Hwnd = Plugin.Window.Find(0, "La Tale Client")
HwndEx = Plugin.Window.FindEx(Hwnd, 0, "LATALE_CLIENT", 0)
Hwnd = Plugin.Window.Foreground()
Hwnd = Plugin.Window.MousePoint()
Hwnd = Plugin.Window.GetKeyFocusWnd()
sRect = Plugin.Window.GetClientRect(Hwnd)
Dim MyArray
MyArray = split(sRect, "|")
Ux = CLng(MyArray(0))
Uy = CLng(MyArray(1))

Rem 攻击开始


FindPic Ux,Uy,Ux+800,Uy+600,"Attachment:\1.bmp",0.9,zijiX,zijiY
If zijiX > 0 And zijiY > 0 Then

FindPic zijiX-370,zijiY-100,zijiX+230,zijiY+100,"Attachment:\2.bmp",0.9,guaiX,guaiY
If guaiX > 0 And guaiY > 0 Then

If guaiX > zijiX - 70 Then 
	KeyDown "Right", 1
Else 
    KeyDown "Left", 1
End If
KeyPress "A", 1
KeyPress "S", 1
KeyPress "D", 1
KeyPress "F", 1
KeyPress "Z", 1
KeyPress "X", 1
KeyUp "Right", 1
KeyUp "Left", 1
Delay 100
Goto 攻击开始
Else 
Goto 攻击结束


End If

Else 
Goto 攻击结束

End If

Rem 攻击结束