[@举报加速]
{
　　请共同爱护传世私服游戏环境，公平监督使用变态恶意加速外挂！\
本传世私服全国独家——变态加速举报系统，让使用变速者永远远离\
我们的游戏！<color=red 等级><$STR(G36)>级以上玩家，如果在游戏里发现使用变态>\
<color=red 加速外挂的，就可以在这里举报对方的名字！只要同时有超过>\
<color=red 8个人举报同一人，系统就会自动将这个人关闭到小黑屋反省1>\
<color=red 小时>，如果连续被关超过3次小黑屋，就会被禁止登陆本游戏！\
被举报者可以在关小黑屋时与我们客服联系，如果GM核查到\
<color=red 参与举报者是恶意乱举报，举报者将被删除帐号处罚！>\
　　<发现有人使用变态加速，我要进行举报/@举报别人>　　　<返回上页/@main>
#ELSESAY
当前该功能暂时没有开放！！\\
<返回上页/@main>
[@举报别人]
\
　　举报前请注意：你要100%确定对方在使用加速外挂时，才\
能进行举报，<color=red 如果进行乱举报，将会受到删除帐号处罚！>\\
　　你可以同时叫你的朋友们一起来观察对方是否使用加速外\
挂，如果大家都确认，你们就可以进行举报了！只要有超过8个\
人举报同一个人使用加速，那么对方将被系统自动关小黑屋！\\
　　<我们已经确定了，我要开始举报！/@真举报了>　　　　<返回上页/@举报加速>
[@真举报了]
#IF
CHECKLEVELEX < $STR(G36)
#ACT
messagebox 你的等级没有<$STR(G36)>级，还没有举报权利！
break
#ELSEACT
queryvalue 请输入你想举报者的名字: 2 30 7777
break
[@getstring7777]
#IF
LARGE G37 0
#ACT
Getstring s6
MOV S7 $USERNAME
INC S7 :在
INC S7 $HOUR
INC S7 点
INC S7 $MIN
INC S7 分
INC S7 $SEC
INC S7 秒·举报：
INC S7 $STR(S6)
MOV S8 $USERNAME
INC S8 举报
INC S8 $STR(S6)
#ELSEACT
break
close
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
CHECKVARLIST $STR(S6) ..\QuestDiary\数据文件\玩家名字.txt
#ELSEACT
SENDMSG 5 (*)输入错误，全服没有叫[{<$STR(S6)>}]的玩家！
break
close
#IF
CHECKVARLIST $STR(S8) ..\QuestDiary\数据文件\举报加速\分类记录.txt
#ACT
SENDMSG 5 (*)你今天已经举报过[{<$STR(S6)>}]了，请不要重复举报！
break
close
#IF
CHECKVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\关进监狱.txt
#ACT
SENDMSG 5 (*)[{<$STR(S6)>}]已经在监狱中服役中，不能进行举报！
break
close
#IF
CHECKVARLIST $USERNAME ..\QuestDiary\数据文件\举报加速\举报次数.txt
#ACT
SENDMSG 5 (*)每人每天只可使用一次举报服务，你今天的举报次数已经使用了！
break
close
#IF
CHECKVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速1.txt
#ELSEACT
ADDVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速1.txt
ADDVARLIST $STR(S7) ..\QuestDiary\数据文件\举报加速\举报记录.txt
ADDVARLIST $STR(S8) ..\QuestDiary\数据文件\举报加速\分类记录.txt
ADDVARLIST $USERNAME ..\QuestDiary\数据文件\举报加速\举报次数.txt
SENDMSG 0 (*)[{<$USERNAME>}]举报[{<$STR(S6)>}]使用加速外挂！当前他(她)已经被1人举报，当累积有8人同时举报他(她)时，系统就会自动把他(她)关进监狱！
break
close
#IF
CHECKVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速2.txt
#ELSEACT
ADDVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速2.txt
ADDVARLIST $STR(S7) ..\QuestDiary\数据文件\举报加速\举报记录.txt
ADDVARLIST $STR(S8) ..\QuestDiary\数据文件\举报加速\分类记录.txt
ADDVARLIST $USERNAME ..\QuestDiary\数据文件\举报加速\举报次数.txt
SENDMSG 0 (*)[{<$USERNAME>}]举报[{<$STR(S6)>}]使用加速外挂！当前他(她)已经被2人举报，当累积有8人同时举报他(她)时，系统就会自动把他(她)关进监狱！
break
close
#IF
CHECKVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速3.txt
#ELSEACT
ADDVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速3.txt
ADDVARLIST $STR(S7) ..\QuestDiary\数据文件\举报加速\举报记录.txt
ADDVARLIST $STR(S8) ..\QuestDiary\数据文件\举报加速\分类记录.txt
ADDVARLIST $USERNAME ..\QuestDiary\数据文件\举报加速\举报次数.txt
SENDMSG 0 (*)[{<$USERNAME>}]举报[{<$STR(S6)>}]使用加速外挂！当前他(她)已经被3人举报，当累积有8人同时举报他(她)时，系统就会自动把他(她)关进监狱！
break
close
#IF
CHECKVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速4.txt
#ELSEACT
ADDVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速4.txt
ADDVARLIST $STR(S7) ..\QuestDiary\数据文件\举报加速\举报记录.txt
ADDVARLIST $STR(S8) ..\QuestDiary\数据文件\举报加速\分类记录.txt
ADDVARLIST $USERNAME ..\QuestDiary\数据文件\举报加速\举报次数.txt
SENDMSG 0 (*)[{<$USERNAME>}]举报[{<$STR(S6)>}]使用加速外挂！当前他(她)已经被4人举报，当累积有8人同时举报他(她)时，系统就会自动把他(她)关进监狱！
break
close
#IF
CHECKVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速5.txt
#ELSEACT
ADDVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速5.txt
ADDVARLIST $STR(S7) ..\QuestDiary\数据文件\举报加速\举报记录.txt
ADDVARLIST $STR(S8) ..\QuestDiary\数据文件\举报加速\分类记录.txt
ADDVARLIST $USERNAME ..\QuestDiary\数据文件\举报加速\举报次数.txt
SENDMSG 0 (*)[{<$USERNAME>}]举报[{<$STR(S6)>}]使用加速外挂！当前他(她)已经被5人举报，当累积有8人同时举报他(她)时，系统就会自动把他(她)关进监狱！
break
close
#IF
CHECKVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速6.txt
#ELSEACT
ADDVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速6.txt
ADDVARLIST $STR(S7) ..\QuestDiary\数据文件\举报加速\举报记录.txt
ADDVARLIST $STR(S8) ..\QuestDiary\数据文件\举报加速\分类记录.txt
ADDVARLIST $USERNAME ..\QuestDiary\数据文件\举报加速\举报次数.txt
SENDMSG 0 (*)[{<$USERNAME>}]举报[{<$STR(S6)>}]使用加速外挂！当前他(她)已经被6人举报，当累积有8人同时举报他(她)时，系统就会自动把他(她)关进监狱！
break
close
#IF
CHECKVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速7.txt
#ACT
ADDVARLIST $STR(S7) ..\QuestDiary\数据文件\举报加速\举报记录.txt
ADDVARLIST $STR(S8) ..\QuestDiary\数据文件\举报加速\分类记录.txt
DELVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速1.txt
DELVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速2.txt
DELVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速3.txt
DELVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速4.txt
DELVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速5.txt
DELVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速6.txt
DELVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速7.txt
ADDVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\关进监狱.txt
ADDVARLIST $USERNAME ..\QuestDiary\数据文件\举报加速\举报次数.txt
SENDMSG 0 (*)[{<$USERNAME>}]举报[{<$STR(S6)>}]使用加速外挂！当前他(她)已经被8人举报，系统已经自动将其关进监狱！
#ELSEACT
ADDVARLIST $STR(S6) ..\QuestDiary\数据文件\举报加速\举报加速7.txt
ADDVARLIST $STR(S7) ..\QuestDiary\数据文件\举报加速\举报记录.txt
ADDVARLIST $STR(S8) ..\QuestDiary\数据文件\举报加速\分类记录.txt
ADDVARLIST $USERNAME ..\QuestDiary\数据文件\举报加速\举报次数.txt
SENDMSG 0 (*)[{<$USERNAME>}]举报[{<$STR(S6)>}]使用加速外挂！当前他(她)已经被7人举报，当累积有8人同时举报他(她)时，系统就会自动把他(她)关进监狱！
break
close
#IF
CHECKONLINE $STR(s6)
#ACT
hcall $STR(s6) @关进监狱服役
}