1.         (语句无法识别，可能有错误): ss(1)="8C9C11" //威严
  2.         (语句无法识别，可能有错误): ss(2)="11DE42" //狂乱
  3.         (语句无法识别，可能有错误): ss(3)="4A4A42" //灵魂
  4.         (语句无法识别，可能有错误): ss(4)="529429" //灾难
  5.         (语句无法识别，可能有错误): ss(5)="4A295B" //眼睛
  6.         (语句无法识别，可能有错误): ss(6)="D69473" //小篮
  7.         (语句无法识别，可能有错误): ss(7)="848484" //无色
  8.         (语句无法识别，可能有错误): ss(8)="AD73D6" //碳 175,191
  9.         (语句无法识别，可能有错误): ss(9)="BDB5C6" // 蓝冰
  10.         注释：这里使用查找颜色来获取物品 不知道在别的电脑上是否能使用 反正在我自己的电脑上是可以用的 请教一下
  11.         令 sss(0) = 20000
  12.         令 sss(1) = 20000
  13.         令 sss(2) = 20000
  14.         令 sss(3) = 4000
  15.         令 sss(4) = 3200
  16.         令 sss(5) = 25000
  17.         令 sss(6) = 100
  18.         令 sss(7) = 50
  19.         令 sss(8) = 50
  20.         令 sss(9) = 9000
  21.         定义变量 n, m, i, j
  22.         定义变量 jiage
  23.         令 n = 0
  24.         令 geshu = 1
  25.         定义变量 kx
  26.         (语句无法识别，可能有错误): kx=85 //第一格物品x取色点
  27.         令 ux = kx
  28.         定义变量 ky
  29.         (语句无法识别，可能有错误): ky=191 //第一个物品y取色点
  30.         注释：扫描第一行物品，共8个物品格
  31.         循环 8 次
  32.             注释： 单格物品扫描
  33.             循环 10 次
  34.                 如果点 (ux,ky) 的颜色等于 ss(n) 则
  35.                     (语句无法识别，可能有错误): jiage=wupin(geshu,sss(n)) //获取物品价钱
  36.                     跳出循环
  37.                 条件结束
  38.                 令 n = n + 1
  39.             循环结束
  40.             (语句无法识别，可能有错误): qian=qian+jiage //计算总价格
  41.             (语句无法识别，可能有错误): jiage=0 //价格清零
  42.             (语句无法识别，可能有错误): ux=ux+30 //x坐标加30，扫描下一个框内物品
  43.             (语句无法识别，可能有错误): geshu=geshu+1 //个数循环
  44.             令 n = 0
  45.             (语句无法识别，可能有错误): Next If qian<>0 then
  46.             注释：MsgBox "总价钱为："&qian
  47.             （鼠标）移动到 (197, 301)
  48.             延时 250 毫秒
  49.             （鼠标）左键单击, 1次
  50.             延时 250 毫秒
  51.             (语句无法识别，可能有错误): KeyPress "BackSpace", 10 //金钱输入清零
  52.             延时 50 毫秒
  53.             定义变量 shuzi(9)
  54.             令 shuzi(0) = "0"
  55.             令 shuzi(1) = "1"
  56.             令 shuzi(2) = "2"
  57.             令 shuzi(3) = "3"
  58.             令 shuzi(4) = "4"
  59.             令 shuzi(5) = "5"
  60.             令 shuzi(6) = "6"
  61.             令 shuzi(7) = "7"
  62.             令 shuzi(8) = "8"
  63.             令 shuzi(9) = "9"
  64.             令 i = 1
  65.             定义变量 shu
  66.             令 cishu = len(qian)
  67.             循环 cishu 次
  68.                 (语句无法识别，可能有错误): shu=left(qian,1) //取qian的左起第一个数字
  69.                 (语句无法识别，可能有错误): qian=right(qian,cishu-i) //取qian的右起第I个数字
  70.                 （键盘）按 shu 键, 1次
  71.                 延时 250 毫秒
  72.                 令 i = i + 1
  73.             循环结束
  74.         条件结束
  75.         延时 100 毫秒
  76.         （鼠标）左键单击, 1次
  77.         调用 检查并交易()
  78.     子程序结束
  79.     (语句无法识别，可能有错误): Function wupin(GS,JQ) //计算物品总价格
  80.     注释：代码太他妈有才了
  81.     注释：此代码论坛中有，个人觉得很好。
  82.     定义变量 a(100)
  83.     定义变量 b(100)
  84.     定义变量 q(100)
  85.     令 number0 = "Attachment:\0.bmp"
  86.     令 number1 = "Attachment:\1.bmp"
  87.     令 number2 = "Attachment:\2.bmp"
  88.     令 number3 = "Attachment:\3.bmp"
  89.     令 number4 = "Attachment:\4.bmp"
  90.     令 number5 = "Attachment:\5.bmp"
  91.     令 number6 = "Attachment:\6.bmp"
  92.     令 number7 = "Attachment:\7.bmp"
  93.     令 number8 = "Attachment:\8.bmp"
  94.     令 number9 = "Attachment:\9.bmp"
  95.     令 cishu = 1
  96.     (语句无法识别，可能有错误): leftx=72+(GS-1)*30 //132
  97.     (语句无法识别，可能有错误): upy=174 //155
  98.     (语句无法识别，可能有错误): rightx=99+(GS-1)*30 //162
  99.     (语句无法识别，可能有错误): downy=185 //235
  100.     令 Similar = 1