// creator  : weidu.exe (version 23100)
// argument : _PROST1.DLG
// game		 : .
// source	 : ./override/_PROST1.DLG
// dialog	 : ./DIALOG.TLK
// dialogF  : (none)

BEGIN ~_PROST1~

IF ~RandomNum(8,8)
~ THEN BEGIN 0 // from:
  SAY #75096 /* ~Ooo love.  You're a cheeky monkey, aren't you?~ */
  IF ~~ THEN EXIT
END

IF ~RandomNum(8,1)
~ THEN BEGIN 1 // from:
  SAY #75097 /* ~I love a fighter in full plate.  They just look so... hard.~ */
  IF ~~ THEN EXIT
END

IF ~RandomNum(8,2)
~ THEN BEGIN 2 // from:
  SAY #75098 /* ~I generally avoid temptation unless I can't resist it.~ */
  IF ~~ THEN EXIT
END

IF ~RandomNum(8,3)
~ THEN BEGIN 3 // from:
  SAY #75099 /* ~I'm no angel, but I've spread my wings a bit.~ */
  IF ~~ THEN EXIT
END

IF ~RandomNum(8,4)
~ THEN BEGIN 4 // from:
  SAY #75100 /* ~It is better to be looked over than overlooked.~ */
  IF ~~ THEN EXIT
END

IF ~RandomNum(8,5)
~ THEN BEGIN 5 // from:
  SAY #75101 /* ~The curve is more powerful than the sword.~ */
  IF ~~ THEN EXIT
  IF ~Global("X#SharCourtesan1","GLOBAL",0)
OR(2)
Gender(Player1,FEMALE)
!Class(Player1,FIGHTER_ALL)
OR(5)
Gender(Player2,MALE)
Gender(Player3,MALE)
Gender(Player4,MALE)
Gender(Player5,MALE)
Gender(Player6,MALE)
~ THEN DO ~SetGlobal("X#SharCourtesan1","GLOBAL",1)~ GOTO 8
  IF ~Global("X#SharCourtesan1","GLOBAL",0)
Gender(Player1,MALE)
Class(Player1,FIGHTER_ALL)
~ THEN DO ~SetGlobal("X#SharCourtesan1","GLOBAL",1)~ GOTO 9
  IF ~Global("X#SharCourtesan1","GLOBAL",0)
InParty("sharteel")
InMyArea("sharteel")
!StateCheck("sharteel",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#SharCourtesan1","GLOBAL",1)~ EXTERN ~_SHARTJ~ 74
END

IF ~RandomNum(8,6)
~ THEN BEGIN 6 // from:
  SAY #75102 /* ~Too many girls follow the line of least resistance... but a good line is hard to resist.~ */
  IF ~~ THEN EXIT
END

IF ~RandomNum(8,7)
~ THEN BEGIN 7 // from:
  SAY #75103 /* ~Anything worth doing is worth doing slowly.~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 8 // from: 5.1
  SAY #99783 /* ~Ooo... I know who'd end up on top, dear. I can see it in his eyes...~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 9 // from: 5.2
  SAY #99782 /* ~Ooo... I know who'd end up on top, dear. And I do not mind it a single bit. I love a fighter in full plate. They just look so... hard.~ */
  IF ~~ THEN EXIT
  IF ~  OR(2)
Gender(Player1,FEMALE)
!Class(Player1,FIGHTER_ALL)
OR(5)
Gender(Player2,MALE)
Gender(Player3,MALE)
Gender(Player4,MALE)
Gender(Player5,MALE)
Gender(Player6,MALE)
~ THEN GOTO 10
END

IF ~~ THEN BEGIN 10 // from: 9.1
  SAY #99783 /* ~Ooo... I know who'd end up on top, dear. I can see it in his eyes...~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 11 // from: _SHARTJ:74.2
  SAY #99782 /* ~Ooo... I know who'd end up on top, dear. And I do not mind it a single bit. I love a fighter in full plate. They just look so... hard.~ */
  IF ~~ THEN EXIT
  IF ~  OR(2)
Gender(Player1,FEMALE)
!Class(Player1,FIGHTER_ALL)
OR(5)
Gender(Player2,MALE)
Gender(Player3,MALE)
Gender(Player4,MALE)
Gender(Player5,MALE)
Gender(Player6,MALE)
~ THEN GOTO 12
END

IF ~~ THEN BEGIN 12 // from: _SHARTJ:74.1 11.1
  SAY #99783 /* ~Ooo... I know who'd end up on top, dear. I can see it in his eyes...~ */
  IF ~~ THEN EXIT
END
