KeyPress "Esc", 4 Delay 800 FindPic Ux,Uy,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\采集\返回游戏.bmp",0.9,intX,intY //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX > 0 And intY > 0 Then //在这里可以添加找到坐标后,需要做的处理。 KeyPress "Esc", 1 Delay 800 End If //取消决斗 Delay 1000 FindPic Ux,Uy,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\换线疗伤\取消决斗.bmp",0.9,intX,intY //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX > 0 And intY > 0 Then //在这里可以添加找到坐标后,需要做的处理。 MoveTo intX + 5, intY + 3 Delay 1000 LeftClick 1 Delay 800 End If End Sub Sub 取消决斗 FindPic Ux,Uy,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\换线疗伤\取消决斗.bmp",0.9,intX,intY //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX > 0 And intY > 0 Then //在这里可以添加找到坐标后,需要做的处理。 MoveTo intX + 5, intY + 3 Delay 1000 LeftClick 1 Delay 800 End If End Sub Sub 换线疗伤 //换线 MoveTo Ux + 735, Uy + 155 Delay 800 LeftClick 1 Delay 1500 MoveTo Ux + 672, Uy + 219 Delay 800 LeftClick 1 Delay 1500 KeyPress "Enter", 1 Delay 10000 //确认换线(交易服) Rem 确认换线交易服 IfColor Ux+102,Uy+45,"4646CB",0 Then KeyPress "F12", 1 Delay 1500 Else Delay 3000 Goto 确认换线交易服 End If Rem 打开地图 KeyPress "M", 1 Delay 800 KeyPress "M", 1 Delay 800 KeyPress "M", 1 Delay 1000 KeyPress "Num 1", 1 Delay 1500 FindPic Ux,Uy,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\换线疗伤\功能地点.bmp",0.9,intX,intY //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX > 0 And intY > 0 Then //在这里可以添加找到坐标后,需要做的处理。 MoveTo intX - 8, intY + 3 Delay 800 LeftClick 1 Delay 1500 MoveTo intX+60, intY +200 Delay 800 End If Call 取消决斗 FindPic Ux,Uy,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\换线疗伤\斗神坛.bmp",0.9,intX,intY //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX > 0 And intY > 0 Then //在这里可以添加找到坐标后,需要做的处理。 MoveTo intX + 8, intY + 3