Delay 1000
LeftClick 1
Delay 500
RestoreMousePos
EndIf
Delay 2000
MoveR 34,0
RightClick 1
Delay 1000
VBSCall FindPic(250,250,550,400,"Attachment:\卖石.bmp",0.9,x,y)
If x>=0 and y>=0
SaveMousePos
Delay 1000
MoveTo x,y+8
Delay 1000
LeftClick 1
Delay 500
RestoreMousePos
EndIf
Delay 2000
MoveR 0,-33
RightClick 1
Delay 1000
VBSCall FindPic(250,250,550,400,"Attachment:\卖石.bmp",0.9,x,y)
If x>=0 and y>=0
SaveMousePos
Delay 1000
MoveTo x,y+8
Delay 1000
LeftClick 1
Delay 500
RestoreMousePos
EndIf
Delay 2000
MoveR 0,-33
RightClick 1
Delay 1000
VBSCall FindPic(250,250,550,400,"Attachment:\卖石.bmp",0.9,x,y)
If x>=0 and y>=0
SaveMousePos
Delay 1000
MoveTo x,y+8
Delay 1000
LeftClick 1
Delay 500
RestoreMousePos
EndIf
Delay 2000
MoveR 0,-33
RightClick 1
Delay 1000
VBSCall FindPic(250,250,550,400,"Attachment:\卖石.bmp",0.9,x,y)
If x>=0 and y>=0
SaveMousePos
Delay 1000
MoveTo x,y+8
Delay 1000
LeftClick 1
Delay 500
RestoreMousePos
EndIf
Delay 2000
MoveR 38,0
RightClick 1
Delay 1000
VBSCall FindPic(250,250,550,400,"Attachment:\卖石.bmp",0.9,x,y)
If x>=0 and y>=0
SaveMousePos
Delay 1000
MoveTo x,y+8
Delay 1000
LeftClick 1
Delay 500
RestoreMousePos
EndIf
Delay 2000
MoveR 0,35
RightClick 1
Delay 1000
VBSCall FindPic(250,250,550,400,"Attachment:\卖石.bmp",0.9,x,y)
If x>=0 and y>=0
SaveMousePos
Delay 1000
MoveTo x,y+8
Delay 1000
LeftClick 1
Delay 500
RestoreMousePos
EndIf
Delay 2000
MoveR 0,36
RightClick 1
Delay 1000
VBSCall FindPic(250,250,550,400,"Attachment:\卖石.bmp",0.9,x,y)
If x>=0 and y>=0
SaveMousePos
Delay 1000
MoveTo x,y+8
Delay 1000
LeftClick 1