//人物中间位置坐标
UserVar x=400 人物中间位置X坐标
UserVar y=270 人物中间位置Y坐标
Rem 开始打怪
z1=0
Rem 开始打怪1
While z1<=3
    z1=z1+1
    If z1=1
        //一层打怪开始
        Rem 一层打怪
        z2=0
        Rem 找怪1
        While z2<=46
            z2=z2+1
            If z2=1
                KeyPress 13,1
                SayString "@移动 174 187"
                KeyPress 13,1
            EndIf 
            If z2=2
                KeyPress 13,1
                SayString "@移动 187 175"
                KeyPress 13,1
            EndIf 
            //在这里省弱了。。。。。。。。。。。。。。。。
            If z2<46
                Goto 正式打怪
            EndIf 
        EndWhile 
    EndIf 
    If z1=2
        //二层打怪开始
        Rem 二层打怪
        z=0
        Rem 找怪2
        While z<=68
            z=z+1
            If z=1
                KeyPress 13,1
                SayString "@移动 132 18"
                KeyPress 13,1
            EndIf 
            If z=2
                KeyPress 13,1
                SayString "@移动 128 28"
                KeyPress 13,1
            EndIf 
            //在这里省弱了。。。。。。。。。。。。。。。。
            If z=68
                Goto 二下一过门
            EndIf 
            If z<68
                Goto 正式打怪
            EndIf 
        EndWhile 
    EndIf 
    //道士给自己打防。开盾。F5-F9。此段对于法师有战士可以不用将For z1<=3语名改为For z1<=2
    If z1=3
        MoveTo x,y
        Delay 1200
        KeyPress 116,1
        MoveTo x,y
        Delay 1200
        KeyPress 117,1
        MoveTo x,y
        Delay 1200
        KeyPress 118,1
        MoveTo x,y
        Delay 1200
        KeyPress 119,1
        Delay 1200
        KeyPress 120,1
    EndIf 
    Goto 开始打怪1
EndWhile 
Goto 开始打怪
//使用魔法打怪  F3设置火墙。风墙。雨火。等等
Rem 正式打怪
Delay 500
MoveTo x,y+80
Delay 1500
KeyPress 114,1
MoveTo x,y-80
Delay 1500
KeyPress 114,1
MoveTo x+100,y
Delay 1500
KeyPress 114,1
MoveTo x-100,y
Delay 1500
KeyPress 114,1
Delay 1500
MoveTo x,y
Delay 1500
KeyPress 114,1
Delay 500
If z1=1
    Goto 找怪1
EndIf