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