1.         否则如果 chongwushengji = 2 则
  2.         条件结束
  3.     循环结束
  4. 子程序结束
  5. 子程序 副本模式
  6.     标记 再来吧(子程序 副本模式)
  7.     如果 xuelan = 1 则
  8.         如果 吃红 = 1 则
  9.             调用 红90()
  10.         否则如果 吃红 = 2 则
  11.             调用 红80()
  12.         否则如果 吃红 = 3 则
  13.             调用 红70()
  14.         否则如果 吃红 = 4 则
  15.             调用 红60()
  16.         否则如果 吃红 = 5 则
  17.             调用 红50()
  18.         否则如果 吃红 = 6 则
  19.             调用 红40()
  20.         否则如果 吃红 = 7 则
  21.             调用 红30()
  22.         否则如果 吃红 = 8 则
  23.             调用 红20()
  24.         否则如果 吃红 = 9 则
  25.             调用 红10()
  26.         否则如果 吃红 = 10 则
  27.         条件结束
  28.         如果 shifouhanhua = 1 则
  29.             调用 喊话()
  30.         否则如果 shifouhanhua = 2 则
  31.         条件结束
  32.         如果 吃蓝 = 1 则
  33.             调用 蓝90()
  34.         否则如果 吃蓝 = 2 则
  35.             调用 蓝80()
  36.         否则如果 吃蓝 = 3 则
  37.             调用 蓝70()
  38.         否则如果 吃蓝 = 4 则
  39.             调用 蓝60()
  40.         否则如果 吃蓝 = 5 则
  41.             调用 蓝50()
  42.         否则如果 吃蓝 = 6 则
  43.             调用 蓝40()
  44.         否则如果 吃蓝 = 7 则
  45.             调用 蓝30()
  46.         否则如果 吃蓝 = 8 则
  47.             调用 蓝20()
  48.         否则如果 吃蓝 = 9 则
  49.             调用 蓝10()
  50.         否则如果 吃蓝 = 10 则
  51.             如果 shifouhanhua = 1 则
  52.                 调用 喊话()
  53.             否则如果 shifouhanhua = 2 则
  54.             条件结束
  55.         否则如果 xuelan = 2 则
  56.             调用 内存血()
  57.             如果 shifouhanhua = 1 则
  58.                 调用 喊话()
  59.             否则如果 shifouhanhua = 2 则
  60.             条件结束
  61.             调用 内存蓝()
  62.             如果 shifouhanhua = 1 则
  63.                 调用 喊话()
  64.             否则如果 shifouhanhua = 2 则
  65.             条件结束
  66.         条件结束
  67.     条件结束
  68.     延时 500 毫秒
  69.     令 XY = Bkgnd.FindColor(Hwnd,294,224,368,249," A9C7D4")
  70.     令 ZB = InStr(XY,"|")
  71.     令 X = Clng(Left(XY,ZB - 1))
  72.     令 Y = Clng(Right(XY,Len(XY) - ZB))
  73.     如果 X > 0 并且 Y > 0 则
  74.         调用 Bkgnd.LeftClick(Hwnd,X,Y)
  75.     条件结束
  76.     标记 fbda(子程序 副本模式)
  77.     延时 500 毫秒
  78.     令 XY = Bkgnd.FindColor(Hwnd,592,227,655,249,"ACC8D3")
  79.     令 ZB = InStr(XY,"|")
  80.     令 X = Clng(Left(XY,ZB - 1))
  81.     令 Y = Clng(Right(XY,Len(XY) - ZB))
  82.     如果 X > 0 并且 Y > 0 则
  83.         调用 Bkgnd.LeftClick(Hwnd,X,Y)
  84.     否则
  85.         跳转到标记 fbda(子程序 副本模式)
  86.     条件结束
  87.     延时 500 毫秒
  88.     如果 关闭战斗显示 = 0 则
  89.         调用 关闭战斗显示1()
  90.     否则如果 不关闭战斗显示 = 1 则
  91.     条件结束
  92.     标记 fbguanbi(子程序 副本模式)
  93.     延时 500 毫秒
  94.     令 XY = Bkgnd.FindColor(Hwnd,294,224,368,249," A9C7D4")
  95.     令 ZB = InStr(XY,"|")
  96.     令 X = Clng(Left(XY,ZB - 1))
  97.     令 Y = Clng(Right(XY,Len(XY) - ZB))
  98.     如果 X > 0 并且 Y > 0 则
  99.         调用 Bkgnd.LeftClick(Hwnd,X,Y)
  100.     条件结束