;;;QQ:67762207

[@Oma_Banya_Kimssi]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSql "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY" [@Banya_Kimssi_0]

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

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 7
#ACT
goto @Kimssi_Oma_1
break
#ELSEACT
break

[@Kimssi_Oma_1]
#IF
small s1 5
#ACT
goto @Kimssi_Oma_1_2
break
#ELSEACT
goto @Kimssi_Oma_1_1
break

[@Kimssi_Oma_1_1]
#IF
#ACT
give 王铁匠的铁锤 1
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=8"
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1=20"
#SAY
(看来这个就是潘夜岛铁匠铁匠师傅丢的铁锤。)\\

[@Kimssi_Oma_1_2]
#ACT
inc S1 1
sysmsg "猎杀半兽人进度增加20%"
break
#ELSEACT
break

}

[@main_wha_Banya]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSql "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY" [@wha_Banya_0]

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

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 10

#ACT
goto @wha_Omajounsa_1
break

#ELSEACT
break

[@wha_Omajounsa_1]
#IF
small s1 5
#ACT
goto @wha_Omajounsa_1_2
break

#ELSEACT
goto @wha_Omajounsa_1_1
break

[@wha_Omajounsa_1_1]
#IF
#ACT
give 角笛 1
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=11"
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1=20"
#SAY
(这就是那个奇特的角笛... 拿它去比奇县骷髅洞穴1层(303:67)那个可疑的房间碰碰运气。)\

[@wha_Omajounsa_1_2]
#ACT
inc S1 1
sysmsg "猎杀进度增加20%"
break

#ELSEACT
break

}

[@AreaQuest_Omayongsa]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSql "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY" [@Quest_Omayongsa]

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

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 12
#ACT
goto @Omayongsa_Area_1
break
#ELSEACT
break

[@Omayongsa_Area_1]
#IF
#ACT
map 0
give 半块不死牌 1
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=13"
delaygoto [local] 3 @Omayongsa_say

[@Omayongsa_say]
#SAY
(这东西好像带有一种强大的能量，看来要到云发老师那里问问是什么东西。)\\
<关  闭/@exit>
}

[@Quest_haegultosa]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSql "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY" [@Area_haegultosa]

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

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 15
#ACT
goto @haegultosa_Area_1
break
#ELSEACT
break

[@haegultosa_Area_1]
#IF
#ACT
map 0
give 不死牌 1
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=16"
delaygoto [local] 3 @haegultosa_say

[@haegultosa_say]
#SAY
(终于得到了完整的不死牌，把它交给比奇城官吏吧。)\\
<关  闭/@exit>

}
;;----------------------------vimascript
