2019年2月28日星期四

易语言地下城与勇士辅助自动刷图类源码

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
.版本 2
.支持库 EThread
.支持库 spec
.程序集 自动
.子程序 自动刷图
.判断开始 (全局_总开关.自动刷图开关 = 假)
  全局_总开关.自动刷图开关 = 真
  .判断开始 (文件读配置 (“刷图模式”) = 1)
    系统公告 (“自动刷图 - 开启”)
  .判断 (文件读配置 (“刷图模式”) = 2)
    系统公告 (“自动剧情 - 开启”)
  .判断 (文件读配置 (“刷图模式”) = 3)
    系统公告 (“自动深渊 - 开启”)
  .默认
  .判断结束
  启动线程 (&自动主线程, , 全局_总开关.自动刷图句柄)
.默认
  全局_总开关.自动刷图开关 = 假
  .判断开始 (文件读配置 (“刷图模式”) = 1)
    系统公告 (“自动刷图 - 关闭”)
  .判断 (文件读配置 (“刷图模式”) = 2)
    系统公告 (“自动剧情 - 关闭”)
  .判断 (文件读配置 (“刷图模式”) = 3)
    系统公告 (“自动深渊 - 关闭”)
  .默认
  .判断结束
  强制结束线程 (全局_总开关.自动刷图句柄)
.判断结束
.子程序 自动主线程
.局部变量 死循环, 整数型
.局部变量 返回值, 整数型
.判断循环首 (死循环 = 0)
  .如果真 (汇编_读整数型 (#对话基址) = 1)
    延迟 (200)
    内存按键 (#空格键)
  .如果真结束
  .如果真 (文件读配置 (“刷图模式”) ≠ 3)
    超级延时 (200)
    返回值 = 刷图返回值 ()
  .如果真结束
  .如果真 (文件读配置 (“刷图模式”) = 3)
    超级延时 (200)
    返回值 = 深渊返回值 ()
  .如果真结束
  .如果真 (返回值 = 1004)
    超级延时 (200)
    自动角色 ()
    到循环尾 ()
  .如果真结束
  .如果真 (返回值 = 1005)
    超级延时 (200)
    自动模式 ()
    到循环尾 ()
  .如果真结束
  .如果真 (返回值 = 1001)
    超级延时 (200)
    .如果真 (进图判断 = 假)
      进图判断 = 真
      超级延时 (1200)
      全局_消息反馈 = 19
      启动线程 (&全屏开关, , )
    .如果真结束
    延迟 (200)
    全局_消息反馈 = 7
    到循环尾 ()
  .如果真结束
  .如果真 (返回值 = 1002)
    全局_消息反馈 = 7
    超级延时 (200)
    自动顺图 ()
    延迟 (600)
    到循环尾 ()
  .如果真结束
  .如果真 (返回值 = 1003)
    超级延时 (200)
    .如果真 (文件读配置 (“刷图模式”) ≠ 3)
      自动出图 ()
    .如果真结束
    .如果真 (文件读配置 (“刷图模式”) = 3)
      深渊出图 ()
    .如果真结束
    到循环尾 ()
  .如果真结束
.判断循环尾 ()
.子程序 刷图返回值, 整数型
全局_总开关.疲劳值 = 疲劳 ()
.判断开始 (取是否城镇 () = 假)
  .判断开始 (取是否开门 () = 假)
    返回 (1001)
  .默认
    .判断开始 (是否在BOSS房 () = 假)
      返回 (1002)
    .默认
      返回 (1003)
    .判断结束
  .判断结束
.判断 (全局_总开关.疲劳值 < 1 或 全局_总开关.自动刷图开关 = 真 且 判断远古地图 () = 真 且 全局_总开关.疲劳值 < 6)
  返回 (1004)
.判断 (全局_总开关.疲劳值 ≥ 1)
  返回 (1005)
.默认
  返回 (0)
.判断结束
.子程序 深渊返回值, 整数型
全局_总开关.疲劳值 = 疲劳 ()
.判断开始 (取是否城镇 () = 假)
  .判断开始 (取是否开门 () = 假)
    返回 (1001)
  .默认
    .判断开始 (取深渊柱子存在 () = 假)
      返回 (1002)
    .默认
      返回 (1003)
    .判断结束
  .判断结束
.判断 (全局_总开关.疲劳值 < 1)
  返回 (1004)
.判断 (全局_总开关.疲劳值 ≥ 1)
  返回 (1005)
.默认
  返回 (0)
.判断结束
.子程序 自动模式
.判断开始 (文件读配置 (“刷图模式”) = 1)
  自动智能 (1)
.判断 (文件读配置 (“刷图模式”) = 2)
  自动智能 (2)
.判断 (文件读配置 (“刷图模式”) = 3)
  自动智能 (3)
.默认
.判断结束
.子程序 自动智能
.参数 类型, 整数型
.局部变量 主线类型, 整数型
.局部变量 局任务, 整数型
.如果真 (类型 = 1) ' 自动刷图
  全局_刷图.地图编号 = 文件读配置 (“副本编号”)
  全局_刷图.地图等级 = 文件读配置 (“副本难度”)
  全局_消息反馈 = 1 ' 到副本门口
  超级延时 (500)
  全局_消息反馈 = 2 ' 选图
  超级延时 (500)
  .判断开始 (文件读配置 (“副本难度”) < 5)
    全局_消息反馈 = 3 ' 进图
  .默认
    全局_消息反馈 = 4 ' 进图
  .判断结束
  超级延时 (3000)
  全局_消息反馈 = 19 ' 透明评分
.如果真结束
.如果真 (类型 = 2) ' 自动剧情
  超级延时 (500)
  智能计算任务 ()
  超级延时 (500)
.如果真结束
.如果真 (类型 = 3) ' 自动深渊
  全局_刷图.地图编号 = 文件读配置 (“副本编号”)
  全局_刷图.地图等级 = 文件读配置 (“副本难度”)
  全局_消息反馈 = 1
  超级延时 (500)
  全局_消息反馈 = 2
  超级延时 (500)
  全局_消息反馈 = 27
  超级延时 (3000)
  全局_消息反馈 = 19 ' 透明评分
.如果真结束
.子程序 自动顺图
.局部变量 当前房间, 坐标型
当前房间 = 当前房间 ()
.如果真 (全局_刷图.地图编号 = 104 或 全局_刷图.地图编号 = 192)
  .如果真 (文件读配置 (“是否全图”) = 1)
    格蓝迪自动全图 ()
  .如果真结束
  .如果真 (文件读配置 (“是否全图”) = 2)
    钢铁自动全图 ()
  .如果真结束
.如果真结束
.如果真 (文件读配置 (“刷图模式”) = 3)
  时间广场深渊 ()
.如果真结束
.如果真 (文件读配置 (“刷图模式”) ≠ 3)
  延时 (100)
  顺图调用 ()
.如果真结束
.子程序 自动出图
超级延时 (1000)
.如果真 (取怪物是否死亡 () = 真 且 取是否开门 () = 真)
  .判断循环首 (汇编_读整数型 (#对话基址) ≠ 0)
    内存按键 (#空格键)
  .判断循环尾 ()
  超级延时 (100)
  全局_消息反馈 = 25 ' 通关确认
  全局_消息反馈 = 8 ' 翻牌
  超级延时 (200)
  启动线程 (&全屏开关, , )
  .如果真 (文件读配置 (“刷图模式”) = 1)
    出图公告 (1)
  .如果真结束
  .如果真 (文件读配置 (“刷图模式”) = 2)
    出图公告 (2)
  .如果真结束
  .如果真 (文件读配置 (“刷图模式”) = 3)
    出图公告 (3)
  .如果真结束
  进图判断 = 假
  超级延时 (1000)
  .如果真 (局_任务ID ≠ 0)
    提交Call (局_任务ID)
    局_任务ID = 0
  .如果真结束
  .如果真 (局_任务ID = 0)
    提交Call (剧情任务ID)
  .如果真结束
  超级延时 (100)
  .如果真 (取是否制裁 () = 假)
    全局_消息反馈 = 7 ' 捡物
  .如果真结束
  超级延时 (4500)
  全局_消息反馈 = 11 ' 出图
  .判断循环首 (取是否城镇 () = 假)
    超级延时 (300)
  .判断循环尾 ()
  超级延时 (500)
  全局_消息反馈 = 10 ' 卖物
  超级延时 (500)
.如果真结束
.子程序 深渊出图
超级延时 (500)
.如果真 (取怪物是否死亡 () = 真 且 取是否开门 () = 真)
  出图公告 (3)
  超级延时 (100)
  .如果真 (取是否制裁 () = 假)
    全局_消息反馈 = 7 ' 捡物
  .如果真结束
  超级延时 (100)
  全局_消息反馈 = 11 ' 出图
  .判断循环首 (取是否城镇 () = 假)
    超级延时 (10)
  .判断循环尾 ()
  超级延时 (500)
  全局_消息反馈 = 10 ' 卖物
  超级延时 (500)
.如果真结束
.子程序 自动角色
全局_刷图.自动角色 = 汇编_加 (全局_刷图.自动角色, 1)
.如果真 (全局_刷图.自动角色 ≥ 文件读配置 (“角色数量”))
  公告 (“已刷完配置指定[ ” + 到文本 (全局_刷图.自动角色) + “ ]个角色 - 停止挂机”)
  公告 (“当前北京时间:” + 到文本 (取现行时间 ()))
  全局_总开关.自动刷图开关 = 假
  强制结束线程 (全局_总开关.自动刷图句柄)
  返回 ()
.如果真结束
超级延时 (300)
公告 (“自动完成” + 到文本 (全局_刷图.自动角色) + “个角色 自动换角色”)
角色位置 = 汇编_加 (汇编_取偏移地址 (#角色基址, { 200, 200, 0 }), 1)
超级延时 (1000)
组包_选择界面 ()
超级延时 (1000)
组包_选择角色 (角色位置)
超级延时 (2000)
.计次循环首 (999, )
  .如果真 (取游戏状态 () = 1)
    跳出循环 ()
  .如果真结束
  超级延时 (1000)
.计次循环尾 ()
超级延时 (4000)
全局_刷图.翻拍次数 = 0
.子程序 格蓝迪自动全图
.局部变量 当前, 坐标型
当前 = 当前房间 ()
.如果真 (当前.x = 0 且 当前.y = 0)
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 1 且 当前.y = 0)
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 2 且 当前.y = 0)
  拾取遍历 ()
  顺图至下 ()
.如果真结束
.如果真 (当前.x = 2 且 当前.y = 1)
  拾取遍历 ()
  顺图至左 ()
.如果真结束
.如果真 (当前.x = 1 且 当前.y = 1)
  拾取遍历 ()
  顺图至下 ()
.如果真结束
.如果真 (当前.x = 1 且 当前.y = 2)
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 2 且 当前.y = 2)
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 3 且 当前.y = 2)
  拾取遍历 ()
  顺图至上 ()
.如果真结束
.子程序 钢铁自动全图
.局部变量 当前, 坐标型
当前 = 当前房间 ()
.判断开始 (当前.x = 0 且 当前.y = 0)
  拾取遍历 ()
  顺图至右 ()
.判断 (当前.x = 1 且 当前.y = 0)
  拾取遍历 ()
  顺图至右 ()
.判断 (当前.x = 2 且 当前.y = 0)
  拾取遍历 ()
  顺图至下 ()
.判断 (当前.x = 2 且 当前.y = 1)
  拾取遍历 ()
  顺图至左 ()
.判断 (当前.x = 1 且 当前.y = 1)
  拾取遍历 ()
  顺图至左 ()
.判断 (当前.x = 0 且 当前.y = 1)
  拾取遍历 ()
  顺图至下 ()
.判断 (当前.x = 0 且 当前.y = 2)
  拾取遍历 ()
  顺图至下 ()
.判断 (当前.x = 0 且 当前.y = 3)
  拾取遍历 ()
  顺图至右 ()
.判断 (当前.x = 1 且 当前.y = 3)
  拾取遍历 ()
  顺图至上 ()
.判断 (当前.x = 1 且 当前.y = 2)
  拾取遍历 ()
  顺图至右 ()
.判断 (当前.x = 2 且 当前.y = 2)
  拾取遍历 ()
  顺图至右 ()
.默认
.判断结束
.子程序 时间广场深渊
.局部变量 当前, 坐标型
当前 = 当前房间 ()
.如果真 (当前.x = 0 且 当前.y = 0)
  全局_总开关.重置 = 1
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 1 且 当前.y = 0)
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 2 且 当前.y = 0)
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 3 且 当前.y = 0)
  拾取遍历 ()
  顺图至下 ()
.如果真结束
.如果真 (当前.x = 3 且 当前.y = 1)
  .如果 (全局_总开关.重置 = 1)
    拾取遍历 ()
    顺图至右 ()
  .否则
    拾取遍历 ()
    顺图至左 ()
  .如果结束
.如果真结束
.如果真 (当前.x = 4 且 当前.y = 1)
  全局_总开关.重置 = 0
  拾取遍历 ()
  顺图至左 ()
.如果真结束
.如果真 (当前.x = 2 且 当前.y = 1)
  拾取遍历 ()
  顺图至左 ()
.如果真结束
.如果真 (当前.x = 1 且 当前.y = 1)
  拾取遍历 ()
  顺图至下 ()
.如果真结束
.如果真 (当前.x = 1 且 当前.y = 2)
  拾取遍历 ()
  顺图至下 ()
.如果真结束
.如果真 (当前.x = 1 且 当前.y = 3)
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 2 且 当前.y = 3)
  拾取遍历 ()
  顺图至上 ()
.如果真结束
.如果真 (当前.x = 2 且 当前.y = 2)
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 3 且 当前.y = 2)
  拾取遍历 ()
  顺图至右 ()
.如果真结束
.如果真 (当前.x = 4 且 当前.y = 2)
  拾取遍历 ()
  顺图至右 ()
.如果真结束

没有评论:

发表评论