;;;QQ:67762207
[@Basic5_Bichunkanli_20]
{
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSql "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@Bichunkanli_Next]

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

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 16
#ACT
GOTO @Bichunkanli_STEP5
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 4
#ACT
GOTO @Bichunkanli_STEP4
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 3
#ACT
GOTO @Bichunkanli_STEP3
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 2
#ACT
GOTO @Bichunkanli_STEP2
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 1
#ACT
GOTO @Bichunkanli_STEP1
BREAK

#IF
Equal A0 %USERNAME
#SAY
现在你还是去找别人为好。\\
<关  闭/@EXIT>
#ACT
BREAK

#IF
#SAY
这好像不是你的，还是还给主人吧。\\
<关  闭/@EXIT>
#ACT
BREAK

[@Bichunkanli_STEP1]
#IF
#SAY
你就是王大人极力推荐的武士吗?\
来得正好，我正想召见你呢。想让你帮忙调查{FCOLOR/10}比奇地区半兽人重新扩大势力{FCOLOR/12}的事情, 你有勇气接受嘛?\\
<我能先了解一下详情么？/@Bichunkanli_STEP1_1>

[@Bichunkanli_STEP1_1]
#IF
#SAY
好，这可是一个漫长的故事...\
我们是当年宗主国所派遣的远征队的后裔。祖先们为了消灭半兽人征战至此，但战争结束后，一场意外的大地震却切断了我们回乡的道路。后来我们在比奇重建家园，却和比奇地区的半兽人成为{FCOLOR/10}死敌{FCOLOR/12}。\
最近，我们收到半兽人正在扩大势力的情报，它们似乎掌握了一种神秘的力量，将已经死去的同族尸体复活，成为不死的{FCOLOR/10}骷髅战士{FCOLOR/12}呢。\
这毕竟是传言，想请你帮忙调查事件真相，必要的时候出手制止他们的阴谋。 \\
<这么严峻的问题啊...包在我身上!/@Bichunkanli_STEP1_2>

[@Bichunkanli_STEP1_2]
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=2"
#SAY
我们已经派了几名英勇的战士前去，但他们没有一个能活着回来，现在这件事情就委托给你了，我相信你一定能成功。\
首先，我想请你{FCOLOR/10}调查比奇县的骷髅洞穴{FCOLOR/12}，察看他们制造骷髅战士的神秘魔法究竟是什么。如果可能的话，就阻止他们的阴谋，祝你好运。\\
<关  闭/@exit>

[@Bichunkanli_STEP2]
#IF
#SAY
请调查一下{FCOLOR/10}比奇县的骷髅洞穴{FCOLOR/12}。我们收到{FCOLOR/10}1层有可疑的房间{FCOLOR/12}的情报。\\
<关  闭/@exit>

[@Bichunkanli_STEP3]
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=4"
#SAY
我有预感，那个可疑的房间就是阴谋的核心。可能是半兽族用魔法封印了那里。\
我手下有一个{FCOLOR/10}研究半兽族的学者{FCOLOR/12}。他的名字是{FCOLOR/10}云发{FCOLOR/12}，现在被派到{FCOLOR/10}比奇县骷髅洞穴2层{FCOLOR/12}发掘半兽人的遗物呢。\
如果你找到他，他说不定能帮助你。\\
<关  闭/@exit>

[@Bichunkanli_STEP4]
#IF
#SAY
到{FCOLOR/10}比奇县骷髅洞穴2层{FCOLOR/12}找学者{FCOLOR/10}云发{FCOLOR/12}。从他那里能够得到有用的情报。\\
<关  闭/@exit>

[@Bichunkanli_STEP5]
#IF
checkitem 不死牌 1
#ACT
SET [304] 1
take 不死牌 1
Mov A0 "AreaQuest4"
Mov D0 2
Mov D1 0
Mov D2 0
Mov D3 0
Goto @EverythingReward
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=0"
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1=21"
#SAY
我代表比奇的所有居民感谢你！这下我们不用担忧半兽人带领不死部队攻打比奇城了，我们可以高枕无忧了。\
这是对你的奖赏，请收下！\\
<关  闭/@exit>
#ELSESAY
无功不受禄，你首先要证明自己的实力不是吗? {FCOLOR/10}不死牌{FCOLOR/12}拿到了么?\\
<关  闭/@exit>
#ELSEACT
break

}

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

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

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 14
#ACT
GOTO @Unbal_STEP4
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 13
#ACT
GOTO @Unbal_STEP3
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 5
#ACT
GOTO @Unbal_STEP2
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 4
#ACT
GOTO @Unbal_STEP1
BREAK

#IF
Equal A0 %USERNAME
#SAY
你去找其他人谈谈吧，我很忙。\\
<关  闭/@EXIT>
#ACT
BREAK

#IF
#SAY
这好像不是你的，还是还给主人吧。\\
<关  闭/@EXIT>
#ACT
BREAK

[@Unbal_STEP1]
#IF
#SAY
你来这里有何公干? 我正在进行研究，不想受到妨碍。\\
<是比奇官吏令我来找你的/@Unbal_STEP1_1>

[@Unbal_STEP1_1]
#IF
#SAY
哦，原来是官吏大人派来的使者，有什么事情请吩咐吧...\\
<我想询问关于半兽族封印魔法的事情.../@Unbal_STEP1_2>

[@Unbal_STEP1_2]
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=5"
#SAY
...\
这件事情我已经听说了，看来半兽人正在策划阴谋的传言是真的。\
要想解开房间的封印，需要一种特殊物品，究竟是什么物品我也不能肯定，但是我可以给你一个线索。\
不久前我听到{FCOLOR/10}半兽人在潘夜岛附近活动{FCOLOR/12}的传闻。在潘夜岛居民当中或许会有人看到半兽人带着的{FCOLOR/10}奇特的物品{FCOLOR/12}，你还是去探访一下吧。\\
<关  闭/@EXIT>

[@Unbal_STEP2]
#IF
#SAY
在{FCOLOR/10}潘夜岛{FCOLOR/12}居民当中或许会有人看到半兽人带着的{FCOLOR/10}奇特的物品{FCOLOR/12}，你还是去探访一下吧。\\
<关  闭/@EXIT>

[@Unbal_STEP3]
#IF
checkitem 半块不死牌 1
#SAY
你是说得到半块不死牌了吗? 能让我看下吗?\
...\
这确实是{FCOLOR/10}远古遗留下来的物品{FCOLOR/12}，但这肯定不是半兽人做的。不过它身上蕴含的魔力十分强大，如果半兽人掌握了使用它的方法，我们人类就岌岌可危了。所以请你赶快{FCOLOR/10}寻找剩下的半块{FCOLOR/12}。\\
<剩下半块不死牌在哪里能够找到?/@Unbal_STEP3_1>
#ELSESAY
事情办得怎么样了? 有什么收获嘛。\\
<关  闭/@EXIT>
#ELSEACT
break

[@Unbal_STEP3_1]
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=14"
#SAY
在{FCOLOR/10}比奇县骷髅洞穴2层(255:281){FCOLOR/12}好像看到过和这里差不多的地方，去那里看看吧\\
<关  闭/@EXIT>

[@Unbal_STEP4]
#IF
#SAY
请探查一下{FCOLOR/10}比奇县骷髅洞穴2层(255:281){FCOLOR/12}。\\
<关  闭/@EXIT>
}

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

[@Whanpc_Next()]
#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 @Whanpc_STEP4
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 9
#ACT
GOTO @Whanpc_STEP3
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 6
#ACT
GOTO @Whanpc_STEP2
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 5
#ACT
GOTO @Whanpc_STEP1
BREAK

#IF
Equal A0 %USERNAME
#SAY
你去找别人谈谈吧，我很忙。\\
<关  闭/@EXIT>
#ACT
BREAK

[@Whanpc_STEP1]
#IF
#SAY
请进。您看起来不像是来买饰品的。\\
<你留意过半兽人是否携带着什么特殊的东西吗?/@Whanpc_STEP1_1>

[@Whanpc_STEP1_1]
#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=6"
#SAY
说起半兽人...好像有那么一些印象...\
对了, {FCOLOR/10}武器铺铁匠师傅{FCOLOR/12}最近饱受半兽人的侵扰，如果你能帮帮他的话，我也会帮助你。\\
<关  闭/@exit>

[@Whanpc_STEP2]
#IF
#SAY
{FCOLOR/10}武器铺铁匠师傅{FCOLOR/12}最近饱受半兽人的侵扰，如果你能帮帮他的话，我也会帮助你。
<关  闭/@exit>

[@Whanpc_STEP3]
#IF
#ACT
SET [199] 1
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=10"
#SAY
武器铺的铁匠师傅把什么都告诉我了，你可真是个好人啊。\
我记得不久前看到过一名{FCOLOR/10}半兽战士{FCOLOR/12}脖子上带着一个样子很怪的{FCOLOR/10}角笛{FCOLOR/12}。不过我从来没听过半兽人会吹笛子，那算不算奇怪的东西呢？\\
<关  闭/@exit>

[@Whanpc_STEP4]
#IF
#SAY
{FCOLOR/10}半兽战士{FCOLOR/12}带着一个样子很怪的{FCOLOR/10}角笛{FCOLOR/12}。不过我从来没听过半兽人会吹笛子，那算不算奇怪的东西呢？\\
<关  闭/@exit>

}

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

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

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 9
#ACT
GOTO @Taekuon_STEP4
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 8
#ACT
GOTO @Taekuon_STEP3
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 7
#ACT
GOTO @Taekuon_STEP2
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 6
#ACT
GOTO @Taekuon_STEP1
BREAK

#IF
Equal A0 %USERNAME
#SAY
你去找别人问问吧，不要来打扰我。\\
<关  闭/@EXIT>
#ACT
BREAK


[@Taekuon_STEP1]
#IF
#ACT
SET [199] 1
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=7"
#SAY
你是听晓华讲述了我的苦衷，来帮助我的嘛? 真是不胜感激...\
那么请听我讲事情的经过。最近经常发生半兽人结队来村里进行掠夺的事情。我的店也被抢了5次。\
有一次竟然把我的{FCOLOR/10}铁锤{FCOLOR/12}抢了去。其他的东西都是身外之物，只是铁锤一定要找回来。就像剑是侠客的生命一样，对于铁匠来说铁锤是比生命还重要的东西。并且这个铁锤是我的传家之物!\
所以拜托你，{FCOLOR/10}在比奇附近的半兽人中{FCOLOR/12}一定有那个抢走我铁锤的家伙，请一定要帮我找到。\\
<关  闭/@EXIT>

[@Taekuon_STEP2]
#IF
#SAY
{FCOLOR/10}在比奇附近的半兽人中{FCOLOR/12}一定有那个抢走我铁锤的家伙，请一定要帮我找到。\\
<关  闭/@EXIT>

[@Taekuon_STEP3]
#IF
checkitem 王铁匠的铁锤 1
#ACT
SET [199] 0
take 王铁匠的铁锤 1
Mov A0 "AreaQuest4"
Mov D0 1
Mov D1 0
Mov D2 0
Mov D3 0
Goto @EverythingReward
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=9"
#SAY
我的铁锤终于回来了，太感谢你了，我本来都已经绝望了。\
小店屡次被半兽人掠夺，剩下的只有这些，就当作给你的报酬吧，千万不要推辞。\\
<关  闭/@EXIT>
#ELSESAY
我的铁锤找回来了嘛？\\
<关  闭/@EXIT>
#ELSEACT
break

[@Taekuon_STEP4]
#IF
#SAY
晓华年纪虽小却很懂事。\\
<关  闭/@EXIT>
}
;;;QQ:67762207
