;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@set011A]
{


#ACT
MonGenP "DQ1600_02,100,100,80" ŵ7 40
MonGenP "DQ1600_02,100,100,80" ŵ7 40
MonGenP "DQ1600_02,100,100,80" ŵ7 40
MonGenP "DQ1600_02,100,100,80" ŵ7 40
MonGenP "DQ1600_02,100,100,80" ŵ귨7 30
MonGenP "DQ1600_02,141,28,0" ŵ꽫ʿ9 1
MonGenP "DQ1600_02,141,28,4" ŵ8 10
ApplyMonEx "DQ1600_02,141,28,190" ŵ8 [Monsterside] "ŵ껤"
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg0]
EventMsg "DQ1600_02" %A7 123
Delaygoto [Grobal] 300 @set011_1

[@set011_1]
begin
#ACT
loadValue P1 "QuestDiary\Judgement\Flag.txt" [011] [mon]
#IF
equal P1 1
#ACT
break
#ELSEACT
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ귨7 10
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg1]
EventMsg "DQ1600_02" %A7 123
Delaygoto [Grobal] 300 @set011_2
end

[@set011_2]
begin
#ACT
loadValue P1 "QuestDiary\Judgement\Flag.txt" [011] [mon]
#IF
equal P1 1
#ACT
break
#ELSEACT
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ귨7 10
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg2]
EventMsg "DQ1600_02" %A7 18
Delaygoto [Grobal] 300 @set011_3
end

[@set011_3]
begin
#ACT
loadValue P1 "QuestDiary\Judgement\Flag.txt" [011] [mon]
#IF
equal P1 1
#ACT
break
#ELSEACT

MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ7 10
MonGenP "DQ1600_02,100,100,80" ŵ귨7 10
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg3]
EventMsg "DQ1600_02" %A7 18
Delaygoto [Grobal] 300 @set011_4
end

[@set011_4]
begin

#ACT
loadValue P1 "QuestDiary\Judgement\Flag.txt" [011] [mon]
#IF
equal P1 1
#ACT
break
#ELSEACT
MonGenP "DQ1600_02,150,50,40" ŵ7 10
MonGenP "DQ1600_02,150,50,40" ŵ7 10
MonGenP "DQ1600_02,150,50,40" ŵ7 10
MonGenP "DQ1600_02,150,50,40" ŵ7 10
MonGenP "DQ1600_02,150,50,40" ŵ귨7 10
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg4]
EventMsg "DQ1600_02" %A7 18
DelayGoto [Grobal] 600 @checkmission
end


[@checkmission]
#IF
checkmonmap "DQ1600_02" 1 ŵ꽫ʿ9
!checkmonmap "DQ1600_02" 1 ŵ껤
#ACT
Goto @missionclear
#ELSEACT
Goto @missionfailed

[@missionclear]
#ACT
loadValue P1 "QuestDiary\Judgement\Flag.txt" [011] [mon]
#IF
equal P1 1
#ACT
break
#ELSEACT
monclear "DQ1600_02" ŵ꽫ʿ9
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg5]
EventMsg "DQ1600_02" %A7 123
DelayGoto [Grobal] 12 @set011A_1

[@set011A_1]
#ACT
saveValue "QuestDiary\Judgement\Flag.txt" [011] [QuestSuccess] 1
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg6]
EventMsg "DQ1600_02" %A7 18
DelayGoto [Grobal] 12 @set011A_2

[@set011A_2]
#ACT
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg7]
EventMsg "DQ1600_02" %A7 10072
DelayGoto [Grobal] 12 @set011A_3

[@set011A_3]
#ACT
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg8]
EventMsg "DQ1600_02" %A7 18
DelayGoto [Grobal] 12 @set011A_4

[@set011A_4]
#ACT
mov A0 "Judgement"
mov D0 11
mov D1 1
mov D2 0
mov D3 0
goto @EveryThingReward
movenpc "npcroom1,4,11,ŵ꽫ʿ" 4,50,281
monclear DQ1600_02
Mapting DQ1600_02 4 50 281


[@missionfailed]
#ACT
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg9]
EventMsg "DQ1600_02" %A7 18
DelayGoto [Grobal] 12 @missionfailed_2

[@missionfailed_2]
#ACT
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\011\011Event.txt] [Convert] [Msg10]
EventMsg "DQ1600_02" %A7 10072
DelayGoto [Grobal] 12 @missionfailed_3

[@missionfailed_3]
#ACT
monclear DQ1600_02
mov A0 "Judgement"
mov D0 11
mov D1 2
mov D2 0
mov D3 0
goto @EveryThingReward
Mapting DQ1600_02 4 50 281


}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;