[Gm版本库]传奇脚本系列-外挂监狱

(@@InPutString @@InPutInteger)
[@main]
#IF
ISADMIN
#ACT
CloseBigDialogBox
#SAY
<规则说明：/SCOLOR=249>被抓获的玩家无法在牢房外面活动\
　　　　　就算他有机会传送到外面去，不到<10秒/SCOLOR=250>就会被<重新关押/SCOLOR=250>\
　　　　　<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
　　　　　<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>  【<坐牢[url=]/@@InPutString51[/url]>】\
　　　　　<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
　　　　　<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
<想自由活动，可以贿赂抓挂队长花费100W元宝保释自己或朋友/SCOLOR=254>\ \
<我要花元宝保释我朋友.他说他再也不开挂了（输入名字）[url=]/@@InPutString52>\[/url] \
#elseSAY
<规则说明：/SCOLOR=249>经游戏<网关检测超速>被抓获的玩家无法在牢房外面活动\
　　　　　就算他有机会传送到外面去，不到<10秒/SCOLOR=250>就会被<重新关押/SCOLOR=250>\
　　　　　<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
　　　　　<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
　　　　　<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
　　　　　<开挂可耻.希望你们放下屠刀.立地成佛！/SCOLOR=242>\
<想自由活动，可以贿赂抓挂队长花费100W元宝保释自己或朋友/SCOLOR=254>\ \
<我要花元宝保释我朋友.他说他再也不开挂了（输入名字）[url=]/@@InPutString52>\[/url] \

[@CallInPutString52]
#IF
CheckOnline <$STR(S52)>
CheckGameGold > 999999
CheckTextList .\QuestDiary\通缉文本\坐监名单.txt <$STR(S52)>
#ACT
GameGold - 1000000
DelTextList .\QuestDiary\通缉文本\坐监名单.txt <$STR(S52)>
S52.SETRANKLEVELNAME %s\●━━━━●\┃已被保释┃\●━━━━●
GuildNoticeMsg 255 252 玩家（%S）花费100W元宝成功获得保释（<$STR(S52)>），重获自由之身！
GuildNoticeMsg 255 252 玩家（%S）花费100W元宝成功获得保释（<$STR(S52)>），重获自由之身！
GuildNoticeMsg 255 252 玩家（%S）花费100W元宝成功获得保释（<$STR(S52)>），重获自由之身！
GuildNoticeMsg 255 252 玩家（%S）花费100W元宝成功获得保释（<$STR(S52)>），重获自由之身！
MESSAGEBOX 成功解救了正在坐牢的：（<$STR(S52)>）
break
#ELSEACT
MESSAGEBOX 操作失败，可能的原因如下：\　\“玩家不在线”“元宝不足”“不在通缉的名单里”
[@CallInPutString51]
#IF
CheckOnline <$STR(S51)>
#ACT
GOTO @坐牢A
break
#ELSEACT
MESSAGEBOX 操作失败：玩家不在线，无法发起坐监功能！
[@坐牢A]
#IF
CheckTextList .\QuestDiary\通缉文本\坐监名单.txt <$STR(S51)>
#ACT
MESSAGEBOX 操作失败：此人正在坐监中，您无需重复输入！
break
#IF
CheckGameGold > 1
#ACT
GameGold - 1
AddTextList .\QuestDiary\通缉文本\坐监名单.txt <$STR(S51)>
S51.SETRANKLEVELNAME %s\“我罪孽深重，不得不去坐牢去了”\☆★正在享受牢狱之苦★☆
S51.CHANGENAMECOLOR 253
GuildNoticeMsg 255 5 『反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
GuildNoticeMsg 255 5 『反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
GuildNoticeMsg 255 5 『反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
GuildNoticeMsg 255 5 『反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
SendCenterMsg 255 5 『反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
SendCenterMsg 255 5 『反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
SendCenterMsg 255 5 『反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
SendCenterMsg 255 5 『反挂组』抓获外挂犯人（<$STR(S51)>）坐牢去了，真是可怜的孩子！
MESSAGEBOX 操作成功，（<$STR(S51)>）坐牢去了！
break
#ELSEACT
MESSAGEBOX 操作失败，元宝不足1个，无法使用此功能！