1.         条件结束
  2.     循环结束
  3. 子程序结束,回到调用处
  4. 子程序 砍价要价
  5.     PosX = 467
  6.     PosY = 319
  7.     调用子程序 移动鼠标
  8.     左键单击
  9.     延时2600毫秒
  10. 子程序结束,回到调用处
  11. 子程序 向前行走
  12.     按住<Up>
  13.     延时TurnAngle毫秒
  14.     弹起<Up>
  15.     延时100毫秒
  16. 子程序结束,回到调用处
  17. 子程序 航行技能
  18.     //Delay 1000
  19.     //F2技能
  20.     按键<F1>
  21.     延时1500毫秒
  22.     按键<F2>
  23.     延时1500毫秒
  24.     按键<F11>
  25.     延时1500毫秒
  26.     //F3技能
  27.     按键<F1>
  28.     延时1500毫秒
  29.     按键<F3>
  30.     延时1500毫秒
  31.     按键<F11>
  32.     延时1500毫秒
  33.     //F4技能
  34.     按键<F1>
  35.     延时1500毫秒
  36.     按键<F4>
  37.     延时1500毫秒
  38.     按键<F11>
  39.     延时1500毫秒
  40. 子程序结束,回到调用处
  41. 子程序 航向向前
  42.     PosX = 399
  43.     PosY = 296
  44.     调用子程序 移动鼠标
  45.     左键双击
  46.     延时600毫秒
  47. 子程序结束,回到调用处
  48. 子程序 修船
  49.     //Delay 1000
  50.     MP = 0
  51.     如果表达式 (MP = 0) 为真,则循环执行
  52.         PosX = 45
  53.         PosY = 79
  54.         调用子程序 坐标转换
  55.         调用外部VBScript子程序 MessageBox ("错误的码头,请开到多佛尔或伦敦后重新执行!")
  56.         如果表达式 (x>0 and y>0) 为真,则
  57.             按键<F1>
  58.             延时1500毫秒
  59.             按键<F8>
  60.             延时1500毫秒
  61.             按键<F11>
  62.             延时1500毫秒
  63.         否则
  64.             MP = 1
  65.         条件结束
  66.     循环结束
  67. 子程序结束,回到调用处
  68. 子程序 行动力保护
  69.     //Delay 1000
  70.     MP = 0
  71.     如果表达式 (MP = 0) 为真,则循环执行
  72.         PosX = 45
  73.         PosY = 115
  74.         调用子程序 坐标转换
  75.         调用外部VBScript子程序 MessageBox ("错误的码头,请开到多佛尔或伦敦后重新执行!")
  76.         如果表达式 (x>0 and y>0) 为真,则
  77.             //行动力为50~150,故行动力长度为100,补到80这个点就可以了,即80%
  78.             x = x - PosX
  79.             如果表达式 (x<80) 为真,则
  80.                 按键<F1>
  81.                 延时1500毫秒
  82.                 按键<F5>
  83.                 延时1000毫秒
  84.                 按键<F11>
  85.                 延时1000毫秒
  86.                 iLiaoLi = iLiaoLi-1
  87.             否则
  88.                 MP = 1
  89.             条件结束
  90.         否则
  91.             MP = 1
  92.         条件结束
  93.     循环结束
  94. 子程序结束,回到调用处
  95. 子程序 延时判定
  96.     延时500毫秒
  97.     Shape1 = 2106545426
  98.     //黄色箭头时候的鼠标形状
  99.     Shape2 = 2012885647
  100.     //网络延时的时候漏斗的形状