//使用數組,第壹種顏色賦值給s(0),第二種顏色賦值給s(1),以此類推,我使用360瀏覽器界面上的顏色做示範,自行修改。
dim s(2)
s(0) = "1E6CEC":s(1) = "31B05F":s(2) = "9E8C6C"
a = 0
//要找幾種顏色,就循環幾次
For 3
//循環開始
Rem 開始
FindColor 0, 0, 1024, 768, s(a), x, y
//開始查找顏色
If x > 0 And y > 0 Then
//如果找到顏色就移動鼠標到色點上並點擊。
MoveTo x, y
Delay 128
LeftClick 1
Delay 128
a = a + 1
//找到上壹個顏色後,賦值+1,開始找下壹個顏色
Else
//如果沒有找到這個顏色
Delay 128
Goto 開始
//從標記為開始的地方重新尋找
End If
Delay 128
next
//跳回(結束)循環