BEGIN ~60ASHRA~

IF WEIGHT #7 ~  Global("60ASHRA","GLOBAL",0)
~ THEN BEGIN 0
  SAY #31184
  IF ~  !Class(Protagonist,PALADIN)
CheckStatGT(Protagonist,12,CHR)
~ THEN REPLY #31185 DO ~SetGlobal("60Ashra", "GLOBAL", 1)~ GOTO 2
  IF ~  !Class(Protagonist,PALADIN)
CheckStatLT(Protagonist,13,CHR)
~ THEN REPLY #31185 DO ~SetGlobal("60Ashra", "GLOBAL", 1)~ GOTO 1
  IF ~!Global("US_OJAIHA_DIPLOMACY","GLOBAL",1)~ THEN REPLY #31186 DO ~SetGlobal("60Ashra", "GLOBAL", 1)~ GOTO 1
  IF ~~ THEN REPLY #31187 DO ~SetGlobal("60Ashra", "GLOBAL", 1)~ GOTO 2
  IF ~~ THEN REPLY #31189 DO ~SetGlobal("60Ashra", "GLOBAL", 1)~ GOTO 3
  IF ~~ THEN REPLY #31190 DO ~SetGlobal("60Ashra", "GLOBAL", 1)~ GOTO 4
END

IF ~~ THEN BEGIN 1
  SAY #31191
  IF ~~ THEN DO ~Enemy()~ EXIT
END

IF ~~ THEN BEGIN 2
  SAY #31193
  IF ~~ THEN REPLY #31195 GOTO 3
  IF ~~ THEN REPLY #31196 EXIT
END

IF ~~ THEN BEGIN 3
  SAY #31197
  IF ~~ THEN EXTERN ~60INHATR~ 20
END

IF ~~ THEN BEGIN 4
  SAY #31198
  IF ~  !Class(Protagonist,PALADIN)
CheckStatGT(Protagonist,12,CHR)
~ THEN REPLY #31185 GOTO 2
  IF ~  !Class(Protagonist,PALADIN)
CheckStatLT(Protagonist,13,CHR)
~ THEN REPLY #31185 GOTO 1
  IF ~~ THEN REPLY #31186 GOTO 1
  IF ~~ THEN REPLY #31187 GOTO 2
  IF ~~ THEN REPLY #31189 GOTO 3
  IF ~~ THEN REPLY #31199 GOTO 1
  IF ~~ THEN REPLY #31200 GOTO 5
END

IF WEIGHT #1 ~  Global("60ASHRA","GLOBAL",3)
~ THEN BEGIN 5
  SAY #31201
  IF ~~ THEN DO ~Enemy()~ EXIT
END

IF ~~ THEN BEGIN 6
  SAY #31202
  IF ~~ THEN REPLY #31205 DO ~SetGlobal("60Ashra", "GLOBAL", 2)~ GOTO 14
  IF ~~ THEN REPLY #31206 DO ~SetGlobal("60Ashra", "GLOBAL", 2)~ EXIT
END

IF ~~ THEN BEGIN 7
  SAY #31207
  IF ~~ THEN REPLY #31195 GOTO 3
  IF ~~ THEN REPLY #31196 EXIT
END

IF WEIGHT #8 ~  True()
~ THEN BEGIN 8
  SAY #31210
  IF ~~ THEN REPLY #31189 GOTO 3
  IF ~~ THEN REPLY #31190 GOTO 4
END

IF ~~ THEN BEGIN 9
  SAY #31212
  IF ~~ THEN DO ~SetGlobal("60Duel_VFA", "GLOBAL", 1)
StartCutSceneMode()
StartCutScene("60cDuelV")~ EXIT
END

IF WEIGHT #5 ~  Global("60DUEL_VFA","GLOBAL",1)
~ THEN BEGIN 10
  SAY #31213
  IF ~~ THEN EXIT
END

IF WEIGHT #6 ~  Global("60DUEL_CCS","GLOBAL",1)
~ THEN BEGIN 11
  SAY #31213
  IF ~~ THEN EXIT
END

IF WEIGHT #4 ~  Global("60DUEL_VFA","GLOBAL",4)
~ THEN BEGIN 12
  SAY #31214
  IF ~~ THEN REPLY #31216 DO ~AddXpVar("Level_12_Easy",31183)
SetGlobal("60Duel_VFA", "GLOBAL", 5)~ GOTO 13
  IF ~~ THEN REPLY #31195 DO ~AddXpVar("Level_12_Easy",31183)
SetGlobal("60Duel_VFA", "GLOBAL", 5)~ GOTO 3
  IF ~~ THEN REPLY #31196 DO ~AddXpVar("Level_12_Easy",31183)
SetGlobal("60Duel_VFA", "GLOBAL", 5)~ EXIT
END

IF ~~ THEN BEGIN 13
  SAY #31217
  IF ~~ THEN REPLY #31218 GOTO 14
  IF ~~ THEN REPLY #31196 EXIT
END

IF ~~ THEN BEGIN 14
  SAY #31219
  IF ~~ THEN REPLY #31220 DO ~SetGlobal("60Ashra", "GLOBAL", 3)~ JOURNAL #31180 GOTO 15
  IF ~~ THEN REPLY #31221 GOTO 5
  IF ~~ THEN REPLY #31222 GOTO 5
  IF ~~ THEN REPLY #31223 GOTO 5
END

IF ~~ THEN BEGIN 15
  SAY #31224
  IF ~~ THEN REPLY #31225 GOTO 5
  IF ~~ THEN REPLY #31196 EXIT
END

IF WEIGHT #3 ~  Global("60DUEL_VFA","GLOBAL",2)
~ THEN BEGIN 16
  SAY #31226
  IF ~~ THEN REPLY #31195 DO ~SetGlobal("60Duel_VFA", "GLOBAL", 3)~ GOTO 3
  IF ~~ THEN REPLY #31196 DO ~SetGlobal("60Duel_VFA", "GLOBAL", 3)~ EXIT
END

IF WEIGHT #2 ~  GlobalGT("60DUEL_CCS","GLOBAL",3)
Global("60DUEL_VFA","GLOBAL",0)
~ THEN BEGIN 17
  SAY #31227
  IF ~~ THEN REPLY #31203 DO ~SetGlobal("60Ashra", "GLOBAL", 2)~ GOTO 9
  IF ~~ THEN REPLY #31228 DO ~SetGlobal("60Ashra", "GLOBAL", 2)~ GOTO 7
  IF ~~ THEN REPLY #31196 DO ~SetGlobal("60Ashra", "GLOBAL", 2)~ EXIT
END

IF ~~ THEN BEGIN 18
  SAY #31229
  IF ~~ THEN GOTO 5
END

IF ~~ THEN BEGIN 19
  SAY #31230
  IF ~~ THEN EXTERN ~60INHATR~ 5
END

IF ~~ THEN BEGIN 20
  SAY #31231
  IF ~~ THEN DO ~Enemy()~ EXIT
END

IF ~~ THEN BEGIN 21
  SAY #31232
  IF ~~ THEN GOTO 22
END

IF ~~ THEN BEGIN 22
  SAY #31233
  IF ~~ THEN DO ~Enemy()~ EXIT
END

IF WEIGHT #0 ~  !Global("6051_Wearing_Robes","GLOBAL",6)
!Global("US_OJAIHA_DIPLOMACY","GLOBAL",1)
~ THEN BEGIN 23
  SAY #34321
  IF ~~ THEN DO ~Enemy()~ EXIT
END
