Goto 开始 EndIf EndIf EndIf Plugin XY = Bkgnd.FindColorEx(hwnd,isx,isy,isrx,isry,"4AFF84",0, ck) //下面这句用于分割字符串 MyArray = Split(XY, "|") //下面这句将字符串转换成数值 X = CInt(MyArray(0)): Y = CInt(MyArray(1)) If X>-1 and Y>-1 X=X+20 Y=Y-30 Plugin Bkgnd.LeftClick(hwnd, X, Y) Delay 2000 IfColor mx,my,0004D6,2 Delay 1000 Rem 捡取 If zijiu<zi Plugin Bkgnd.KeyPress(hwnd,skill1) Plugin Bkgnd.KeyPress(hwnd,skill2) Plugin Bkgnd.KeyPress(hwnd,skill3) // Delay 1000 zijiu=zijiu+1 sha=sha+1 Plugin Msg.ShowScrTXT(6, 118, 122, 145, "杀怪数"&sha, "0000FF") EndIf IfColor mx,my,21204A,2 Plugin Bkgnd.KeyPress(hwnd,32) Plugin Bkgnd.KeyPress(hwnd,32) zijiu=0 Goto 开始 Else Delay 1000 If zijiu>=zi zijiu=0 Goto 开始 EndIf Goto 捡取 Goto 开始 EndIf EndIf EndIf Plugin XY = Bkgnd.FindColorEx(hwnd,leftx,lefty,leftrx,leftry,"52FF84",0, ck) //下面这句用于分割字符串 MyArray = Split(XY, "|") //下面这句将字符串转换成数值 X = CInt(MyArray(0)): Y = CInt(MyArray(1)) If X>-1 and Y>-1 X=X+20 Y=Y-30 Plugin Bkgnd.LeftClick(hwnd, X, Y) Delay 2000 IfColor mx,my,0004D6,2 Delay 1000 Rem 捡取 If zijiu<zi Plugin Bkgnd.KeyPress(hwnd,skill1) Plugin Bkgnd.KeyPress(hwnd,skill2) Plugin Bkgnd.KeyPress(hwnd,skill3) //Delay 1000 zijiu=zijiu+1 sha=sha+1 Plugin Msg.ShowScrTXT(6, 118, 122, 145, "杀怪数"&sha, "0000FF") EndIf IfColor mx,my,21204A,2 Plugin Bkgnd.KeyPress(hwnd,32) Plugin Bkgnd.KeyPress(hwnd,32) zijiu=0 Goto 开始 Else Delay 1000 If zijiu>=zi zijiu=0 Goto 开始 EndIf Goto 捡取 Goto 开始 EndIf EndIf EndIf Plugin XY = Bkgnd.FindColorEx(hwnd,leftx,lefty,leftrx,leftry,"4AFF84",0, ck) //下面这句用于分割字符串 MyArray = Split(XY, "|") //下面这句将字符串转换成数值 X = CInt(MyArray(0)): Y = CInt(MyArray(1)) If X>-1 and Y>-1 X=X+20 Y=Y-30 Plugin Bkgnd.LeftClick(hwnd, X, Y) Delay 2000 IfColor mx,my,0004D6,2 Delay 1000 Rem 捡取 If zijiu<zi Plugin Bkgnd.KeyPress(hwnd,skill1) Plugin Bkgnd.KeyPress(hwnd,skill2) Plugin Bkgnd.KeyPress(hwnd,skill3) //Delay 1000 zijiu=zijiu+1 sha=sha+1 Plugin Msg.ShowScrTXT(6, 118, 122, 145, "杀怪数"&sha, "0000FF")