1. 子程序结束
  2. 子程序 修理
  3.     调用 Bkgnd.KeyPress(hwnd,123)
  4.     延时 100 毫秒
  5.     调用 Bkgnd.KeyPress(hwnd,77)
  6.     调用 Bkgnd.LeftClick(hwnd,442,226)
  7.     延时 2000 毫秒
  8.     标记 PD1(子程序 修理)
  9.     令 Color = BkgndColor.GetPixelColor(hwnd,442,226)
  10.     如果 Color = "14090388" 则
  11.         延时 500 毫秒
  12.         跳转到标记 PD1(子程序 修理)
  13.     条件结束
  14.     调用 Bkgnd.KeyPress(hwnd,123)
  15.     调用 Bkgnd.LeftClick(hwnd,476,275)
  16.     延时 500 毫秒
  17.     调用 Bkgnd.LeftDoubleClick(hwnd,476,275)
  18.     延时 2000 毫秒
  19.     调用 Bkgnd.LeftClick(hwnd,439,197)
  20.     延时 2000 毫秒
  21.     调用 Bkgnd.LeftClick(hwnd,491,311)
  22.     延时 2000 毫秒
  23.     调用 Bkgnd.LeftClick(hwnd,444,221)
  24. 子程序结束
  25. 子程序 选择起点
  26.     调用 判断当前地图()
  27.     注释：TracePrint "siwangdian:" & siwangdian
  28.     注释：TracePrint "ditu:" & ditu
  29.     注释：TracePrint "cyzsw:" & cyzsw
  30.     如果 siwangdian = 0 则
  31.         如果 ditu = "五行天龙阵" 则
  32.             如果 cyzsw = 0 则
  33.                 调用 脱离卡死离开天龙()
  34.             否则
  35.                 调用 走出天龙()
  36.             条件结束
  37.         条件结束
  38.         跳转到标记 天龙阵入口(子程序 选择起点)
  39.     否则如果 siwangdian = 1 则
  40.         如果 ditu = "天龙阵入口" 则
  41.             调用 走进天龙()
  42.         条件结束
  43.         跳转到标记 BOSS宁仲德(子程序 选择起点)
  44.     否则如果 siwangdian = 2 则
  45.         如果 ditu = "天龙阵入口" 则
  46.             调用 走进天龙()
  47.         条件结束
  48.         跳转到标记 BOSS司马伯道(子程序 选择起点)
  49.     否则如果 siwangdian = 3 则
  50.         如果 ditu = "天龙阵入口" 则
  51.             调用 走进天龙()
  52.         条件结束
  53.         跳转到标记 BOSS垄都(子程序 选择起点)
  54.     否则如果 siwangdian = 4 则
  55.         如果 ditu = "天龙阵入口" 则
  56.             调用 走进天龙()
  57.         条件结束
  58.         跳转到标记 BOSS夏侯云冲(子程序 选择起点)
  59.     否则如果 siwangdian = 5 则
  60.         如果 ditu = "天龙阵入口" 则
  61.             调用 走进天龙()
  62.         条件结束
  63.         跳转到标记 BOSS程志远(子程序 选择起点)
  64.     条件结束
  65. 子程序结束
  66. 子程序 小地图走路(X0,Y0,Color0)
  67.     如果 zhiye = 2 则
  68.         调用 释放技能(intXJn1,intYJn1,time1,10,200)
  69.     否则如果 zhiye = 3 则
  70.         调用 释放技能(intXJn1,intYJn1,time1,120,500)
  71.     条件结束
  72.     调用 Bkgnd.KeyPress(hwnd,123)
  73.     延时 50 毫秒
  74.     调用 Bkgnd.KeyPress(hwnd,77)
  75.     延时 500 毫秒
  76.     调用 Bkgnd.LeftClick(hwnd,X0,Y0)
  77.     延时 50 毫秒
  78.     令 i = 0
  79.     标记 A(子程序 小地图走路)
  80.     令 Color1 = BkgndColor.GetPixelColor(hwnd,X0,Y0)
  81.     如果 Color1 = Color0 并且 i < 100 则
  82.         令 i = i + 1
  83.         如果 i = 15 或者 i = 30 或者 i = 45 或者 i = 60 或者 i = 75 或者 i = 90 则
  84.             调用 Bkgnd.LeftClick(hwnd,X0,Y0)
  85.             延时 50 毫秒
  86.         条件结束
  87.         延时 500 毫秒
  88.         跳转到标记 A(子程序 小地图走路)
  89.     条件结束
  90.     调用 Bkgnd.KeyPress(hwnd,123)
  91.     调用 异常判断()
  92. 子程序结束
  93. 子程序 走进天龙
  94.     调用 小地图走路(590,191,16777215)
  95.     延时 5000 毫秒
  96. 子程序结束
  97. 子程序 走出天龙
  98.     调用 小地图走路(233,412,16777215)
  99.     延时 5000 毫秒
  100. 子程序结束