BEGIN ~ftowna~

IF WEIGHT #3 ~RandomNum(10,1)
GlobalLT("Chapter","GLOBAL",4)~ THEN BEGIN 0
  SAY @328
  IF ~~ THEN UNSOLVED_JOURNAL @310562 EXIT
END

IF WEIGHT #4 ~RandomNum(10,2)
GlobalLT("Chapter","GLOBAL",4)~ THEN BEGIN 1
  SAY @329
  IF ~~ THEN UNSOLVED_JOURNAL @310559 EXIT
END

IF WEIGHT #5 ~RandomNum(10,3)~ THEN BEGIN 2
  SAY @330
  IF ~~ THEN EXIT
END

IF WEIGHT #6 ~RandomNum(10,4)
!Global("OublekBounty2","GLOBAL",1)~ THEN BEGIN 3
  SAY @331
  IF ~~ THEN UNSOLVED_JOURNAL @310572 EXIT
END

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

IF WEIGHT #7 ~RandomNum(10,5)
!Global("OublekBounty1","GLOBAL",1)~ THEN BEGIN 5
  SAY @333
  IF ~~ THEN UNSOLVED_JOURNAL @310563 EXIT
END

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

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

IF WEIGHT #8 ~RandomNum(10,6)
GlobalLT("Chapter","GLOBAL",4)~ THEN BEGIN 8
  SAY @17687
  IF ~~ THEN REPLY @17688 GOTO 9
  IF ~~ THEN REPLY @17689 GOTO 10
END

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

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

IF WEIGHT #12 ~RandomNum(10,10)
GlobalLT("Chapter","GLOBAL",4)~ THEN BEGIN 11
  SAY @17706
  IF ~~ THEN REPLY @17708 GOTO 12
  IF ~~ THEN REPLY @17710 GOTO 13
END

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

IF ~~ THEN BEGIN 13
  SAY @17717
  IF ~~ THEN EXIT
END

IF WEIGHT #9 ~RandomNum(10,7)~ THEN BEGIN 14
  SAY @17980
  IF ~~ THEN EXIT
END

IF WEIGHT #10 ~RandomNum(10,8)~ THEN BEGIN 15
  SAY @17989
  IF ~~ THEN EXIT
END

IF WEIGHT #11 ~RandomNum(10,9)~ THEN BEGIN 16
  SAY @17990
  IF ~~ THEN EXIT
END
