传奇服务端自动封挂监狱保释NPC脚本

(@@InPutString @@InPutInteger)
[@main]
你来到这里，说明你人品极差，本监狱长正式拘留你48小时。\
乖乖的站在那里不要动。否则就准备吃我一鞭！\
不对，不过看你是初犯准予你自己保释或者请朋友保释你.\ \
<监狱长大人，小人知道错了.我要保释我自己/@@InPutString52> \
<我朋友已经办好了保释手续,请送我出去/@出去1>

[@CallInPutString52]
#IF
CheckOnline <$STR(S52)>
CHECKGAMEGOLD > 399999
CheckTextList .\QuestDiary\封挂监狱名单\轻刑囚犯监狱.txt <$STR(S52)>
#ACT
GAMEGOLD - 400000
DelTextList .\QuestDiary\封挂监狱名单\轻刑囚犯监狱.txt <$STR(S52)>
mapmove 3 333 335
S52.SETRANKLEVELNAME %s\●━━━━●\┃已被保释┃\●━━━━●
GuildNoticeMsg 255 252 玩家（%S）花费40万元宝成功获得保释,大家一起监督他!!
GuildNoticeMsg 255 252 玩家（%S）花费40万元宝成功获得保释,大家一起监督他!!
GuildNoticeMsg 255 252 玩家（%S）花费40万元宝成功获得保释,大家一起监督他!!
MESSAGEBOX 你已经成功获得保释出狱,下次我不希望在这看见你.
break
#ELSEACT
MESSAGEBOX 操作失败，可能的原因如下：\ \“玩家不在线”“元宝不足40万”“不在通缉的名单里”

[@出去1]
#IF
CheckNameList ..\QuestDiary\封挂监狱名单\轻刑囚犯监狱.txt <$STR(S51)>
#ACT
MESSAGEBOX 你未被任何人保释/你小子到了这里还不老实/看样子得多关你几天了..
break
#ELSEACT
mapmove 3 333 335
MESSAGEBOX 你已经成功获得保释出狱,下次我不希望在这看见你.