BEGIN ~_READ4~

IF WEIGHT #2 ~NumberOfTimesTalkedTo(0)
~ THEN BEGIN 0
  SAY @40116
  IF ~~ THEN EXIT
END

IF WEIGHT #3 ~NumTimesTalkedToGT(0)
~ THEN BEGIN 1
  SAY @40117
  IF ~~ THEN EXIT
END

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

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