Delay 200
        LeftClick 1
        Delay 3000
    End If
    //      找强化石  
    FindPic 300,300,1280,959,"Attachment:\AQ.bmp",0.9,intX,intY
    If intX > 0 And intY > 0 Then 
        MoveTo intX, intY 
        GetCursorPos x, y
        Delay 50
        FindPic x-80,y,x+100,y+80,"Attachment:\kg.bmp",0.9,x,y
        If x >= 0 And y > 0 Then 
            MoveTo x+8,y+8
        End If
        Delay 200
        LeftClick 1
        Delay 3000
    End If
    //            经验卷  
    FindPic 300,300,1280,959,"Attachment:\kg.bmp",0.9,intX,intY
    If intX > 0 And intY > 0 Then 
        MoveTo intX + 8, intY + 8
        Delay 200
        LeftClick 1
        Delay 3000
    End If
End Sub
Delay 20000
Goto 开始