1. 定义变量 a,b, x, y,n
  2. 弹出窗口 "单击确定键打开画图软件"
  3. 延时 500 毫秒
  4. 启动程序或打开文件 "mspaint.exe"
  5. 延时 500 毫秒
  6. 注释:最大化
  7. (键盘)按下 "Alt" 键
  8. (键盘)按 "Space" 键, 1次
  9. (键盘)弹起 "Alt" 键
  10. (键盘)按 "X" 键, 1次
  11. 延时 500 毫秒
  12. 令 a = 920
  13. 令 b = 530
  14. 令 n = inputbox("输入旋转圈数","准备",n)
  15. 弹出窗口 "按下确定键开始画图(直到出现结束窗口,不要移动鼠标)"
  16. 延时 500 毫秒
  17. (鼠标)移动到 (a, b)
  18. 延时 20 毫秒
  19. (鼠标)左键按下
  20. 延时 20 毫秒
  21. 令 x = 1
  22. 令 y = 0
  23. 循环 n 次
  24.     (鼠标)移动到 (a + 5 * x, b + 5 * y)
  25.     延时 50 毫秒
  26.     令 y = x
  27.     (鼠标)移动到 (a + 5 * x, b + 5 * y)
  28.     延时 50 毫秒
  29.     令 x = - x
  30.     (鼠标)移动到 (a + 5 * x, b + 5 * y)
  31.     延时 50 毫秒
  32.     令 y = x
  33.     (鼠标)移动到 (a + 5 * x, b + 5 * y)
  34.     延时 50 毫秒
  35.     令 x = - (x + 1)
  36.     (鼠标)移动到 (a + 5 * x, b + 5 * y)
  37.     延时 50 毫秒
  38. 循环结束
  39. (鼠标)左键弹起
  40. 弹出窗口 "结束,谢谢使用"