检测客户端动画效果的脚本

(@zzsd)
[@main]FLASH(7)
\
<GMexecute动画效果/@动画效果1> <$STR(M0)>\
<GMexecute上一个动画效果/@上一个动画效果1> <$STR(M0)>\
<GMexecute下一个动画效果/@下一个动画效果1> <$STR(M0)>\\
<SHOWHUMEFFECT动画效果/@动画效果2> <$STR(M0)>\
<SHOWHUMEFFECT上一个动画效果/@上一个动画效果2> <$STR(M0)>\
<SHOWHUMEFFECT下一个动画效果/@下一个动画效果2> <$STR(M0)>\\
;236 232 219 218 214 202 201 174
<mobfireburn动画效果/@动画效果3> <$STR(M0)>\
<mobfireburn上一个动画效果/@上一个动画效果3> <$STR(M0)>\
<mobfireburn下一个动画效果/@下一个动画效果3> <$STR(M0)>\

[@动画效果3]
#ACT
MOV P0 0
QUERYVAL 0 1 4 @请输入动画效果3 请输入动画效果[数值]注:9999则停止
break

[@请输入动画效果3]
#act
mobfireburn $M $X $Y $STR(M0) 5 600
GOTO @main
break

[@上一个动画效果3]
#act
DEC M0 1
mobfireburn $M $X $Y $STR(M0) 5 600
GOTO @main
break

[@下一个动画效果3]
#act
inc M0 1
mobfireburn $M $X $Y $STR(M0) 5 600
GOTO @main
break

[@动画效果2]
#ACT
MOV P0 0
QUERYVAL 0 1 4 @请输入动画效果2 请输入动画效果[数值]注:9999则停止
break

[@请输入动画效果2]
#act
SHOWHUMEFFECT $STR(M0)
GOTO @main
break

[@上一个动画效果2]
#act
DEC M0 1
SHOWHUMEFFECT $STR(M0)
GOTO @main
break

[@下一个动画效果2]
#act
inc M0 1
SHOWHUMEFFECT $STR(M0)
GOTO @main
break

[@动画效果1]
#ACT
MOV P0 0
QUERYVAL 0 1 4 @请输入动画效果1 请输入动画效果[数值]注:9999则停止
break

[@请输入动画效果1]
#act
GMexecute 烟花 $STR(M0)
GOTO @main
break

[@上一个动画效果1]
#act
DEC M0 1
GMexecute 烟花 $STR(M0)
GOTO @main
break

[@下一个动画效果1]
#act
inc M0 1
GMexecute 烟花 $STR(M0)
GOTO @main
break