EndFor Rem 判断点二颜色正确 Return CX.判断点击判断 Sub CX.目的地 If Var_QD = "3" X00=783:Y00=532 X01= X00 : Y01= Y00 : COL01 = "00CFFF" : time01=80 : xiaosh=1 Gosub CX.点击判断 If KKK = 0 KKK = 1 Var_user=Cint(Var_user01)-1 Goto END.目的地 Else Delay 300 KeyPress 117,1 Goto END EndIf EndIf If Var_mubiao="0" If txt_record = "精灵太空站左翼" Goto 精灵太空站左翼 ElseIf txt_record = "精灵太空站" Goto 精灵太空站 EndIf X00=47:Y00=518:time01=2000 X01= 632 : Y01= 357 : COL01 = "9C9A9C" : time01=200 Gosub CX.点击判断 Rem 精灵太空站 X00=632:Y00=357:time00=500 X01= 109 : Y01= 395 : COL01 = "FFFF8C" : time01=200 Gosub CX.点击判断 Rem 精灵太空站左翼 X00=X3:Y00=Y3:time00=500 X01= 100 : Y01= 120 : COL01 = "FFFF08" : time01=200 Gosub CX.点击判断 ElseIf Var_mubiao="1" //帕诺星 X = 296 : Y = 225 : COL_PNX = "EFEFF7" : a = 5 A_PNX = X - a : B_PNX = Y - a : C_PNX=X+a : D_PNX=Y+a //火星 X_SB = 146 : Y_SB = 173 Y_SQ1 = 229 : Y_SQ2 = Y_SQ1+1 : COL_SQ = "00CFFF" COL_MB = "100CFF" Gosub 通过地图进入星系 If Var_ceng > 1 //火星二层 X00=856:Y00=125:time01=1000 X01= X00 : Y01= Y00 : COL01 = "080C21" : time01=800 : xiaosh=1 Gosub CX.点击判断 EndIf ElseIf Var_mubiao="2" ElseIf Var_mubiao="3" //云霄星 X00=47:Y00=518:time01=2000 X01= 632 : Y01= 357 : COL01 = "9C9A9C" : time01=1000 Gosub CX.点击判断 //帕诺星系 Delay 1000 Plugin GetColor = Bkgnd.GetPixelColor(Hwnd, 805, 156) If GetColor = "999AFF" Else X01=266:Y01=230:time01=3000 Gosub CX.直接点击 EndIf //找云霄星 For 5 //下面这句用于向后台窗口句柄(变量:Hwnd)发送一个鼠标移动到客户区域(坐标:150, 184)处 Plugin Bkgnd.MoveTo(Hwnd, 150, 184) Delay 1000 Delay time101 Plugin XY = Bkgnd.FindCenterColor(Hwnd, 134, 184, 832, 186, "3169CE") MyArray = Split(XY, "|") X = CInt(MyArray(0)): Y = CInt(MyArray(1)) If X > 0 and Y >0 For 10 X = X + 5 Plugin Bkgnd.LeftClick(Hwnd, X, Y) Plugin Bkgnd.LeftClick(Hwnd, X, Y) Delay 500 Plugin XY = Bkgnd.FindCenterColor(Hwnd, 134, 184, 832, 186, "3169CE") MyArray = Split(XY, "|") X = CInt(MyArray(0)): Y = CInt(MyArray(1)) If X > 0 and Y >0 Plugin Bkgnd.LeftClick(Hwnd, X, Y) Else Goto END.目的地 EndIf EndFor EndIf EndFor ElseIf Var_mubiao="4" //海洋星一层 X00=647:Y00=182 X01= 0 : Y01= 0 : COL01 = "737573" : time01=1000 : xiaosh=1 Gosub CX.点击判断 ElseIf Var_mubiao="基地" X00=783:Y00=532 X01= X00 : Y01= Y00 : COL01 = "00CFFF" : time01=80 : xiaosh=1 Gosub CX.点击判断 Goto END