1.     调用 辨状态()
  2.     注释：↓passnum:人或宝宝是否被遮挡或已挂传递参数
  3.     如果 passnum = 1 则
  4.         跳转到标记 待加蓝(子程序 人加蓝)
  5.     否则
  6.         跳转到标记 已加蓝(子程序 人加蓝)
  7.     条件结束
  8.     注释：↑经过上面测数，如没测到，则说明人物被遮挡住了
  9.     标记 待加蓝(子程序 人加蓝)
  10.     延时 50 毫秒
  11.     注释：↓测黑色
  12.     令 mycolor = 得到指定点 (Lx + 220 - round((1 - pplan) * 139), Ty + 62) 的颜色
  13.     调用 Color.ColorToRGB(mycolor,R,G,B)
  14.     注释：↑红色(R)、绿色(G)、蓝色(B)
  15.     调用 Color.ColorToHSL(mycolor,H,S,L)
  16.     注释：↑色调(H)、饱和度(S)、亮度(L)
  17.     如果 B < 66 并且 S < 40 则
  18.         注释：↑人物缺蓝，需补充
  19.         注释：↓补蓝之前，先补宝宝血
  20.         令 rworbb = 2
  21.         注释：↑(人或)宝宝加血对像判断参数
  22.         调用 辨状态()
  23.         注释：↓passnum:人或宝宝是否被遮挡或已挂传递参数
  24.         如果 passnum = 1 则
  25.             定义变量 bbn
  26.             令 bbn = 0
  27.             标记 补BB血(子程序 人加蓝)
  28.             令 bbn = bbn + 1
  29.             如果 bbn > 3 则
  30.                 注释：↑此处限制喂食次数，以防陷入死循环
  31.                 跳转到标记 BB血满(子程序 人加蓝)
  32.             条件结束
  33.             注释：↓测红色
  34.             令 bbcolor = 得到指定点 (Lx + 210, Ty + 110) 的颜色
  35.             调用 Color.ColorToRGB(bbcolor,R,G,B)
  36.             注释：↑红色(R)、绿色(G)、蓝色(B)
  37.             调用 Color.ColorToHSL(bbcolor,H,S,L)
  38.             注释：↑色调(H)、饱和度(S)、亮度(L)
  39.             如果 R > 210 并且 B < 10 并且 H < 10 并且 S > 230 则
  40.                 注释：↑测红色，如测不到,则说明宝宝加没加满血，需继续喂食
  41.                 跳转到标记 BB血满(子程序 人加蓝)
  42.             否则
  43.                 （键盘）按 "F10" 键, 1次
  44.                 延时 1000 毫秒
  45.                 跳转到标记 补BB血(子程序 人加蓝)
  46.             条件结束
  47.         条件结束
  48.         标记 BB血满(子程序 人加蓝)
  49.         （键盘）按 "F9" 键, 1次
  50.         延时 1000 毫秒
  51.         调用 喂食()
  52.     条件结束
  53.     标记 已加蓝(子程序 人加蓝)
  54. 子程序结束
  55. 子程序 人加血()
  56.     令 rworbb = 1
  57.     注释：↑人(或宝宝)加血对像判断参数
  58.     调用 辨状态()
  59.     注释：↓passnum:人或宝宝是否被遮挡或已挂传递参数
  60.     如果 passnum = 1 则
  61.         跳转到标记 血亏盈(子程序 人加血)
  62.     否则
  63.         跳转到标记 rw满血(子程序 人加血)
  64.     条件结束
  65.     注释：↑经过上面先后测数，如没测到，则说明人物被遮挡住了
  66.     标记 血亏盈(子程序 人加血)
  67.     延时 50 毫秒
  68.     注释：↓测黑色
  69.     令 mycolor = 得到指定点 (Lx + 220 - round((1 - ppxue) * 139), Ty + 54) 的颜色
  70.     调用 Color.ColorToRGB(mycolor,R,G,B)
  71.     注释：↑红色(R)、绿色(G)、蓝色(B)
  72.     调用 Color.ColorToHSL(mycolor,H,S,L)
  73.     注释：↑色调(H)、饱和度(S)、亮度(L)
  74.     如果 B < 66 并且 S < 40 则
  75.         注释：↑人物缺蓝，需补充
  76.         令 xuelank = 1
  77.         延时 1000 毫秒
  78.         （键盘）按 "F8" 键, 1次
  79.         延时 1000 毫秒
  80.     条件结束
  81.     令 xuelank = 0
  82.     标记 rw满血(子程序 人加血)
  83. 子程序结束
  84. 子程序 清心()
  85.     令 rworbb = 1
  86.     注释：↑人(或宝宝)加血对像判断参数
  87.     调用 辨状态()
  88.     注释：↓passnum:人或宝宝是否被遮挡或已挂传递参数
  89.     如果 passnum = 1 则
  90.         跳转到标记 血盈亏(子程序 清心)
  91.     否则
  92.         跳转到标记 rw血满(子程序 清心)
  93.     条件结束
  94.     注释：↑经过上面先后测数，如没测到，则说明人物被遮挡住了
  95.     标记 血盈亏(子程序 清心)
  96.     延时 50 毫秒
  97.     注释：↓测黑色
  98.     令 mycolor = 得到指定点 (Lx + 220 - round((1 - ppxue) * 139), Ty + 54) 的颜色
  99.     调用 Color.ColorToRGB(mycolor,R,G,B)
  100.     注释：↑红色(R)、绿色(G)、蓝色(B)