- 标记 1
- 等待按任意键,保存到变量o中
- //KeyPress 8,1
- 如果表达式 (o=81) 为真,则
- 调用外部VBScript子程序 su=GetCursorShape(0)
- 调用外部VBScript子程序 su=GetCursorShape(0)
- 调用外部VBScript子程序 su=GetCursorShape(0)
- 调用插件命令 Hwnd = Window.Foreground()
- color=GetPixelColor(x,y)
- 弹出窗口 "X坐标为 "&x&" Y坐标为 "&y&" 颜色为 "&color&" 句柄为 "&Hwnd&" 鼠标形状为 "&su
- 延时100毫秒
- 跳转到标记 1
- 否则
- 跳转到标记 1
- 条件结束