1.                     令 sss = sss11
  2.                 否则如果 n = 12 则
  3.                     令 sss = sss12
  4.                 条件结束
  5.                 (语句无法识别，可能有错误): jiag=wupin(geshu,sss) //获取物品价钱
  6.                 注释：Call xiejiage(geshu,jiag,sss)
  7.                 注释：BeginThread 输出信息
  8.                 跳出循环
  9.             条件结束
  10.             令 n = n + 1
  11.         循环结束
  12.         (语句无法识别，可能有错误): qian=qian+jiag //计算总价格
  13.         (语句无法识别，可能有错误): jiag=0 //价格清零
  14.         (语句无法识别，可能有错误): ux=ux+30 //x坐标加30，扫描下一个框内物品
  15.         (语句无法识别，可能有错误): geshu=geshu+1 //个数循环
  16.         令 n = 0
  17.     循环结束
  18.     (语句无法识别，可能有错误): jiage=qian //参数传递
  19. 函数结束
  20. (语句无法识别，可能有错误): Function wupin(GS,JQ) //计算物品总价格 LX 查找类型
  21. 注释：代码太他妈有才了
  22. 注释：此代码论坛中有，个人觉得很好。
  23. 定义变量 a(100)
  24. 定义变量 b(100)
  25. 定义变量 q(100)
  26. 令 number0 = "Attachment:\0.bmp"
  27. 令 number1 = "Attachment:\1.bmp"
  28. 令 number2 = "Attachment:\2.bmp"
  29. 令 number3 = "Attachment:\3.bmp"
  30. 令 number4 = "Attachment:\4.bmp"
  31. 令 number5 = "Attachment:\5.bmp"
  32. 令 number6 = "Attachment:\6.bmp"
  33. 令 number7 = "Attachment:\7.bmp"
  34. 令 number8 = "Attachment:\8.bmp"
  35. 令 number9 = "Attachment:\9.bmp"
  36. 令 cishu = 1
  37. (语句无法识别，可能有错误): leftx=72+(GS-1)*30 //132
  38. (语句无法识别，可能有错误): upy=174 //155
  39. (语句无法识别，可能有错误): rightx=99+(GS-1)*30 //162
  40. (语句无法识别，可能有错误): downy=185 //235
  41. 令 Similar = 1
  42. 令 lx = leftx
  43. 定义变量 n, m, p, i, j
  44. 令 n = 0
  45. 令 m = 1
  46. 令 p = 1
  47. 循环当 n <> m 时
  48.     令 m = n
  49.     从左上到右下查找图片 number0，把找到的坐标保存到 (fx, fy)，指定区域（左：leftx 上：upy 右：rightx 下：downy），相似度 Similar
  50.     如果 fx >= 0 并且 fy >= 0 则
  51.         令 n = n + 1
  52.         令 leftx = fx + 1
  53.         令 a(n) = fx
  54.         令 b(n) = 0
  55.     条件结束
  56. 循环结束
  57. 令 leftx = lx
  58. 令 m = m - 1
  59. 循环当 n <> m 时
  60.     令 m = n
  61.     从左上到右下查找图片 number1，把找到的坐标保存到 (fx, fy)，指定区域（左：leftx 上：upy 右：rightx 下：downy），相似度 Similar
  62.     如果 fx >= 0 并且 fy >= 0 则
  63.         令 n = n + 1
  64.         令 leftx = fx + 1
  65.         令 a(n) = fx
  66.         令 b(n) = 1
  67.     条件结束
  68. 循环结束
  69. 令 leftx = lx
  70. 令 m = m - 1
  71. 循环当 n <> m 时
  72.     令 m = n
  73.     从左上到右下查找图片 number2，把找到的坐标保存到 (fx, fy)，指定区域（左：leftx 上：upy 右：rightx 下：downy），相似度 Similar
  74.     如果 fx >= 0 并且 fy >= 0 则
  75.         令 n = n + 1
  76.         令 leftx = fx + 1
  77.         令 a(n) = fx
  78.         令 b(n) = 2
  79.     条件结束
  80. 循环结束
  81. 令 leftx = lx
  82. 令 m = m - 1
  83. 循环当 n <> m 时
  84.     令 m = n
  85.     从左上到右下查找图片 number3，把找到的坐标保存到 (fx, fy)，指定区域（左：leftx 上：upy 右：rightx 下：downy），相似度 Similar
  86.     如果 fx >= 0 并且 fy >= 0 则
  87.         令 n = n + 1
  88.         令 leftx = fx + 1
  89.         令 a(n) = fx
  90.         令 b(n) = 3
  91.     条件结束
  92. 循环结束
  93. 令 leftx = lx
  94. 令 m = m - 1
  95. 循环当 n <> m 时
  96.     令 m = n
  97.     从左上到右下查找图片 number4，把找到的坐标保存到 (fx, fy)，指定区域（左：leftx 上：upy 右：rightx 下：downy），相似度 Similar
  98.     如果 fx >= 0 并且 fy >= 0 则
  99.         令 n = n + 1
  100.         令 leftx = fx + 1