自动变身查看客户端怪物APPR值

[@GMHT]
{
#IF
ISADMIN
#SAY
<color=blue 百度贴吧><$DATETIME><color=blue CS1978>
──────────────────────────
╂┎─　 Ｗǒ. 只爱<CS1978/@@urlhttp://tieba.baidu.com/cs1978>。。。
┃┃┒
┃┠┚　絕　
┚┖──────所有新版本的诱惑~~
──────────────────────────
<外观自动显示/@外观显示> <传世单机/@@urlhttp://tieba.baidu.com/%E4%BC%A0%E4%B8%96%E5%8D%95%E6%9C%BA> <WFAN/@@urlhttp://tieba.baidu.com/wfan >
《传奇世界》6周年之后都是渣
#ELSESAY
你不是管理者，不能使用此服务！\
<离开/@exit>
;============================================================1
[@外观显示]
#IF
ISADMIN
#ACT
MOV P8 0
queryvalue 请输入变身[APPR数值]注:10000则停止 2 20 0004
break
[@getstring0004]
#ACT
Getstring S0
MOV P9 $STR(S0)
DelayGoto 200 @变身结果
SENDMSG 5 你刚才所输入的变身编号是：<$STR(P9)>
SENDMSG 6 ┏☆━━━━━━━━━━☆┓
SENDMSG 6 ☆系统将在正在执行自动变身☆
SENDMSG 6 ┗☆━━━━━━━━━━☆┛
break
;============================================================2
[@变身结果]
#IF
ISADMIN
#SAY
<color=blue 百度贴吧><$DATETIME><color=blue CS1978>
──────────────────────────
<停止变身/@停>│当前的APPR为[<$str(P9)>]
│
<手动输入/@外观显示>│<COLOR=RED 正在自动刷新中，请勿使用！>
│
<COLOR=Gray 刷 新>│
│

<COLOR=Gray 外观显示>
#ACT
changeappr $STR(P9)
delay 1 @还原
break
;============================================================3
[@还原]
#IF
ISADMIN
#SAY
<color=blue 百度贴吧><$DATETIME><color=blue CS1978>
──────────────────────────
<停止变身/@停>│当前的APPR为[<$str(P9)>]
│
<手动输入/@外观显示>│<COLOR=RED 正在自动刷新中，请勿使用！>
│
<COLOR=Gray 刷 新>│
│
<COLOR=Gray 外观显示>
#ACT
changeappr $STR(P9)
delay 1 @下一个
break
;============================================================4
[@下一个]
#IF
EQUAL P8 1
#ACT
DelayGoto 200 @开始变身
BREAK
#if
LARGE P9 10000
#ACT
break
#ELSEACT
INC P9 1
DelayGoto 200 @变身结果
break
;============================================================01
[@开始]
#IF
#ACT
MOV P8 0
GOTO @下一个
break
[@停]
#IF
#ACT
MOV P8 1
DelayGoto 600 @开始变身
break
[@刷新观外]
#IF
#ACT
INC P9 1
GOTO @开始变身
BREAK
[@开始变身]
#IF
ISADMIN
#SAY
<color=blue 百度贴吧><$DATETIME><color=blue CS1978>
──────────────────────────
<开始变身/@开始>│当前的APPR为[<$str(P9)>]
│
<手动输入/@外观显示>│
│
<刷 新/@刷新还原>│
│
<COLOR=Gray 外观显示>
#ACT
changeappr $STR(P9)
break
[@刷新还原]
#IF
ISADMIN
#SAY
<color=blue 百度贴吧><$DATETIME><color=blue CS1978>
──────────────────────────
<开始变身/@开始>│当前的APPR为[<$str(P9)>]
│
<手动输入/@外观显示>│
│
<刷 新/@刷新观外>│
│
<COLOR=Gray 外观显示>
#ACT
changeappr $STR(P9)
break
;============================================================01

}