1. 注释：======================================================================欢迎使用独处软件
2. 如果 Form1.HP＜多少用回城.Value = 1 则
3.     循环当 true 时
4.         令 QA = Form1.InputBox7.Text
5.         令 QQ = Form1.InputBox8.Text
6.         从左上到右下查找图片 "Attachment:\aa.bmp"，把找到的坐标保存到 (aaaX, aaaY)，指定区域（左：0 上：0 右：2000 下：2000），相似度 1
7.         如果 aaaX > 0 并且 aaaY > 0 则
8.         否则
9.             从左上到右下查找图片 "Attachment:\回了.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：2000 下：2000），相似度 1
10.             如果 intX > 0 并且 intY > 0 则
11.                 如果点 (intX + QA - 589,intY + 7) 的颜色不等于 "9AFF" 则
12.                     （键盘）按 QQ 键, 1次
13.                     延时 500 毫秒
14.                     弹出窗口 "[独处软件]提醒你---你以回城,软件关闭"
15.                     脚本停止运行
16.                 条件结束
17.             条件结束
18.         条件结束
19.     循环结束
20. 条件结束
21. 注释：======================================================================欢迎使用独处软件
22. 如果 Form1.前台幻师学校.Value = 1 则
23.     令 Hwnd = Window.GetKeyFocusWnd()
24.     令 QW = Form1.InputBox9.Text
25.     令 QE = Form1.InputBox10.Text
26.     循环当 true 时
27.         令 sRect = Window.GetClientRect(Hwnd)
28.         令 MyArray = Split(sRect,"丨")
29.         调用 Bkgnd.MoveTo(Hwnd,72 + Ux,63 + Uy)
30.         调用 Bkgnd.LeftClick(Hwnd,72 + Ux,63 + Uy)
31.         延时 100 毫秒
32.         （键盘）按 QW 键, 1次
33.         延时 100 毫秒
34.         调用 Bkgnd.MoveTo(Hwnd,399 + Ux,297 + Uy)
35.         调用 Bkgnd.RightClick(Hwnd,399 + Ux,297 + Uy)
36.         延时 1100 毫秒
37.         调用 Bkgnd.MoveTo(Hwnd,72 + Ux,63 + Uy)
38.         调用 Bkgnd.LeftClick(Hwnd,72 + Ux,63 + Uy)
39.         延时 100 毫秒
40.         （键盘）按 QE 键, 1次
41.         延时 1100 毫秒
42.         调用 Bkgnd.MoveTo(Hwnd,72 + Ux,63 + Uy)
43.         调用 Bkgnd.LeftClick(Hwnd,72 + Ux,63 + Uy)
44.         延时 100 毫秒
45.         （键盘）按 QE 键, 1次
46.         延时 100 毫秒
47.         从左上到右下查找图片 "Attachment:\qw1.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：2000 下：2000），相似度 1
48.         如果 intX > 0 并且 intY > 0 则
49.             调用 Media.Beep(800,200)
50.             调用 Media.Beep(500,200)
51.             延时 1000 毫秒
52.             调用 Media.Beep(800,200)
53.             调用 Media.Beep(500,200)
54.             延时 1000 毫秒
55.             调用 Media.Beep(800,200)
56.             调用 Media.Beep(500,200)
57.             延时 1000 毫秒
58.             调用 Media.Beep(800,200)
59.             调用 Media.Beep(500,200)
60.             延时 1000 毫秒
61.             调用 Media.Beep(800,200)
62.             调用 Media.Beep(500,200)
63.             延时 1000 毫秒
64.             调用 Media.Beep(800,200)
65.             调用 Media.Beep(500,200)
66.         否则
67.             延时 7000 毫秒
68.         条件结束
69.     循环结束
70. 否则
71. 条件结束
72. 注释：======================================================================欢迎使用独处软件
73. 如果 Form1.后台喊话.Value = 1 则
74.     令 Hwnd = Window.GetKeyFocusWnd()
75.     循环当 true 时
76.         调用 Bkgnd.KeyPress(Hwnd,13)
77.         调用 Bkgnd.SendString(Hwnd,Form1.InputBox1.Text)
78.         调用 Bkgnd.KeyPress(Hwnd,13)
79.         调用 Bkgnd.KeyPress(Hwnd,13)
80.         延时 Form1.InputBox6.Text * 1000 毫秒
81.         注释：
82.         调用 Bkgnd.KeyPress(Hwnd,13)
83.         调用 Bkgnd.SendString(Hwnd,Form1.InputBox2.Text)
84.         调用 Bkgnd.KeyPress(Hwnd,13)
85.         调用 Bkgnd.KeyPress(Hwnd,13)
86.         延时 Form1.InputBox6.Text * 1000 毫秒
87.         注释：
88.         调用 Bkgnd.KeyPress(Hwnd,13)
89.         调用 Bkgnd.SendString(Hwnd,Form1.InputBox3.Text)
90.         调用 Bkgnd.KeyPress(Hwnd,13)
91.         调用 Bkgnd.KeyPress(Hwnd,13)
92.         延时 Form1.InputBox6.Text * 1000 毫秒
93.         注释：
94.         调用 Bkgnd.KeyPress(Hwnd,13)
95.         调用 Bkgnd.SendString(Hwnd,Form1.InputBox4.Text)
96.         调用 Bkgnd.KeyPress(Hwnd,13)
97.         调用 Bkgnd.KeyPress(Hwnd,13)
98.         延时 Form1.InputBox6.Text * 1000 毫秒
99.         注释：
100.         调用 Bkgnd.KeyPress(Hwnd,13)