传奇服务(2012/8/10)端封杀外一条龙大家需求的脚本

(@@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个，无法使用此功能！


论坛一条龙

不错哦，楼主这是要火的节奏啊！

楼主最近很消极啊！

灌水不是我的目的！

没人理我，好伤心啊！

楼主是一个神奇的青年！

支持一下，下面的保持队形！

林子大了，什么鸟都有了啊！

论坛的帖子越来越有深度了！

看了这么多帖子，第一次看到这么高质量内容！