BEGIN ~ironm4~

IF ~NumTimesTalkedTo(0)~ THEN BEGIN 0
  SAY @7662
  IF ~~ THEN REPLY @7672 GOTO 1
  IF ~~ THEN REPLY @7673 GOTO 2
  IF ~~ THEN REPLY @7674 GOTO 5
END

IF ~~ THEN BEGIN 1
  SAY @7663
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 2
  SAY @7664
  IF ~~ THEN REPLY @7675 GOTO 3
  IF ~~ THEN REPLY @7676 GOTO 4
  IF ~~ THEN REPLY @7677 GOTO 1
END

IF ~~ THEN BEGIN 3
  SAY @7665
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 4
  SAY @7666
  IF ~~ THEN DO ~CreateCreature("IRONGU",[936.836],0)
CreateCreature("IRONGU",[936.836],0)
CreateCreature("IRONGU",[936.836],0)
EscapeArea()~ EXIT
END

IF ~~ THEN BEGIN 5
  SAY @7667
  IF ~~ THEN REPLY @7678 GOTO 6
  IF ~~ THEN REPLY @7679 GOTO 7
  IF ~~ THEN REPLY @7680 GOTO 8
END

IF ~~ THEN BEGIN 6
  SAY @7668
  IF ~~ THEN UNSOLVED_JOURNAL @310381 GOTO 9
END

IF ~~ THEN BEGIN 7
  SAY @7669
  IF ~~ THEN GOTO 9
END

IF ~~ THEN BEGIN 8
  SAY @7670
  IF ~~ THEN DO ~SetGlobal("SearchIronThrone","GLOBAL",1)~ UNSOLVED_JOURNAL @310382 GOTO 9
END

IF ~~ THEN BEGIN 9
  SAY @7671
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 10
  SAY @7681
  IF ~~ THEN EXIT
END

IF ~StateCheck(Myself,STATE_CHARMED)~ THEN BEGIN 11
  SAY @7685
  IF ~~ THEN UNSOLVED_JOURNAL @310383 EXIT
END

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