Delay 1000 LeftClick 5 Delay 5000 Rem 继续取消M返回杀怪点 KeyPress "M", 1 Delay 500 FindPic 200, 100, 1200, 900, "C:\Program Files\mf\美服区域地图.bmp", 0.9, intX1, intY1 If intX1 > 0 And intY1 > 0 Then Goto 继续取消M返回杀怪点 End If Delay 1000 KeyDown "D", 1 Delay 600 KeyUp "D", 1 Delay 100 KeyUp "R", 1 Delay 200 End Sub //========================================================================================================== // 防卡怪07 //========================================================================================================== Sub 防卡怪 KeyPress "1", 1 Delay Var3 FindPic intx9 - 567, inty - 44, intx9 - 212, inty + 142, "C:\Program Files\mf\美服怪物满血条.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then KeyDown "D", 1 Delay 600 KeyUp "D", 1 Delay 100 Call 返回杀怪点() Delay 100 KeyUp "R", 1 Delay 200 End If End Sub //========================================================================================================== // 吃红蓝07 //========================================================================================================== Sub 判断是否需吃红蓝 FindPic intx9 - 849, inty9 - 29, intx9 - 568, inty9 + 130, "C:\Program Files\mf\不用吃血的血条.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then Else KeyPress "0", 3 Delay 100 End If FindPic intx9 - 849, inty9 - 29, intx9 - 568, inty9 + 130, "C:\Program Files\mf\不用吃蓝的蓝条.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then Else KeyPress "9", 3 Delay 100 End If End Sub //========================================================================================================== // 卖垃圾08 //========================================================================================================== Sub 卖垃圾 Rem 继续按M前往卖垃圾 KeyPress "M", 1 Delay 500 FindPic 200, 100, 1200, 900, "C:\Program Files\mf\美服区域地图.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then Else Goto 继续按M前往卖垃圾 End If FindPic 200, 100, 1200, 900, "C:\Program Files\mf\美服选商人下拉图表.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then MoveTo intx + 5, inty + 5 Delay 1000 LeftClick 1 Delay 500 Else MoveTo intx9 + 5, inty9 + 50 Delay 1000 Goto 继续按M前往卖垃圾 End If FindPic 200, 100, 1200, 900, "C:\Program Files\mf\37M武器.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then MoveTo intx + 5, inty + 5 Delay 1000 LeftClick 1 Delay 500 Else MoveTo intx9 + 5, inty9 + 50 Delay 1000 Goto 继续按M前往卖垃圾 End If FindPic 200, 100, 1200, 900, "C:\Program Files\mf\前往商人.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then MoveTo intx + 5, inty + 5 Delay 1000