;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@052Start]
{
#IF
#ACT
ReadValueSql "TBL_JobServerMain " "FLD_JOB='JOBSTORY'" "FLD_JOBNAME,FLD_JOBCONDITION" [@052Start_0]

[@052Start_0()]
#ACT
mov B1 %ARG(1)
mov B2 %ARG(2)

#IF
Equal B1 "Q052"
Equal B2 "Start"
#ACT
Movr P1 80
Inc P1 100
Movr P2 80
Inc P2 100
ForMatStr "D002,%s,%s" %P1 %P2
SaveValue "QuestDiary\Judgement\Flag.txt" [052] [Position] %A9
Movenpc "npcroom1, 5, "1,˵ʿ" %A9
ForMatStr "(%s,%s)" %P1 %P2
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\052\052.txt] [Convert] [Msg0]
LineMsg Grobal %A7

param1 D002
param2 %P1
param3 %P2
SetMission
LoadValue A9 "QuestDiary\Judgement\Flag.txt" [052] [Position]
AddStr A9 ",20"
Mongenp %A9 ŵ7 10
Mongenp %A9 ŵ7 10
Mongenp %A9 ŵ7 10
Mongenp %A9 ŵ7 10
Mongenp %A9 ŵ꽫ʿ7 10
Mongenp %A9 ŵ귨7 10
ClearMission

DelayGoto [Grobal] 1800 @052ClearMonster

[@052ClearMonster]
#ACT
MonClear D002 ŵ7
MonClear D002 ŵ7
MonClear D002 ŵ7
MonClear D002 ŵ7
MonClear D002 ŵ꽫ʿ7
MonClear D002 ŵ귨7
LoadValue A9 "QuestDiary\Judgement\Flag.txt" [052] [Position]
AddStr A9 "˵ʿ"
Movenpc %A9 npcroom1, 5, 11

UpdateValueSql "TBL_JobServerMain" "FLD_JOB='JOBSTORY'" "FLD_JOBCONDITION='End'"
SaveValue "QuestDiary\Judgement\Flag.txt" [MainTimer] [SuperQuest] 0
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 