1.             鼠标移到 724 , 619
  2.             延时100毫秒
  3.             鼠标移到 725 , 620
  4.             调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1440,900,"主城.bmp",1.0,intX,intY)
  5.             如果表达式 (intX>0 and intY>0) 为真,则
  6.                 延时2000毫秒
  7.                 鼠标移到 intX , intY
  8.                 延时2000毫秒
  9.                 左键单击
  10.                 延时2000毫秒
  11.                 调用子程序 寻找3级丘陵3
  12.                 //跳转到寻找3级丘陵
  13.             条件结束
  14.         条件结束
  15.     否则
  16.         调用子程序 寻找3级丘陵3
  17.         //跳转到寻找3级丘陵
  18.     条件结束
  19. 子程序结束,回到调用处
  20. 脚本停止运行
  21. //================================================================================================================
  22. //============== ===================
  23. //============== ===================
  24. //============== ===================
  25. //============== ===================
  26. //============== ===================
  27. //============== ===================
  28. //============== ===================
  29. //============== ===================
  30. //============== ===================
  31. //============== ===================
  32. //==============子程序 =========寻找3级丘陵====================================
  33. 子程序 寻找3级丘陵3
  34.     //3级丘陵自动寻找
  35.     鼠标移到 724 , 619
  36.     延时100毫秒
  37.     鼠标移到 725 , 620
  38.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1440,900,"主城.bmp",1.0,intX,intY)
  39.     如果表达式 (intX>0 and intY>0) 为真,则
  40.         延时2000毫秒
  41.         鼠标移到 intX , intY
  42.         延时2000毫秒
  43.         左键单击
  44.         延时2000毫秒
  45.         //查看有没有 掠夺 选项
  46.         鼠标移到 724 , 619
  47.         延时100毫秒
  48.         鼠标移到 725 , 620
  49.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1440,900,"主城.bmp",1.0,intX,intY)
  50.         如果表达式 (intX>0 and intY>0) 为真,则
  51.             延时2000毫秒
  52.             鼠标移到 intX , intY
  53.             延时2000毫秒
  54.             左键单击
  55.             延时2000毫秒
  56.             调用子程序 掠夺
  57.             // 掠夺
  58.         否则
  59.             // 没有 掠夺 选项，有 叉叉 则关闭窗口
  60.             鼠标移到 724 , 619
  61.             延时100毫秒
  62.             鼠标移到 725 , 620
  63.             调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1440,900,"主城.bmp",1.0,intX,intY)
  64.             如果表达式 (intX>0 and intY>0) 为真,则
  65.                 延时2000毫秒
  66.                 鼠标移到 intX , intY
  67.                 延时2000毫秒
  68.                 左键单击
  69.                 延时2000毫秒
  70.                 调用子程序 寻找3级平地3
  71.                 //跳转到寻找3级平地
  72.             条件结束
  73.         条件结束
  74.     否则
  75.         调用子程序 寻找3级平地3
  76.         //跳转到寻找3级平地
  77.     条件结束
  78. 子程序结束,回到调用处
  79. 脚本停止运行
  80. //================================================================================================================
  81. //============== ===================
  82. //============== ===================
  83. //============== ===================
  84. //============== ===================
  85. //============== ===================
  86. //============== ===================
  87. //============== ===================
  88. //============== ===================
  89. //============== ===================
  90. //============== ===================
  91. //==============子程序 =========寻找3级平地====================================
  92. 子程序 寻找3级平地3
  93.     //3级平地自动寻找
  94.     鼠标移到 724 , 619
  95.     延时100毫秒
  96.     鼠标移到 725 , 620
  97.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1440,900,"主城.bmp",1.0,intX,intY)
  98.     如果表达式 (intX>0 and intY>0) 为真,则
  99.         延时2000毫秒
  100.         鼠标移到 intX , intY