1.         如果 X > 0 则
  2.             （鼠标）移动到 (X + 20, Y + 20)
  3.             （鼠标）左键单击, 1次
  4.             延时 500 毫秒
  5.             注释：是否有 确认出售 按钮，并且保存坐标，
  6.             调用 Shuaxin()
  7.             延时 1000 毫秒
  8.             标记 qrcs(子程序 huicheng)
  9.             从左上到右下查找图片 "Attachment:\qrcs.bmp"，把找到的坐标保存到 (a, b)，指定区域（左：276 上：389 右：533 下：560），相似度 0.9
  10.             如果 a > 0 则
  11.                 从左上到右下查找图片 "Attachment:\baoguo.bmp"，把找到的坐标保存到 (inX, inY)，指定区域（左：0 上：0 右：1024 下：768），相似度 0.9
  12.                 （鼠标）移动到 (inX - 127, inY + 132)
  13.                 令 kk = 0
  14.                 注释：2层循环 卖掉
  15.                 循环 7 次
  16.                     循环 8 次
  17.                         （鼠标）相对移动 (34, 0)
  18.                         延时 200 毫秒
  19.                         调用 dianji()
  20.                         令 kk = kk + 1
  21.                         如果 kk = 10 则
  22.                             注释：满10次点击一下出售
  23.                             保存鼠标位置
  24.                             （鼠标）移动到 (a + 30, b + 10)
  25.                             延时 500 毫秒
  26.                             （鼠标）左键单击, 1次
  27.                             延时 100 毫秒
  28.                             令 kk = 0
  29.                             恢复鼠标位置
  30.                         条件结束
  31.                     循环结束
  32.                     （鼠标）相对移动 (- 272 , 34)
  33.                     延时 200 毫秒
  34.                 循环结束
  35.                 注释：最后再卖一次
  36.                 （鼠标）移动到 (a + 30, b + 10)
  37.                 延时 500 毫秒
  38.                 （鼠标）左键单击, 1次
  39.                 延时 100 毫秒
  40.                 注释：打开人物 点戒指\后检查是否到位，到位后走1步
  41.                 调用 Msg.Tips("卖完了")
  42.                 （键盘）按 "C" 键, 1次
  43.                 标记 rwsx(子程序 huicheng)
  44.                 延时 1000 毫秒
  45.                 从左上到右下查找图片 "Attachment:\rwsx.bmp"，把找到的坐标保存到 (X, Y)，指定区域（左：143 上：129 右：442 下：272），相似度 0.9
  46.                 如果 X > 0 则
  47.                     （鼠标）移动到 (X - 118, Y + 248)
  48.                     延时 500 毫秒
  49.                     （鼠标）左键双击, 1次
  50.                     延时 10000 毫秒
  51.                     标记 rwsx2(子程序 huicheng)
  52.                     从左上到右下查找图片 "Attachment:\rwsx.bmp"，把找到的坐标保存到 (X, Y)，指定区域（左：143 上：129 右：442 下：272），相似度 0.9
  53.                     如果 X > 0 则
  54.                         （鼠标）移动到 (794, 735)
  55.                         延时 500 毫秒
  56.                         （鼠标）左键单击, 1次
  57.                         （鼠标）移动到 (323, 433)
  58.                         延时 500 毫秒
  59.                         （鼠标）左键单击, 1次
  60.                     否则
  61.                         延时 1000 毫秒
  62.                         跳转到标记 rwsx2(子程序 huicheng)
  63.                     条件结束
  64.                 否则
  65.                     延时 1000 毫秒
  66.                     （鼠标）移动到 (794, 735)
  67.                     延时 500 毫秒
  68.                     （鼠标）左键单击, 1次
  69.                     跳转到标记 rwsx(子程序 huicheng)
  70.                 条件结束
  71.             否则
  72.                 延时 500 毫秒
  73.                 跳转到标记 qrcs(子程序 huicheng)
  74.             条件结束
  75.         否则
  76.             跳转到标记 chushou(子程序 huicheng)
  77.         条件结束
  78.     否则
  79.         延时 3000 毫秒
  80.         跳转到标记 zhaoshangren(子程序 huicheng)
  81.     条件结束
  82.     注释： FindPic 553, 44,748, 183,"Attachment:\fjs.bmp",0.9,X,Y
  83.     注释： If X > 0 Then
  84.     注释：
  85.     注释： Else
  86.     注释： Delay 3000
  87.     注释： Goto zhaoshangren
  88.     注释： End If
  89.     注释：
  90.     调用 Window.Hide(HWz)
  91. 子程序结束
  92. 注释：/********辅助方法
  93. 子程序 read()
  94.     令 computer = File.ReadINI("setup","computer","D:\Desktop\a\test.ini")
  95.     注释：主窗体 状态，0 空闲，1-进行交易，2-正在交易
  96.     令 status = File.ReadINI("setup","status","D:\Desktop\a\test.ini")
  97. 子程序结束
  98. 注释：检查是否还原了浏览器
  99. 子程序 checkopen()
  100.     标记 dengdaiyse(子程序 checkopen)