;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@028Start]
{
#ACT
loadValue A1 "QuestDiary\Judgement\Flag.txt" [028] [QuestUserName]

#IF
!equal A1 ""
#ACT
goto @028End
goto @028checkGuild_A

break
#ELSEACT
break


[@028checkGuild_A]
#ACT
FormatStr "FLD_PAGUNSUNGGUILD='%s'" %guildname
Mov A8 %A9
UpdateValueSql "TBL_TaoSungCastleWar" "FLD_TAOSUNG='TAOSUNG'" %A8
LoadValue A7 [Convert_Def\QuestDiary\Judgement\Story\028\028.txt] [Convert] [Msg0]
linemsg "D1604" %A7
close
break


[@028End]
#ACT
MonClear D1604 ŵ99
MonClear D1604 ľդ7
MonClear D1604 ľդ8
MonClear D1604 ŵʯ
MonGenP "D1604,174,121,0" ŵ 1
AddPath 183, 110
AddPath 183, 115
AddPath 183, 110
ApplyPath "D1604,174,121,100" ŵ
MonGenP "D1604,175,121,0" ŵʯ 5
MonGenP "D1604,189,121,0" ŵʯ 5
MonGenP "D1604,175,107,0" ŵʯ 5
MonGenP "D1604,189,107,0" ŵʯ 5
MonGenP "D1604,188,108,0" ľդ8 1
MonGenP "D1604,188,122,0" ľդ8 1
MonGenP "D1604,174,122,0" ľդ8 1
MonGenP "D1604,174,108,0" ľդ8 1

MonGenP "D1604,191,108,0" ľդ7 1
MonGenP "D1604,191,122,0" ľդ7 1
MonGenP "D1604,177,122,0" ľդ7 1
MonGenP "D1604,177,108,0" ľդ7 1

MonGenP "D1604,177,105,0" ľդ8 1
MonGenP "D1604,191,105,0" ľդ8 1
MonGenP "D1604,191,119,0" ľդ8 1
MonGenP "D1604,177,119,0" ľդ8 1

MonGenP "D1604,174,119,0" ľդ7 1
MonGenP "D1604,174,105,0" ľդ7 1
MonGenP "D1604,188,105,0" ľդ7 1
MonGenP "D1604,188,119,0" ľդ7 1

MonGenP "D1604,189,108,0" ľդ7 1
MonGenP "D1604,190,108,0" ľդ7 1
MonGenP "D1604,191,107,0" ľդ7 1
MonGenP "D1604,191,106,0" ľդ7 1
MonGenP "D1604,190,105,0" ľդ7 1
MonGenP "D1604,189,105,0" ľդ7 1
MonGenP "D1604,188,106,0" ľդ7 1
MonGenP "D1604,188,107,0" ľդ7 1

MonGenP "D1604,189,122,0" ľդ8 1
MonGenP "D1604,190,122,0" ľդ8 1
MonGenP "D1604,191,121,0" ľդ8 1
MonGenP "D1604,191,120,0" ľդ8 1
MonGenP "D1604,190,119,0" ľդ8 1
MonGenP "D1604,189,119,0" ľդ8 1
MonGenP "D1604,188,120,0" ľդ8 1
MonGenP "D1604,188,121,0" ľդ8 1

MonGenP "D1604,175,122,0" ľդ7 1
MonGenP "D1604,176,122,0" ľդ7 1
MonGenP "D1604,177,121,0" ľդ7 1
MonGenP "D1604,177,120,0" ľդ7 1
MonGenP "D1604,176,119,0" ľդ7 1
MonGenP "D1604,175,119,0" ľդ7 1
MonGenP "D1604,174,120,0" ľդ7 1
MonGenP "D1604,174,121,0" ľդ7 1

MonGenP "D1604,175,108,0" ľդ7 1
MonGenP "D1604,176,108,0" ľդ7 1
MonGenP "D1604,177,107,0" ľդ7 1
MonGenP "D1604,177,106,0" ľդ7 1
MonGenP "D1604,176,105,0" ľդ7 1
MonGenP "D1604,175,105,0" ľդ7 1
MonGenP "D1604,174,106,0" ľդ7 1
MonGenP "D1604,174,107,0" ľդ7 1

MonGenP "D1604,200,200,190" ŵ9 100
MonGenP "D1604,200,200,190" ŵ9 100
MonGenP "D1604,200,200,190" ŵ9 100
MonGenP "D1604,200,200,190" ŵ9 100
MonGenP "D1604,200,200,190" ŵ귨9 100
MonGenP "D1604,200,200,190" ŵ꽫ʿ9 100

DelayGoto [Grobal] 3600 @028End2

[@028End2]
#ACT
LoadValue P1 "QuestDiary\Judgement\Flag.txt" [028] [MonDie]
#IF
equal P1 1
#ACT
goto @028EndEvent_1
break
#ELSEACT
goto @028End3
break

[@028End3]
#ACT
ReadValueSql "TBL_JobServerMain" "FLD_JOB='JOBSTORY'" "FLD_JOBNAME,FLD_JOBCONDITION" [@028End3_0]


[@028End3_0()]
#ACT
mov A1 %ARG(1)
mov A2 %ARG(2)

#IF
equal A1 "Q028"
!equal A1 "End"

#ACT
UpdateValueSql "TBL_JobServerMain" "FLD_JOB='JOBSTORY'" "FLD_JOBCONDITION='End'"
Savevalue "QuestDiary\Judgement\Flag.txt" [MainTimer] [SuperQuest] 0
goto @028MapClose

[@028MapClose]

#ACT
mapting D1601 5 216 185
mapting D1602 4 457 77
mapting D1603 41 167 94
MonClear D1601
MonClear D1602
MonClear D1603
mapting D1604 41 167 94
MonClear D1604
goto @028EndEvent_1



[@028EndEvent_1]
#CALL [Judgement\Story\028\028Event.txt] @028EndMsg
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;