1. 令 dm = createobject("dm.dmsoft")
2. 向调试窗口输出：dm.ver()
3. dm.SetPath("d:\temp")
4. dm.SetDict(0,"dm_soft.txt")
5. 延时 1000 毫秒
6. 令 hwnd = dm.GetForegroundWindow()
7. 注释：↑获取“鼠标指向”窗口句柄
8. 令 dm_ret = dm.BindWindow(hwnd,"normal","normal","normal",0)
9. 延时 200 毫秒
10. 如果 dm_ret = 0 则
11.     弹出窗口 "绑定“失败”"
12.     ExitScript()
13. 条件结束
14. 延时 500 毫秒
15. 注释：最前判定
16. 令 dm_ret = dm.FindStr(825,238,1009,432,"接","e5f2f2-000000",1.0,intX,intY)
17. 如果 intx >= 0 则
18.     调用 jiequ
19. 条件结束
20. 令 dm_ret = dm.FindStr(753,183,1020,475,"回","e5f2f2-000000",1.0,intX,intY)
21. 如果 intx >= 0 则
22.     调用 huifu
23. 条件结束
24. 令 dm_ret = dm.FindStr(825,238,1009,432,"信","e5f2f2-000000",1.0,intX,intY)
25. 如果 intX >= 0 并且 intY >= 0 则
26.     调用 songxin
27. 条件结束
28. 令 dm_ret = dm.FindStr(6,114,384,623,"剧","fdff3c-000000",1.0,intX,intY)
29. 如果 intX >= 0 并且 intY >= 0 则
30.     调用 juqing
31. 条件结束
32. 令 dm_ret = dm.FindStr(825,238,1009,432,"打","e5f2f2-000000",1.0,intX,intY)
33. 如果 intX >= 0 并且 intY >= 0 则
34.     调用 daguai
35. 否则
36. 条件结束
37. 令 dm_ret = dm.FindStr(825,238,1009,432,"将","e5f2f2-000000",1.0,intX,intY)
38. 如果 intX >= 0 并且 intY >= 0 则
39.     调用 jiang
40. 条件结束
41. 令 dm_ret = dm.FindStr(825,238,1009,432,"去","e5f2f2-000000",1.0,intX,intY)
42. 如果 intX >= 0 并且 intY >= 0 则
43.     调用 qu
44. 条件结束
45. 令 dm_ret = dm.FindStr(825,238,1009,432,"击","e5f2f2-000000",1.0,intX,intY)
46. 如果 intX >= 0 并且 intY >= 0 则
47.     调用 daguai2
48. 条件结束
49. 令 dm_ret = dm.FindStr(0,0,2000,2000,"成","f2e88f-000000",1.0,intX,intY)
50. 如果 intX >= 0 并且 intY >= 0 则
51.     调用 wancheng
52. 条件结束
53. 令 dm_ret = dm.FindStr(0,0,2000,2000,"受","f2e88f-000000",1.0,intX,intY)
54. 如果 intX >= 0 并且 intY >= 0 则
55.     调用 jieshou
56. 条件结束
57. 令 dm_ret = dm.FindStr(0,0,2000,2000,"购","f2e88f-000000",1.0,intX,intY)
58. 如果 intX >= 0 并且 intY >= 0 则
59.     调用 goumai
60. 条件结束
61. 令 dm_ret = dm.FindStr(825,238,1009,432,"往","e5f2f2-000000",1.0,intX,intY)
62. 如果 intX >= 0 并且 intY >= 0 则
63.     调用 wang
64. 条件结束
65. 令 dm_ret = dm.FindStr(825,238,1009,432,"些","e5f2f2-000000",1.0,intX,intY)
66. 如果 intX >= 0 并且 intY >= 0 则
67.     调用 xie
68. 条件结束
69. 令 dm_ret = dm.FindStr(825,238,1009,432,"找","e5f2f2-000000",1.0,intX,intY)
70. 如果 intX >= 0 并且 intY >= 0 则
71.     调用 zhao
72. 条件结束
73. 令 dm_ret = dm.FindStr(15,195,170,324,"6","ffa000-000000",1.0,intX,intY)
74. 如果 intX >= 0 并且 intY >= 0 则
75.     调用 zhong
76. 条件结束
77. 令 dm_ret = dm.FindStr(825,238,1009,432,"杀","e5f2f2-000000",1.0,intX,intY)
78. 如果 intX >= 0 并且 intY >= 0 则
79.     调用 shaguai
80. 条件结束
81. 令 dm_ret = dm.FindStr(825,238,1009,432,"采","e5f2f2-000000",1.0,intX,intY)
82. 如果 intX >= 0 并且 intY >= 0 则
83.     调用 caiji
84. 条件结束
85. 令 dm_ret = dm.FindStr(825,238,1009,432,"快","fdff3c-000000",1.0,intX,intY)
86. 如果 intX >= 0 并且 intY >= 0 则
87.     调用 kuaisu
88. 条件结束
89. 令 dm_ret = dm.FindStr(1,0,2000,2000,"要","ffa000-000000",1.0,intX,intY)
90. 如果 intX >= 0 并且 intY >= 0 则
91.     调用 dati
92. 否则
93. 条件结束
94. 令 dm_ret = dm.FindStr(0,0,2000,2000,"未","ffa000-000000",1.0,intX,intY)
95. 如果 intX >= 0 并且 intY >= 0 则
96.     调用 dati
97. 否则
98. 条件结束
99. 令 dm_ret = dm.FindStr(0,0,2000,2000,"未","ffa000-000000",1.0,intX,intY)
100. 如果 intX >= 0 并且 intY >= 0 则