按键精灵区域找色

目的是找到第一个颜色点时（找不到就一直找，直到找到，）单击鼠标左键，然后再找第二个颜色点（找不到就一直找，直到找到，）找到后单击鼠标左键，然后第三个，找到后单击左键，然后结束。最好有实例，本人笨笨。采纳后追加分。

//使用数组,第一种颜色赋值给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
//跳回（结束）循环