1. 令 DNF = Window.Find(0,"地下城与勇士")
  2. Window.Move(DNF,0,0)
  3. (语句无法识别,可能有错误): 线程 = BeginThread(测试)
  4. 子程序 测试
  5.     令 DNF = Window.Find(0,"地下城与勇士")
  6.     标记 p(子程序 测试)
  7.     延时 20000 毫秒
  8.     标记 u(子程序 测试)
  9.     调用 Bkgnd.KeyPress(DNF,13)
  10.     延时 1000 毫秒
  11.     令 G = 得到指定点 (92, 406) 的颜色
  12.     如果 g = "AADDEE" 则
  13.         调用 Bkgnd.KeyPress(DNF,49)
  14.         延时 500 毫秒
  15.         调用 Bkgnd.KeyPress(DNF,13)
  16.     否则
  17.         跳转到标记 u(子程序 测试)
  18.     条件结束
  19.     跳转到标记 p(子程序 测试)
  20. 子程序结束
  21. 标记 d
  22. 令 闹钟1 = 得到指定点 (587, 359) 的颜色
  23. 令 闹钟2 = 得到指定点 (586, 359) 的颜色
  24. 如果 闹钟1 = "1E1E89" 或者 闹钟2 = "1E1E89" 则
  25. 否则
  26.     调用 Bkgnd.LeftDown(DNF,599,348)
  27.     延时 100 毫秒
  28.     调用 Bkgnd.LeftUp(DNF,599,348)
  29. 条件结束
  30. 跳转到标记 d