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 判断战斗状态