BEGIN ~alyth~

IF WEIGHT #4 ~NumTimesTalkedTo(0)~ THEN BEGIN 0
  SAY @8335
  IF ~~ THEN REPLY @8342 GOTO 1
  IF ~~ THEN REPLY @8343 GOTO 2
  IF ~~ THEN REPLY @8344 GOTO 3
END

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

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

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

IF WEIGHT #0 ~NumTimesTalkedToGT(0)
ReactionLT(LastTalkedToBy,NEUTRAL_LOWER)~ THEN BEGIN 4
  SAY @8340
  IF ~~ THEN EXIT
END

IF WEIGHT #1 ~NumTimesTalkedToGT(0)
ReactionGT(LastTalkedToBy(),HOSTILE_UPPER)~ THEN BEGIN 5
  SAY @8341
  IF ~~ THEN DO ~StartStore("tav0721",LastTalkedToBy())~ EXIT
END

IF WEIGHT #2 ~StateCheck(Myself,STATE_CHARMED)~ THEN BEGIN 6
  SAY @8345
  IF ~~ THEN EXIT
END

IF ~~ THEN BEGIN 7
  SAY @9191
  IF ~~ THEN EXIT
END
