Sub checkValue //卖卡
//Check if number of subjugation > 5
If n >2 Then
Delay 300
Call clickPoint(659, 514)
//Sell cards
Call holdPoint(20, 125, "3E74B7")
For 180000
IfColor 173 + intX, 467 + intY, "004B73", 0 Then
Call holdPoint(173, 467, "004B73")
Call holdPoint(312, 332, "0A1F96")
Call holdPoint(376, 347, "444444")
Exit For
End If
Delay 300
IfColor 173 + intX, 467 + intY, "2F5655", 0 Then
Exit For
End If
Delay 300
Next
Call holdPoint(545, 85, "6868FC")
//Reset number of subjugation
n = 0
Goto checkFinished
End If
Delay 300
End Sub
Sub buypaper// 买纸
//Check if coins > 400k
IfColor 33 + intX, 38 + intY, "000000", 0 Then
IfColor 35 + intX, 43 + intY, "000000", 0 Then
Delay 300
Call clickPoint(659, 514)
//Purchase 3 "Pattern of Basic Race"
Call holdPoint(612, 531, "529BEB")
Delay 900
Call checkPoint(195, 132, "40491F")
For 3
Call holdPoint(667, 271, "343B19")
Call holdPoint(312, 332, "0A1F96")
Call holdPoint(376, 347, "444444")
Next
Call holdPoint(732, 88, "6868FC")
Goto checkFinished
End If
End If
Delay 300
//Check if coins = 500k
IfColor 35 + intX, 37 + intY, "000000", 0 Then
IfColor 31 + intX, 43 + intY, "000000", 0 Then
Delay 300
Call clickPoint(659, 514)
//Purchase 4 "Pattern of Basic Race"
Call holdPoint(612, 531, "529BEB")
Delay 900
Call checkPoint(195, 132, "40491F")
For 4
Call holdPoint(667, 271, "343B19")
Call holdPoint(312, 332, "0A1F96")
Call holdPoint(376, 347, "444444")
Next
Call holdPoint(732, 88, "6868FC")
Goto checkFinished
End If
End If
Delay 300
End Sub |
