BEGIN ~mtbe3~

IF ~NumTimesTalkedTo(0)~ THEN BEGIN 0
  SAY @8059
  IF ~ReactionGT(LastTalkedToBy(),HOSTILE_UPPER)~ THEN REPLY @8064 GOTO 1
  IF ~ReactionLT(LastTalkedToBy(),NEUTRAL_LOWER)~ THEN REPLY @8065 GOTO 2
  IF ~~ THEN REPLY @8066 GOTO 3
  IF ~~ THEN REPLY @8067 GOTO 4
END

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

IF ~~ THEN BEGIN 2
  SAY @8061
  IF ~~ THEN EXIT
END

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

IF ~~ THEN BEGIN 4
  SAY @8063
  IF ~~ THEN EXIT
END

IF ~StateCheck(Myself,STATE_CHARMED)~ THEN BEGIN 5
  SAY @8068
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 6
  SAY @9052
  IF ~~ THEN EXIT
END
