r A=DropList{"物理攻击":"0"|"法术攻击":"1"}=0 "人物攻击方式"
UserVar B=DropList{"物理攻击":"0"|"法术攻击":"1"}=0 "宠物攻击方式"

//判断游戏是否打开

Rem 判断游戏是否开始

Hwnd = Plugin.Window.Find(0, "神 武")
sWindow = Plugin.Window.IsWindow(Hwnd)
If sWindow = 0 Then 

    Call Plugin.Msg.Tips("游戏未打开")

    Delay 1000
    Goto 判断游戏是否开始

Else 
    Call Plugin.Window.Active(Hwnd)
    Call Plugin.Window.Move(Hwnd, 0, 0)
End If


//判断战斗状态

Rem 判断战斗状态

Delay 1000

FindPic 730, 500, 873, 533, "Attachment:\目标.bmp", 0.5, ZDX, ZDY

If ZDX > 0 And ZDY > 0 Then 
    Call Plugin.Msg.ShowScrTXT(200, 3, 1024, 768, "战斗中", "0000FF")

    FindPic 353,122,408,142,"Attachment:\2.bmp",0.5,X1,Y1
    If X1 > 0 And Y1 > 0 Then

        LockMouse
        Call Plugin.Window.Active(Hwnd)

        If a = 1 Then 
            KeyDown 18, 1
            KeyPress 81, 1
            KeyUp 18, 1

        ElseIf A=0 THEN
            KeyDown 18, 1
            KeyPress 65, 1
            KeyUp 18, 1
        End If
        
        If b = 1 Then 
            KeyDown 18, 1
            KeyPress 81, 1
            KeyUp 18, 1
        ElseIf b=0 THEN
            KeyDown 18, 1
            KeyPress 65, 1
            KeyUp 18, 1
        End If      

        UnlockMouse

    End If

Else 
    Call Plugin.Msg.ShowScrTXT(200, 3, 1024, 768, "非战斗", "0000FF")

End If

Goto 判断战斗状态