1.     (鼠标)左键单击, 2次
  2.     延时 400 毫秒
  3.     (鼠标)左键单击, 2次
  4.     延时 150 毫秒
  5. 否则
  6.     跳转到标记 jiancha(子程序 检查并交易)
  7. 条件结束
  8. 否则
  9.     注释:MsgBox "价格不符合"
  10.     调用 输入金钱()
  11.     延时 500 毫秒
  12.     调用 检查并交易()
  13. 条件结束
  14. 子程序结束
  15. 子程序 检查交易是否提前结束
  16.     令 i = 0
  17.     标记 star(子程序 检查交易是否提前结束)
  18.     从左上到右下查找图片 "Attachment:\11.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  19.     如果 intX > 0 并且 intY > 0 则
  20.         (语句无法识别,可能有错误): Delay 500 //2分钟内未交易完成则关闭交易框
  21.     否则
  22.         调用 站街自动喊话()
  23.         跳转到标记 jiewei(子程序 检查交易是否提前结束)
  24.     条件结束
  25.     标记 jiewei(子程序 检查交易是否提前结束)
  26. 子程序结束
  27. 子程序 检查是否有交易
  28.     标记 star(子程序 检查是否有交易)
  29.     从左上到右下查找图片 "Attachment:\11.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  30.     如果 intX > 0 并且 intY > 0 则
  31.         调用 检查并交易()
  32.         延时 100 毫秒
  33.     否则
  34.         注释: Goto jiewei
  35.     条件结束
  36.     注释: rem jiewei
  37. 子程序结束
  38. 子程序 防掉线
  39.     令 kaiguan = 0
  40.     循环 2 次
  41.         (鼠标)移动到 (33, 439)
  42.         延时 600 毫秒
  43.         (键盘)按 "w" 键, 1次
  44.         延时 100 毫秒
  45.         (键盘)按 "q" 键, 1次
  46.         延时 100 毫秒
  47.         (鼠标)移动到 (89, 202)
  48.         延时 100 毫秒
  49.         (鼠标)左键单击, 1次
  50.         延时 1000 毫秒
  51.         如果点 (143,437) 的颜色不等于 "6DA2B9" 则
  52.             注释:接受任务
  53.             延时 1000 毫秒
  54.             (鼠标)移动到 (143, 437)
  55.             延时 100 毫秒
  56.             (鼠标)左键单击, 1次
  57.             延时 100 毫秒
  58.             (键盘)按 "Esc" 键, 1次
  59.             延时 100 毫秒
  60.             (鼠标)移动到 (419, 405)
  61.             延时 600 毫秒
  62.             (鼠标)左键单击, 2次
  63.         否则
  64.             延时 1000 毫秒
  65.             注释:放弃任务
  66.             (鼠标)移动到 (419, 402)
  67.             延时 100 毫秒
  68.             (鼠标)左键单击, 1次
  69.             延时 100 毫秒
  70.             (鼠标)移动到 (336, 407)
  71.             延时 100 毫秒
  72.             (鼠标)左键单击, 1次
  73.             延时 100 毫秒
  74.         条件结束
  75.         (键盘)按 "Esc" 键, 1次
  76.     循环结束
  77.     脚本停止运行
  78. 子程序结束
  79. 子程序 输出信息
  80.     调用 Bkgnd.SendString(Hwnd2,"内容")
  81.     Window.Active(hwnd2)
  82.     (键盘)按 "enter" 键, 1次
  83. 子程序结束
  84. 函数 xiejiage(geshu,jq,wupin)
  85.     令 fso = CreateObject("Scripting.FileSystemObject")
  86.     令 b = File.ExistFile("c:\testfile.txt")
  87.     如果 b = 0 则
  88.         令 c = fso.CreateTextFile("c:\testfile.txt")
  89.         令 a = fso.opentextfile("c:\testfile.txt",8)
  90.     否则
  91.         令 a = fso.opentextfile("c:\testfile.txt",8)
  92.     条件结束
  93.     a.writeline((now & "————" & "第" & geshu & "格单价:" & wupin & "价钱" & jq))
  94.     a.close()
  95. 函数结束
  96. 函数 jiage(yanshi)
  97.     延时 yanshi 毫秒
  98.     定义变量 ss(100)
  99.     (语句无法识别,可能有错误): ss(0)="3131CE" //强韧
  100.     (语句无法识别,可能有错误): ss(1)="52423A" //威严