;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@EventItem_Area7]
{
#ACT
SetItemEvent 61 3 @Event_Main

[@Event_Main]
#ACT
Mov A0 %USERMAP

#IF
Equal A0 "D401"
#ACT
return true
goto @Event_Ok
break

#ELSEACT
break

[@Event_Ok]
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSql "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@kaemi_Next25]

[@kaemi_Next25()]
#IF
#ACT
mov A0 %ARG(1)
mov D0 %ARG(2)
mov D1 %ARG(3)

#IF
Equal A0 %USERNAME
Equal D0 26
Equal D1 7

#ACT
GOTO @Area7_ItemEvent
BREAK

[@Area7_ItemEvent]
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=8"

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide7\ItemEvent.txt] @Convert_ItemEvent_0

[@Area7_ItemEvent_1]
#IF

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide7\ItemEvent.txt] @Convert_ItemEvent_1

[@Area7_ItemEvent_2]
#IF

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide7\ItemEvent.txt] @Convert_ItemEvent_2

[@Area7_ItemEvent_3]
#IF

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide7\ItemEvent.txt] @Convert_ItemEvent_3

[@Area7_ItemEvent_4]
#IF

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide7\ItemEvent.txt] @Convert_ItemEvent_4

[@Area7_ItemEvent_5]
#IF
#ACT
map 0


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