For xunhuan If guaijjc = 0 then ElseIf guaijjc =1 then If X2<=time Then gosub 竞技场加怪 X1 = time X2=DateAdd("n",daguaijingji,X1) End If End if If xuelan = 1 then If 吃红=1 Gosub 红90 ElseIf 吃红=2 Gosub 红80 ElseIf 吃红=3 then Gosub 红70 ElseIf 吃红 = 4 then Gosub 红60 ElseIf 吃红=5 then Gosub 红50 ElseIf 吃红=6 then Gosub 红40 ElseIf 吃红=7 then Gosub 红30 ElseIf 吃红=8 then Gosub 红20 ElseIf 吃红=9 then Gosub 红10 ElseIf 吃红=10 then End If If shifouhanhua = 1 then gosub 喊话 ElseIf shifouhanhua= 2 then End if If 吃蓝=1 Gosub 蓝90 ElseIf 吃蓝=2 then Gosub 蓝80 ElseIf 吃蓝=3 then Gosub 蓝70 ElseIf 吃蓝=4 then Gosub 蓝60 ElseIf 吃蓝=5 then Gosub 蓝50 ElseIf 吃蓝=6 then Gosub 蓝40 ElseIf 吃蓝=7 then Gosub 蓝30 ElseIf 吃蓝=8 then Gosub 蓝20 ElseIf 吃蓝=9 then Gosub 蓝10 ElseIf 吃蓝=10 then End If If shifouhanhua = 1 then gosub 喊话 ElseIf shifouhanhua= 2 then End if ElseIf xuelan = 2 then Gosub 内存血 If shifouhanhua = 1 then gosub 喊话 ElseIf shifouhanhua= 2 then End if gosub 内存蓝 If shifouhanhua = 1 then gosub 喊话 ElseIf shifouhanhua= 2 then End if End If If guai=1 then call 位置1 ElseIf guai=2 then call 位置2 ElseIf guai=3 then call 位置3 ElseIf guai=4 then call 位置4 ElseIf guai=5 then call 位置5 End If Rem guaiding Delay 300 guaiding = Plugin.Bkgnd.GetPixelColor(Hwnd, 463,396) If guaiding= "A9C7D4" then Call Plugin.Bkgnd.LeftClick(Hwnd, 463,396) Else Goto guaiding End If If 关闭战斗显示 = 0 Gosub 关闭战斗显示1 ElseIf 不关闭战斗显示 =1 End If Delay 1000 Plugin.SR.SetMode 1,Hwnd Rem guanbi Delay 500 x1=518:y1=434:x2=567:y2=457 colordsc="D4C7A9-000000":similar=0.95 STR=Plugin.SR.ShapeRec(x1,y1,x2,y2,colordsc,similar)