GOM引擎服务端对玩家投毒追杀脚本

(@@InPutString @@InPutInteger)
[@main]
#IF
#ACT
CloseBigDialogBox
OPENMERCHANTBIGDLG 10 478 0 4 0 -65 0 0 0 0
#say
<ImgEx:10:474:475:476:400:-7/@EXIT>\
<>   <★GM700论坛★/AUTOCOLOR=249> <→/AUTOCOLOR=254> <缔造☆经典/AUTOCOLOR=254> <→ 实力打造非凡丶王者绝非偶然/AUTOCOLOR=244> <Hot~/AUTOCOLOR=250>\
<-----------------------------------------------------------------------/SCOLOR=13>\
<仇人藏匿，想干掉他都难，真是伤透了脑筋/SCOLOR=251>\
<攻城掠地，想杀人爆装备，可是对方没红名/SCOLOR=253>\
<给你提供一个超方便的特权！在我这可以给对手投毒并且追杀/SCOLOR=250>\
不过<投毒/SCOLOR=254> 需要<５００００元宝/SCOLOR=250> <追杀/SCOLOR=254>需要<２０００００元宝/SCOLOR=250>\

<个人投毒/@@InPutString53>                     <禁止投毒地图查看/@查看>\ \

<开始追杀/@@InPutString51>                     <禁止追杀地图查看/@查看>\ \

[@查看]
#act
MESSAGEBOX 沙巴克皇宫，第二大陆，第三大陆，所有地图\\擂台，活动地图，不可追杀，不允许投毒

[@InPutString53]
#or
S53.ISONMAP 0150
S53.ISONMAP xdt1
S53.ISONMAP xdt2
S53.ISONMAP xdt3
S53.ISONMAP xdt4
S53.ISONMAP xdt5
S53.ISONMAP xdt6
S53.ISONMAP xdt7
S53.ISONMAP xdt8
S53.ISONMAP xdt9
S53.ISONMAP xdt10
S53.ISONMAP leitai2
#act
MESSAGEBOX 对方所在地图不允许投毒！
#ELSEACT
GOTO @准备投毒
break

[@准备投毒]
#IF
S53.CheckOnline
CHECKGAMEGOLD > 49999
#ACT
GAMEGOLD - 50000
S53.ChangePkPoint + 200
GuildNoticeMsg 250 252 投毒：玩家(%s)开启投毒功能，(<$STR(S53)>)瞬间变成了超级大红名.
S53.GuildNoticeMsg 249 0 投毒：你已经被人投毒,赶快逃命吧！ SELF
CLOSE
#ELSEACT
MESSAGEBOX 投毒失败：\对方不在线或者元宝不足50000！

[@InPutString51]
#or
S53.ISONMAP 0150
S53.ISONMAP xdt1
S53.ISONMAP xdt2
S53.ISONMAP xdt3
S53.ISONMAP xdt4
S53.ISONMAP xdt5
S53.ISONMAP xdt6
S53.ISONMAP xdt7
S53.ISONMAP xdt8
S53.ISONMAP xdt9
S53.ISONMAP xdt10
S53.ISONMAP leitai2
#act
MESSAGEBOX 对方所在地图不允许追杀！
#ELSEACT
GOTO @准备追杀
break

[@准备追杀]
#IF
S51.CheckOnline
CHECKGAMEGOLD > 199999
#ACT
GAMEGOLD - 200000
S51.ChangeModeEx 10 1
REGOTO <$STR(S51)>
GuildNoticeMsg 24 254 追杀：玩家(%s)开启追杀功能，(<$STR(S51)>)即将面临死亡的考验.
GuildNoticeMsg 254 42 追杀：玩家(%s)开启追杀功能，(<$STR(S51)>)即将面临死亡的考验.
S51.GuildNoticeMsg 0 249 追杀：你已经被人追杀,赶快逃命吧! SELF
BREAK
#ELSEACT
MESSAGEBOX 投毒失败：\对方不在线或者元宝不足200000！