x = Plugin.Sys.GetScRX()
y = Plugin.Sys.GetScRY()
Do
For i = 1 To 4
FindPic 0, 0, x, y, "Attachment:\" & i & ".bmp", 0.9, intX, intY
If intX > 0 And intY > 0 and i = 1 Then
Delay 200
MoveTo intX, intY
Delay 200
LeftClick 1
Exit Do
ElseIf intX > 0 And intY > 0 and i = 2 and b=0 Then
Delay 200
MoveTo intX, intY
Delay 200
LeftClick 1
b=1
ElseIf intX > 0 And intY > 0 and i = 3 and b=1 Then
Delay 200
MoveTo intX, intY
Delay 200
LeftClick 1
c=1
ElseIf intX > 0 And intY > 0 and i = 4 and c=1 Then
Delay 200
MoveTo intX, intY
Delay 200
LeftClick 1
d=1
End If
Delay 100
Next
Loop
图片名为1、2、3、4四张图放到附件,记得用抓抓截。