1.         调用 血低自动吃包子()
  2.         调用 蓝低自动吃包子()
  3.     否则如果 zhiye = 2 则
  4.         调用 血低自动吃包子()
  5.         调用 蓝低自动吃包子()
  6.     否则如果 zhiye = 3 则
  7.         调用 方士自动治疗()
  8.         调用 蓝低自动吃包子()
  9.     条件结束
  10. 子程序结束
  11. 子程序 血低自动吃包子
  12.     标记 X1(子程序 血低自动吃包子)
  13.     令 GetColor = Bkgnd.GetPixelColor(hwnd,193,44)
  14.     延时 300 毫秒
  15.     如果 GetColor = "190073" 则
  16.         调用 释放技能(intXBj1,intYBj1,timeBj1,0,1000)
  17.         延时 14000 毫秒
  18.         跳转到标记 X1(子程序 血低自动吃包子)
  19.     条件结束
  20. 子程序结束
  21. 子程序 蓝低自动吃包子
  22.     标记 X1(子程序 蓝低自动吃包子)
  23.     令 Color4 = BkgndColor.GetPixelColor(hwnd,196,55)
  24.     延时 300 毫秒
  25.     如果 Color4 <> "14658104" 则
  26.         调用 释放技能(intXBj1,intYBj1,timeBj1,0,1000)
  27.         延时 14000 毫秒
  28.         跳转到标记 X1(子程序 蓝低自动吃包子)
  29.     条件结束
  30. 子程序结束
  31. 注释:关闭窗口
  32. 子程序 关闭窗口
  33.     调用 Bkgnd.KeyPress(hwnd,123)
  34.     延时 100 毫秒
  35.     如果 laczy <> "2" 则
  36.         调用 Bkgnd.KeyPress(hwnd,90)
  37.     条件结束
  38.     延时 100 毫秒
  39.     令 i = 0
  40.     标记 A(子程序 关闭窗口)
  41.     令 Color0 = BkgndColor.GetPixelColor(hwnd,702,429)
  42.     如果 Color0 <> 8487421 并且 i < 50 则
  43.         令 i = i + 1
  44.         延时 500 毫秒
  45.         跳转到标记 A(子程序 关闭窗口)
  46.     条件结束
  47.     调用 Bkgnd.LeftClick(hwnd,702,429)
  48.     延时 100 毫秒
  49.     调用 Bkgnd.KeyPress(hwnd,123)
  50. 子程序结束
  51. 子程序 医生治疗
  52.     调用 小地图走路(531,300,14090388)
  53.     调用 Bkgnd.LeftClick(hwnd,715,264)
  54.     延时 1000 毫秒
  55.     调用 Bkgnd.LeftDoubleClick(hwnd,715,264)
  56.     延时 1000 毫秒
  57.     调用 Bkgnd.LeftClick(hwnd,453,198)
  58.     延时 100 毫秒
  59.     调用 Bkgnd.KeyPress(hwnd,123)
  60. 子程序结束
  61. 子程序 初始化
  62.     (语句无法识别,可能有错误): cyzsw = 0 //程远志是否死亡 0:死亡;1:还在
  63.     (语句无法识别,可能有错误): ditu = "天龙阵入口" //地图标示
  64.     (语句无法识别,可能有错误): siwangdian = qidian //记录死亡点
  65.     (语句无法识别,可能有错误): jrfbcs = 0//今天的天龙副本的次数
  66.     调用 Bkgnd.LeftClick(hwnd,992,203)
  67.     延时 300 毫秒
  68.     调用 Bkgnd.LeftClick(hwnd,253,468)
  69.     延时 300 毫秒
  70.     调用 Bkgnd.LeftClick(hwnd,102,463)
  71.     延时 300 毫秒
  72.     如果 zhiye = 0 则
  73.         调用 武将初始化技能坐标()
  74.     否则如果 zhiye = 1 则
  75.         调用 刺客初始化技能坐标()
  76.     否则如果 zhiye = 2 则
  77.         调用 谋士初始化技能坐标()
  78.     否则如果 zhiye = 3 则
  79.         调用 方士初始化技能坐标()
  80.     条件结束
  81.     调用 查找技能所在坐标("Bj1",bzBjKey1)
  82.     向调试窗口输出:"包子_所在坐标:" & intXBj1 & "," & intYBj1
  83. 子程序结束
  84. 子程序 平衡吃包子
  85.     如果 phbj = 1 则
  86.         注释:血
  87.         令 Color1 = Bkgnd.GetPixelColor(hwnd,193,44)
  88.         注释:蓝
  89.         令 Color2 = BkgndColor.GetPixelColor(hwnd,196,55)
  90.         如果 Color1 = "190073" 或者 Color2 = 14658104 则
  91.             调用 Bkgnd.LeftDoubleClick(hwnd,intXBj1,intYBj1)
  92.             延时 200 毫秒
  93.         条件结束
  94.     条件结束
  95. 子程序结束
  96. 子程序 脱离卡死
  97.     标记 AAA(子程序 脱离卡死)
  98.     调用 脱离卡死离开天龙()
  99.     如果 zhiye = 2 则
  100.         调用 释放技能(intXJn1,intYJn1,time1,10,200)