1.         savestring="回城次数达到设定值,停止挂机。。。"
  2.         调用子程序 写入日志
  3.         跳转到标记 停止挂机
  4.     条件结束
  5.     如果表达式 (huichengD=1) 为真,则
  6.         savestring="回玄勃补给。。。"
  7.         调用子程序 写入日志
  8.         dim color(3)
  9.         color(0)="2134d6"
  10.         color(1)="3030d6"
  11.         color(2)="1824bd"
  12.         color(3)="2130de"
  13.         跳转到标记 准备寻找
  14.     条件结束
  15.     如果表达式 (huichengD=2) 为真,则
  16.         savestring="回柳正补给。。。"
  17.         调用子程序 写入日志
  18.         dim color(3)
  19.         color(0)="5a4910"
  20.         color(1)="b57918"
  21.         color(2)="deae39"
  22.         color(3)="9c4910"
  23.         跳转到标记 准备寻找
  24.     条件结束
  25.     如果表达式 (huichengD=3) 为真,则
  26.         savestring="回柳善补给。。。"
  27.         调用子程序 写入日志
  28.         标记 回柳善
  29.         延时128毫秒
  30.         按键<Tab>
  31.         延时512毫秒
  32.         调用外部VBScript子程序 Call 运行一个外部程序("Shutdown.exe -s -t 30")
  33.         如果表达式 (baox<0 and baoy<0) 为真,则
  34.             延时128毫秒
  35.             跳转到标记 回柳善
  36.         条件结束
  37.         鼠标移到 977 , 369
  38.         延时128毫秒
  39.         右键单击
  40.         延时256毫秒
  41.         鼠标移到 516 , 463
  42.         延时128毫秒
  43.         左键单击
  44.         延时5000毫秒
  45.         按键<Tab>
  46.         延时128毫秒
  47.         跳转到标记 准备寻找
  48.     条件结束
  49.     //白天黑夜各取两种颜色,确保找到仓库NPC
  50.     标记 准备寻找
  51.     循环 5 遍
  52.         鼠标移到 fx , fy
  53.         延时200毫秒
  54.         左键单击
  55.         延时1000毫秒
  56.     循环结束
  57.     调用子程序 垂直视角
  58.     调用子程序 倾斜视角
  59.     标记 寻找仓库
  60.     循环 2 遍
  61.         按键#kjjF8
  62.         延时64毫秒
  63.     循环结束
  64.     npc_color=0
  65.     如果表达式 (huichengD=3) 为真,则
  66.         延时64毫秒
  67.         调用外部VBScript子程序 Call 运行一个外部程序("Shutdown.exe -s -t 30")
  68.         //寻找仓库NPC
  69.         延时256毫秒
  70.         如果表达式 (npcX>0 and npcY>0) 为真,则
  71.             //如果找到仓库NPC
  72.             npc=1
  73.             跳转到标记 打开仓库
  74.         条件结束
  75.         npc=0
  76.     否则如果(huichengD=1 or huichengD=2)为真,则
  77.         循环 4 遍
  78.             延时64毫秒
  79.             调用外部VBScript子程序 Call 运行一个外部程序("Shutdown.exe -s -t 30")
  80.             //寻找仓库NPC
  81.             延时256毫秒
  82.             如果表达式 (npcX>0 and npcY>0) 为真,则
  83.                 //如果找到仓库NPC
  84.                 npc=1
  85.                 跳转到标记 打开仓库
  86.             条件结束
  87.             npc=0
  88.             npc_color=npc_color+1
  89.         循环结束
  90.     条件结束
  91.     标记 打开仓库
  92.     如果表达式 (npc=1) 为真,则
  93.         //如果找到仓库NPC
  94.         鼠标移到 npcX , npcY
  95.         延时128毫秒
  96.         标记 打开
  97.         左键单击
  98.         延时6000毫秒
  99.         调用外部VBScript子程序 Call 运行一个外部程序("Shutdown.exe -s -t 30")
  100.         延时64毫秒