1.         （键盘）弹起 Alt 键
  2.     否则
  3.         标记 战斗后
  4.         注释：把对话框点掉
  5.         （鼠标）移动到 (232, 366)
  6.         （鼠标）左键按下
  7.         延时 200 毫秒
  8.         （鼠标）左键弹起
  9.         延时 200 毫秒
  10.         注释：***********************战斗结束后自动补血***********************
  11.         如果 red = 50 则
  12.             注释：判断人物红50%
  13.             令 GetColor = 得到指定点 (611, 34) 的颜色
  14.             调用 Color.ColorToRGB(GetColor,R,G,B)
  15.             如果 B > 100 则
  16.                 调用 Window.Active(Hwnd)
  17.                 （鼠标）移动到 (596, 37)
  18.                 （鼠标）右键单击, 1次
  19.                 延时 500 毫秒
  20.                 令 GetColor = 得到指定点 (611, 34) 的颜色
  21.                 调用 Color.ColorToRGB(GetColor,R,G,B)
  22.                 如果 B > 100 则
  23.                     （鼠标）移动到 (596, 37)
  24.                     （鼠标）右键单击, 1次
  25.                 条件结束
  26.             条件结束
  27.             注释：判断宝宝红50%
  28.             令 GetColor = 得到指定点 (496, 34) 的颜色
  29.             调用 Color.ColorToRGB(GetColor,R,G,B)
  30.             如果 B > 100 则
  31.                 如果 vet = 1 则
  32.                     如果 mouth = 1 则
  33.                         调用 Bkgnd.SendString(Hwnd,shout)
  34.                         调用 Bkgnd.KeyPress(Hwnd,13)
  35.                         令 mouth = 0
  36.                     条件结束
  37.                 否则
  38.                     调用 Window.Active(Hwnd)
  39.                     （鼠标）移动到 (486, 37)
  40.                     （鼠标）右键单击, 1次
  41.                 条件结束
  42.             条件结束
  43.         否则
  44.             注释：判断人物红25%
  45.             令 GetColor = 得到指定点 (602, 34) 的颜色
  46.             调用 Color.ColorToRGB(GetColor,R,G,B)
  47.             如果 B > 100 则
  48.                 调用 Window.Active(Hwnd)
  49.                 （鼠标）移动到 (596, 37)
  50.                 （鼠标）右键单击, 1次
  51.             条件结束
  52.             注释：判断宝宝红25%
  53.             令 GetColor = 得到指定点 (486, 34) 的颜色
  54.             调用 Color.ColorToRGB(GetColor,R,G,B)
  55.             如果 B > 100 则
  56.                 如果 vet = 1 则
  57.                     如果 mouth = 1 则
  58.                         调用 Bkgnd.SendString(Hwnd,shout)
  59.                         调用 Bkgnd.KeyPress(Hwnd,13)
  60.                         令 mouth = 0
  61.                     条件结束
  62.                 否则
  63.                     调用 Window.Active(Hwnd)
  64.                     （鼠标）移动到 (486, 37)
  65.                     （鼠标）右键单击, 1次
  66.                 条件结束
  67.             条件结束
  68.         条件结束
  69.         注释：***********************战斗结束后自动补蓝***********************
  70.         如果 blue = 50 则
  71.             注释：判断人物蓝50%
  72.             令 GetColor = 得到指定点 (611, 45) 的颜色
  73.             调用 Color.ColorToRGB(GetColor,R,G,B)
  74.             如果 R > 100 则
  75.                 调用 Window.Active(Hwnd)
  76.                 （鼠标）移动到 (602, 47)
  77.                 （鼠标）右键单击, 1次
  78.             条件结束
  79.             注释：判断宝宝蓝50%
  80.             令 GetColor = 得到指定点 (496, 45) 的颜色
  81.             调用 Color.ColorToRGB(GetColor,R,G,B)
  82.             如果 R > 100 则
  83.                 如果 vet = 1 则
  84.                     如果 mouth = 1 则
  85.                         调用 Bkgnd.SendString(Hwnd,shout)
  86.                         调用 Bkgnd.KeyPress(Hwnd,13)
  87.                         令 mouth = 0
  88.                     条件结束
  89.                 否则
  90.                     调用 Window.Active(Hwnd)
  91.                     （鼠标）移动到 (486, 47)
  92.                     （鼠标）右键单击, 1次
  93.                 条件结束
  94.             条件结束
  95.         否则
  96.             注释：判断人物蓝25%
  97.             令 GetColor = 得到指定点 (602, 45) 的颜色
  98.             调用 Color.ColorToRGB(GetColor,R,G,B)
  99.             如果 R > 100 则
  100.                 调用 Window.Active(Hwnd)