1. 令 路径 = Sys.GetDir(0)
2. 展开附件 显示桌面.scf 到 路径 文件夹
3. 令 延时 = 300
4. 令 宽 = Sys.GetScRX()
5. 令 高 = Sys.GetScRY()
6. 令 K = （命令库 图像）查找屏幕图片数量(100,高 - 40,宽,高,"Attachment:\判断.bmp",0.9)
7. 如果 K > 6 或者 k = 0 则
8.     调用 Media.Beep(900,200)
9.     弹出窗口 "没有检测到窗口或者超过可用开数"
10.     脚本停止运行
11. 条件结束
12. 令 名字 = InputBox("请输入大号角色昵称，检测到" & K & "开~" & TTTT & "")
13. 启动程序或打开文件 "路径\显示桌面.scf"
14. 启动程序或打开文件 "路径\显示桌面.scf"
15. 定义变量 a(6)
16. 令 i = 0
17. 循环 k 次
18.     标记 寻找
19.     调用 Msg.Tips("正在寻找第" & i & "个号句柄（请不要最小化窗口）:" & TTTT)
20.     从左上到右下查找图片 "Attachment:\飞车.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：1024 下：768），相似度 0.9
21.     如果 intX > 0 并且 intY > 0 则
22.         保存鼠标位置
23.         （鼠标）移动到 (intX, intY)
24.         令 a(i) = Window.MousePoint()
25.         恢复鼠标位置
26.     否则
27.         跳转到标记 寻找
28.     条件结束
29.     令 HH = a(i)
30.     注释：下面这句是判断窗口是否打开
31.     令 Window1 = Window.IsWindow(HH)
32.     如果 Window1 = 1 则
33.         注释：窗口打开
34.         令 sClass = Window.GetClass(HH)
35.         注释：飞车为"GAMEAPP"
36.         令 sText = Window.GetText(HH)
37.         注释：飞车为"QQ飞车公测版 Beta31 Build05 【大区】 【角色名字】"
38.         调用 Msg.Tips("标题：" & sText & "类名:" & sClass & "" & Hwnd)
39.     否则
40.         注释：窗口没有打开
41.         脚本停止运行
42.     条件结束
43.     循环 3 次
44.         令 rect = Window.GetClientRect(HH)
45.         如果 StrComp(Right(rect,7),"640|480") <> 0 则
46.             调用 Window.Active(HH)
47.             调用 Window.SetText(HH,"改变窗口大小ing")
48.             延时 100 毫秒
49.             （键盘）按 "F8" 键, 1次
50.             延时 700 毫秒
51.         条件结束
52.     循环结束
53.     调用 Window.Move(HH,0,0)
54.     调用 Window.Min(HH)
55.     如果 sText = "QQ飞车公测版 Beta31 Build05 【电信区】 【" & 名字 & "】" 或者 sText = "QQ飞车公测版 Beta31 Build05 【电信二】 【" & 名字 & "】" 或者 sText = "QQ飞车公测版 Beta31 Build05 【网通区】 【" & 名字 & "】" 则
56.         调用 Window.SetText(HH,名字)
57.         令 remember = i
58.     否则
59.         调用 Window.SetText(HH,"小号")
60.     条件结束
61.     令 i = i + 1
62.     延时 100 毫秒
63. 循环结束
64. 调用 Window.Restore(a(remember))
65. 调用 Window.Move(a(remember),宽 - 650,0)
66. 调用 Msg.Tips("进入主控制循环区鼠标移动到最左右调整切换频率")
67. 标记 开始
68. 令 c = 0
69. 循环 k 次
70.     从左上到右下查找图片 "Attachment:\差.bmp"，把找到的坐标保存到 (差X, 差Y)，指定区域（左：0 上：0 右：2000 下：2000），相似度 0.8
71.     如果 差X > 0 并且 差Y > 0 则
72.         保存鼠标位置
73.         （鼠标）移动到 (差X, 差Y)
74.         （鼠标）左键单击, 1次
75.         恢复鼠标位置
76.     条件结束
77.     调用 临时调整()
78.     令 b = 0
79.     循环 K 次
80.         如果 b = c 则
81.         否则
82.             调用 Window.Min(a(b))
83.         条件结束
84.         令 b = b + 1
85.     循环结束
86.     调用 Window.Restore(a(c))
87.     令 rect = Window.GetClientRect(a(c))
88.     令 r = Split(rect,"|")
89.     令 x = r(0)
90.     令 y = r(1)
91.     调用 准备()
92.     如果 c = remember 则
93.         调用 Window.SetText(a(remember),名字)
94.     否则
95.         调用 Window.SetText(a(c),"辅助号")
96.     条件结束
97.     调用 Window.Active(a(c))
98.     （键盘）按 "Space" 键, 1次
99.     延时 50 毫秒
100.     （键盘）按 "Space" 键, 1次