Sub wcrw1()    //完成任务鼠标点击1次//
i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\完成任务.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
Delay 200
End If
Wend
MoveTo intX+30, intY+10
Delay 400
LeftClick 1
Delay 400
End Sub

Sub wcrw2()    //完成任务鼠标点击2次//
i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\完成任务.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
Delay 200
End If
Wend
MoveTo intX+30, intY+10
Delay 600
LeftClick 1
Delay 700
LeftClick 1
Delay 500
End Sub

Sub wcrw3()    //完成任务鼠标点击3次//
i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\完成任务.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
End If
Wend
MoveTo intX + 30, intY + 10
Delay 600
LeftClick 1
Delay 700
LeftClick 1
Delay 700
LeftClick 1
Delay 500
End Sub

Sub lqrw()    //领取任务点击一次//
i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\领取任务.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
Delay 200
End If
Wend
MoveTo intX+30, intY+10
Delay 400
LeftClick 1
Delay 400
End Sub

Sub lqdjjl()    //领取等级奖励//
i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\点击领取.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
End If
Wend
Delay 400
MoveTo intX+5, intY+5
Delay 400
LeftClick 1
Delay 100
    
i=0
While i=0
FindPic 0,0,1024,768,"Attachment:\领取奖励2.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
i = 1
End If
Wend
Delay 200
MoveTo intX+30, intY+5
Delay 400
LeftClick 1
Delay 1000
LeftClick 1
Delay 600
End Sub


i=0    //开始修仙//
While i=0
FindPic 0,0,1024,768,"Attachment:\开始修仙.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then