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
MoveTo intX + 40, intY + 5
    Delay 200
    LeftClick 1
Delay 200
    LeftClick 1
 Delay 200
    LeftClick 1

    End If

Wend

Call qq()
Call qq()
Call qq()
Sub qq()
FindPic 0,0,1024,768,"Attachment:\高级.bmp",0.9,intX,intY
End Sub
If intX > 0 And intY > 0 Then
	
MoveTo intX + 20, intY + 5
 Delay 200
    LeftClick 1
Delay 200
    LeftClick 1
Delay 200
    LeftClick 1

    End If

Call ww()
Call ww()
Call ww()
Sub ww()
FindPic 0,0,1024,768,"Attachment:\复活.bmp",0.9,intX,intY
End Sub
If intX > 0 And intY > 0 Then
	
MoveTo intX + 20, intY + 5
   Delay 200
    LeftClick 1
Delay 200
    LeftClick 1
Delay 200
    LeftClick 1

    End If

Call q()
Call q()
Call q()
Sub q()
FindPic 0,0,1024,768,"Attachment:\确定.bmp",0.9,intX,intY
End Sub
If intX > 0 And intY > 0 Then 
MoveTo intX + 15, intY + 5
   Delay 200
    LeftClick 1
Delay 200
    LeftClick 1
   Delay 200
    LeftClick 1

    End If

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 63600
MoveTo intX + 40, intY + 5
    Delay 200
    LeftClick 1
    Delay 200
    LeftClick 1
    Delay 200
    LeftClick 1

    End If
   
Wend
Call w()
Call w()
Call w()
Sub w()
FindPic 0,0,1024,768,"Attachment:\领取经验.bmp",0.9,intX,intY
End Sub
If intX > 0 And intY > 0 Then
MoveTo intX + 160, intY + 5
    Delay 200
    LeftClick 1
    Delay 200
    LeftClick 1