// creator  : weidu.exe (version 23600)
// argument : ARKUSH.DLG
// game     : .
// source   : ./override/ARKUSH.DLG
// dialog   : lang\en_us/dialog.tlk
// dialogF  : (none)

BEGIN ~ARKUSH~

IF ~  True()
~ THEN BEGIN 0 // from:
  SAY #18355 /* ~Who might you be then? Ah, great adventurers no doubt? I could tell by your hands. Stained with magic and the effort of hefting a weapon. Such markings may be invisible to the average eye, but I can see them plain as day. I can see a lot plain as day. Care for a consultation? Perhaps a little old fashioned palm reading? A little gypsy magic to steer your course straight and true?~ */
  IF ~~ THEN REPLY #18364 /* ~Begone. I have no use for your rambling incantations. I have access to my own magic.~ */ GOTO 1
  IF ~~ THEN REPLY #18369 /* ~I see no harm in a little divination on your part. Here is my palm. What does it tell you?~ */ GOTO 2
  IF ~Global("X#ARKUSH0","GLOBAL",0)
InParty("dynaheir")
InMyArea("dynaheir")
!StateCheck("dynaheir",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#ARKUSH0","GLOBAL",1)~ EXTERN ~DYNAHJ~ 251
  IF ~Global("X#ARKUSH0","GLOBAL",0)
InParty("viconia")
InMyArea("viconia")
!StateCheck("viconia",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#ARKUSH0","GLOBAL",1)~ EXTERN ~VICONJ~ 197
  IF ~Global("X#ARKUSH0","GLOBAL",0)
OR(3)
Class(Player1,SORCERER)
Class(Player1,BARD_ALL)
Class(Player1,MAGE_ALL)
InParty("edwin")
InMyArea("edwin")
!StateCheck("edwin",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#ARKUSH0","GLOBAL",1)~ EXTERN ~EDWINJ~ 175
  IF ~Global("X#ARKUSH0","GLOBAL",0)
InParty("edwin")
InMyArea("edwin")
!StateCheck("edwin",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#ARKUSH0","GLOBAL",1)~ EXTERN ~EDWINJ~ 176
END

IF ~~ THEN BEGIN 1 // from: 0.0 DYNAHJ:254.0 DYNAHJ:253.0 DYNAHJ:252.0 DYNAHJ:251.0 EDWINJ:177.0 EDWINJ:176.0 EDWINJ:175.0
  SAY #18365 /* ~No doubt you do, but what I offer is not magic in your sense but rather a reading of YOU. Nothing to do with summoning energy, just the reading of that which is already there. Give me your palm, and I shall demonstrate.~ */
  IF ~~ THEN REPLY #18368 /* ~I have no interest! Twice I have said this, so leave me be!~ */ GOTO 9
  IF ~~ THEN REPLY #18410 /* ~If you feel you must, then I see no harm.~ */ GOTO 2
END

IF ~~ THEN BEGIN 2 // from: 1.1 0.1 DYNAHJ:254.1 DYNAHJ:253.1 DYNAHJ:252.1 DYNAHJ:251.1 EDWINJ:177.1 EDWINJ:176.1 EDWINJ:175.1
  SAY #18372 /* ~Let's have a look now. Interesting. Though you live the hard life now, your hand tells of a softer existence not long ago. I assume that you have just recently taken to the road?~ */
  IF ~~ THEN REPLY #18375 /* ~That much is true, yes. Do go on.~ */ GOTO 3
  IF ~~ THEN REPLY #18379 /* ~I do not wish to know your opinion of my manicure. Enough of this foolishness.~ */ GOTO 9
END

IF ~~ THEN BEGIN 3 // from: 2.0
  SAY #18377 /* ~I thought as much. Let's have a little closer look now. Back down your life line. I see a scholarly influence, and you are well educated. You had a mentor who was a great sage? Perhaps of considerable power as well?~ */
  IF ~~ THEN REPLY #18414 /* ~My foster father Gorion was a sage, and a bit of a mage as well. Go on.~ */ GOTO 4
  IF ~~ THEN REPLY #18416 /* ~Oh, end this game. I do not wish to indulge this any further.~ */ GOTO 9
END

IF ~~ THEN BEGIN 4 // from: 3.0
  SAY #18413 /* ~You had a reasonably happy childhood with him, aside from being a little difficult. My my, but you were quite the little hellion. Wonder where that comes from? Let's see what we can't learn about you back before this Gorion. Further back I see... I see... Merciful gods! I-see-a-long-and-happy-life-for-you-and-yours. 10 gold, please, and I'll be on my way.~ */
  IF ~~ THEN REPLY #18429 /* ~Well, a happy ending after all. Here's your gold. Thanks for the reading.~ */ GOTO 5
  IF ~~ THEN REPLY #18433 /* ~What? What is it that you saw?~ */ GOTO 6
  IF ~Global("X#XzarArkushule","GLOBAL",0)
InParty("xzar")
InMyArea("xzar")
!StateCheck("xzar",CD_STATE_NOTVALID)
InParty("montaron")
InMyArea("montaron")
!StateCheck("montaron",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#XzarArkushule","GLOBAL",1)~ EXTERN ~XZARJ~ 112
END

IF ~~ THEN BEGIN 5 // from: 7.1 6.0 4.0
  SAY #18431 /* ~I change my mind, I shan't touch it! I take nothing from you! Leave me!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
  IF ~Global("SafArkush5","GLOBAL",0)
InParty("safana")
InMyArea("safana")
!StateCheck("safana",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SafArkush5","GLOBAL",1)~ EXTERN ~SAFANJ~ 14
  IF ~Global("X#ImoenArkushule1","GLOBAL",0)
InParty("imoen")
InMyArea("imoen")
!StateCheck("imoen",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#ImoenArkushule1","GLOBAL",1)~ EXTERN ~IMOEN2~ 167
END

IF ~~ THEN BEGIN 6 // from: 4.1
  SAY #18434 /* ~I saw nothing! You will live long and enjoy life, and I will be going now! Back from me!~ */
  IF ~~ THEN REPLY #18435 /* ~Suit yourself. Here is the gold you asked for.~ */ GOTO 5
  IF ~~ THEN REPLY #18436 /* ~You must tell me. Please, dear lady.~ */ GOTO 7
END

IF ~~ THEN BEGIN 7 // from: 6.1
  SAY #18437 /* ~I have told all I am going to. Stay back from me! Your life is none of my affair!~ */
  IF ~~ THEN REPLY #18438 /* ~Please, I don't mean to be rude. Just tell me what your vision revealed.~ */ GOTO 8
  IF ~~ THEN REPLY #18439 /* ~As you would have it. Here is the gold you asked for.~ */ GOTO 5
END

IF ~~ THEN BEGIN 8 // from: 7.0
  SAY #18440 /* ~Stay away from me! I warn you, I'll not let you near me!~ */
  IF ~~ THEN DO ~Enemy()
~ EXIT
  IF ~Global("SafArkush8","GLOBAL",0)
InParty("safana")
InMyArea("safana")
!StateCheck("safana",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SafArkush8","GLOBAL",1)~ EXTERN ~SAFANJ~ 15
  IF ~Global("X#ImoenArkushule2","GLOBAL",0)
InParty("imoen")
InMyArea("imoen")
!StateCheck("imoen",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#ImoenArkushule2","GLOBAL",1)~ EXTERN ~IMOEN2~ 168
END

IF ~~ THEN BEGIN 9 // from: 3.1 2.1 1.0
  SAY #18441 /* ~If that is what you wish, so be it. I would be a touch more polite to old gypsy women in your future though. Not all would take your rebuff as good-naturedly. Fare thee well.~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 10 // from:
  SAY #9057 /* ~Leave me!~ */
  IF ~~ THEN DO ~SetGlobal("X#SafArkush5","GLOBAL",1)
EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 11 // from:
  SAY #41902 /* ~No names! I don't want to know names! Do not come nearer!~ */
  IF ~~ THEN DO ~SetGlobal("X#SafArkush8","GLOBAL",1)
Enemy()
~ EXIT
END

IF ~~ THEN BEGIN 12 // from:
  SAY #46974 /* ~I don't want none of your gold, you hear?~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
  IF ~Global("SafArkush5","GLOBAL",0)
InParty("safana")
InMyArea("safana")
!StateCheck("safana",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SafArkush5","GLOBAL",1)~ EXTERN ~SAFANJ~ 14
END

IF ~~ THEN BEGIN 13 // from:
  SAY #46976 /* ~Aiyee!~ */
  IF ~~ THEN DO ~Enemy()
~ EXIT
  IF ~Global("SafArkush8","GLOBAL",0)
InParty("safana")
InMyArea("safana")
!StateCheck("safana",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("SafArkush8","GLOBAL",1)~ EXTERN ~SAFANJ~ 15
END
