Exit Do
Else 
    Goto ms
End If
Loop
Delay 2000
Rem zbl
KeyDown 17, 1
Delay 100
KeyPress 87, 1
Delay 50
KeyUp 17, 1
Delay 300
Do
FindPic 0,0,1024,768,"Attachment:\装备栏.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
Exit Do
Else
    Goto zbl
End If
Loop

//加延迟
Delay 1000
//等待XP技能
DO
Rem bb
FindPic 484,21,1086,791,"Attachment:\XP.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 

MoveTo intX, intY
Delay 400
LeftClick 3
        Delay 100
        MoveTo intX-420, xitY+350
Exit Do
Else
Goto bb
End If
Loop

Delay 550
//开始刷球 循环随机+换球以  XP 图色判断的

DO
    FindPic 0,0,1024,768,"Attachment:\已满球.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
    KeyPress "4", 1
    Else
    KeyPress "3", 1
End If
    Delay YS
FindPic 9,297,900,855,"Attachment:\提前飞天.bmp",1,intX,intY
If intX > 0 And intY > 0 Then 
        KeyPress "F2", 1
Exit Do
        Else
    RightClick 1
        RightClick 1
End If
    Delay YS1
        Loop
KeyPress "F2", 1
KeyPress "F2", 1
KeyPress "F2", 1

Do
    Rem ftq
    KeyPress "F2", 1
FindPic 0,0,1024,768,"Attachment:\冰封.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
    Exit Do
    Else 
    Goto ftq
End If
Loop
//飞天后打开VIP仓库存球 加延迟
Delay 1500


FindPic 0,0,1024,768,"Attachment:\VIP图片.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
    Delay 50
    LeftClick 1
    Delay 1000
    MoveTo intX-280, intY-250
    Delay 1000
    LeftClick 1
End If
Delay 500
Do 
        Rem djc
FindPic 0,0,1024,768,"Attachment:\金币存储.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX+185, intY-70
    Delay 600
    LeftClick 10
    
Exit Do