1.                 （鼠标）移动到 (602, 47)
  2.                 （鼠标）右键单击, 1次
  3.             条件结束
  4.             注释：判断宝宝蓝25%
  5.             令 GetColor = 得到指定点 (486, 45) 的颜色
  6.             调用 Color.ColorToRGB(GetColor,R,G,B)
  7.             如果 R > 100 则
  8.                 如果 vet = 1 则
  9.                     如果 mouth = 1 则
  10.                         调用 Bkgnd.SendString(Hwnd,shout)
  11.                         调用 Bkgnd.KeyPress(Hwnd,13)
  12.                         令 mouth = 0
  13.                     条件结束
  14.                 否则
  15.                     调用 Window.Active(Hwnd)
  16.                     （鼠标）移动到 (486, 47)
  17.                     （鼠标）右键单击, 1次
  18.                 条件结束
  19.             条件结束
  20.         条件结束
  21.         注释：*********************自动巫医************************
  22.         如果 vet = 1 则
  23.             如果点 (108,82) 的颜色等于 "303460" 则
  24.                 调用 Window.Active(Hwnd)
  25.                 （鼠标）移动到 (232, 366)
  26.                 延时 500 毫秒
  27.                 （鼠标）左键按下
  28.                 延时 500 毫秒
  29.                 （鼠标）左键弹起
  30.                 延时 500 毫秒
  31.                 （鼠标）左键单击, 1次
  32.                 令 mouth = 1
  33.             条件结束
  34.         条件结束
  35.     条件结束
  36. 条件结束
  37. 跳转到标记 start
  38. 子程序 OnScriptExit()
  39.     调用 Window.Top(Hwnd,1)
  40.     调用 Window.SetText(Hwnd,sText)
  41.     调用 Window.SetClientSize(Hwnd,640,480)
  42. 子程序结束