1. 令 Hwnd = Window.MousePoint()
2. 调用 大漠_绑定()
3. 令 dm_ret = dm.SetDict(0,"新炫舞.txt")
4. 令 dm_ret = dm.usedict(0)
5. 循环开始
6.     令 dm_ret = dm.FindStrFast(150,415,500,455,"2","ffffff-202020","0.9",x,y)
7.     如果 X > 0 则
8.         延时 10 毫秒
9.         令 按键查看 = dm.OcrEx(100,415,910,455,"ffffff-202020|c0ceea-202020|fefdfd-505050",0.9)
10.         标记 开始
11.         令 按键 = split(按键查看,"|")
12.         循环 i 从 1 到 ubound(按键)
13.             令 坐标 = split(按键(i),",")
14.             令 X坐标 = cint(坐标(0))
15.             令 Y坐标 = cint(坐标(1))
16.             令 按键a = dm.Ocr(x坐标 - 15,y坐标 - 10,x坐标 + 50,y坐标 + 40,"ffffff-202020|c0ceea-202020|fefdfd-505050",0.9)
17.             标记 aaa
18.             令 dm_ret = dm.FindColor(x坐标 - 10,y坐标 + 41,x坐标 + 10,y坐标 + 58,"a4eaf5-505050|ffc6b6-505050|ffffff-505050|fbdb43-505050","1.0",0,x,y)
19.             如果 x < 0 则
20.                 延时 1 毫秒
21.                 跳转到标记 aaa
22.             否则
23.                 如果 按键a = "上" 则
24.                     dm.KeyPress(38)
25.                 否则如果 按键a = "下" 则
26.                     dm.KeyPress(40)
27.                 否则如果 按键a = "左" 则
28.                     dm.KeyPress(37)
29.                 否则如果 按键a = "右" 则
30.                     dm.KeyPress(39)
31.                 否则如果 按键a = "空格" 则
32.                     dm.KeyPress(32)
33.                 条件结束
34.             条件结束
35.         循环结束
36.     条件结束
37.     延时 1 毫秒
38. 循环结束
39. 函数 OCR(起点x,起点y,终点x,终点y,色彩,模糊度)
40.     令 ocr = dm.Ocr(起点x,起点y,终点x,终点y,色彩,模糊度)
41. 函数结束
42. 子程序 OnScriptLoad()
43.     展开附件 EZ辅助.txt 到 C:\《Universe》\ 文件夹
44.     展开附件 *.* 到 C:\《Universe》\新炫舞 文件夹
45. 子程序结束
46. 子程序 OnScriptExit()
47.     令 dm_ret = dm.UnBindWindow()
48.     调用 msg.Tips("谢谢使用《Universe》辅助")
49. 子程序结束
50. 子程序 大漠_绑定()
51.     注释：-----------------------------分割线----------------------------------//
52.     调用 msg.Tips("开始运行")
53.     令 ws = createobject("Wscript.Shell")
54.     ws.run("regsvr32 C:\《Universe》\新炫舞\dm.dll /s")
55.     令 dm = createobject("dm.dmsoft")
56.     注释：-----------------------------判断是否高级绑定----------------------------------//
57.     令 绑定模式2 = dm.bindwindow(hwnd,"dx","dx2","dx",0)
58.     令 base_path = dm.GetBasePath()
59.     延时 1000 毫秒
60.     令 dm_ret = dm.SetPath("C:\《Universe》\新炫舞")
61.     令 判定指定窗口是否已经被后台绑定 = dm.IsBind(hwnd)
62.     注释：---------------------优化用户环境结束 开始设置新炫舞环境--------------------------//
63.     令 dm_ret = dm.SetShowErrorMsg(0)
64.     令 dm_ret = dm.SetWindowState(hwnd,12)
65.     注释：----------------------------------字库选择//关闭输入法---------------------------------------//
66. 子程序结束
67. 注释：制作：Universe
68. 注释：日期：2011.10.10
69. 注释：修改：2012.5.13