1. 子程序 商帮出城()
2.     标记 寻路(子程序 商帮出城)
3.     注释：打开自动寻路窗口
4.     dm.KeyDown(18)
5.     dm.KeyPress(192)
6.     dm.KeyUp(18)
7.     延时 500 毫秒
8.     注释：查找“坐标”字位置并输入移动位置100.156
9.     令 dm_ret = dm.FindStr(400,100,800,600,"坐标","fff263-181008",1.0,intX,intY)
10.     延时 200 毫秒
11.     如果 intX > 0 并且 intY > 0 则
12.         dm.MoveTo(intX + 42,intY + 6)
13.         延时 200 毫秒
14.         dm.LeftClick()
15.         延时 200 毫秒
16.         注释：SayString "100"
17.         dm.SendString(DYCK,"100")
18.         延时 200 毫秒
19.         dm.keypress(13)
20.         延时 200 毫秒
21.         注释：SayString "156"
22.         dm.SendString(DYCK,"156")
23.         延时 200 毫秒
24.         注释：移动鼠标到“移动”单击
25.         dm.keypress(13)
26.         延时 200 毫秒
27.     否则
28.         跳转到标记 寻路(子程序 商帮出城)
29.     条件结束
30.     注释：跑路延时
31.     延时 5000 毫秒
32.     注释：判断是否出城
33.     循环当 intX > 0 并且 intY > 0 时
34.         dm.MoveTo(intX + 128,intY + 7)
35.         延时 200 毫秒
36.         dm.LeftClick()
37.         延时 5000 毫秒
38.         令 dm_ret = dm.FindStr(400,100,800,600,"坐标","fff263-181008",1.0,intX,intY)
39.         延时 200 毫秒
40.     循环结束
41. 子程序结束
42. 注释：====================返回己方城市脚本======================
43. 子程序 返回己方帮派()
44.     标记 返回帮派寻路(子程序 返回己方帮派)
45.     注释：打开自动寻路窗口
46.     dm.KeyDown(18)
47.     dm.KeyPress(192)
48.     dm.KeyUp(18)
49.     延时 500 毫秒
50.     注释：判断是否打开自动寻路
51.     令 dm_ret = dm.FindStr(400,100,800,600,"坐标","fff263-181008",1.0,intX,intY)
52.     延时 100 毫秒
53.     如果 intX > 0 并且 intY > 0 则
54.         延时 200 毫秒
55.     否则
56.         跳转到标记 返回帮派寻路(子程序 返回己方帮派)
57.     条件结束
58.     注释：查找指定区域内所有字符串是否含有地图标志人物名称或怪物
59.     注释：赋值当前地图为map
60.     令 dm_ret = dm.FindPic(400,100,800,600,"自动寻路.bmp","000000",0.9,0,intX,intY)
61.     定义变量 x1
62.     定义变量 x2
63.     定义变量 y1
64.     定义变量 y2
65.     令 x1 = intX
66.     令 y1 = intY + 153
67.     令 x2 = intX + 85
68.     令 y2 = intY + 167
69.     令 s = dm.Ocr(x1,y1,x2,y2,"ffffff-1b1008",1.0)
70.     延时 200 毫秒
71.     开始VBScript块
72.         根据 s 选择
73.         情况 "白堤柳鬼":
74.             令 map = "西湖"
75.         情况 "童贯":
76.             令 map = "洛阳"
77.         情况 "金钱豹":
78.             令 map = "雁南"
79.         情况 "阿林":
80.             令 map = "草原"
81.         情况 "阿史那默谷":
82.             令 map = "辽西"
83.         情况 "纥石烈阿疏":
84.             令 map = "长白山"
85.         情况 "大黑熊":
86.             令 map = "黄龙府"
87.         情况 "韦大叔":
88.             令 map = "苏州"
89.         情况 "程青霜":
90.             令 map = "大理"
91.         情况 "打草谷辽兵":
92.             令 map = "雁北"
93.         情况 "江湖游医":
94.             令 map = "嵩山"
95.         情况 "许愿树":
96.             令 map = "太湖"
97.         情况 "法河":
98.             令 map = "龙泉"
99.         情况 "白花蜘蛛":
100.             令 map = "武夷"