按键精灵手机版监控像素变换点击脚本

Dim GetColor
Do
    GetColor = GetPixelColor(532, 708)//获得坐标的颜色
    //TracePrint Now()
    //TracePrint GetColor
    If GetColor <> "FFFFFF" Then 
        For 1000//循环点击1000次
            Tap 555, 680
        Next
        Exit Do
        TracePrint GetColor
    End If
    Delay 10
Loop
Dim GetColor
Do
    GetColor = GetPixelColo