Return Sub xp3 If xp=3 MoveTo 812,551 Delay 32 LeftClick 1 EndIf Return Sub 拒绝交易 VBSCall FindColorEx(133,312,135,314,"ffffff",1,0.8,x1,y1) VBSCall FindColorEx(311,389,313,391,"916e23",1,0.8,x2,y2) VBSCall FindColorEx(326,233,328,235,"8b6ff",1,0.8,x3,y3) If x1>=0 and y1>=0 and x2>=0 and y2>=0 and x3>=0 and y3>=0 MoveTo 312,390 Delay 32 LeftClick 1 EndIf Return Sub 同意组队 VBSCall FindColorEx(270,232,275,238,"c7ff",1,0.8,x1,y1) VBSCall FindColorEx(220,393,225,396,"aeff",1,0.8,x2,y2) If x1>=0 and y1>=0 and x2>=0 and y2>=0 MoveTo 223,394 Delay 32 LeftClick 1 EndIf Return Sub 关闭推荐任务 VBSCall FindColorEx(905,236,907,238,"c7ff",1,0.8,x1,y1) VBSCall FindColorEx(605,234,607,236,"c3ff",1,0.8,x2,y2) If x1>=0 and y1>=0 and x2>=0 and y2>=0 MoveTo 906,237 Delay 32 LeftClick 1 EndIf Return Sub 关闭导师界面 VBSCall FindColorEx(269,180,271,182,"c3f7",1,0.8,x1,y1) VBSCall FindColorEx(276,175,278,177,"dec7b5",1,0.8,x2,y2) If x1>=0 and y1>=0 and x2>=0 and y2>=0 MoveTo 270,181 Delay 32 LeftClick 1 EndIf Return Sub 自动收花 VBSCall FindColorEx(247,443,249,445,"8e46de",1,0.8,x1,y1) VBSCall FindColorEx(434,346,436,348,"18b2f7",1,0.8,x2,y2) If x1>=0 and y1>=0 and x2>=0 and y2>=0 MoveTo 289,450 Delay 32 LeftClick 1 EndIf Return