;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@Area10_Mon1]
{
#IF
check [110] 1
check [111] 0
check [199] 1
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@Area10_Mon1Read]

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

#IF
Equal A0 %USERNAME
Equal D0 29
Equal D1 3
#ACT
goto @Area10_Mon1_1

#ELSEACT
break

[@Area10_Mon1_1]
#IF
Random 30
#ACT
give  1
set [199] 0
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=4"

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide10\Monster.txt] @Convert_Monster_0

}

[@Area10_Mon2]
{
#IF
check [110] 1
check [111] 0
check [199] 1
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@Area10_Mon2Read]

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

#IF
Equal A0 %USERNAME
Equal D0 29
Equal D1 5
#ACT
goto @Area10_Mon2_1
break

#IF
Equal A0 %USERNAME
Equal D0 29
Equal D1 18
#ACT
goto @Area10_Mon2_2
break

#ELSEACT
break

[@Area10_Mon2_1]
#IF
checkitem  29

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide10\Monster.txt] @Convert_Monster_1

#ACT
give  1
set [199] 1
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=6"
break

#IF
Random 3
#ACT
give  1

[@Area10_Mon2_2]
#IF
#ACT
set [199] 0
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=19"


#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide10\Monster.txt] @Convert_Monster_2

}

[@Area10_Mon3]
{
#IF
check [110] 1
check [111] 0
check [199] 1
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@Area10_Mon3Read]

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

#IF
Equal A0 %USERNAME
Equal D0 29
Equal D1 7
#ACT
goto @Area10_Mon3_1
break

#ELSEACT
break

[@Area10_Mon3_1]
#IF
checkitem Һ 29

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide10\Monster.txt] @Convert_Monster_3

#ACT
set [199] 0
give Һ 1
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=8"
break

#IF
Random 4
#ACT
take Һ 1

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide10\Monster.txt] @Convert_Monster_4

#ELSEACT
give Һ 1

}

[@Area10_Mon4]
{
#IF
check [110] 1
check [111] 0
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@Area10_Mon4Read]

[@Area10_Mon4Read()]
#IF
#ACT
Mov A1 %ARG(1)
Mov D0 %ARG(2)
Mov D1 %ARG(3)

#IF
Equal A1 %USERNAME
Equal D0 29
Equal D1 20
#ACT
set [199] 0
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=22"
LoadValue A7 [Convert_Def\QuestDiary\AreaQuest\ChoBoGuide10\Monster.txt] [Convert] [Msg0]
EventMSG [Private] %A7
Delaygoto [Local] 7 @Areaa10_Mon4MapMove

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide10\Monster.txt] @Convert_Monster_5

[@Areaa10_Mon4MapMove]
#IF
#ACT
Map D805

}

[@Area10_Mon5]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@Area10_Mon5Read]

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

#IF
Equal A0 %USERNAME
Equal D0 29
Equal D1 23

#ACT
goto @Area10_Mon5_1
break

#ELSEACT
break

[@Area10_Mon5_1]
#IF
Random 20

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide10\Monster.txt] @Convert_Monster_6

#ACT
set [199] 0
give ֮ 1
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=24"

}

[@Area10_Mon6]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSQL "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@Area10_Mon6Read]

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

#IF
Equal A0 %USERNAME
Equal D0 29
Equal D1 25
#ACT
goto @Area10_Mon6_1
#ELSEACT
break

[@Area10_Mon6_1]
#IF
checkitem ֮ 1

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\AreaQuest\ChoBoGuide10\Monster.txt] @Convert_Monster_7

#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSQL "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=26"
#ELSEACT
break

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