1.     如果点 (96,49) 的颜色等于 "1FAC70" 则
  2.     否则
  3.         延时 1000 毫秒
  4.         跳转到标记 dengdaiyse(子程序 checkopen)
  5.     条件结束
  6. 子程序结束
  7. 注释：/获得包裹数字
  8. 子程序 Getnum()
  9.     调用 checkopen()
  10.     标记 openbg(子程序 Getnum)
  11.     从左上到右下查找图片 "Attachment:\baoguo.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：1024 下：768），相似度 0.9
  12.     如果 intX > 0 则
  13.         注释：检查数字
  14.         令 numb = SimPlugOCR.OCR(intX + 80,intY + 20,intX + 230,intY + 100)
  15.         令 MyArray = Split(numb,"/")
  16.         令 numb = MyArray(0)
  17.     否则
  18.         调用 openbg()
  19.         延时 500 毫秒
  20.         跳转到标记 openbg(子程序 Getnum)
  21.     条件结束
  22. 子程序结束
  23. 子程序 dianji()
  24.     令 fancuo = 0
  25.     把当前鼠标所在的位置保存到 (x, y)
  26.     令 GetColor = 得到指定点 (x - 2, y - 2) 的颜色
  27.     延时 100 毫秒
  28.     （鼠标）左键双击, 1次
  29.     延时 200 毫秒
  30.     标记 dj(子程序 dianji)
  31.     如果点 (x - 2,y - 2) 的颜色等于 GetColor 则
  32.         （鼠标）左键双击, 1次
  33.         延时 200 毫秒
  34.         令 foncuo = fancuo + 1
  35.         如果 fancuo < 50 则
  36.             跳转到标记 dj(子程序 dianji)
  37.         条件结束
  38.     条件结束
  39. 子程序结束
  40. 子程序 Shuaxin()
  41.     标记 sx(子程序 Shuaxin)
  42.     从左上到右下查找图片 "Attachment:\baoguo.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：1024 下：768），相似度 0.9
  43.     如果 intX > 0 则
  44.         （鼠标）移动到 (intX + 110, intY + 424)
  45.         延时 300 毫秒
  46.         （鼠标）左键单击, 1次
  47.     否则
  48.         跳转到标记 sx(子程序 Shuaxin)
  49.         延时 300 毫秒
  50.     条件结束
  51.     延时 3000 毫秒
  52. 子程序结束
  53. 子程序 openbg()
  54.     （鼠标）移动到 (838, 735)
  55.     延时 500 毫秒
  56.     （鼠标）左键单击, 1次
  57.     延时 500 毫秒
  58. 子程序结束