1.             （鼠标）移动到 (459 + Ux, 315 + Uy)
  2.             延时 5 毫秒
  3.             （鼠标）左键双击, 1次
  4.             延时 5 毫秒
  5.         条件结束
  6.         注释：二号
  7.         如果 Form1.Hao.ListIndex = 2 则
  8.             （鼠标）移动到 (459 + Ux, 343 + Uy)
  9.             延时 5 毫秒
  10.             （鼠标）左键双击, 1次
  11.             延时 5 毫秒
  12.         条件结束
  13.         注释：三号
  14.         如果 Form1.Hao.ListIndex = 3 则
  15.             （鼠标）移动到 (459 + Ux, 371 + Uy)
  16.             延时 5 毫秒
  17.             （鼠标）左键双击, 1次
  18.             延时 5 毫秒
  19.         条件结束
  20.         注释：四号
  21.         如果 Form1.Hao.ListIndex = 4 则
  22.             （鼠标）移动到 (459 + Ux, 399 + Uy)
  23.             延时 5 毫秒
  24.             （鼠标）左键双击, 1次
  25.             延时 5 毫秒
  26.         条件结束
  27.         注释：五号
  28.         如果 Form1.Hao.ListIndex = 5 则
  29.             （鼠标）移动到 (459 + Ux, 427 + Uy)
  30.             延时 5 毫秒
  31.             （鼠标）左键双击, 1次
  32.             延时 5 毫秒
  33.         条件结束
  34.         注释：六号
  35.         如果 Form1.Hao.ListIndex = 6 则
  36.             （鼠标）移动到 (459 + Ux, 455 + Uy)
  37.             延时 5 毫秒
  38.             （鼠标）左键双击, 1次
  39.             延时 5 毫秒
  40.         条件结束
  41.         注释：统计次数
  42.         令 Cs = Cs + 1
  43.         令 剩余次数 = Form1.B.Text + 1 - Cs
  44.         向调试窗口输出："小窗口" & 剩余次数
  45.         调用 Window.SetText(JB1,"已送" & Cs - 1 & "朵花！ 还剩" & 剩余次数 & "朵")
  46.         如果 剩余次数 = 0 则
  47.             延时 300 毫秒
  48.             令 time2 = Sys.GetTime()
  49.             弹出窗口 Form1.B.Text & "朵花已送完" & vbcr & "总共耗时：" & time2 - time1 & "毫秒"
  50.             脚本停止运行
  51.         条件结束
  52.     子程序结束
  53.     子程序 小窗口()
  54.         向调试窗口输出："我是小窗口"
  55.         注释：检测背景是否黑屏
  56.         如果点 (0 + Ux,599 + Uy) 的颜色等于 "0" 则
  57.         否则
  58.             （键盘）按 "F12" 键, 1次
  59.         条件结束
  60.         注释：检测是否在对局中
  61.         注释：蓝
  62.         如果点 (718 + Ux,117 + Uy) 的颜色等于 "FFD399" 则
  63.         否则
  64.             注释：粉红
  65.             如果点 (718 + Ux,117 + Uy) 的颜色等于 "F5A5FD" 则
  66.             否则
  67.                 弹出窗口 "检测到已离开对局或未在对局中开启。点击确定后脚本将停止！如有需要请按启动热键重新启动！"
  68.                 脚本停止运行
  69.             条件结束
  70.         条件结束
  71.         注释：开始送花操作
  72.         （键盘）按 "Z" 键, 1次
  73.         （键盘）按 "X" 键, 1次
  74.         （鼠标）移动到 (358 + Ux, 247 + Uy)
  75.         注释：一号
  76.         如果 Form1.Hao.ListIndex = 1 则
  77.             延时 5 毫秒
  78.             （鼠标）左键双击, 1次
  79.             延时 5 毫秒
  80.         条件结束
  81.         注释：二号
  82.         如果 Form1.Hao.ListIndex = 2 则
  83.             （鼠标）移动到 (358 + Ux, 267 + Uy)
  84.             延时 5 毫秒
  85.             （鼠标）左键双击, 1次
  86.             延时 5 毫秒
  87.         条件结束
  88.         注释：三号
  89.         如果 Form1.Hao.ListIndex = 3 则
  90.             （鼠标）移动到 (358 + Ux, 287 + Uy)
  91.             延时 5 毫秒
  92.             （鼠标）左键双击, 1次
  93.             延时 5 毫秒
  94.         条件结束
  95.         注释：四号
  96.         如果 Form1.Hao.ListIndex = 4 则
  97.             （鼠标）移动到 (358 + Ux, 307 + Uy)
  98.             延时 5 毫秒
  99.             （鼠标）左键双击, 1次
  100.             延时 5 毫秒