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

BEGIN ~NADARI~

IF ~  Global("NADARIN","GLOBAL",0)
ReactionLT(LastTalkedToBy,NEUTRAL_LOWER)
~ THEN BEGIN 0 // from:
  SAY #15228 /* ~With breath that strong, you could kill giants. Now get out of here before I hurt you.~ */
  IF ~~ THEN EXIT
  IF ~Global("X#AloraNadarin1","GLOBAL",0)
InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#AloraNadarin1","GLOBAL",1)~ EXTERN ~ALORAJ~ 32
END

IF ~  Global("NADARIN","GLOBAL",0)
ReactionGT(LastTalkedToBy,HOSTILE_UPPER)
~ THEN BEGIN 1 // from:
  SAY #15229 /* ~Hey, you! You look either bored or foolish. Either way, I could use your services. Some wiseacre tried to send a basilisk by freight and now it's broken free and is making a mess of one of the warehouses at the harbor. As I said, I need someone who's either bored or foolish.~ */
  IF ~~ THEN DO ~SetGlobal("NADARIN","GLOBAL",1)
~ UNSOLVED_JOURNAL #27299 /* ~Basilisk on the Loose
Some idiot let a basilisk get away from the ship carrying it. Now the monster is loose in a dockside warehouse, petrifying everyone it can see. If I can deal with it, Nadarin should reward me.~ */ EXIT
  IF ~Global("X#NADARI1","GLOBAL",0)
InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#NADARI1","GLOBAL",1)~ GOTO 11
  IF ~Global("X#NADARI1","GLOBAL",0)
InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#NADARI1","GLOBAL",1)~ EXTERN ~BRANWJ~ 69
  IF ~Global("X#NADARI1","GLOBAL",0)
InParty("xan")
InMyArea("xan")
!StateCheck("xan",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#NADARI1","GLOBAL",1)~ EXTERN ~XANJ~ 221
  IF ~Global("X#NADARI1","GLOBAL",0)
InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#NADARI1","GLOBAL",1)~ EXTERN ~ALORAJ~ 102
  IF ~Global("X#NADARI1","GLOBAL",0)
InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#NADARI1","GLOBAL",1)~ GOTO 15
  IF ~Global("X#NADARI1","GLOBAL",0)
InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#NADARI1","GLOBAL",1)~ EXTERN ~ALORAJ~ 104
END

IF ~  Global("NADARIN","GLOBAL",1)
!Dead("BASILNAD")
~ THEN BEGIN 2 // from:
  SAY #15230 /* ~Look, how many times do I have to ask you? The docks are more ornamented than the High Hall!~ */
  IF ~~ THEN EXIT
  IF ~Global("X#AloraNadarin3","GLOBAL",0)
InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#AloraNadarin3","GLOBAL",1)~ EXTERN ~ALORAJ~ 30
END

IF ~  Global("NADARIN","GLOBAL",1)
ReactionLT(LastTalkedToBy,FRIENDLY_LOWER)
Dead("BASILNAD")
~ THEN BEGIN 3 // from:
  SAY #15231 /* ~Thanks and long live the foolish! Here's 500 gold pieces for taking care of that on such short notice. Also, you might want these. They're an item I obtained from a fence I know in Athkatla. You never know, they might fit you.~ */
  IF ~~ THEN DO ~EraseJournalEntry(27299)
AddexperienceParty(1300)
GiveGoldForce(500)
GiveItem("BOOT02",LastTalkedToBy)
SetGlobal("NADARIN","GLOBAL",2)
~ SOLVED_JOURNAL #27300 /* ~Basilisk on the Loose
That escaped basilisk will terrorize no one else. Nadarin offered a nice reward for the deed.~ */ EXIT
  IF ~Global("X#AloraNadarin4","GLOBAL",0)
InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#AloraNadarin4","GLOBAL",1)~ EXTERN ~ALORAJ~ 29
END

IF ~  Global("NADARIN","GLOBAL",1)
ReactionGT(LastTalkedToBy,NEUTRAL_UPPER)
Dead("BASILNAD")
~ THEN BEGIN 4 // from:
  SAY #15232 /* ~Thank the gods for bored adventurers. I don't know what we'd do without you. Here's 500 gold pieces for your help.~ */
  IF ~~ THEN DO ~EraseJournalEntry(27299)
AddexperienceParty(1300)
GiveGoldForce(500)
SetGlobal("NADARIN","GLOBAL",2)
~ SOLVED_JOURNAL #27300 /* ~Basilisk on the Loose
That escaped basilisk will terrorize no one else. Nadarin offered a nice reward for the deed.~ */ EXIT
END

IF ~  False()
~ THEN BEGIN 5 // from:
  SAY #15233 /* ~Curses! You adventurers are all the same! I've got an emergency to deal with and all you want to do is cause trouble! Damn you to the Ninth Hell!~ */
  IF ~~ THEN EXIT
END

IF ~  True()
~ THEN BEGIN 6 // from:
  SAY #15234 /* ~Cheers to all of you for saving our docks from becoming a stone quarry!~ */
  IF ~~ THEN EXIT
  IF ~Global("X#AloraNadarin5","GLOBAL",0)
InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#AloraNadarin5","GLOBAL",1)~ EXTERN ~ALORAJ~ 28
END

IF ~~ THEN BEGIN 7 // from:
  SAY #18715 /* ~~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 8 // from:
  SAY #28973 /* ~Bah!~ */
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 9 // from:
  SAY #46835 /* ~Bah, you aren't smelling too great yourself, woman!~ */
  IF ~~ THEN DO ~EraseJournalEntry(27299)
AddexperienceParty(1300)
GiveGoldForce(500)
GiveItem("BOOT02",LastTalkedToBy)
SetGlobal("NADARIN","GLOBAL",2)
~ SOLVED_JOURNAL #27300 /* ~Basilisk on the Loose
That escaped basilisk will terrorize no one else. Nadarin offered a nice reward for the deed.~ */ EXIT
END

IF ~~ THEN BEGIN 10 // from:
  SAY #46837 /* ~Please, get outta my face and go kill that damned monster 'fore I suffer a hernia.~ */
  IF ~~ THEN EXIT
  IF ~  InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN EXTERN ~ALORAJ~ 31
END

IF ~~ THEN BEGIN 11 // from: 1.1
  SAY #49815 /* ~Bored, foolish and have a score t' settle. You qualify.~ */
  IF ~~ THEN DO ~SetGlobal("NADARIN","GLOBAL",1)
~ UNSOLVED_JOURNAL #27299 /* ~Basilisk on the Loose
Some idiot let a basilisk get away from the ship carrying it. Now the monster is loose in a dockside warehouse, petrifying everyone it can see. If I can deal with it, Nadarin should reward me.~ */ EXIT
END

IF ~~ THEN BEGIN 12 // from:
  SAY #49815 /* ~Bored, foolish and have a score t' settle. You qualify.~ */
  IF ~~ THEN DO ~SetGlobal("NADARIN","GLOBAL",1)
~ UNSOLVED_JOURNAL #27299 /* ~Basilisk on the Loose
Some idiot let a basilisk get away from the ship carrying it. Now the monster is loose in a dockside warehouse, petrifying everyone it can see. If I can deal with it, Nadarin should reward me.~ */ EXIT
END

IF ~~ THEN BEGIN 13 // from:
  SAY #49815 /* ~Bored, foolish and have a score t' settle. You qualify.~ */
  IF ~~ THEN DO ~SetGlobal("NADARIN","GLOBAL",1)
~ UNSOLVED_JOURNAL #27299 /* ~Basilisk on the Loose
Some idiot let a basilisk get away from the ship carrying it. Now the monster is loose in a dockside warehouse, petrifying everyone it can see. If I can deal with it, Nadarin should reward me.~ */ EXIT
END

IF ~~ THEN BEGIN 14 // from:
  SAY #49815 /* ~Bored, foolish and have a score t' settle. You qualify.~ */
  IF ~~ THEN DO ~SetGlobal("NADARIN","GLOBAL",1)
~ UNSOLVED_JOURNAL #27299 /* ~Basilisk on the Loose
Some idiot let a basilisk get away from the ship carrying it. Now the monster is loose in a dockside warehouse, petrifying everyone it can see. If I can deal with it, Nadarin should reward me.~ */ EXIT
END

IF ~~ THEN BEGIN 15 // from: 1.5
  SAY #49811 /* ~ My lucky day, then. I got someone who's bored AND foolish.~ */
  IF ~~ THEN DO ~SetGlobal("NADARIN","GLOBAL",1)
~ UNSOLVED_JOURNAL #27299 /* ~Basilisk on the Loose
Some idiot let a basilisk get away from the ship carrying it. Now the monster is loose in a dockside warehouse, petrifying everyone it can see. If I can deal with it, Nadarin should reward me.~ */ EXIT
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 16
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 72
  IF ~  InParty("xan")
InMyArea("xan")
!StateCheck("xan",CD_STATE_NOTVALID)
~ THEN EXTERN ~XANJ~ 223
  IF ~  InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN EXTERN ~ALORAJ~ 103
END

IF ~~ THEN BEGIN 16 // from: 15.1
  SAY #49815 /* ~Bored, foolish and have a score t' settle. You qualify.~ */
  IF ~~ THEN DO ~SetGlobal("NADARIN","GLOBAL",1)
~ UNSOLVED_JOURNAL #27299 /* ~Basilisk on the Loose
Some idiot let a basilisk get away from the ship carrying it. Now the monster is loose in a dockside warehouse, petrifying everyone it can see. If I can deal with it, Nadarin should reward me.~ */ EXIT
END

IF ~~ THEN BEGIN 17 // from:
  SAY #49811 /* ~ My lucky day, then. I got someone who's bored AND foolish.~ */
  IF ~~ THEN DO ~SetGlobal("NADARIN","GLOBAL",1)
~ UNSOLVED_JOURNAL #27299 /* ~Basilisk on the Loose
Some idiot let a basilisk get away from the ship carrying it. Now the monster is loose in a dockside warehouse, petrifying everyone it can see. If I can deal with it, Nadarin should reward me.~ */ EXIT
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN GOTO 18
  IF ~  InParty("branwen")
InMyArea("branwen")
!StateCheck("branwen",CD_STATE_NOTVALID)
~ THEN EXTERN ~BRANWJ~ 73
  IF ~  InParty("xan")
InMyArea("xan")
!StateCheck("xan",CD_STATE_NOTVALID)
~ THEN EXTERN ~XANJ~ 224
  IF ~  InParty("alora")
InMyArea("alora")
!StateCheck("alora",CD_STATE_NOTVALID)
~ THEN EXTERN ~ALORAJ~ 105
END

IF ~~ THEN BEGIN 18 // from: 17.1
  SAY #49815 /* ~Bored, foolish and have a score t' settle. You qualify.~ */
  IF ~~ THEN DO ~SetGlobal("NADARIN","GLOBAL",1)
~ UNSOLVED_JOURNAL #27299 /* ~Basilisk on the Loose
Some idiot let a basilisk get away from the ship carrying it. Now the monster is loose in a dockside warehouse, petrifying everyone it can see. If I can deal with it, Nadarin should reward me.~ */ EXIT
END
