1. 令 Hwnd = Window.Find(0,"《天龙八部OL》")
2. 令 sRect = Window.GetClientRect(Hwnd)
3. 定义变量 MyArray
4. 令 MyArray = Split(sRect,"|")
5. 令 L = CLng(MyArray(0))
6. 令 T = CLng(MyArray(1))
7. 令 R = CLng(MyArray(2))
8. 令 B = CLng(MyArray(3))
9. 标记 脚本开始
10. 调用 打怪()
11. 调用 人物加血()
12. 调用 宝宝加血()
13. 跳转到标记 脚本开始
14. 子程序 打怪()
15.     延时 200 毫秒
16.     （键盘）按下 "Ctrl" 键
17.     延时 200 毫秒
18.     （键盘）按 "Tab" 键, 1次
19.     延时 200 毫秒
20.     （键盘）弹起 "Ctrl" 键
21.     延时 200 毫秒
22.     （键盘）按 "F1" 键, 1次
23.     延时 200 毫秒
24. 子程序结束
25. 子程序 人物加血()
26.     延时 200 毫秒
27.     如果点 (L + 165,t + 34) 的颜色等于 "393939" 则
28.         （键盘）按 "F2" 键, 1次
29.     否则
30.     条件结束
31. 子程序结束
32. 子程序 宝宝加血()
33.     延时 200 毫秒
34.     如果点 (L + 184,T + 83) 的颜色等于 "383838" 则
35.         （键盘）按 "F3" 键, 1次
36.     否则
37.     条件结束
38. 子程序结束