1.                     调用 Bkgnd.LeftClick(Hwnd,453,394)
  2.                     延时 1500 毫秒
  3.                     令 er = Bkgnd.FindColorEx(Hwnd,471,396,472,397,"010067",0,0.9)
  4.                     延时 300 毫秒
  5.                     令 MyArray = Split(er,"|")
  6.                     令 xx = Clng(MyArray(0))
  7.                     令 yy = Clng(MyArray(1))
  8.                     如果 xx > 0 并且 yy > 0 则
  9.                         延时 32 毫秒
  10.                         调用 Bkgnd.LeftClick(Hwnd,505,390)
  11.                         延时 500 毫秒
  12.                         调用 Bkgnd.LeftClick(Hwnd,533,399)
  13.                     条件结束
  14.                 条件结束
  15.                 标记 nndd(子程序 宠物模块1)
  16.                 延时 500 毫秒
  17.             循环结束
  18.         条件结束
  19.     条件结束
  20. 子程序结束
  21. 子程序 竞技场打断()
  22.     延时 50 毫秒
  23.     令 daduan = Bkgnd.FindColorEx(Hwnd,474,388,481,394,"A9C7D4",0,0.9)
  24.     延时 32 毫秒
  25.     令 MyArray1 = Split(daduan,"|")
  26.     令 x = Clng(MyArray1(0))
  27.     令 y = Clng(MyArray1(1))
  28.     如果 x > 0 并且 y > 0 则
  29.         延时 56 毫秒
  30.         调用 Bkgnd.LeftClick(Hwnd,537,401)
  31.         延时 56 毫秒
  32.         调用 Bkgnd.LeftClick(Hwnd,537,401)
  33.     条件结束
  34. 子程序结束
  35. 子程序 关闭打怪界面()
  36.     注释：判断关闭按钮（就是那个红X）是否显示出来
  37.     标记 判断关闭按钮(子程序 关闭打怪界面)
  38.     延时 256 毫秒
  39.     令 ddjj = Bkgnd.FindColorEx(Hwnd,475,37,488,44,"D9F9FF",0,0.9)
  40.     延时 56 毫秒
  41.     令 MyArraygb = Split(ddjj,"|")
  42.     令 xxxs = Clng(MyArraygb(0))
  43.     令 yyxs = Clng(MyArraygb(1))
  44.     如果 xxxs > 0 并且 yyxs > 0 则
  45.         调用 Bkgnd.LeftClick(Hwnd,978,42)
  46.         延时 256 毫秒
  47.     否则
  48.         跳转到标记 判断关闭按钮(子程序 关闭打怪界面)
  49.         延时 1000 毫秒
  50.     条件结束
  51. 子程序结束
  52. 子程序 修理装备1()
  53.     如果 n >= no 则
  54.         调用 Bkgnd.LeftClick(Hwnd,581,406)
  55.         延时 256 毫秒
  56.         调用 竞技场打断()
  57.         注释：防止未点到人物或点了没反应
  58.         标记 未点到人物2(子程序 修理装备1)
  59.         令 ui = Bkgnd.FindColorEx(Hwnd,164,75,174,86,"FFFFFF",0,0.8)
  60.         延时 32 毫秒
  61.         令 MyArray5 = Split(ui,"|")
  62.         令 x2 = Clng(MyArray5(0))
  63.         令 y2 = Clng(MyArray5(1))
  64.         如果 x2 < 0 并且 y2 < 0 则
  65.             注释：重新点击人物打开人物属性
  66.             调用 Bkgnd.LeftClick(Hwnd,581,406)
  67.             延时 256 毫秒
  68.             调用 竞技场打断()
  69.             跳转到标记 未点到人物2(子程序 修理装备1)
  70.         否则
  71.             调用 修理装备()
  72.             调用 退出加血加蓝循环()
  73.         条件结束
  74.     条件结束
  75. 子程序结束
  76. 注释：时间停顿判断 如果 用于在打怪刚开始的确认窗口停顿时间为70秒就重新点击开始脚本
  77. 子程序 时间判断()
  78.     如果 ms = 1 则
  79.         如果 DateDiff("s",timedg,now) >= timedaguai 则
  80.             跳转到标记 打怪开始(子程序 时间判断)
  81.         条件结束
  82.     条件结束
  83. 子程序结束
  84. 子程序 副本打怪()
  85.     延时 300 毫秒
  86.     令 op = Bkgnd.FindColorEx(Hwnd,691,235,692,236,"0F1315",0,0.88)
  87.     延时 32 毫秒
  88.     注释：判断是否在副本内
  89.     令 MyArray1 = Split(op,"|")
  90.     令 x2 = Clng(MyArray1(0))
  91.     令 y2 = Clng(MyArray1(1))
  92.     如果 x2 > 0 并且 y2 > 0 则
  93.         注释：如果是就点击打怪
  94.         调用 Bkgnd.LeftClick(Hwnd,623,239)
  95.         延时 56 毫秒
  96.         调用 Bkgnd.LeftClick(Hwnd,623,239)
  97.         延时 300 毫秒
  98.         令 fbtime = now
  99.         调用 Window.SendKeyPress(Hwnd,32)
  100.         延时 56 毫秒