详情简介

[@Mir2m2监狱系统脚本NPC]
{
#IF
CHECK [0] 0
#ACT
MOV P9 <$HUAMN(监狱系统次数)>
#IF
SMALL P9 2
#ACT
MOV P1 $(监狱系统费用1)
MOV P2 $(监狱系统时间1)
#IF
EQUAL P9 2
#ACT
MOV P1 $(监狱系统费用2)
MOV P2 $(监狱系统时间2)
#IF
EQUAL P9 3
#ACT
MOV P1 $(监狱系统费用3)
MOV P2 $(监狱系统时间3)
#IF
EQUAL P9 4
#ACT
MOV P1 $(监狱系统费用4)
MOV P2 $(监狱系统时间4)
#IF
EQUAL P9 5
#ACT
MOV P1 $(监狱系统费用5)
MOV P2 $(监狱系统时间5)
#IF
EQUAL P9 6
#ACT
MOV P1 $(监狱系统费用6)
MOV P2 $(监狱系统时间6)
#IF
EQUAL P9 7
#ACT
MOV P1 $(监狱系统费用7)
MOV P2 $(监狱系统时间7)
#IF
EQUAL P9 8
#ACT
MOV P1 $(监狱系统费用8)
MOV P2 $(监狱系统时间8)
#IF
LARGE P9 8
#ACT
MOV P1 $(监狱系统费用9)
MOV P2 $(监狱系统时间9)

#IF
ISADMIN
#SAY
【<GM抓人坐牢/@@InPutString51>】　

#IF
CHECK [0] 0
#SAY
<COLOR=clRed 规则说明：>被抓获的玩家无法在牢房外面活动\
　　　　　就算他有机会传送到外面去，不到<COLOR=clLime 2秒>就会被<COLOR=clLime 重新关押>\
　　　　　<COLOR=$00FFAADD 开挂可耻.希望你们放下屠刀.立地成佛！>\
<COLOR=clAqua 想自由活动，可以贿赂抓挂队长花费元宝保释自己或朋友>\
\ \
<冲值元宝点击这里领取元宝/@Mir2m2监狱系统领取元宝> <COLOR=$00006BEF 被抓次数越多保释需要元宝越高> <查看保释报价/@Mir2m2监狱系统保释报价>\
\ \

#IF
ISONMAP $(监狱系统地图0)
#SAY
<COLOR=clFuchsia 您目前已被抓> <$STR(P9)> <COLOR=clFuchsia 次，保释需要> <$STR(P1)> <COLOR=clFuchsia 元宝，并关禁> <$STR(P2)> <COLOR=clFuchsia 分钟！>\
<我要重新做人.再也不开挂，并支付元宝保释自己！/@Mir2m2监狱系统保释自己>　　<已被保释点这里出去/@Mir2m2监狱系统出去>\
#ELSESAY
\ \
<我要花元宝保释我朋友/@@InPutString52>　　<我要举报玩家开挂/@@InPutString53><COLOR=clRed （举报需要支付$(监狱系统举报)元宝！）>\

[@Mir2m2监狱系统保释报价]
#ACT
#SAY
<COLOR=clFuchsia 被抓第1次保释需要：>$(监狱系统费用1) <COLOR=clFuchsia 元宝，并关禁> $(监狱系统时间1) <COLOR=clFuchsia 分钟！> <返回首页/@Mir2m2监狱系统脚本NPC>\
<COLOR=clFuchsia 被抓第2次保释需要：>$(监狱系统费用2) <COLOR=clFuchsia 元宝，并关禁> $(监狱系统时间2) <COLOR=clFuchsia 分钟！>\
<COLOR=clFuchsia 被抓第3次保释需要：>$(监狱系统费用3) <COLOR=clFuchsia 元宝，并关禁> $(监狱系统时间3) <COLOR=clFuchsia 分钟！>\
<COLOR=clFuchsia 被抓第4次保释需要：>$(监狱系统费用4) <COLOR=clFuchsia 元宝，并关禁> $(监狱系统时间4) <COLOR=clFuchsia 分钟！>\
<COLOR=clFuchsia 被抓第5次保释需要：>$(监狱系统费用5) <COLOR=clFuchsia 元宝，并关禁> $(监狱系统时间5) <COLOR=clFuchsia 分钟！>\
<COLOR=clFuchsia 被抓第6次保释需要：>$(监狱系统费用6) <COLOR=clFuchsia 元宝，并关禁> $(监狱系统时间6) <COLOR=clFuchsia 分钟！>\
<COLOR=clFuchsia 被抓第7次保释需要：>$(监狱系统费用7) <COLOR=clFuchsia 元宝，并关禁> $(监狱系统时间7) <COLOR=clFuchsia 分钟！>\
<COLOR=clFuchsia 被抓第8次保释需要：>$(监狱系统费用8) <COLOR=clFuchsia 元宝，并关禁> $(监狱系统时间8) <COLOR=clFuchsia 分钟！>\
<COLOR=clFuchsia 被抓第9次保释需要：>$(监狱系统费用9) <COLOR=clFuchsia 元宝，并关禁> $(监狱系统时间9) <COLOR=clFuchsia 分钟！>\

[@Mir2m2监狱系统出去]
#IF
CHECK $(监狱系统占用1) 0
#ACT
MAPMOVE 3 330 330
#ELSEACT
MESSAGEBOX 您目前是犯人！\　\请等待朋友或你自己保释才能出去！
GOTO @Mir2m2监狱系统脚本NPC

[@Mir2m2监狱系统保释自己]
#IF
CHECK $(监狱系统占用1) 0
#ACT
MESSAGEBOX 操作失败，原因如下：\　\您不在监狱名单里，不需要保释！
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CHECK [0] 0
#ACT
MOV P9 <$HUAMN(监狱系统次数)>
#IF
SMALL P9 2
#ACT
MOV P1 $(监狱系统费用1)
MOV P2 $(监狱系统时间1)
#IF
EQUAL P9 2
#ACT
MOV P1 $(监狱系统费用2)
MOV P2 $(监狱系统时间2)
#IF
EQUAL P9 3
#ACT
MOV P1 $(监狱系统费用3)
MOV P2 $(监狱系统时间3)
#IF
EQUAL P9 4
#ACT
MOV P1 $(监狱系统费用4)
MOV P2 $(监狱系统时间4)
#IF
EQUAL P9 5
#ACT
MOV P1 $(监狱系统费用5)
MOV P2 $(监狱系统时间5)
#IF
EQUAL P9 6
#ACT
MOV P1 $(监狱系统费用6)
MOV P2 $(监狱系统时间6)
#IF
EQUAL P9 7
#ACT
MOV P1 $(监狱系统费用7)
MOV P2 $(监狱系统时间7)
#IF
EQUAL P9 8
#ACT
MOV P1 $(监狱系统费用8)
MOV P2 $(监狱系统时间8)
#IF
LARGE P9 8
#ACT
MOV P1 $(监狱系统费用9)
MOV P2 $(监狱系统时间9)

#IF
CHECK [0] 0
#ACT
MOV P3 <$STR(P2)>
INC P3 <$HUAMN(监狱系统时间)>
DEC P3 <$GLOBAL(监狱系统计时)>
MUL P3 60
#IF
LARGE P3 0
#ACT
MOV S10
MOV P9 <$STR(P3)>
MOV P7 <$STR(P9)>
DIV P7 3600
MOV P6 <$STR(P7)>
MUL P6 3600
INC P6 1
INC P9 1
DEC P9 <$STR(P6)>
MOV P8 <$STR(P9)>
DIV P8 60
MOV P6 <$STR(P8)>
MUL P6 60
INC P6 1
INC P9 1
DEC P9 <$STR(P6)>
#IF
LARGE P3 0
LARGE P7 0
#ACT
INC S10 <$STR(P7)>小时
#IF
LARGE P3 0
LARGE P8 0
#ACT
INC S10 <$STR(P8)>分钟
#IF
LARGE P3 0
LARGE P9 0
#ACT
INC S10 <$STR(P9)>秒
#IF
LARGE P3 0
#ACT
MESSAGEBOX 操作失败，原因如下：\　\您已被抓<$HUAMN(监狱系统次数)>次，需要关禁<$STR(P2)>分钟！\　\当前关禁剩余时间：<$STR(S10)>
MOV S10
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CheckGameGold < <$STR(P1)>
#ACT
MESSAGEBOX 操作失败，原因如下：\　\您已被抓<$HUAMN(监狱系统次数)>次，保释需要<$STR(P1)>元宝！\　\您的元宝不够<$STR(P1)>个！
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#ELSEACT
GameGold - <$STR(P1)>
;SETRANKLEVELNAME %s\●━━━━●\┃已被保释┃\●━━━━●
SENDMSG 0 玩家（%S）发誓再也不开挂花费<$STR(P1)>元宝成功获得保释自己，重获自由之身！ 255 252
SENDMSG 0 玩家（%S）发誓再也不开挂花费<$STR(P1)>元宝成功获得保释自己，重获自由之身！ 255 252
SENDMSG 0 玩家（%S）发誓再也不开挂花费<$STR(P1)>元宝成功获得保释自己，重获自由之身！ 255 252
SENDMSG 0 玩家（%S）发誓再也不开挂花费<$STR(P1)>元宝成功获得保释自己，重获自由之身！ 255 252
SET $(监狱系统占用1) 0
CALCVAR HUMAN 监狱系统时间 = 0
GOTO @Mir2m2监狱系统数据保存
mapmove 3 333 333

[@@InPutString52]
#ACT
DELAYGOTO 1 @InPutString52
[@InPutString52]
#IF
CHECK [0] 0
#ACT
MOV S11 <$STR(S52)>
MOV S52
#IF
EQUAL S11
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【没有输入正确的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
EQUAL S11 <$USERNAME>
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【不能输入自己的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CheckOnline <$STR(S11)>
#ELSEACT
MESSAGEBOX 操作失败，原因如下：\　\【您输入的玩家不在线】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
<$STR(S11)>.CHECK $(监狱系统占用1) 0
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【<$STR(S11)>】不在监狱名单里，不需要保释！
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#ELSEACT
CALCVAR GLOBAL 监狱系统字符1 = <$STR(S11)>
CALCVAR GLOBAL 监狱系统数字1 = 0
CALCVAR GLOBAL 监狱系统数字2 = 0
Gmexecute $(监狱系统触发) @Mir2m2监狱系统获取次数
#IF
CHECKVAR GLOBAL 监狱系统字符1 =
#ACT
MOV P9 <$GLOBAL(监狱系统数字1)>
#ELSEACT
CALCVAR GLOBAL 监狱系统字符1 =
MESSAGEBOX 操作失败，原因如下：\　\【<$STR(S11)>】不在线！
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
SMALL P9 2
#ACT
MOV P1 $(监狱系统费用1)
MOV P2 $(监狱系统时间1)
#IF
EQUAL P9 2
#ACT
MOV P1 $(监狱系统费用2)
MOV P2 $(监狱系统时间2)
#IF
EQUAL P9 3
#ACT
MOV P1 $(监狱系统费用3)
MOV P2 $(监狱系统时间3)
#IF
EQUAL P9 4
#ACT
MOV P1 $(监狱系统费用4)
MOV P2 $(监狱系统时间4)
#IF
EQUAL P9 5
#ACT
MOV P1 $(监狱系统费用5)
MOV P2 $(监狱系统时间5)
#IF
EQUAL P9 6
#ACT
MOV P1 $(监狱系统费用6)
MOV P2 $(监狱系统时间6)
#IF
EQUAL P9 7
#ACT
MOV P1 $(监狱系统费用7)
MOV P2 $(监狱系统时间7)
#IF
EQUAL P9 8
#ACT
MOV P1 $(监狱系统费用8)
MOV P2 $(监狱系统时间8)
#IF
LARGE P9 8
#ACT
MOV P1 $(监狱系统费用9)
MOV P2 $(监狱系统时间9)

#IF
CHECK [0] 0
#ACT
MOV P4 <$STR(P9)>
MOV P3 <$STR(P2)>
INC P3 <$GLOBAL(监狱系统数字2)>
DEC P3 <$GLOBAL(监狱系统计时)>
MUL P3 60
#IF
LARGE P3 0
#ACT
MOV S10
MOV P9 <$STR(P3)>
MOV P7 <$STR(P9)>
DIV P7 3600
MOV P6 <$STR(P7)>
MUL P6 3600
INC P6 1
INC P9 1
DEC P9 <$STR(P6)>
MOV P8 <$STR(P9)>
DIV P8 60
MOV P6 <$STR(P8)>
MUL P6 60
INC P6 1
INC P9 1
DEC P9 <$STR(P6)>
#IF
LARGE P3 0
LARGE P7 0
#ACT
INC S10 <$STR(P7)>小时
#IF
LARGE P3 0
LARGE P8 0
#ACT
INC S10 <$STR(P8)>分钟
#IF
LARGE P3 0
LARGE P9 0
#ACT
INC S10 <$STR(P9)>秒
#IF
ISADMIN
LARGE P3 0
#ACT
CALCVAR HUMAN 监狱系统输入1 = <$STR(S11)>
QUERYVALUE 0 2 0 @Mir2m2监狱系统GM保释 【<$STR(S11)>】已被抓<$STR(P4)>次，需要关禁<$STR(P2)>分钟！\　\当前关禁剩余时间：<$STR(S10)>\　\是否清除关禁时间马上保释？
BREAK
#IF
ISADMIN
#ACT
CALCVAR HUMAN 监狱系统输入1 = <$STR(S11)>
QUERYVALUE 0 2 0 @Mir2m2监狱系统GM保释 【<$STR(S11)>】已被抓<$STR(P4)>次，需要关禁<$STR(P2)>分钟！\　\当前关禁时间已到！\　\是否保释【<$STR(S11)>】？
BREAK
#IF
LARGE P3 0
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【<$STR(S11)>】已被抓<$STR(P4)>次，需要关禁<$STR(P2)>分钟！\　\当前关禁剩余时间：<$STR(S10)>
MOV S10
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CheckGameGold < <$STR(P1)>
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【<$STR(S11)>】已被抓<$STR(P4)>次，保释需要<$STR(P1)>元宝！\　\您的元宝不够<$STR(P1)>个！
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK

#IF
CHECK [0] 0
#ACT
GameGold - <$STR(P1)>
SENDMSG 0 玩家（%S）花费<$STR(P1)>元宝成功获得保释（<$STR(S11)>），重获自由之身！ 255 252
SENDMSG 0 玩家（%S）花费<$STR(P1)>元宝成功获得保释（<$STR(S11)>），重获自由之身！ 255 252
SENDMSG 0 玩家（%S）花费<$STR(P1)>元宝成功获得保释（<$STR(S11)>），重获自由之身！ 255 252
SENDMSG 0 玩家（%S）花费<$STR(P1)>元宝成功获得保释（<$STR(S11)>），重获自由之身！ 255 252
MESSAGEBOX 成功解救了正在坐牢的：<$STR(S11)>
;<$STR(S11)>.SETRANKLEVELNAME %s\●━━━━●\┃已被保释┃\●━━━━●
<$STR(S11)>.SET $(监狱系统占用1) 0
<$STR(S11)>.CALCVAR HUMAN 监狱系统时间 = 0
CALCVAR GLOBAL 监狱系统字符1 = <$STR(S11)>
MOV S11
Gmexecute $(监狱系统触发) @Mir2m2监狱系统保存次数
CALCVAR GLOBAL 监狱系统字符1 =
GOTO @Mir2m2监狱系统脚本NPC

[@Mir2m2监狱系统GM保释]
#IF
ISADMIN
#ACT
MOV S11 <$HUMAN(监狱系统输入1)>
CALCVAR HUMAN 监狱系统输入 =
#ELSEACT
MOV S11
SENDMSG 5 您不是管理员，权限不足！
CLOSE
BREAK
#IF
EQUAL S11
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【没有输入正确的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
EQUAL S11 <$USERNAME>
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【不能输入自己的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CheckOnline <$STR(S11)>
#ELSEACT
MESSAGEBOX 操作失败，原因如下：\　\【您输入的玩家不在线】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
<$STR(S11)>.CHECK $(监狱系统占用1) 0
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【<$STR(S11)>】不在监狱名单里，不需要保释！
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK

#IF
CHECK [0] 0
#ACT
SENDMSG 0 【GM管理员】保释（<$STR(S11)>），重获自由之身！ 255 252
SENDMSG 0 【GM管理员】保释（<$STR(S11)>），重获自由之身！ 255 252
SENDMSG 0 【GM管理员】保释（<$STR(S11)>），重获自由之身！ 255 252
SENDMSG 0 【GM管理员】保释（<$STR(S11)>），重获自由之身！ 255 252
MESSAGEBOX 成功解救了正在坐牢的：<$STR(S11)>
;<$STR(S11)>.SETRANKLEVELNAME %s\●━━━━●\┃已被保释┃\●━━━━●
<$STR(S11)>.SET $(监狱系统占用1) 0
<$STR(S11)>.CALCVAR HUMAN 监狱系统时间 = 0
CALCVAR GLOBAL 监狱系统字符1 = <$STR(S11)>
MOV S11
Gmexecute $(监狱系统触发) @Mir2m2监狱系统保存次数
CALCVAR GLOBAL 监狱系统字符1 =
GOTO @Mir2m2监狱系统脚本NPC

[@@InPutString51]
#ACT
DELAYGOTO 1 @InPutString51
[@InPutString51]
#IF
CHECK [0] 0
#ACT
MOV S11 <$STR(S51)>
MOV S51

#IF
ISADMIN
#ELSEACT
MOV S11
SENDMSG 5 您不是管理员，权限不足！
CLOSE
BREAK
#IF
EQUAL S11
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【没有输入正确的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
EQUAL S11 <$USERNAME>
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【不能输入自己的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CheckOnline <$STR(S11)>
#ELSEACT
CALCVAR HUMAN 监狱系统输入1 = <$STR(S11)>
QUERYVALUE 0 2 0 @Mir2m2监狱系统GM抓人 操作失败，原因如下：\　\【<$STR(S11)>】不在线！\　\是否在他下次上线时自动抓进监狱？
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
<$STR(S11)>.CHECK $(监狱系统占用1) 1
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【<$STR(S11)>】正在坐监中，您无需重复输入！
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#ELSEACT
<$STR(S11)>.SET $(监狱系统占用1) 1
<$STR(S11)>.CALCVAR HUAMN 监狱系统次数 + 1
<$STR(S11)>.CALCVAR HUAMN 监狱系统时间 = <$GLOBAL(监狱系统计时)>
<$STR(S11)>.SetScTimer $(监狱系统占用0) 1
<$STR(S11)>.MAPMOVE $(监狱系统地图0)
;<$STR(S11)>.SETRANKLEVELNAME %s\“我罪孽深重，不得不去坐牢去了”\☆★正在享受牢狱之苦★☆
;<$STR(S11)>.CHANGENAMECOLOR 253

SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5 10
SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5 10
SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5 10
SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5
SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5
SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5
SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5
SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5
SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5
SENDMSG 0 『GM反挂组』抓获外挂犯人（<$USERNAME>）坐牢去了，真是可怜的孩子！ 255 5
MESSAGEBOX 操作成功，（<$STR(S11)>）坐牢去了！

CALCVAR GLOBAL 监狱系统字符1 = <$STR(S11)>
MOV S11
Gmexecute $(监狱系统触发) @Mir2m2监狱系统保存次数
CALCVAR GLOBAL 监狱系统字符1 =
GOTO @Mir2m2监狱系统脚本NPC
BREAK

[@Mir2m2监狱系统GM抓人]
#IF
ISADMIN
#ACT
MOV S11 <$HUMAN(监狱系统输入1)>
CALCVAR HUMAN 监狱系统输入 =
#ELSEACT
MOV S11
SENDMSG 5 您不是管理员，权限不足！
CLOSE
BREAK
#IF
EQUAL S11
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【没有输入正确的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
EQUAL S11 <$USERNAME>
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【不能输入自己的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CHECKSTRINGLIST ..\QuestDiary\Mir2m2监狱系统配置(免费脚本群.347979)\Mir2m2监狱玩家名单.txt <$STR(S11)>
#ACT
MESSAGEBOX 操作失败，【<$STR(S11)>】已在监狱名单列表！
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#ELSEACT
ADDLINELIST ..\QuestDiary\Mir2m2监狱系统配置(免费脚本群.347979)\Mir2m2监狱玩家名单.txt <$STR(S11)>
MESSAGEBOX 操作成功，【<$STR(S11)>】下次上线时被抓监狱！
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK

[@@InPutString53]
#ACT
DELAYGOTO 1 @InPutString53
[@InPutString53]
#IF
CHECK [0] 0
#ACT
MOV S11 <$STR(S53)>
MOV S53
#IF
EQUAL S11
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【没有输入正确的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
EQUAL S11 <$USERNAME>
#ACT
MESSAGEBOX 操作失败，原因如下：\　\【不能输入自己的名字】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CheckOnline <$STR(S11)>
#ELSEACT
MESSAGEBOX 操作失败，原因如下：\　\【您输入的玩家不在线】
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CheckGameGold < $(监狱系统举报)
#ACT
MESSAGEBOX 操作失败，原因如下：\　\举报玩家开挂需要$(监狱系统举报)元宝！\　\您的元宝不够$(监狱系统举报)个！
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#ELSEACT
CALCVAR GLOBAL 监狱系统字符1 = <$STR(S11)>
CALCVAR GLOBAL 监狱系统数字1 = 0
CALCVAR GLOBAL 监狱系统数字2 = 0
Gmexecute $(监狱系统触发) @Mir2m2监狱系统获取次数
#IF
CHECKVAR GLOBAL 监狱系统字符1 =
#ACT
MOV P9 <$GLOBAL(监狱系统数字1)>
#ELSEACT
CALCVAR GLOBAL 监狱系统字符1 =
MESSAGEBOX 操作失败，原因如下：\　\【<$STR(S11)>】不在线！
MOV S11
GOTO @Mir2m2监狱系统脚本NPC
BREAK
#IF
CHECK [0] 0
#ACT
GameGold - $(监狱系统举报)
SENDMSG 0 玩家（%S）举报（<$STR(S11)>）开外挂，请等待GM核实！ 255 252 10
SENDMSG 0 玩家（%S）举报（<$STR(S11)>）开外挂，请等待GM核实！ 255 252
SENDMSG 0 玩家（%S）举报（<$STR(S11)>）开外挂，请等待GM核实！ 255 252
SENDMSG 0 玩家（%S）举报（<$STR(S11)>）开外挂，请等待GM核实！ 255 252
MESSAGEBOX 您成功举报（<$STR(S11)>）开外挂，请等待GM核实！

MOV S10 <$STR(S11)>
INC S10 " "
DEC S10 17 500

MOV S11 已抓次数:<$STR(P9)>
INC S11 " "
DEC S11 21 500
INC S10 <$STR(S11)>

MOV S11 举报人:<$USERNAME>
INC S11 " "
DEC S11 24 500
INC S10 <$STR(S11)>

INC S10 举报时间:<$DATETIME>

ADDLINELIST ..\QuestDiary\Mir2m2监狱系统配置(免费脚本群.347979)\Mir2m2监狱玩家举报.txt <$STR(S10)>
MOV S10
MOV S11
GOTO @Mir2m2监狱系统脚本NPC

[@Mir2m2监狱系统常量加载]
#CALL [\Mir2m2监狱系统配置(免费脚本群.347979)\Mir2m2监狱系统常量.ini] @Mir2m2监狱系统常量
#CALL [\Mir2m2监狱系统配置(免费脚本群.347979)\Mir2m2监狱系统数据.txt] @Mir2m2监狱系统数据保存


[@Mir2m2监狱系统领取元宝]

;#CALL [\充值元宝\元宝.txt] @领取元宝

}