1. 标记 卖矿
  2. 按键<P>
  3. 延时1000毫秒
  4. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,700,400,"Attachment:\杂货坐标.bmp",0.9,x,y)
  5. 如果表达式 (x>=0 and y>=0) 为真,则
  6.     鼠标移到 x-43 , y-5
  7.     延时1000毫秒
  8.     右键单击
  9.     延时2000毫秒
  10.     按键<P>
  11. 条件结束
  12. 延时24000毫秒
  13. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,700,400,"Attachment:\杂货坐标.bmp",0.9,x,y)
  14. 如果表达式 (x>=0 and y>=0) 为真,则
  15.     鼠标移到 x+360 , y+110
  16.     延时500毫秒
  17.     左键单击
  18. 条件结束
  19. 延时2000毫秒
  20. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,700,400,"Attachment:\杂货坐标.bmp",0.9,x,y)
  21. 如果表达式 (x>=0 and y>=0) 为真,则
  22.     鼠标移到 x-153 , y+80
  23.     延时20毫秒
  24.     左键单击
  25. 条件结束
  26. 延时2000毫秒
  27. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,700,400,"Attachment:\杂货坐标.bmp",0.9,x,y)
  28. 如果表达式 (x>=0 and y>=0) 为真,则
  29.     鼠标移到 x , y
  30.     延时20毫秒
  31.     鼠标相对移动 -110 , -160
  32.     延时3000毫秒
  33.     右键单击
  34.     延时1000毫秒
  35.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,700,400,"Attachment:\杂货坐标.bmp",0.9,x,y)
  36.     如果表达式 (x>=0 and y>=0) 为真,则
  37.         保存鼠标位置
  38.         延时1000毫秒
  39.         鼠标移到 x , y+8
  40.         延时1000毫秒
  41.         左键单击
  42.         延时500毫秒
  43.         恢复鼠标位置
  44.     条件结束
  45.     鼠标相对移动 0 , 30
  46.     延时2000毫秒
  47.     右键单击
  48.     延时1000毫秒
  49.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,700,400,"Attachment:\杂货坐标.bmp",0.9,x,y)
  50.     如果表达式 (x>=0 and y>=0) 为真,则
  51.         保存鼠标位置
  52.         延时1000毫秒
  53.         鼠标移到 x , y+8
  54.         延时1000毫秒
  55.         左键单击
  56.         延时500毫秒
  57.         恢复鼠标位置
  58.     条件结束
  59.     延时2000毫秒
  60.     鼠标相对移动 0 , 30
  61.     右键单击
  62.     延时1000毫秒
  63.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,700,400,"Attachment:\杂货坐标.bmp",0.9,x,y)
  64.     如果表达式 (x>=0 and y>=0) 为真,则
  65.         保存鼠标位置
  66.         延时1000毫秒
  67.         鼠标移到 x , y+8
  68.         延时1000毫秒
  69.         左键单击
  70.         延时500毫秒
  71.         恢复鼠标位置
  72.     条件结束
  73.     延时2000毫秒
  74.     鼠标相对移动 0 , 30
  75.     右键单击
  76.     延时1000毫秒
  77.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,700,400,"Attachment:\杂货坐标.bmp",0.9,x,y)
  78.     如果表达式 (x>=0 and y>=0) 为真,则
  79.         保存鼠标位置
  80.         延时1000毫秒
  81.         鼠标移到 x , y+8
  82.         延时1000毫秒
  83.         左键单击
  84.         延时500毫秒
  85.         恢复鼠标位置
  86.     条件结束
  87.     延时2000毫秒
  88.     鼠标相对移动 32 , 0
  89.     右键单击
  90.     延时1000毫秒
  91.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,700,400,"Attachment:\杂货坐标.bmp",0.9,x,y)
  92.     如果表达式 (x>=0 and y>=0) 为真,则
  93.         保存鼠标位置
  94.         延时1000毫秒
  95.         鼠标移到 x , y+8
  96.         延时1000毫秒
  97.         左键单击
  98.         延时500毫秒
  99.         恢复鼠标位置
  100.     条件结束