//手头没有手机测试,理论上如下。
//假设该绿色的坐标点为50,100
Dim rColor,ys
//ys赋值颜色,自己取得该点颜色,这里假设颜色为"FFFFFF".
ys="FFFFFF"
Do
//截图屏幕至内存,等待被调用
KeepCapture
Delay 100
//得到点50,100坐标点的颜色,赋值给变量rColor
rColor = GetPixelColor(50, 100)
If rColor = ys Then
TracePrint "颜色值不对,跳回继续判断"
Else
Tap 50, 100
Exit Do
End If
//判断结束,清空内存截图
ReleaseCapture
Loop