End If
xunhuan =jyl + 3
For xunhuan
MoveR 34, 0
Delay 200
//前3次不点击
If k < 4 Then
Else
Call dianji()
End If
Delay 100
yu = k Mod 8
If yu = 0 Then
MoveR -272,34
End If
k=k+1
Next
Else
Delay 500
Goto keyijy
End If
Delay 500
///点击交易1
Rem dianjy
FindPic 0,0,1024,768,"Attachment:\jy2.bmp",0.9,X,Y
If X > 0 Then
MoveTo X+50, Y+5
Delay 300
LeftClick 1
Else
Delay 500
Goto dianjy
End If
Call Plugin.Window.Hide(hw)
Call Plugin.Window.Show(HWz)
MoveTo 0,0
Delay 1000
///点击交易2
Rem dianjy2
FindPic 0,0,1024,768,"Attachment:\jy2.bmp",0.9,X,Y
If X > 0 Then
MoveTo X+50, Y+5
Delay 300
LeftClick 1
Else
Delay 500
Goto dianjy2
End If
Delay 1000
If baoguoman=1 Then
Call huicheng()
End If
End Sub
Sub huicheng()
IfColor 731, 743, "E1EEF6", 0 Then
MoveTo 731, 743
Delay 300
LeftDoubleClick 1
Delay 300
Else
IfColor 695, 743, "DEF0F7", 0 Then
MoveTo 695, 743
Delay 300
LeftDoubleClick 1
Delay 300
Else
IfColor 658, 741, "ECF4FB", 0 Then
MoveTo 658, 741
Delay 300
LeftDoubleClick 1
Delay 300
Else
IfColor 621, 741, "ECF4FB", 0 Then
MoveTo 621, 741
Delay 300
LeftDoubleClick 1
Delay 300
Else
IfColor 583, 744, "E5FBF6", 0 Then
MoveTo 583, 744
Delay 300
LeftDoubleClick 1
Delay 300
Else
IfColor 546, 746, "BCDFE9", 0 Then
MoveTo 546, 746
Delay 300
LeftDoubleClick 1
Delay 300
Else
IfColor 509, 746, "BCDFE9", 0 Then
MoveTo 509, 746
Delay 300