Delay 500
LeftClick 1
End If
//连续找图加延迟
Delay 300
Do
Rem cq
FindPic 0,0,1024,768,"Attachment:\金币存储.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 300
LeftClick 1
Exit Do
Else
Goto cq
End If
Loop
//连续找图加延迟
Delay 300
For C
FindPic 0,0,1024,768,"Attachment:\输入金额.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX+80, intY
Delay 300
LeftClick 1
Delay 500
SayString "1000000"
MoveTo intX+110, intY+80
Delay 500
LeftClick 1
End If
Next
Delay 300
KeyPress "Esc", 1
Delay 300
// 飞天
Do
Rem ft
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 ft
End If
Loop
//连续找图 加延迟
//利用 神视野 偏移坐标点击下凡到冰封
Delay 1000
FindPic 0,0,1024,768,"Attachment:\冰封.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX-180, intY+180
Delay 600
LeftClick 1
Delay 600
MoveTo intX+80, intY+200
Delay 600
LeftClick 1
Delay 600
MoveTo intX-280, intY+30
Delay 600
LeftDoubleClick 1
End If
//加延迟
Delay 300
Do
Rem xf
FindPic 484,21,1086,791,"Attachment:\XP.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Exit Do
Else
Goto xf
End If
Loop
Delay 300
FindPic 0,0,1024,768,"Attachment:\冰封.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX+480, intY+550
Delay 200
LeftClick 1
Delay 500
MoveTo intX, intY+240
Delay 500
LeftClick 1
Delay 500
MoveTo intX, intY+420
Delay 500
LeftClick 1
End If
Delay 300
Do
Rem ms
FindPic 0,0,1024,768,"Attachment:\模式.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then