传奇游戏中增加游戏乐趣的（向仇家投毒）脚本

(@@InPutString @@InPutInteger )
[@main]
你有痛恨的仇家吗？弄不死他，就毒死他！\
你打不过他需要有人帮吗？\
使用说明：在输入框内输入<要下毒的人物名字>\  \
<中毒的人将受到毁灭性打击,如若没有找到解药必死无疑!>\ \
〖<购买毒药/@tdwymdy>〗      〖<开始下毒/@@InPutString5>〗       〖<购买解药/@tdwymjy>〗\ \
<提示：毒药2000元宝1颗/AUTOCOLOR=250,253,254,241>
[@CallInPutString5]
#IF
S5.CHECKHUMINRANGE 3 330 330 10
#SAY
对方在土城安全区, 不可投毒!!!
#ELSEACT
GOTO @没在安全区
[@没在安全区]
#IF
checkitem 百花软筋散 1
#ACT
AddTextList .\QuestDiary\数据文件\中毒者.txt <$str(s5)>
take 百花软筋散 1
GMEXECUTE 开始提问 @中毒检测
SENDMSG 5 [投毒*]：我已经帮你制造了一起投毒事件！我犯罪了，愿上帝能原谅我。-_-  
SENDMSG 1  [投毒*]：玩家〖<$str(s5)>〗已中了仇家〖%s〗所投下的巨毒<百花软筋散>，如今深中巨毒！
break
#ELSESAY
你没有毒药<百花软筋散>要我怎么帮你去下毒？给我闪一边去~！\ \
[@tdwymdy]
#IF
CHECKGAMEGOLD > 1999
#ACT
GAMEGOLD - 2000
give 百花软筋散 1
goto @main
SENDMSG 5 [投毒*]：已经把毒药<百花软筋散>给你拉，要好好使用哦。
break
#ELSESAY
购买毒药需要2000个元宝，没有元宝就想买毒药<百花软筋散>？\ \
[@tdwymjy]
最近有得罪谁被下毒拉？ \
做个文明的市民嘛，被下毒可是要花钱的！\
你可以选择使用2000个元宝购买解药，还可以选择掉级兑换哦。\
<150级以上才可以兑换每兑换一个掉1级！>\ \ \
〖<元宝购买解药[url=]/@ybgm[/url]解药>〗　　　　　〖<掉级兑换解药[url=]/@djgm[/url]解药>〗\ \
[@ybgm解药]
#IF
CHECKGAMEGOLD > 1999
#ACT
GAMEGOLD - 2000
give 甘露解毒水 1
goto @main
SENDMSG 5 [投毒*]：已经把解药<甘露解毒水>给你拉，双击即可痊愈。
break
#ELSESAY
购买解药需要2000个元宝，没有元宝就想买解药<甘露解毒水>？\ \
[@djgm解药]
#IF
CHECKLEVELEX > 149
#ACT
CHANGELEVEL - 1
give 甘露解毒水 1
goto @main
SENDMSG 5 [投毒*]：已经把解药<甘露解毒水>给你拉，双击即可痊愈。
break
#ELSESAY
兑换解药需要150级以上，每兑换一个掉1级！\ \