i = 0
d = 1
For t
For 7
Call rw
i = i + 1
d = d + 1
Next
Next
Sub rw
Select Case i
Case 0
Call xjrw
Call a
Call a1
Call b1
Call qysz
MoveTo 842, 652
Delay 100
LeftClick 1
Case 1
Call xjrw
Call a
Call a2
Call b2
Call qysz
MoveTo 842, 652
Delay 100
LeftClick 1
Case 2
Call xjrw
Call a
Call a3
Call b3
Call qysz
MoveTo 842, 652
Delay 100
LeftClick 1
Case 3
Call xjrw
Call a
Call a4
Call b4
Call qysz
MoveTo 842, 652
Delay 100
LeftClick 1
Case 4
Call xjrw
Call a
Call a5
Call b5
Call qysz
MoveTo 842, 652
Delay 100
LeftClick 1
Case 5
Call xjrw
Call a
Call a6
Call b6
Call qysz
MoveTo 842, 652
Delay 100
LeftClick 1
Case 6
Call xjrw
Call a
Call a7
Call b7
Call qysz
MoveTo 842, 652
Delay 100
LeftClick 1
Case Else
//否则
End Select
End Sub