1. 用户定义变量 Var2=DropList{195:1|196:2|197:3|198:4|199:5|200:6|201:7|202:8|203:9|204:10|205:11|206:12|207:13|208:14|209:15}=0 【主刷服】
2. 用户定义变量 Var1=DropList{195:1|196:2|197:3|198:4|199:5|200:6|201:7|202:8|203:9|204:10|205:11|206:12|207:13|208:14|209:15}=0 【副刷服】
3. 用户定义变量 Var4=DropList{是:1|否:2}=2 跑服后是否开设房间
4. 用户定义变量 Var5=DropList{是:1|否:2}=2 是否开设密码房间
5. 用户定义变量 Var3=2000 跑服延时
6. //------------------上面是自定内容
7. 调用插件命令 a = Window.Foreground()
8. 延时50毫秒
9. （VBScript语句） set ppt=createobject("wscript.shell")
10. （VBScript语句） pp="HKEY_LOCAL_MACHINE\SOFTWARE\MPlay\Crazy Arcade\"
11. （VBScript语句） way=ppt.regread (pp&"CAPath")
12. moor="段神：自动跑F服工具1.4"
13. //定义，上面是设置的，下面的是设置房间名
14. （VBScript语句） ppt.regwrite pp& "LastRoomTitle",moor,"REG_SZ"
15. 延时50毫秒
16. 调用插件命令 Sys.SetCLB("段神自动跑F工具 - 1.4 .Www.dsbz.ys168.com - -// ")
17. 按住 <Ctrl>
18. 按键 <V>
19. 弹起 <Ctrl>
20. 调用插件命令 Bkgnd.KeyPress(a, 13)
21. 延时50毫秒
22. 调用插件命令 Bkgnd.LeftClick(a,118,584)
23. 延时50毫秒
24. 调用子程序 副F
25. 延时Var3毫秒
26. 按住 <Ctrl>
27. 按键 <V>
28. 弹起 <Ctrl>
29. 调用插件命令 Bkgnd.KeyPress(a, 13)
30. 延时50毫秒
31. 调用插件命令 Bkgnd.LeftClick(a,118,584)
32. 延时50毫秒
33. 调用子程序 主F
34. 延时Var3毫秒
35. 按住 <Ctrl>
36. 按键 <V>
37. 弹起 <Ctrl>
38. 调用插件命令 Bkgnd.KeyPress(a, 13)
39. 延时50毫秒
40. 如果表达式 (Var4=2) 为真,则
41. 条件结束
42. 如果表达式 (Var4=1) 为真,则
43.     调用插件命令 Bkgnd.LeftClick(a, 283, 80)
44.     如果表达式 (Var5=1) 为真,则
45.         调用插件命令 Bkgnd.LeftClick(a, 483,343)
46.         调用插件命令 Bkgnd.LeftClick(a, 485,316)
47.         调用插件命令 Bkgnd.KeyPress(a, 77)
48.     条件结束
49.     调用插件命令 Bkgnd.KeyPress(a, 13)
50. 条件结束
51. 脚本停止运行
52. 子程序 副F
53.     调用插件命令 Bkgnd.LeftClick(a, 753, 134)
54.     延时100毫秒
55.     如果表达式 (Var1=1) 为真,则
56.         调用插件命令 Bkgnd.LeftClick(a, 504, 248)
57.     条件结束
58.     //下面这句是得到当前最前面的窗口句柄
59.     如果表达式 (Var1=2) 为真,则
60.         调用插件命令 Bkgnd.LeftClick(a, 673, 251)
61.     条件结束
62.     如果表达式 (Var1=3) 为真,则
63.         调用插件命令 Bkgnd.LeftClick(a, 503, 302)
64.     条件结束
65.     如果表达式 (Var1=4) 为真,则
66.         调用插件命令 Bkgnd.LeftClick(a, 674, 302)
67.     条件结束
68.     如果表达式 (Var1=5) 为真,则
69.         调用插件命令 Bkgnd.LeftClick(a, 500, 357)
70.     条件结束
71.     如果表达式 (Var1=6) 为真,则
72.         调用插件命令 Bkgnd.LeftClick(a, 670, 365)
73.     条件结束
74.     如果表达式 (Var1=7) 为真,则
75.         调用插件命令 Bkgnd.LeftClick(a, 503, 414)
76.     条件结束
77.     如果表达式 (Var1=8) 为真,则
78.         调用插件命令 Bkgnd.LeftClick(a, 666, 415)
79.     条件结束
80.     如果表达式 (Var1=9) 为真,则
81.         调用插件命令 Bkgnd.LeftClick(a, 504, 476)
82.     条件结束
83.     如果表达式 (Var1=10) 为真,则
84.         调用插件命令 Bkgnd.LeftClick(a, 670, 472)
85.     条件结束
86.     如果表达式 (Var1=11) 为真,则
87.         调用插件命令 Bkgnd.LeftClick(a, 565, 519)
88.         延时200毫秒
89.         调用插件命令 Bkgnd.LeftClick(a, 503, 251)
90.     条件结束
91.     如果表达式 (Var1=12) 为真,则
92.         调用插件命令 Bkgnd.LeftClick(a, 565, 519)
93.         延时200毫秒
94.         调用插件命令 Bkgnd.LeftClick(a, 672, 247)
95.     条件结束
96.     如果表达式 (Var1=13) 为真,则
97.         调用插件命令 Bkgnd.LeftClick(a, 565, 519)
98.         延时200毫秒
99.         调用插件命令 Bkgnd.LeftClick(a, 498, 302)
100.     条件结束