传奇服务端封杀外挂脚本

gmbbs醉后知酒浓

封杀外挂脚本传奇版本中提取(@@InPutString @@InPutInteger)
[@main]
#IF
ISADMIN
#ACT
CloseBigDialogBox
#SAY
<规则说明：/SCOLOR=249>被抓获的玩家无法在牢房外面活动\
就算他有机会传送到外面去，不到<10秒/SCOLOR=250>就会被<重新关押/SCOLOR=250>\
<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242> 【<坐牢/@@InPutString51>】\
<想自由活动，可以贿赂抓挂队长花费元宝保释朋友/SCOLOR=254>\
<保释金额分别为：/SCOLOR=254><轻刑囚犯监狱(40万元宝)/SCOLOR=250>\
<保释金额分别为：/SCOLOR=254><重型囚犯监狱(60万元宝)/SCOLOR=250>　　\
<保释金额分别为：/SCOLOR=254><特大通缉犯监狱(80万元宝)/SCOLOR=250>　\
<我要花金币保释我朋友.他说他再也不开挂了（输入名字）/@@InPutString52>\ \
#elseSAY
<规则说明：/SCOLOR=249>被抓获的玩家无法在牢房外面活动\
就算他有机会传送到外面去，不到<10秒/SCOLOR=250>就会被<重新关押/SCOLOR=250>\
<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
<想自由活动，可以贿赂抓挂队长花费元宝保释朋友/SCOLOR=254>\
<保释金额分别为：/SCOLOR=254><轻刑囚犯监狱(40万元宝)/SCOLOR=250>\
<保释金额分别为：/SCOLOR=254><重型囚犯监狱(60万元宝)/SCOLOR=250>　　\
<保释金额分别为：/SCOLOR=254><特大通缉犯监狱(80万元宝)/SCOLOR=250>　\
<我要花金币保释我朋友.他说他再也不开挂了（输入名字）/@@InPutString52>\ \
[@CallInPutString52]
#IF
CheckOnline <$STR(S52)>
CHECKGAMEGOLD > 399999
CheckTextList .\QuestDiary\封挂监狱名单\轻刑囚犯监狱.txt <$STR(S52)>
#ACT
GAMEGOLD - 400000
DelTextList .\QuestDiary\封挂监狱名单\轻刑囚犯监狱.txt <$STR(S52)>
S52.SETRANKLEVELNAME %s\●━━━━●\┃已被保释┃\●━━━━●
GuildNoticeMsg 255 252 玩家（%S）花费40万元宝成功获得保释轻刑囚犯（<$STR(S52)>），重获自由之身！
GuildNoticeMsg 255 252 玩家（%S）花费40万元宝成功获得保释轻刑囚犯（<$STR(S52)>），重获自由之身！
GuildNoticeMsg 255 252 玩家（%S）花费40万元宝成功获得保释轻刑囚犯（<$STR(S52)>），重获自由之身！
MESSAGEBOX 成功解救了正在坐牢的：（<$STR(S52)>）
break
#ELSEACT
MESSAGEBOX 操作失败，可能的原因如下：\ \“玩家不在线”“元宝不足40万”“不在通缉的名单里”

#IF
CheckOnline <$STR(S52)>
CHECKGAMEGOLD > 599999
CheckTextList .\QuestDiary\封挂监狱名单\重型囚犯监狱.txt <$STR(S52)>
#ACT
GAMEGOLD - 600000
DelTextList .\QuestDiary\封挂监狱名单\重型囚犯监狱.txt <$STR(S52)>
S52.SETRANKLEVELNAME %s\●━━━━●\┃已被保释┃\●━━━━●
GuildNoticeMsg 255 252 玩家（%S）花费60万元宝保释重型囚犯（<$STR(S52)>），重获自由之身！
GuildNoticeMsg 255 252 玩家（%S）花费60万元宝保释重型囚犯（<$STR(S52)>），重获自由之身！
GuildNoticeMsg 255 252 玩家（%S）花费60万元宝保释重型囚犯（<$STR(S52)>），重获自由之身！
MESSAGEBOX 成功解救了正在坐牢的：（<$STR(S52)>）
break
#ELSEACT
MESSAGEBOX 操作失败，可能的原因如下：\ \“玩家不在线”“元宝不足60万”“不在通缉的名单里”

#IF
CheckOnline <$STR(S52)>
CHECKGAMEGOLD > 799999
CheckTextList .\QuestDiary\封挂监狱名单\特大通缉犯监狱.txt <$STR(S52)>
#ACT
GAMEGOLD - 800000
DelTextList .\QuestDiary\封挂监狱名单\特大通缉犯监狱.txt <$STR(S52)>
S52.SETRANKLEVELNAME %s\●━━━━●\┃已被保释┃\●━━━━●
GuildNoticeMsg 255 252 玩家（%S）花费80万元宝保释特大通缉犯（<$STR(S52)>），重获自由之身！
GuildNoticeMsg 255 252 玩家（%S）花费80万元宝保释特大通缉犯（<$STR(S52)>），重获自由之身！
GuildNoticeMsg 255 252 玩家（%S）花费80万元宝保释特大通缉犯（<$STR(S52)>），重获自由之身！
MESSAGEBOX 成功解救了正在坐牢的：（<$STR(S52)>）
break
#ELSEACT
MESSAGEBOX 操作失败，可能的原因如下：\ \“玩家不在线”“元宝不足80万”“不在通缉的名单里”

[@CallInPutString51]
#IF
CheckOnline <$STR(S51)>
#ACT
GOTO @坐牢A
break
#ELSEACT
MESSAGEBOX 操作失败：玩家不在线，无法发起坐监功能！


#IF
CheckOnline <$STR(S53)>
#ACT
GOTO @坐牢A
break
#ELSEACT
MESSAGEBOX 操作失败：玩家不在线，无法发起坐监功能！

#IF
CheckOnline <$STR(S55)>
#ACT
GOTO @坐牢A
break
#ELSEACT
MESSAGEBOX 操作失败：玩家不在线，无法发起坐监功能！

[@坐牢A]
#IF
CheckNameList ..\QuestDiary\封挂监狱名单\轻刑囚犯监狱.txt <$STR(S51)>
#ACT
MESSAGEBOX 操作失败：此人正在坐监中，您无需重复输入！
break
#IF
CheckGold 1
#ACT
Take 金币 1
AddTextList .\QuestDiary\封挂监狱名单\轻刑囚犯监狱.txt <$STR(S51)>
S51.SETRANKLEVELNAME %s\“我罪孽深重，不得不去坐牢去了”\☆★正在享受牢狱之苦★☆
S51.CHANGENAMECOLOR 253
GuildNoticeMsg 255 5 『PK反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
GuildNoticeMsg 255 5 『PK反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
SendCenterMsg 255 5 『PK反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
SendCenterMsg 255 5 『PK反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
MESSAGEBOX 操作成功，（<$STR(S51)>）坐牢去了！
break
#ELSEACT
MESSAGEBOX 操作失败，金币不足1个，无法使用此功能

罢禽脾

介是神马？！！

瞿新美

LZ是天才，坚定完毕

畔土泉

占位编辑

余怡月

LZ帖子不给力，勉强给回复下吧

7r72069irs

太生气了，无法HOLD啦 >_<......

匪耍缶

我也是坐沙发的

嫦蓟叹

顶起出售广告位

美诽

秀起来~

漂剂

啥玩应呀