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

BEGIN ~_KEVIN~

IF ~True()
~ THEN BEGIN 0 // from:
  SAY #81674 /* ~Don't come in here!!  There's a basilisk loose!  Get out while you're still able.~ */
  IF ~~ THEN REPLY #81675 /* ~All right, we're out of here.~ */ DO ~EscapeArea()
~ EXIT
  IF ~~ THEN REPLY #81676 /* ~How did a basilisk get into a warehouse in the center of the city?~ */ GOTO 1
END

IF ~~ THEN BEGIN 1 // from: 0.1
  SAY #81677 /* ~Gorpel Hind and his adventuring band, the Merry Fools, captured the beast a few weeks back.  It was to be transported to Waterdeep to be shown at a carnival but the thing woke up from its magical slumber before it was supposed to! But enough talk... runnnnn...~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
  IF ~Global("X#KEVIN1","GLOBAL",0)
InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#KEVIN1","GLOBAL",1)~ GOTO 2
  IF ~Global("X#KEVIN1","GLOBAL",0)
InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN DO ~SetGlobal("X#KEVIN1","GLOBAL",1)~ EXTERN ~_FALDOJ~ 156
  IF ~Global("X#KEVIN1","GLOBAL",0)
InParty("coran")
InMyArea("coran")
!StateCheck("coran",CD_STATE_NOTVALID)
Global("P#CoranRomanceInactive","GLOBAL",1)
~ THEN DO ~SetGlobal("X#KEVIN1","GLOBAL",1)~ GOTO 4
  IF ~Global("X#KEVIN1","GLOBAL",0)
InParty("coran")
InMyArea("coran")
!StateCheck("coran",CD_STATE_NOTVALID)
Global("P#CoranRomanceInactive","GLOBAL",1)
~ THEN DO ~SetGlobal("X#KEVIN1","GLOBAL",1)~ EXTERN ~_CORANJ~ 576
END

IF ~~ THEN BEGIN 2 // from: 1.1
  SAY #103260 /* ~Fleeee!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 3 // from:
  SAY #103260 /* ~Fleeee!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 4 // from: 1.3
  SAY #103258 /* ~It's almost here!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN GOTO 5
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN EXTERN ~_FALDOJ~ 157
END

IF ~~ THEN BEGIN 5 // from: 4.1
  SAY #103260 /* ~Fleeee!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END

IF ~~ THEN BEGIN 6 // from:
  SAY #103258 /* ~It's almost here!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN GOTO 7
  IF ~  InParty("faldorn")
InMyArea("faldorn")
!StateCheck("faldorn",CD_STATE_NOTVALID)
~ THEN EXTERN ~_FALDOJ~ 158
END

IF ~~ THEN BEGIN 7 // from: 6.1
  SAY #103260 /* ~Fleeee!~ */
  IF ~~ THEN DO ~EscapeArea()
~ EXIT
END
