BEGIN ~brathl~

IF WEIGHT #3 ~NumTimesTalkedTo(0)~ THEN BEGIN 0
  SAY @2534
  IF ~~ THEN DO ~MoveToPoint([638.1014])~ EXIT
END

IF WEIGHT #4 ~NumTimesTalkedTo(1)~ THEN BEGIN 1
  SAY @2535
  IF ~~ THEN DO ~MoveToPoint([759.986])~ JOURNAL @310755 EXIT
END

IF WEIGHT #5 ~NumTimesTalkedTo(2)~ THEN BEGIN 2
  SAY @2539
  IF ~~ THEN DO ~MoveToPoint([892.920])~ EXIT
END

IF WEIGHT #6 ~NumTimesTalkedTo(3)~ THEN BEGIN 3
  SAY @2540
  IF ~~ THEN DO ~MoveToPoint([855.856])~ EXIT
END

IF WEIGHT #7 ~NumTimesTalkedTo(4)~ THEN BEGIN 4
  SAY @2541
  IF ~~ THEN DO ~MoveToPoint([760.906])~ EXIT
END

IF WEIGHT #8 ~NumTimesTalkedTo(5)~ THEN BEGIN 5
  SAY @2542
  IF ~~ THEN JOURNAL @310756 EXIT
END

IF WEIGHT #9 ~NumTimesTalkedTo(6)~ THEN BEGIN 6
  SAY @2543
  IF ~~ THEN REPLY @2544 GOTO 7
  IF ~~ THEN REPLY @2545 GOTO 8
  IF ~~ THEN REPLY @2546 GOTO 9
  IF ~~ THEN REPLY @2547 GOTO 10
END

IF ~~ THEN BEGIN 7
  SAY @2550
  IF ~Global("WardsClue","GLOBAL",1)~ THEN REPLY @2559 JOURNAL @310757 GOTO 11
  IF ~~ THEN REPLY @2561 GOTO 8
  IF ~~ THEN REPLY @2562 GOTO 9
  IF ~~ THEN REPLY @2563 GOTO 10
END

IF ~~ THEN BEGIN 8
  SAY @2551
  IF ~~ THEN REPLY @2565 JOURNAL @310758 GOTO 7
  IF ~~ THEN REPLY @2566 GOTO 9
  IF ~~ THEN REPLY @2567 GOTO 10
END

IF ~~ THEN BEGIN 9
  SAY @2552
  IF ~~ THEN REPLY @2569 GOTO 7
  IF ~~ THEN REPLY @2548 GOTO 8
  IF ~~ THEN REPLY @2549 GOTO 10
END

IF ~~ THEN BEGIN 10
  SAY @2553
  IF ~~ THEN DO ~EscapeArea()~ EXIT
END

IF ~~ THEN BEGIN 11
  SAY @2554
  IF ~~ THEN DO ~CreateCreature("FLAM6",[171.1167],0)
CreateCreature("FLAM6",[225.1169],0)
CreateCreature("FLAM6",[405.1330],0)
EscapeArea()~ JOURNAL @310759 EXIT
END

IF ~~ THEN BEGIN 12
  SAY @6255
  IF ~~ THEN EXIT
END

IF WEIGHT #1 ~StateCheck(Myself,STATE_CHARMED)~ THEN BEGIN 13
  SAY @6256
  IF ~~ THEN DO ~SetGlobal("WardsClue","GLOBAL",1)~ JOURNAL @310760 EXIT
END

IF ~~ THEN BEGIN 14
  SAY @9302
  IF ~~ THEN EXIT
END
