1. 调用插件命令 hwnd=Twindows.Find("LUNA Online","LUNA Online")
2. 调用插件命令 WindowEx2.MoveWindow(hwnd,0,0)
3. （VBScript语句） dim hong,qg
4. （VBScript语句） dim t1,t2,time1,time2
5. （VBScript语句） t1=now:t2=now
6. 用户定义变量 time1=5*60 第一个技能的间隔时间(分)，
7. 用户定义变量 time2=14*60 第二个技能的间隔时间(分)，
8. 用户定义变量 qg=droplist{是:0|否:1} 是否不抢怪
9. 用户定义变量 hong=45 血量<hong%时，自动吃红
10. 用户定义变量 lan=10 MP<hong%时，自动吃mp
11. //〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★开★始★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓//
12. 标记 开始
13. 按键<Tab>
14. 延时200毫秒
15. 调用子程序 找怪
16. 延时100毫秒
17. 跳转到标记 开始
18. //〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★攻★击★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓〓//
19. 子程序 攻击
20.     //KeyPress 50,1
21.     //Delay 200
22.     标记 攻击1
23.     按键<1>
24.     延时200毫秒
25.     //Gosub 加血
26.     如果 (342,70) 的颜色等于 #d69cff 则
27.         跳转到标记 攻击1
28.     条件结束
29. 子程序结束,回到调用处
30. 子程序 加血
31.     如果 (hong/100*(196-69)+69,57) 的颜色不等于 #c075f3 则
32.         按键<4>
33.         延时100毫秒
34.         //补血延时
35.     条件结束
36.     如果 (lan/100*(196-69)+69,70) 的颜色不等于 #E85F1C 则
37.         按键<5>
38.         延时100毫秒
39.         //补血延时
40.     条件结束
41. 子程序结束,回到调用处
42. 子程序 找怪
43.     如果表达式 (qg=0) 为真,则
44.         如果 (459,70) 的颜色等于 #d69cff 则
45.             跳转到标记 攻击
46.         否则
47.             跳转到标记 开始
48.         条件结束
49.         EnlIf
50.     子程序结束,回到调用处
51.     子程序 状态技能1
52.         如果表达式 (datediff("s",t1,now)>=tiam1) 为真,则
53.             延时500毫秒
54.             按键<7>
55.             延时200毫秒
56.             按键<8>
57.             延时3000毫秒
58.             t1=now
59.         条件结束
60.     子程序结束,回到调用处
61.     子程序 状态技能2
62.         如果表达式 (datediff("s",t2,now)<time2) 为真,则
63.             跳转到标记 开始
64.         否则
65.             按键<F1>
66.             延时100毫秒
67.             按键<9>
68.             延时1000毫秒
69.             t2=now
70.         条件结束
71.     子程序结束,回到调用处