VBSCall FindPic(50,50,1024,768,"kaishe.bmp",0.9,intX,intY)
If intX>0 and intY>0
MoveTo intX,intY
LeftClick 1
KeyPress 13,1
Delay 2000
MoveTo 577,326
RightClick 1
Else
VBSCall FindPic(0,50,1400,900,"fangzhu.bmp",0.9,intX,intY)
If intX>0 and intY>0
VBSCall FindPic(0,50,1400,900,"kai.bmp",0.9,intX,intY)
If intX>0 and intY>0
MoveTo intX,intY
LeftClick 1
VBSCall FindPic(0,50,1400,900,"guanbi.bmp",0.9,intX,intY)
If intX>0 and intY>0
MoveTo intX,intY
KeyPress 13,1
MoveTo 504,326
LeftClick 1
Delay 500
MoveTo 576,328
LeftClick 1
Else
//脚本开始
Delay 5000
KeyDown 82,1
KeyDown 38,1
MoveTo 50,50
Delay 3500
KeyUp 38,1
KeyUp 82,1
//往上
KeyDown 68,1
KeyDown 39,1
Delay 3500
KeyUp 39,1
KeyUp 68,1
//分开
KeyDown 70,1
Delay 500
KeyPress 16,1
Delay 3500
KeyUp 70,1
KeyDown 82,1
Delay 500
KeyPress 16,1
Delay 3500
KeyUp 82,1
KeyPress 70,60
KeyPress 71,60
//杀第一批结束
KeyDown 82,1
KeyDown 40,1
Delay 400
KeyPress 16,1
KeyUp 40,1
KeyDown 37,1
Delay 400
KeyUp 37,1
Delay 3500
KeyUp 82,1
KeyDown 70,1
Delay 500
KeyPress 16,1
Delay 3500
KeyUp 70,1
KeyDown 82,1
Delay 3500
KeyPress 70,8
KeyPress 68,8
