1. 用户定义变量 ip="49.72.185.76" "自定义ip地址"
2. 调用 注册()
3. 注释：<>------------------------------
4. 令 hwnd = dm.GetMousePointWindow()
5. 向调试窗口输出：hwnd
6. 注释：
7. 调用 绑定()
8. 注释：<>--------------------------
9. 令 dm_ret = dm.FindPic(0,0,2000,2000,"验证码.bmp","000000",0.9,0,intX,intY)
10. 延时 20 毫秒
11. 向调试窗口输出：intX & "," & intY
12. 如果 intX > 0 并且 intY > 0 则
13.     调用 远程代答()
14. 条件结束
15. 注释：<>------------------------------
16. 注释：<>------------------------------
17. 子程序 远程代答()
18.     令 handle = dm.FaqCapture(intX + 44,intY + 87,intX + 173,intY + 139,50,0,0)
19.     延时 20 毫秒
20.     注释：
21.     向调试窗口输出："开始答题"
22.     循环开始
23.         令 答案 = dm.FaqSend(ip & ":12345",handle,2,250 * 1000)
24.         向调试窗口输出：答案
25.         令 MyArray = Split(答案,":")
26.         注释：
27.         如果 MyArray(0) = "OK" 则
28.             跳出循环
29.         否则
30.             调用 Msg.Tips("发送题目，出错了")
31.         条件结束
32.     当 7 = 7 时循环
33.     注释：
34.     延时 4000 毫秒
35.     注释：
36.     dm.MoveTo(intX + 55,intY + 192)
37.     延时 5 毫秒
38.     dm.LeftClick()
39.     延时 20 毫秒
40.     注释：
41.     输入文本 MyArray(1)
42.     延时 500 毫秒
43.     dm.moveto(intX + 113,intY + 263)
44.     延时 20 毫秒
45.     dm.LeftClick()
46.     注释：
47. 子程序结束
48. 注释：<>--------------------------------------------------------------------<>
49. 注释：<>------------------------------子程序------------------------------<>
50. 注释：<>--------------------------------------------------------------------<>
51. 子程序 注册()
52.     展开附件 *.dll 到 .\plugin 文件夹
53.     展开附件 *.bmp 到 .\plugin\大漠梦想 文件夹
54.     展开附件 *.txt 到 .\plugin\大漠梦想 文件夹
55.     展开附件 dm.dll 到 .\plugin\大漠梦想 文件夹
56.     注释：↑PutAttachment释放附件
57.     调用 DBSoft.RegDBSoft("0731A74F3AA9DC55C27CA168D151F792")
58.     注释：↑大兵·注册
59.     调用 RegDll.Reg(".\plugin\大漠梦想\dm.dll")
60.     令 dm = createobject("dm.dmsoft")
61.     dm.SetPath(".\plugin\大漠梦想")
62.     注释：↑大漠·注册
63.     延时 20 毫秒
64. 子程序结束
65. 注释：
66. 子程序 OnScriptExit()
67.     令 dm_ret = dm.UnBindWindow()
68. 子程序结束
69. 子程序 绑定()
70.     循环开始
71.         令 dm_ret = dm.SetWindowState(hwnd,12)
72.         注释：↑设置“窗口”状态
73.         dm.MoveWindow(hwnd,0,0)
74.         注释：↑移动“窗口”到指定位置，允许移到“屏幕”外
75.         延时 500 毫秒
76.         令 dm_ret = dm.BindWindow(hwnd,"dx","windows","windows",0)
77.         延时 200 毫秒
78.         如果 dm_ret = 1 则
79.             跳出循环
80.         条件结束
81.     当 7 = 7 时循环
82.     注释：↑如果，成功，退出Do循环
83.     注释：↑如果，失败，就一直绑定，直到成功
84. 子程序结束