Sub 打普通BOSS Call 异常判断() Call Plugin.Bkgnd.KeyPress(hwnd, 123) Delay 200 Call Plugin.Bkgnd.KeyPress(hwnd, 90) Rem AA Color0 = Plugin.Bkgnd.GetPixelColor(hwnd, 436, 61) If Color0 = "D6D6D6" Then Call 打怪() Goto AA End If Call Plugin.Bkgnd.KeyPress(hwnd, 123) Call 异常判断() End Sub Sub 打程远志判断 Call Plugin.Bkgnd.KeyPress(hwnd, 123) Call Plugin.Bkgnd.KeyPress(hwnd, 90) Delay 50 timeStart = Now Rem A Color0 = Plugin.BkgndColor.GetPixelColor(hwnd, 576, 30) //1638515 Color1 = Plugin.BkgndColor.GetPixelColor(hwnd, 436, 61) //14079702 diffADate0 = DateDiff("s", timeStart, Now) If Color0 = 1638515 And diffADate0 > czyjzjh Then Goto B ElseIf Color1 = 14079702 Then Call 打怪() Goto A ElseIf Color1 <> 14079702 Then Delay 2000 Color2 = Plugin.BkgndColor.GetPixelColor(hwnd, 436, 61) //1638515 If Color2 = 14079702 Then Goto A ElseIf Color2 <> 14079702 Then Goto B End If End If Rem B Call Plugin.Bkgnd.KeyPress(hwnd, 123) Call 异常判断() End Sub Sub 打怪 If zhiye = 0 Then Call 武将出招() ElseIf zhiye = 1 Then Call 刺客出招() ElseIf zhiye = 2 Then Call 谋士出招() ElseIf zhiye = 3 Then Call 方士出招() End If Delay 1500 Call 异常判断() End Sub Function 查找技能所在坐标(Flag, key) intXJn0 = - 1 intYJn0 = - 1 If key = "000" Then TracePrint "技能没使用" ElseIf key = "1" Then intXJn0 = 158 intYJn0 = 576 ElseIf key = "2" Then intXJn0 = 192 intYJn0 = 576 ElseIf key = "3" Then intXJn0 = 229 intYJn0 = 576 ElseIf key = "4" Then intXJn0 = 256 intYJn0 = 576 ElseIf key = "5" Then intXJn0 = 291 intYJn0 = 576 ElseIf key = "6" Then intXJn0 = 326 intYJn0 = 576 ElseIf key = "7" Then intXJn0 = 361 intYJn0 = 576 ElseIf key = "8" Then intXJn0 = 396 intYJn0 = 576 ElseIf key = "9" Then intXJn0 = 431 intYJn0 = 576 ElseIf key = "0" Then intXJn0 = 474 intYJn0 = 576 ElseIf key = "11" Then intXJn0 = 158 intYJn0 = 537 ElseIf key = "22" Then intXJn0 = 192 intYJn0 = 537 ElseIf key = "33" Then