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

BEGIN ~TAMAH~

IF ~  True()
~ THEN BEGIN 0 // from:
  SAY #10641 /* ~What... who are... what has happened?~ */
  IF ~~ THEN REPLY #10642 /* ~Rest yourself, you have likely been petrified for some time now.~ */ GOTO 1
  IF ~~ THEN REPLY #10643 /* ~I have rescued you. What have you to give me as payment?~ */ GOTO 2
  IF ~~ THEN REPLY #10667 /* ~My name is unimportant. All that matters is that you are free.~ */ GOTO 5
  IF ~Global("X#VicTamah","GLOBAL",0)
InParty("viconia")
InMyArea("viconia")
!StateCheck("viconia",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#VicTamah","GLOBAL",1)~ EXTERN ~VICONJ~ 132
END

IF ~~ THEN BEGIN 1 // from: 0.0 VICONJ:133.0 VICONJ:132.0
  SAY #10668 /* ~Petri...? How... I remember fighting some gnolls and... and one turned to stone right before my eyes! I turned around and there was this lizard-thing... and then... and then you. I was turned to stone? For how long?~ */
  IF ~~ THEN REPLY #10875 /* ~I do not know. All that is important is that you are free now.~ */ GOTO 5
  IF ~~ THEN REPLY #10902 /* ~I do not care. I suggest you pay me for your rescue, lest you join the dead once more.~ */ GOTO 2
END

IF ~~ THEN BEGIN 2 // from: 1.1 0.1 VICONJ:133.1 VICONJ:132.1
  SAY #10903 /* ~Rescued? But I was... I was fighting gnolls and then... I couldn't move. You have saved me? I... I suppose I should offer you something, though I don't much like your tone. I have very little to give... I suppose you want gold or jewels?~ */
  IF ~~ THEN REPLY #10906 /* ~My apologies, I should not have taken advantage of you thus. Your thanks is reward enough.~ */ GOTO 5
  IF ~~ THEN REPLY #10907 /* ~Whatever you have is deservedly mine! You would still be "dead" without me!~ */ GOTO 3
END

IF ~~ THEN BEGIN 3 // from: 2.1
  SAY #10908 /* ~A valid point I suppose, though you have me at a disadvantage. I have little left in the world and nothing of value with me. In lieu of coins I will give you that which means the most to me. You may have my home, if that is what you wish.~ */
  IF ~~ THEN REPLY #10909 /* ~Yes, yes, yes, enough talk! Where is it?~ */ GOTO 4
  IF ~~ THEN REPLY #10910 /* ~I would not dream of it. Please, your freedom is reward enough.~ */ GOTO 6
END

IF ~~ THEN BEGIN 4 // from: 3.0
  SAY #10911 /* ~It is a lovely house next to a small lake just south of Beregost. I have no idea how long it has been deserted, though I am sure it shall suit your disposition just fine. I reluctantly thank you, and now take my leave.~ */
  IF ~~ THEN DO ~ReputationInc(-1)
EscapeArea()
~ SOLVED_JOURNAL #27458 /* ~Tamah Rescued
After we rescued her from basilisk petrification, Tamah offered me her lakeside house south of Beregost. Apparently it has stood empty for some time.~ */ EXIT
  IF ~Global("X#BranwenTamah1","GLOBAL",0)
InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#BranwenTamah1","GLOBAL",1)~ EXTERN ~BRANWJ~ 34
END

IF ~~ THEN BEGIN 5 // from: 2.0 1.0 0.2 VICONJ:133.2 VICONJ:132.2
  SAY #10912 /* ~I... I thank you! You have rescued a perfect stranger and... and asked for nothing in return. Certainly a selfless act if ever I have heard of one. I shall speak well of you to anyone that asks. Thank you once again!~ */
  IF ~~ THEN DO ~AddexperienceParty(300)
ReputationInc(1)
EscapeArea()
~ SOLVED_JOURNAL #27459 /* ~Tamah Rescued
Young Tamah fell prey to a basilisk's petrifying gaze. I was happy to rescue her.~ */ EXIT
  IF ~Global("X#BranwenTamah2","GLOBAL",0)
InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#BranwenTamah2","GLOBAL",1)~ EXTERN ~BRANWJ~ 37
END

IF ~~ THEN BEGIN 6 // from: 3.1
  SAY #10913 /* ~You are charitable, albeit reluctantly. I thank you for my rescue, and will not speak ill of you in my travels. Goodbye.~ */
  IF ~~ THEN DO ~EscapeArea()
~ SOLVED_JOURNAL #27460 /* ~Tamah Rescued
Young Tamah fell prey to a basilisk's petrifying gaze. Luckily for her I happened to come along.~ */ EXIT
  IF ~Global("X#BranwenTamah3","GLOBAL",0)
InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#BranwenTamah3","GLOBAL",1)~ EXTERN ~BRANWJ~ 40
END

IF ~~ THEN BEGIN 7 // from:
  SAY #45166 /* ~Have basilisks sneaked up on you also?~ */
  IF ~~ THEN DO ~ReputationInc(-1)
EscapeArea()
~ SOLVED_JOURNAL #27458 /* ~Tamah Rescued
After we rescued her from basilisk petrification, Tamah offered me her lakeside house south of Beregost. Apparently it has stood empty for some time.~ */ EXIT
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 9
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 36
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 8
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 35
END

IF ~~ THEN BEGIN 8 // from: 7.3
  SAY #45168 /* ~That is horrible!~ */
  IF ~~ THEN DO ~ReputationInc(-1)
EscapeArea()
~ SOLVED_JOURNAL #27458 /* ~Tamah Rescued
After we rescued her from basilisk petrification, Tamah offered me her lakeside house south of Beregost. Apparently it has stood empty for some time.~ */ EXIT
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 9
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 36
END

IF ~~ THEN BEGIN 9 // from: 8.1 7.1
  SAY #45170 /* ~Thank you.~ */
  IF ~~ THEN DO ~ReputationInc(-1)
EscapeArea()
~ SOLVED_JOURNAL #27458 /* ~Tamah Rescued
After we rescued her from basilisk petrification, Tamah offered me her lakeside house south of Beregost. Apparently it has stood empty for some time.~ */ EXIT
END

IF ~~ THEN BEGIN 10 // from:
  SAY #45166 /* ~Have basilisks sneaked up on you also?~ */
  IF ~~ THEN DO ~AddexperienceParty(300)
ReputationInc(1)
EscapeArea()
~ SOLVED_JOURNAL #27459 /* ~Tamah Rescued
Young Tamah fell prey to a basilisk's petrifying gaze. I was happy to rescue her.~ */ EXIT
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 12
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 39
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 11
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 38
END

IF ~~ THEN BEGIN 11 // from: 10.3
  SAY #45168 /* ~That is horrible!~ */
  IF ~~ THEN DO ~AddexperienceParty(300)
ReputationInc(1)
EscapeArea()
~ SOLVED_JOURNAL #27459 /* ~Tamah Rescued
Young Tamah fell prey to a basilisk's petrifying gaze. I was happy to rescue her.~ */ EXIT
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 12
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 39
END

IF ~~ THEN BEGIN 12 // from: 11.1 10.1
  SAY #45170 /* ~Thank you.~ */
  IF ~~ THEN DO ~AddexperienceParty(300)
ReputationInc(1)
EscapeArea()
~ SOLVED_JOURNAL #27459 /* ~Tamah Rescued
Young Tamah fell prey to a basilisk's petrifying gaze. I was happy to rescue her.~ */ EXIT
END

IF ~~ THEN BEGIN 13 // from:
  SAY #45166 /* ~Have basilisks sneaked up on you also?~ */
  IF ~~ THEN DO ~EscapeArea()
~ SOLVED_JOURNAL #27460 /* ~Tamah Rescued
Young Tamah fell prey to a basilisk's petrifying gaze. Luckily for her I happened to come along.~ */ EXIT
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 15
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 42
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 14
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 41
END

IF ~~ THEN BEGIN 14 // from: 13.3
  SAY #45168 /* ~That is horrible!~ */
  IF ~~ THEN DO ~EscapeArea()
~ SOLVED_JOURNAL #27460 /* ~Tamah Rescued
Young Tamah fell prey to a basilisk's petrifying gaze. Luckily for her I happened to come along.~ */ EXIT
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 15
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 42
END

IF ~~ THEN BEGIN 15 // from: 14.1 13.1
  SAY #45170 /* ~Thank you.~ */
  IF ~~ THEN DO ~EscapeArea()
~ SOLVED_JOURNAL #27460 /* ~Tamah Rescued
Young Tamah fell prey to a basilisk's petrifying gaze. Luckily for her I happened to come along.~ */ EXIT
END
