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