Loop End Sub Sub 战斗1 // 窗口1 IfColor 325 + 定位点x1, 456 + 定位点y1, "808080", 0 Then FindPic 定位点x1+508,定位点y1+92,定位点x1+568,定位点y1+120,"Attachment:\法术.bmp",0.9,xxx,yyy If xxx > 0 And yyy > 0 Then Call Plugin.Window.Active(窗口1) Delay 25 If rw1 = 0 Then Delay 10 Call 攻击 End If If rw1 = 1 Then Delay 10 Call 防御 End If If rw1 = 2 Then Delay 10 Call 法术 End If End If // Delay 25 FindPic 定位点x1 + 508, 定位点y1 + 176, 定位点x1 + 568, 定位点y1 + 208, "Attachment:\法术.bmp", 0.9, xxx, yyy If xxx > 0 And yyy > 0 Then Call Plugin.Window.Active(窗口1) Delay 25 If bb1 = 0 Then Delay 10 Call 攻击 End If If bb1 = 1 Then Delay 10 Call 防御 End If If bb1 = 2 Then Delay 10 Call 法术 End If End If End If Delay 25 Delay yanchi End Sub Sub 战斗2 // 窗口2 IfColor 325 + 定位点x2, 456 + 定位点y2, "808080", 0 Then FindPic 定位点x2+508,定位点y2+92,定位点x2+568,定位点y2+120,"Attachment:\法术.bmp",0.9,xxx,yyy If xxx > 0 And yyy > 0 Then Call Plugin.Window.Active(窗口2) Delay 25 If rw2 = 0 Then Delay 10 Call 攻击 End If If rw2 = 1 Then Delay 10 Call 防御 End If If rw2 = 2 Then Delay 10 Call 法术 End If End If // Delay 25 FindPic 定位点x2 + 508, 定位点y2 + 176, 定位点x2 + 568, 定位点y2 + 208, "Attachment:\法术.bmp", 0.9, xxx, yyy If xxx > 0 And yyy > 0 Then Call Plugin.Window.Active(窗口2) Delay 25 If bb2 = 0 Then Delay 10 Call 攻击 End If If bb2 = 1 Then Delay 10 Call 防御 End If If bb2 = 2 Then Delay 10 Call 法术 End If End If End If Delay 25 Delay yanchi End Sub Sub 战斗3 // 窗口3 IfColor 325 + 定位点x3, 456 + 定位点y3, "808080", 0 Then FindPic 定位点x3+508,定位点y3+92,定位点x3+568,定位点y3+120,"Attachment:\法术.bmp",0.9,xxx,yyy If xxx > 0 And yyy > 0 Then Call Plugin.Window.Active(窗口3) Delay 25 If rw3 = 0 Then Delay 10 Call 攻击