// creator  : weidu.exe (version 23100)
// argument : GORSUC01.DLG
// game		 : .
// source	 : ./DATA/25DIALOG.BIF
// dialog	 : ./DIALOG.TLK
// dialogF  : (none)

BEGIN ~GORSUC01~

IF ~NumTimesTalkedTo(0)~ THEN BEGIN 0 // from:
  SAY #67773 /* ~Ahhh, look here, dear ladies.  Yet another hapless wanderer, drifting through these endless portals.  Is it lost, do you think?  Shall we ask it?~ */
  IF ~Global("zGorTan1Job","GLOBAL",2)~ THEN GOTO 1
  IF ~!Global("zGorTan1Job","GLOBAL",2)~ THEN GOTO 2
END

IF ~~ THEN BEGIN 1 // from: 0.0
  SAY #67774 /* ~Do not look at us so suspiciously, little mortal.  You have done the tanar'ri a turn and we will not harm you, as agreed.  Not unless you wish us to, that is... (giggle!)~ */
  IF ~~ THEN GOTO 3
END

IF ~~ THEN BEGIN 2 // from: 0.1
  SAY #67775 /* ~So... what do you think of our little maze-prison, <MALEFEMALE> mortal?  Oh, do not look upon us so suspiciously.  We do not seek to hurt you... much.  (giggle!)~ */
  IF ~~ THEN GOTO 3
END

IF ~~ THEN BEGIN 3 // from: 2.0 1.0
  SAY #67776 /* ~If you wish, my alou sisters and I will be more than glad to lead you through this endless maze to the end, where you can find the cavern with the portal out of this place.  It is your choice, dear mortal.~ */
  IF ~Global("zGorTan1Job","GLOBAL",2)~ THEN REPLY #67777 /* ~No thanks, I'm not interested in your help.~ */ GOTO 4
  IF ~!Global("zGorTan1Job","GLOBAL",2)~ THEN REPLY #67778 /* ~No thanks, I'm not interested in your help.~ */ GOTO 5
  IF ~~ THEN REPLY #67779 /* ~You'll lead me through here?  What's the catch?~ */ GOTO 6
  IF ~~ THEN REPLY #67780 /* ~Forget it, demon-spawn!  Time to die, instead!~ */ GOTO 5
END

IF ~~ THEN BEGIN 4 // from: 6.1 3.0
  SAY #67781 /* ~Then my sisters and I shall leave you to your misery, mortal one.  Come, alou fiends... perhaps there is a hapless baatezu about that we can torment.~ */
  IF ~~ THEN DO ~SetGlobal("SuccubusLeave","GLOBAL",1)~ EXIT
END

IF ~~ THEN BEGIN 5 // from: 6.3 6.2 3.3 3.1
  SAY #67782 /* ~Ah!  It is time for us to make sport, my alou sisters!  Come, let us dance!~ */
  IF ~~ THEN DO ~Enemy()~ EXIT
END

IF ~~ THEN BEGIN 6 // from: 3.2
  SAY #67783 /* ~Nothing more than a kiss, dear one.  A little piece of your life energies, nothing more than a taste, and we shall bring you on your way.  (giggle!)  You can afford it, mortal... what do you say?~ */
  IF ~~ THEN REPLY #67784 /* ~Fine... one kiss and you lead me out of here.~ */ GOTO 7
  IF ~Global("zGorTan1Job","GLOBAL",2)~ THEN REPLY #67785 /* ~Kiss a succubus?  Forget it!  I'll find my own way.~ */ GOTO 4
  IF ~!Global("zGorTan1Job","GLOBAL",2)~ THEN REPLY #67786 /* ~Kiss a succubus?  Forget it!  I'll find my own way.~ */ GOTO 5
  IF ~~ THEN REPLY #67787 /* ~I'd say it's time to die, demon.~ */ GOTO 5
END

IF ~~ THEN BEGIN 7 // from: 6.0
  SAY #67788 /* ~You are most adventurous, mortal... I like that in a <MALEFEMALE>.  One quick embrace, then, and we shall do as we bargained.  (giggle!)~ */
  IF ~~ THEN DO ~SetGlobal("SuccubusMove","GLOBAL",1)
StartCutSceneMode()
StartCutScene("Cut215a")~ EXIT
END

IF ~Global("SuccubusMove","GLOBAL",1)~ THEN BEGIN 8 // from:
  SAY #67789 /* ~Here you are, dear one. This is the cavern you seek.  Whether the portal still works... or if the cambion will even let you use it... is another matter entirely.  (giggle!)  Enjoy!~ */
  IF ~~ THEN DO ~SetGlobal("SuccubusLeave","GLOBAL",1)~ EXIT
END
