1. 令 Hwnd = Window.Find(0,"寻仙 - 安徽区 - 紫岚山 : 版本号2.3.5.1")
  2. 调用 Window.Active(Hwnd)
  3. 标记 寻怪
  4. 调用 Bkgnd.KeyPress(Hwnd,81)
  5. 延时 700 毫秒
  6. 标记 接着打怪
  7. 如果点 (328,103) 的颜色等于 "ED" 则
  8.     (鼠标)移动到 (46, 977)
  9.     (鼠标)左键单击, 1次
  10.     延时 1000 毫秒
  11.     调用 Bkgnd.KeyPress(Hwnd,49)
  12.     延时 700 毫秒
  13.     调用 Bkgnd.KeyPress(Hwnd,50)
  14.     延时 700 毫秒
  15.     调用 Bkgnd.KeyPress(Hwnd,51)
  16.     延时 700 毫秒
  17.     调用 Bkgnd.KeyPress(Hwnd,52)
  18.     延时 700 毫秒
  19.     跳转到标记 接着打怪
  20. 否则
  21.     调用 Bkgnd.KeyPress(Hwnd,90)
  22.     延时 500 毫秒
  23.     调用 Bkgnd.KeyPress(Hwnd,90)
  24.     跳转到标记 寻怪
  25. 条件结束