1.         （鼠标）左键单击, 1次
  2.     条件结束
  3.     令 CanColor = 得到指定点 (91, 65) 的颜色
  4.     调用 Msg.Tips(CanColor)
  5.     如果 CanColor = "8A9D4E" 则
  6.         （鼠标）移动到 (26, 62)
  7.         延时 100 毫秒
  8.         （鼠标）左键单击, 1次
  9.     条件结束
  10. 子程序结束
  11. 子程序 鼠标移动点击
  12.     （鼠标）移动到 (intX + 3, intY + 3)
  13.     延时 100 毫秒
  14.     （鼠标）左键单击, 1次
  15.     延时 100 毫秒
  16.     （鼠标）移动到 (intX + 10, intY + 10)
  17.     延时 100 毫秒
  18.     令 finded = 1
  19.     令 sDate1 = Sys.GetDateTime()
  20. 子程序结束
  21. 子程序 学习
  22.     注释：学习标志色
  23.     从左上到右下查找颜色 "9ED3B8"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：1024 下：768）
  24.     如果 intX > 0 并且 intY > 0 则
  25.         （鼠标）移动到 (intX + 3, intY + 3)
  26.         延时 400 毫秒
  27.         （鼠标）左键单击, 1次
  28.         延时 1000 毫秒
  29.         注释：学习中闪亮字
  30.         从左上到右下查找颜色 "0B60FC"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：1024 下：768）
  31.         如果 intX > 0 并且 intY > 0 则
  32.             调用 鼠标移动点击()
  33.         条件结束
  34.         从左上到右下查找图片 "Attachment:\查看.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：1024 下：768），相似度 0.9
  35.         如果 intX > 0 并且 intY > 0 则
  36.             调用 鼠标移动点击()
  37.         条件结束
  38.     条件结束
  39. 子程序结束