1.             令 wrongn = wrongn + 1
  2.             如果 wrongn >= 2 则
  3.                 注释：↑允许测色连续失误次数为1次/怪
  4.                 跳转到标记 下一个(子程序 杀怪)
  5.             条件结束
  6.             跳转到标记 怪未死(子程序 杀怪)
  7.         条件结束
  8.     条件结束
  9.     如果 bossmode = 2 则
  10.         如果 bossk = 1 则
  11.             令 tboss = now
  12.             令 pkboss = 2
  13.             注释：↑限定是出现过BOSS的标记
  14.         条件结束
  15.         如果 DateDiff("s",tboss,now) >= 16 并且 pkboss = 1 则
  16.             令 pkboss = 0
  17.             令 tboss = now
  18.         条件结束
  19.     条件结束
  20.     标记 下一个(子程序 杀怪)
  21.     令 tmax = now
  22.     注释：↑杀怪限时
  23. 子程序结束
  24. 子程序 延时()
  25.     标记 等待(子程序 延时)
  26.     如果 xuelank = 1 则
  27.         延时 1000 毫秒
  28.         跳转到标记 等待(子程序 延时)
  29.     否则
  30.         跳转到标记 到时(子程序 延时)
  31.     条件结束
  32.     标记 到时(子程序 延时)
  33. 子程序结束
  34. 子程序 声音()
  35.     调用 Media.Beep(523,200)
  36.     调用 Media.Beep(578,200)
  37.     调用 Media.Beep(659,200)
  38.     调用 Media.Beep(698,200)
  39.     调用 Media.Beep(784,200)
  40.     调用 Media.Beep(880,200)
  41.     调用 Media.Beep(988,200)
  42.     弹出窗口 "测试结束"
  43.     脚本停止运行
  44. 子程序结束
  45. 子程序 乐曲()
  46.     启动程序或打开文件 ("C:\WINDOWS\Media\air.wav")
  47.     弹出窗口 "测试结束"
  48.     脚本停止运行
  49. 子程序结束
  50. 子程序 喂食()
  51.     令 rworbb = 2
  52.     注释：↑(人或)宝宝加血对像判断参数
  53.     调用 辨状态()
  54.     注释：↓passnum:人或宝宝是否被遮挡或已挂传递参数
  55.     如果 passnum = 1 则
  56.         跳转到标记 待喂(子程序 喂食)
  57.     否则
  58.         跳转到标记 不喂(子程序 喂食)
  59.     条件结束
  60.     注释：↑经过上面测数，如没测到，则说明宝宝挂了或被遮挡住了
  61.     标记 待喂(子程序 喂食)
  62.     延时 50 毫秒
  63.     注释：↓测黑色
  64.     令 bbcolor = 得到指定点 (Lx + 241 - round((1 - bbxue) * 95), Ty + 110) 的颜色
  65.     调用 Color.ColorToRGB(bbcolor,R,G,B)
  66.     注释：↑红色(R)、绿色(G)、蓝色(B)
  67.     调用 Color.ColorToHSL(bbcolor,H,S,L)
  68.     注释：↑色调(H)、饱和度(S)、亮度(L)
  69.     如果 R < 66 并且 S < 40 则
  70.         注释：↑宝宝缺血，需喂食
  71.         定义变量 bbn
  72.         令 bbn = 0
  73.         标记 再喂食(子程序 喂食)
  74.         令 bbn = bbn + 1
  75.         如果 bbn > 5 则
  76.             注释：↑此处限制喂食次数，以防陷入死循环
  77.             跳转到标记 不喂(子程序 喂食)
  78.         条件结束
  79.         （键盘）按 "F10" 键, 1次
  80.         延时 1000 毫秒
  81.         注释：↓测红色
  82.         令 bbcolor = 得到指定点 (Lx + 236, Ty + 110) 的颜色
  83.         调用 Color.ColorToRGB(bbcolor,R,G,B)
  84.         注释：↑红色(R)、绿色(G)、蓝色(B)
  85.         调用 Color.ColorToHSL(bbcolor,H,S,L)
  86.         注释：↑色调(H)、饱和度(S)、亮度(L)
  87.         如果 R > 210 并且 B < 10 并且 H < 10 并且 S > 230 则
  88.             注释：↑测红色，如测不到,则说明宝宝加没加满血，需继续喂食
  89.             跳转到标记 不喂(子程序 喂食)
  90.         否则
  91.             跳转到标记 再喂食(子程序 喂食)
  92.         条件结束
  93.     否则
  94.         跳转到标记 不喂(子程序 喂食)
  95.     条件结束
  96.     标记 不喂(子程序 喂食)
  97. 子程序结束
  98. 子程序 人加蓝()
  99.     令 rworbb = 1
  100.     注释：↑人(或宝宝)加血对像判断参数