(@@InPutInteger @@InPutString)
[@main]
#IF
CHECKCASTLEWAR 沙巴克
#ACT
MESSAGEBOX [暂时不能使用]:现在正在进行攻城战中...!
#ELSEACT
GOTO @HAIREN

[@HAIREN]
<尊敬的玩家：/FCOLOR=3> <$USERNAME> 你好，欢迎光临<$SERVERNAME>恶搞中心！
这里有时下最流行的害人技巧，嘿嘿！！嘿嘿！！
<1/FCOLOR=253>.<你给我10000元宝我可以把你指定的仇家直接送入监狱/FCOLOR=250>！
<2/FCOLOR=253>.<你给我10000元宝我可以把你指定的仇家直接变成红名/FCOLOR=250>！
<3/FCOLOR=253>.<你给我10000元宝我可以把你指定的兄弟直接救出监狱/FCOLOR=250>！
<4/FCOLOR=253>.<你给我20000元宝我可以把你传送到指定的仇家身边/FCOLOR=250>！
<把仇家送进监狱/@main1>　　　　   我为兄弟两肋插刀<把兄弟营救出监狱/@main3>　
<我要陷害他红名/@main2>　　　　　  <想去监狱看看/@kankan>
<追杀仇家砍死他/@ansha>　　　　　

[@kankan]
#if
#act
mapmove JIANYU 7 11

[@ansha]
#call [\\游戏服务暗杀.txt] @追杀

[@main1]
<尊敬的玩家：/FCOLOR=3> <$USERNAME> 你好，
欢迎光临<$SERVERNAME>恶搞专家服务中心,您选择的是
把仇人直接<送进监狱/FCOLOR=2533>业务,本项业务使用一次需要收费
10000元宝,在使用之前请核对您的帐户中元宝数量是否满足
本次消费!谢谢!本服务独特,你可以输入你想陷害的人的名
字,然后再点送进监狱,对方就会直接被送进监狱,并且对方
身上的回程卷等被收干净，对方不在线,您就无法实施陷害!
<请输入被害人名字/@@InPutString93>
<返回/@CALLF>

[@InPutString93]
#IF
EQUAL S93
#ACT
MESSAGEBOX [错误]:输入内容为空,请重新输入!
GOTO @QQGGO
BREAK
#ELSEACT
GOTO @QQGGOJC

[@QQGGOJC]
#IF
CHECKONLINE <$STR(S93)>
#ACT
#SAY
您输入的名字为
<$STR(S93)>;
注意:对方此时正<在线/FCOLOR=250>
您现在害他,对方会直接送到监狱的!
核对名字内容无误后请<名字必须正确！>
<直接送他去监狱/@监狱>
#ELSESAY
您输入的名字为
<$STR(S93)>;
注意:对方此时已<离线>或<无此人>
您现在害他,对方可能无法送到监狱的!
核对名字内容无误后请<名字必须正确！>
<直接送他去监狱/@监狱>   <返回/@main1>




[@监狱]
#IF
CHECKGAMEGOLD > 9999
#ACT
GAMEGOLD - 10000
MOV A120 <$DATETIME>
MOV A130 <$USERNAME>
HCALL <$STR(S93)> @害人
MESSAGEBOX 您的害人计划已经成功实施!
SendMsg 0 [恶搞专家]:★▄▄▄▄▄▄▄▄陷害成功▄▄▄▄▄▄▄▄★
SendMsg 0 [恶搞专家]:▓世态炎凉啊！恶搞专家收了匿名人的巨资！▄▓
SendMsg 0 [恶搞专家]:▓把无辜的-【<$STR(S93)>】直接送进了监狱！▓
SendMsg 0 [恶搞专家]:▓那可怜的-【<$STR(S93)>】在监狱里哭了！  ▓
SendMsg 0 [恶搞专家]:▓世态炎凉!世风日下!此匿名害人者到底是何人▓
SendMsg 0 [恶搞专家]:★▄▄▄▄▄▄▄▄陷害成功▄▄▄▄▄▄▄▄★
BREAK
#ELSEACT
MESSAGEBOX [失败]:您帐户的元宝数量不足,无法实施本次害人计划!
GOTO @main1




[@main2]
<尊敬的玩家：/FCOLOR=3> <$USERNAME> 你好，
欢迎光临<$SERVERNAME>恶搞专家服务中心,您选择的是
把仇人直接<变成红名/FCOLOR=253>业务,本项业务使用一次需要收费
2000元宝,在使用之前请核对您的帐户中元宝数量是否满足
本次消费!谢谢!本服务独特,你可以输入你想陷害的人的名
字,然后再点变成红名,对方就会直接被变成红名！
对方不在线,您就无法实施陷害!
<请输入被害人名字/@@InPutString94>
<返回/@CALLF>

[@InPutString94]
#IF
EQUAL S94
#ACT
MESSAGEBOX [错误]:输入内容为空,请重新输入!
GOTO @GO
BREAK
#ELSEACT
GOTO @GO

[@GO]
#IF
CHECKONLINE <$STR(S94)>
#ACT
#SAY
您输入的名字为
<$STR(S94)>;
注意:对方此时正<在线/FCOLOR=250>
您现在害他,对方会直接变成红名的!
核对名字内容无误后请<名字必须正确！>
<直接让他变红名/@红名>
#ELSESAY
您输入的名字为
<$STR(S94)>;
注意:对方此时已<离线>或<无此人>
您现在害他,对方可能无法变成红名的!
核对名字内容无误后请<名字必须正确！>
<直接让他变红名/@红名>  <返回/@main2>


[@红名]
#IF
CHECKGAMEGOLD > 9999
#ACT
GAMEGOLD - 10000
MOV A120 <$DATETIME>
MOV A130 <$USERNAME>
HCALL <$STR(S94)> @变红名
MESSAGEBOX 您的害人计划已经成功实施!
SendMsg 0 [恶搞专家]:★▄▄▄▄▄▄▄▄陷害成功▄▄▄▄▄▄▄▄★
SendMsg 0 [恶搞专家]:▓损人不利己！恶搞专家收了匿名人的巨资！  ▓
SendMsg 0 [恶搞专家]:▓把无辜的-【<$STR(S94)>】直接直接变成红名▓ (责任编辑：admin)