【有源码】诛仙2脚本

章昊

诛仙2脚本（实现自动登陆、自动喊话、更改窗口名称和自动打怪功能）这里发的所有源码附件需要用户下载安装TC开发工具使用，打开开发工具---在菜单栏中点击文件---打开---打开现有项目---找到该解压后的源码打开---启动调试生成.exe程序运行脚本。

【脚本介绍】：该脚本使用了大漠后台方法，让脚本全程模拟后台操作，其中多线程的完美结合达到了脚本的灵活使用，当中用到了字库，所以当用户使用时务必将“诛仙2字库”文件夹放入D盘(不含子目录)。当然脚本还有很多地方不足需要大家去改善，同时也希望学习TC的朋友学以致用，写出自己强大的脚本来。

【原理】：1、登录器首先获取路径---利用找字选择大区和点击开始游戏---进入游戏界面---选择之前以登陆过的服务器---获取分辨率设置游戏窗口---输入账户和密码---随机选择一个频道进入游戏---弹出登陆成功消息框；

         2、更改窗口名称---找到诛仙2游戏窗口更改游戏窗口；

         3、自动打怪功能---跑到需要打怪地点自动打怪---利用线程的方法---在打怪的同时记录打怪时间---达到设置的时间后关闭打怪线程回到原点---然后自动开启打怪线程继续打怪---当出现验证码时自动放歌报警；

         4、自动喊话功能---获取喊话的游戏窗口---获取每隔多久喊话一次的时间（请正确设置间隔时间）---获取喊话内容---将喊话内容写剪切板---模拟键盘模式---循环实现自动喊话功能。

【使用说明】：

1、下载使用的用户，严格按照解压包中的说明书使用；

2、使用自动打怪功能时，必须将游戏中的标记位置，所有追踪点删除，删除后关闭其窗口使用脚本（如下图）；

3、该脚本需要用户电脑支持1280*1024分辨率，脚本运行后自动系统设置为该分辨率；

4、该脚本的返回起始点时间和返回时间分别表示角色自动打怪多久返回刚开始进行打怪的起始点和人物返回起始点需要多久时间，分别都是以毫秒为单位；

5、用户需要正确的设置，方可运行脚本。

【脚本界面图】：

【源码如下】：

1. #import "dm.dmsoft" dm
   
2. 空间 我的程序
   
3. 
   
4. 整型 x坐标
   
5. 
   
6. 整型 y坐标
   
7. 
   
8. 整型 线程句柄
   
9. 
   
10. //定义一个获取自动打怪的线程句柄
    
11. 
    
12. 整型 线程句柄1
    
13. 
    
14. //定义一个获取开始游戏的线程句柄
    
15. 
    
16. 整型 线程句柄2
    
17. 
    
18. //定义一个获取开始喊话的线程句柄
    
19. 
    
20. 整型 线程句柄3
    
21. 
    
22. //定义一个获取打怪开始的线程句柄
    
23. 
    
24. 整型 线程句柄4
    
25. 
    
26. //定义一个获取人物移动的线程句柄
    
27. 
    
28. ///////////////////////////////////
    
29. 
    
30. //自动登录游戏
    
31. 
    
32. 功能 整型 开始游戏()
    
33. 
    
34. 整型 进程句柄
    
35. 
    
36. 字符型 内容
    
37. 
    
38. 字符型 初始化时间
    
39. 
    
40. 整型 时间
    
41. 
    
42. 内容=浏览框.获得("浏览框0")
    
43. 
    
44. //选择路径
    
45. 
    
46. 进程句柄=进程.打开(内容)
    
47. 
    
48. //获取路径
    
49. 
    
50. 初始化时间=编辑框.获得文本("初始化")
    
51. 
    
52. //获取初始化时间
    
53. 
    
54. 辅助.等待(100)
    
55. 
    
56. 时间=转换.字符型转整型(初始化时间)
    
57. 
    
58. 辅助.等待(100)
    
59. 
    
60. 进程.等待初始化(进程句柄,时间)
    
61. 
    
62. //进行进程初始化
    
63. 
    
64. 辅助.等待(12000)
    
65. 
    
66. 逻辑型 获取坐标
    
67. 
    
68. 整型 是否成功,窗口句柄,选项
    
69. 
    
70. 字符型 进入游戏,选择大区, 获取所在大区, 已选择大区
    
71. 
    
72. 选项=下拉框.得到选项("所在大区")
    
73. 
    
74. //开始选择你要进入的大区
    
75. 
    
76. //选择"新电信一区"
    
77. 
    
78. 如果(选项==0)
    
79. 
    
80. 已选择大区="新电信一区"
    
81. 
    
82. 获取所在大区=下拉框.获得内容("所在大区",0)
    
83. 
    
84. 整型 是否相等0
    
85. 
    
86. 是否相等0=字符串.比较(已选择大区,获取所在大区)
    
87. 
    
88. 如果(是否相等0==0)
    
89. 
    
90. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\新电信一区.txt")
    
91. 
    
92. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
    
93. 
    
94. dm.MoveTo(x坐标,y坐标)
    
95. 
    
96. 如果结束
    
97. 
    
98. 如果结束
    
99. 
    
100. //选择"新电信二区"
     
101. 
     
102. 如果(选项==1)
     
103. 
     
104. 已选择大区="新电信二区"
     
105. 
     
106. 获取所在大区=下拉框.获得内容("所在大区",1)
     
107. 
     
108. 整型 是否相等1
     
109. 
     
110. 是否相等1=字符串.比较(已选择大区,获取所在大区)
     
111. 
     
112. 如果(是否相等1==0)
     
113. 
     
114. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\新电信二区.txt")
     
115. 
     
116. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
117. 
     
118. dm.MoveTo(x坐标,y坐标)
     
119. 
     
120. 辅助.等待(10)
     
121. 
     
122. dm.MoveTo(x坐标,y坐标+25)
     
123. 
     
124. 如果结束
     
125. 
     
126. 如果结束
     
127. 
     
128. //选择"新电信三区"
     
129. 
     
130. 如果(选项==2)
     
131. 
     
132. 已选择大区="新电信三区"
     
133. 
     
134. 获取所在大区=下拉框.获得内容("所在大区",2)
     
135. 
     
136. 整型 是否相等2
     
137. 
     
138. 是否相等2=字符串.比较(已选择大区,获取所在大区)
     
139. 
     
140. 如果(是否相等2==0)
     
141. 
     
142. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\新电信三区.txt")
     
143. 
     
144. dm.FindStrFast(0,0,2000,2000,"新电信三区","4092bb-000000",1.0,x坐标,y坐标)
     
145. 
     
146. dm.MoveTo(x坐标,y坐标)
     
147. 
     
148. 辅助.等待(10)
     
149. 
     
150. dm.MoveTo(x坐标,y坐标+30)
     
151. 
     
152. 如果结束
     
153. 
     
154. 如果结束
     
155. 
     
156. //选择"新电信四区"
     
157. 
     
158. 如果(选项==3)
     
159. 
     
160. 已选择大区="新电信四区"
     
161. 
     
162. 获取所在大区=下拉框.获得内容("所在大区",3)
     
163. 
     
164. 整型 是否相等3
     
165. 
     
166. 是否相等3=字符串.比较(已选择大区,获取所在大区)
     
167. 
     
168. 如果(是否相等3==0)
     
169. 
     
170. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\新电信四区.txt")
     
171. 
     
172. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
173. 
     
174. dm.MoveTo(x坐标,y坐标)
     
175. 
     
176. 如果结束
     
177. 
     
178. 如果结束
     
179. 
     
180. //选择"新网通一区"
     
181. 
     
182. 如果(选项==4)
     
183. 
     
184. 已选择大区="新网通一区"
     
185. 
     
186. 获取所在大区=下拉框.获得内容("所在大区",4)
     
187. 
     
188. 整型 是否相等4
     
189. 
     
190. 是否相等4=字符串.比较(已选择大区,获取所在大区)
     
191. 
     
192. 如果(是否相等4==0)
     
193. 
     
194. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\新网通一区.txt")
     
195. 
     
196. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
197. 
     
198. dm.MoveTo(x坐标,y坐标)
     
199. 
     
200. 如果结束
     
201. 
     
202. 如果结束
     
203. 
     
204. //选择"新网通二区"
     
205. 
     
206. 如果(选项==5)
     
207. 
     
208. 已选择大区="新网通二区"
     
209. 
     
210. 获取所在大区=下拉框.获得内容("所在大区",5)
     
211. 
     
212. 整型 是否相等5
     
213. 
     
214. 是否相等5=字符串.比较(已选择大区,获取所在大区)
     
215. 
     
216. 如果(是否相等5==0)
     
217. 
     
218. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\新网通二区.txt")
     
219. 
     
220. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
221. 
     
222. dm.MoveTo(x坐标,y坐标)
     
223. 
     
224. 辅助.等待(10)
     
225. 
     
226. dm.MoveTo(x坐标,y坐标+24)
     
227. 
     
228. 如果结束
     
229. 
     
230. 如果结束
     
231. 
     
232. //选择"电信一区"
     
233. 
     
234. 如果(选项==6)
     
235. 
     
236. 已选择大区="电信一区"
     
237. 
     
238. 获取所在大区=下拉框.获得内容("所在大区",6)
     
239. 
     
240. 整型 是否相等6
     
241. 
     
242. 是否相等6=字符串.比较(已选择大区,获取所在大区)
     
243. 
     
244. 如果(是否相等6==0)
     
245. 
     
246. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\电信一区.txt")
     
247. 
     
248. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
249. 
     
250. dm.MoveTo(x坐标,y坐标)
     
251. 
     
252. 辅助.等待(10)
     
253. 
     
254. dm.MoveTo(x坐标+80,y坐标)
     
255. 
     
256. 如果结束
     
257. 
     
258. 如果结束
     
259. 
     
260. //选择"电信二区"
     
261. 
     
262. 如果(选项==7)
     
263. 
     
264. 已选择大区="电信二区"
     
265. 
     
266. 获取所在大区=下拉框.获得内容("所在大区",7)
     
267. 
     
268. 整型 是否相等7
     
269. 
     
270. 是否相等7=字符串.比较(已选择大区,获取所在大区)
     
271. 
     
272. 如果(是否相等7==0)
     
273. 
     
274. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\电信二区.txt")
     
275. 
     
276. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
277. 
     
278. dm.MoveTo(x坐标,y坐标)
     
279. 
     
280. 辅助.等待(10)
     
281. 
     
282. dm.MoveTo(x坐标+80,y坐标+23)
     
283. 
     
284. 如果结束
     
285. 
     
286. 如果结束
     
287. 
     
288. //选择"电信三区"
     
289. 
     
290. 如果(选项==8)
     
291. 
     
292. 已选择大区="电信三区"
     
293. 
     
294. 获取所在大区=下拉框.获得内容("所在大区",8)
     
295. 
     
296. 整型 是否相等8
     
297. 
     
298. 是否相等8=字符串.比较(已选择大区,获取所在大区)
     
299. 
     
300. 如果(是否相等8==0)
     
301. 
     
302. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\新电信三区.txt")
     
303. 
     
304. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
305. 
     
306. dm.MoveTo(x坐标,y坐标)
     
307. 
     
308. 辅助.等待(10)
     
309. 
     
310. dm.MoveTo(x坐标+80,y坐标+30)
     
311. 
     
312. 如果结束
     
313. 
     
314. 如果结束
     
315. 
     
316. //选择"电信四区"
     
317. 
     
318. 如果(选项==9)
     
319. 
     
320. 已选择大区="电信四区"
     
321. 
     
322. 获取所在大区=下拉框.获得内容("所在大区",9)
     
323. 
     
324. 整型 是否相等9
     
325. 
     
326. 是否相等9=字符串.比较(已选择大区,获取所在大区)
     
327. 
     
328. 如果(是否相等9==0)
     
329. 
     
330. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\电信四区.txt")
     
331. 
     
332. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
333. 
     
334. dm.MoveTo(x坐标,y坐标)
     
335. 
     
336. 辅助.等待(10)
     
337. 
     
338. dm.MoveTo(x坐标+80,y坐标)
     
339. 
     
340. 如果结束
     
341. 
     
342. 如果结束
     
343. 
     
344. //选择"电信五区"
     
345. 
     
346. 如果(选项==10)
     
347. 
     
348. 已选择大区="电信五区"
     
349. 
     
350. 获取所在大区=下拉框.获得内容("所在大区",10)
     
351. 
     
352. 整型 是否相等10
     
353. 
     
354. 是否相等10=字符串.比较(已选择大区,获取所在大区)
     
355. 
     
356. 如果(是否相等10==0)
     
357. 
     
358. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\电信五区.txt")
     
359. 
     
360. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
361. 
     
362. dm.MoveTo(x坐标,y坐标)
     
363. 
     
364. 如果结束
     
365. 
     
366. 如果结束
     
367. 
     
368. //选择"网通一区"
     
369. 
     
370. 如果(选项==11)
     
371. 
     
372. 已选择大区="网通一区"
     
373. 
     
374. 获取所在大区=下拉框.获得内容("所在大区",11)
     
375. 
     
376. 整型 是否相等11
     
377. 
     
378. 是否相等11=字符串.比较(已选择大区,获取所在大区)
     
379. 
     
380. 如果(是否相等11==0)
     
381. 
     
382. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\网通一区.txt")
     
383. 
     
384. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
385. 
     
386. dm.MoveTo(x坐标,y坐标)
     
387. 
     
388. 辅助.等待(10)
     
389. 
     
390. dm.MoveTo(x坐标+80,y坐标+24)
     
391. 
     
392. 如果结束
     
393. 
     
394. 如果结束
     
395. 
     
396. //选择"网通二区"
     
397. 
     
398. 如果(选项==12)
     
399. 
     
400. 已选择大区="网通二区"
     
401. 
     
402. 获取所在大区=下拉框.获得内容("所在大区",12)
     
403. 
     
404. 整型 是否相等12
     
405. 
     
406. 是否相等12=字符串.比较(已选择大区,获取所在大区)
     
407. 
     
408. 如果(是否相等12==0)
     
409. 
     
410. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\网通二区.txt")
     
411. 
     
412. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
413. 
     
414. dm.MoveTo(x坐标,y坐标)
     
415. 
     
416. 辅助.等待(10)
     
417. 
     
418. dm.MoveTo(x坐标+80,y坐标+30)
     
419. 
     
420. 如果结束
     
421. 
     
422. 如果结束
     
423. 
     
424. //选择"网通三区"
     
425. 
     
426. 如果(选项==13)
     
427. 
     
428. 已选择大区="网通三区"
     
429. 
     
430. 获取所在大区=下拉框.获得内容("所在大区",13)
     
431. 
     
432. 整型 是否相等13
     
433. 
     
434. 是否相等13=字符串.比较(已选择大区,获取所在大区)
     
435. 
     
436. 如果(是否相等13==0)
     
437. 
     
438. 是否成功=dm.SetDict(0,"D:\\诛仙2字库\\网通三区.txt")
     
439. 
     
440. dm.FindStrFast(0,0,2000,2000,获取所在大区,"4092bb-000000",1.0,x坐标,y坐标)
     
441. 
     
442. dm.MoveTo(x坐标,y坐标)
     
443. 
     
444. 辅助.等待(10)
     
445. 
     
446. dm.MoveTo(x坐标+80,y坐标+50)
     
447. 
     
448. 如果结束
     
449. 
     
450. 如果结束
     
451. 
     
452. //点击开始游戏
     
453. 
     
454. 辅助.等待(200)
     
455. 
     
456. dm.LeftClick()
     
457. 
     
458. dm.SetDict(0,"D:\\诛仙2字库\\开始.txt")
     
459. 
     
460. //调用字库,字库创建方法在下载包中有说明如何创建
     
461. 
     
462. dm.FindStr(0,0,2000,2000,"开始","90b1cf-000000",1.0,x坐标,y坐标)
     
463. 
     
464. //找到"开始"这个词
     
465. 
     
466. dm.MoveTo(x坐标,y坐标)
     
467. 
     
468. //后台鼠标移动到该字上面
     
469. 
     
470. dm.LeftClick()
     
471. 
     
472. //鼠标点击开始，进入游戏
     
473. 
     
474. 进程.等待初始化(进程句柄,15000)
     
475. 
     
476. 辅助.等待(19000)
     
477. 
     
478. 窗口句柄=窗口.找到窗口("诛仙2")
     
479. 
     
480. //获得窗口
     
481. 
     
482. 辅助.等待(1000)
     
483. 
     
484. 系统.设置分辨率(1280,1024)
     
485. 
     
486. //设置系统分辨率
     
487. 
     
488. 辅助.等待(3000)
     
489. 
     
490. dm.KeyDown(13)
     
491. 
     
492. 辅助.等待(1000)
     
493. 
     
494. dm.KeyDown(13)
     
495. 
     
496. 辅助.等待(200)
     
497. 
     
498. 窗口.设置大小(窗口句柄,1005,821)
     
499. 
     
500. //设置窗口的大小
     
501. 
     
502. 辅助.等待(200)
     
503. 
     
504. 窗口.设置位置(窗口句柄,100,100)
     
505. 
     
506. //设置游戏窗口位置
     
507. 
     
508. 辅助.等待(200)
     
509. 
     
510. 字符型 账户
     
511. 
     
512. 账户=编辑框.获得文本("账户")
     
513. 
     
514. //获得账户
     
515. 
     
516. 窗口.发送字符串(窗口句柄,账户)
     
517. 
     
518. //填写账户
     
519. 
     
520. 辅助.等待(500)
     
521. 
     
522. dm.KeyDown(9)
     
523. 
     
524. 辅助.等待(100)
     
525. 
     
526. dm.KeyUp(9)
     
527. 
     
528. 字符型 密码
     
529. 
     
530. 密码=编辑框.获得文本("密码")
     
531. 
     
532. //获得密码
     
533. 
     
534. 窗口.发送字符串(窗口句柄,密码)
     
535. 
     
536. //填写密码
     
537. 
     
538. 辅助.等待(500)
     
539. 
     
540. dm.KeyDown(13)
     
541. 
     
542. 辅助.等待(500)
     
543. 
     
544. dm.KeyDown(13)
     
545. 
     
546. 辅助.等待(200)
     
547. 
     
548. //随机选择一个频道，进入游戏
     
549. 
     
550. dm.KeyDown(40)
     
551. 
     
552. 辅助.等待(200)
     
553. 
     
554. dm.KeyDown(40)
     
555. 
     
556. 辅助.等待(200)
     
557. 
     
558. dm.KeyDown(40)
     
559. 
     
560. 辅助.等待(200)
     
561. 
     
562. dm.KeyDown(40)
     
563. 
     
564. 辅助.等待(200)
     
565. 
     
566. dm.KeyDown(40)
     
567. 
     
568. dm.KeyDown(13)
     
569. 
     
570. 辅助.等待(500)
     
571. 
     
572. dm.KeyDown(13)
     
573. 
     
574. 辅助.消息框("恭喜你进入游戏,祝你游戏快乐!")
     
575. 
     
576. //进入游戏成功
     
577. 
     
578. 返回 0
     
579. 
     
580. 功能结束
     
581. 
     
582. ///////////////////////////////////
     
583. 
     
584. //实现更改窗口名称功能
     
585. 
     
586. ///////////////////////////////////
     
587. 
     
588. 功能 逻辑型 更改开始_点击()
     
589. 
     
590. 字符型 获取更改窗口
     
591. 
     
592. 获取更改窗口=编辑框.获得文本("更改窗口")
     
593. 
     
594. //获取要更改的游戏窗口名称
     
595. 
     
596. 整型 窗口句柄
     
597. 
     
598. 窗口句柄=窗口.找到窗口("诛仙2")
     
599. 
     
600. 辅助.等待(50)
     
601. 
     
602. 窗口.置顶(窗口句柄,true)
     
603. 
     
604. 辅助.等待(50)
     
605. 
     
606. 窗口.设置标题(窗口句柄,获取更改窗口)
     
607. 
     
608. //窗口更改成功
     
609. 
     
610. 返回 真
     
611. 
     
612. 功能结束
     
613. 
     
614. /////////////////////////////////
     
615. 
     
616. //定义一个打怪开始函数控制人物打怪
     
617. 
     
618. 功能 逻辑型 打怪开始()
     
619. 
     
620. 整型 X
     
621. 
     
622. 整型 Y
     
623. 
     
624. 整型 x1,y1
     
625. 
     
626. 字符型 x2,y2
     
627. 
     
628. 整型 是否成功2,是否成功3,是否成功4,是否成功5
     
629. 
     
630. //进入循环，开始打怪
     
631. 
     
632. 循环(真)
     
633. 
     
634. //下面开始自动打怪
     
635. 
     
636. 辅助.等待(500)
     
637. 
     
638. //利用区域找色获得怪是否死亡，若死亡重新选怪
     
639. 
     
640. 是否成功2=dm.FindColor(486,140,609,196,"6b1818-000000",0.9,0,X,Y)
     
641. 
     
642. 如果(是否成功2==1)
     
643. 
     
644. dm.KeyDown(9)
     
645. 
     
646. 辅助.等待(50)
     
647. 
     
648. dm.KeyUp(9)
     
649. 
     
650. 如果结束
     
651. 
     
652. //1键攻击
     
653. 
     
654. 辅助.等待(100)
     
655. 
     
656. dm.KeyDown(49)
     
657. 
     
658. 辅助.等待(200)
     
659. 
     
660. dm.KeyUp(49)
     
661. 
     
662. //2键攻击
     
663. 
     
664. 辅助.等待(100)
     
665. 
     
666. dm.KeyDown(50)
     
667. 
     
668. 辅助.等待(150)
     
669. 
     
670. dm.KeyUp(50)
     
671. 
     
672. //3键攻击
     
673. 
     
674. 辅助.等待(100)
     
675. 
     
676. dm.KeyDown(51)
     
677. 
     
678. 辅助.等待(150)
     
679. 
     
680. dm.KeyUp(51)
     
681. 
     
682. //4键攻击
     
683. 
     
684. 辅助.等待(100)
     
685. 
     
686. dm.KeyDown(52)
     
687. 
     
688. 辅助.等待(150)
     
689. 
     
690. dm.KeyUp(52)
     
691. 
     
692. //5键拾取
     
693. 
     
694. 辅助.等待(100)
     
695. 
     
696. dm.KeyDown(53)
     
697. 
     
698. 辅助.等待(150)
     
699. 
     
700. dm.KeyUp(53)
     
701. 
     
702. 辅助.等待(50)
     
703. 
     
704. //获取人物是否需要加血
     
705. 
     
706. 是否成功3=dm.FindColor(263,149,339,169,"db4532-000000",0.9,0,X,Y)
     
707. 
     
708. 如果(是否成功3==1)
     
709. 
     
710. //F1加血
     
711. 
     
712. 辅助.等待(100)
     
713. 
     
714. dm.KeyDown(112)
     
715. 
     
716. 辅助.等待(200)
     
717. 
     
718. dm.KeyUp(112)
     
719. 
     
720. 如果结束
     
721. 
     
722. 辅助.等待(50)
     
723. 
     
724. //获取人物是否需要加蓝
     
725. 
     
726. 是否成功4=dm.FindColor(251,160,315,173,"2f92e6-000000",0.9,0,X,Y)
     
727. 
     
728. 如果(是否成功4==1)
     
729. 
     
730. //F2加蓝
     
731. 
     
732. 辅助.等待(100)
     
733. 
     
734. dm.KeyDown(113)
     
735. 
     
736. 辅助.等待(200)
     
737. 
     
738. dm.KeyUp(113)
     
739. 
     
740. 如果结束
     
741. 
     
742. 是否成功5=dm.FindColor(519,310,569,360,"0FD0E2-000000",0.9,0,X,Y)
     
743. 
     
744. 如果(是否成功5==1)
     
745. 
     
746. 字符型 铃声
     
747. 
     
748. 铃声=编辑框.获得文本("铃声路径")
     
749. 
     
750. 辅助.等待(100)
     
751. 
     
752. 辅助.播放(铃声)
     
753. 
     
754. 如果结束
     
755. 
     
756. 循环结束
     
757. 
     
758. 返回 真
     
759. 
     
760. 功能结束
     
761. 
     
762. //利用多线程，来让人物返回起始点
     
763. 
     
764. 功能 逻辑型 人物移动()
     
765. 
     
766. 
     
767. 
     
768. 整型 打怪时间
     
769. 
     
770. 整型 返回时间
     
771. 
     
772. 字符型 获取打怪时间
     
773. 
     
774. 字符型 获取返回时间
     
775. 
     
776. 获取打怪时间=编辑框.获得文本("打怪时间")
     
777. 
     
778. 辅助.等待(50)
     
779. 
     
780. 打怪时间=转换.字符型转整型(获取打怪时间)
     
781. 
     
782. 获取返回时间=编辑框.获得文本("返回时间")
     
783. 
     
784. 辅助.等待(50)
     
785. 
     
786. 返回时间=转换.字符型转整型(获取返回时间)
     
787. 
     
788. 辅助.等待(7000)
     
789. 
     
790. 循环(真)
     
791. 
     
792. 辅助.等待(打怪时间)
     
793. 
     
794. //人物移动到起始点期间，自动打怪线程关闭
     
795. 
     
796. 线程.关闭(线程句柄3)
     
797. 
     
798. dm.MoveTo(899,308)
     
799. 
     
800. 辅助.等待(20)
     
801. 
     
802. dm.LeftClick()
     
803. 
     
804. 辅助.等待(20)
     
805. 
     
806. 辅助.等待(返回时间)
     
807. 
     
808. //移动到起始点后开始自动打怪
     
809. 
     
810. 线程句柄3=线程.开启("我的程序.打怪开始","")
     
811. 
     
812. 循环结束
     
813. 
     
814. 返回 真
     
815. 
     
816. 功能结束
     
817. 
     
818. //这是一个按钮控件，开启打怪功能
     
819. 
     
820. 功能 逻辑型 开始打怪()
     
821. 
     
822. 整型 窗口句柄
     
823. 
     
824. 字符型 获得窗口
     
825. 
     
826. 获得窗口=编辑框.获得文本("窗口")
     
827. 
     
828. //获得要运行脚本的游戏窗口名称
     
829. 
     
830. 窗口句柄=窗口.找到窗口(获得窗口)
     
831. 
     
832. //调整窗口
     
833. 
     
834. 辅助.等待(1000)
     
835. 
     
836. 窗口.还原(窗口句柄)
     
837. 
     
838. 辅助.等待(1000)
     
839. 
     
840. 窗口.显示(窗口句柄)
     
841. 
     
842. 辅助.等待(500)
     
843. 
     
844. 窗口.置顶(窗口句柄,true)
     
845. 
     
846. 辅助.等待(1000)
     
847. 
     
848. 系统.设置分辨率(1280,1024)
     
849. 
     
850. 辅助.等待(2000)
     
851. 
     
852. 窗口.设置大小(窗口句柄,1005,821)
     
853. 
     
854. 辅助.等待(300)
     
855. 
     
856. 窗口.设置位置(窗口句柄,100,100)
     
857. 
     
858. //利用游戏中的标记坐标控制人物返回到起始点，下面进行设计标记坐标
     
859. 
     
860. 辅助.等待(200)
     
861. 
     
862. dm.MoveTo(1091,236)
     
863. 
     
864. 辅助.等待(200)
     
865. 
     
866. dm.LeftClick()
     
867. 
     
868. 辅助.等待(200)
     
869. 
     
870. dm.MoveTo(907,164)
     
871. 
     
872. 辅助.等待(200)
     
873. 
     
874. dm.LeftClick()
     
875. 
     
876. 辅助.等待(200)
     
877. 
     
878. 整型 自定义数字
     
879. 
     
880. 字符型 转换
     
881. 
     
882. 自定义数字=辅助.随机数(0,100)
     
883. 
     
884. 辅助.等待(500)
     
885. 
     
886. 转换=转换.整型转字符型(自定义数字)
     
887. 
     
888. 辅助.等待(500)
     
889. 
     
890. 窗口.发送字符串(窗口句柄,转换)
     
891. 
     
892. 辅助.等待(500)
     
893. 
     
894. dm.KeyDown(13)
     
895. 
     
896. 辅助.等待(50)
     
897. 
     
898. dm.KeyUp(13)
     
899. 
     
900. 辅助.等待(50)
     
901. 
     
902. //选择第一个怪
     
903. 
     
904. //dm.KeyDown(9)
     
905. 
     
906. //辅助.等待(50)
     
907. 
     
908. //dm.KeyUp(9)
     
909. 
     
910. //线程句柄=线程.开启("我的程序.自动打怪")
     
911. 
     
912. 辅助.等待(50)
     
913. 
     
914. 线程句柄4=线程.开启("我的程序.人物移动","")
     
915. 
     
916. 辅助.等待(50)
     
917. 
     
918. 线程句柄3=线程.开启("我的程序.打怪开始","")
     
919. 
     
920. 返回 真
     
921. 
     
922. //函数返回语句
     
923. 
     
924. 功能结束
     
925. 
     
926. //这是一个关闭打怪按钮，关闭打怪
     
927. 
     
928. 功能 逻辑型 关闭自动打怪()
     
929. 
     
930. 线程.关闭(线程句柄)
     
931. 
     
932. 线程.关闭(线程句柄3)
     
933. 
     
934. 返回 真
     
935. 
     
936. 功能结束
     
937. 
     
938. //////////////////////////////////////
     
939. 
     
940. //实现喊话功能
     
941. 
     
942. //////////////////////////////////////
     
943. 
     
944. 功能 逻辑型 开始喊话()
     
945. 
     
946. 字符型 获取窗口
     
947. 
     
948. 字符型 获取时间
     
949. 
     
950. 字符型 说话内容
     
951. 
     
952. 整型 窗口句柄1
     
953. 
     
954. 整型 得到时间
     
955. 
     
956. 获取窗口=编辑框.获得文本("窗口名称")
     
957. 
     
958. 窗口句柄1=窗口.找到窗口(获取窗口)
     
959. 
     
960. 辅助.等待(100)
     
961. 
     
962. 窗口.显示(窗口句柄1)
     
963. 
     
964. 辅助.等待(1000)
     
965. 
     
966. 窗口.还原(窗口句柄1)
     
967. 
     
968. 辅助.等待(1000)
     
969. 
     
970. 窗口.置顶(窗口句柄1,true)
     
971. 
     
972. 获取时间= 编辑框.获得文本("间隔时间")
     
973. 
     
974. //获取每喊一次话间隔时间
     
975. 
     
976. 辅助.等待(100)
     
977. 
     
978. 得到时间=转换.字符型转整型(获取时间)
     
979. 
     
980. 说话内容= 编辑框.获得文本("喊话内容")
     
981. 
     
982. 如果(窗口句柄1==0)
     
983. 
     
984. 辅助.消息框("没有找游戏窗口!")
     
985. 
     
986. 否则
     
987. 
     
988. 如果(得到时间==0)
     
989. 
     
990. 辅助.消息框("请输入间隔时间!")
     
991. 
     
992. 否则
     
993. 
     
994. 循环(真)
     
995. 
     
996. 辅助.等待(200)
     
997. 
     
998. dm.KeyDown(13)
     
999. 
     
1000. 辅助.等待(200)
      
1001. 
      
1002. dm.KeyUp(13)
      
1003. 
      
1004. 辅助.写入剪切板(说话内容)
      
1005. 
      
1006. 辅助.等待(200)
      
1007. 
      
1008. dm.KeyDown(17)
      
1009. 
      
1010. 辅助.等待(100)
      
1011. 
      
1012. dm.KeyDown(86)
      
1013. 
      
1014. 辅助.等待(200)
      
1015. 
      
1016. dm.KeyUp(86)
      
1017. 
      
1018. 辅助.等待(200)
      
1019. 
      
1020. dm.KeyUp(17)
      
1021. 
      
1022. dm.KeyDown(13)
      
1023. 
      
1024. 辅助.等待(200)
      
1025. 
      
1026. dm.KeyUp(13)
      
1027. 
      
1028. 辅助.等待(200)
      
1029. 
      
1030. 辅助.等待(转换.字符型转整型(获取时间))
      
1031. 
      
1032. 循环结束
      
1033. 
      
1034. 如果结束
      
1035. 
      
1036. 如果结束
      
1037. 
      
1038. 返回 真
      
1039. 
      
1040. 功能结束
      
1041. 
      
1042. //这是一个自动喊话开启按钮
      
1043. 
      
1044. 功能 逻辑型 自动喊话()
      
1045. 
      
1046. 线程句柄2=线程.开启("我的程序.开始喊话","")
      
1047. 
      
1048. 返回 真
      
1049. 
      
1050. 功能结束
      
1051. 
      
1052. //这是一个喊话关闭按钮
      
1053. 
      
1054. 功能 逻辑型 关闭喊话()
      
1055. 
      
1056. 线程.关闭(线程句柄2)
      
1057. 
      
1058. 返回 真
      
1059. 
      
1060. 功能结束
      
1061. 
      
1062. /////////////////////////////
      
1063. 
      
1064. //这是一个自动登录游戏的按钮
      
1065. 
      
1066. 功能 逻辑型 开始_点击()
      
1067. 
      
1068. //这里添加你要执行的代码,这里是你点击开始按钮执行的代码
      
1069. 
      
1070. 线程句柄1=线程.开启("我的程序.开始游戏","")
      
1071. 
      
1072. 返回 真
      
1073. 
      
1074. //函数返回语句
      
1075. 
      
1076. 功能结束
      
1077. 
      
1078. //这是一个退出游戏的按钮
      
1079. 
      
1080. 功能 逻辑型 退出游戏()
      
1081. 
      
1082. 整型 窗口句柄1
      
1083. 
      
1084. 窗口句柄1=窗口.找到窗口("诛仙2")
      
1085. 
      
1086. 辅助.等待(100)
      
1087. 
      
1088. 窗口.还原(窗口句柄1)
      
1089. 
      
1090. 辅助.等待(1000)
      
1091. 
      
1092. 窗口.置顶(窗口句柄1,true)
      
1093. 
      
1094. 辅助.等待(1000)
      
1095. 
      
1096. 系统.设置分辨率(1280,1024)
      
1097. 
      
1098. 辅助.等待(2000)
      
1099. 
      
1100. 窗口.设置大小(窗口句柄1,1005,821)
      
1101. 
      
1102. 辅助.等待(200)
      
1103. 
      
1104. 窗口.设置位置(窗口句柄1,100,100)
      
1105. 
      
1106. 辅助.等待(2000)
      
1107. 
      
1108. dm.MoveTo(1079,869)
      
1109. 
      
1110. 辅助.等待(500)
      
1111. 
      
1112. dm.LeftClick()
      
1113. 
      
1114. 辅助.等待(100)
      
1115. 
      
1116. dm.MoveTo(1008,838)
      
1117. 
      
1118. 辅助.等待(100)
      
1119. 
      
1120. dm.LeftClick()
      
1121. 
      
1122. 辅助.等待(100)
      
1123. 
      
1124. dm.MoveTo(548,606)
      
1125. 
      
1126. 辅助.等待(100)
      
1127. 
      
1128. dm.LeftClick()
      
1129. 
      
1130. 返回 真
      
1131. 
      
1132. 功能结束
      
1133. 
      
1134. //这是一个退出 TC应用程序的按钮
      
1135. 
      
1136. 功能 逻辑型 退出_点击()
      
1137. 
      
1138. //这里是你退出的时候要执行的代码,这类是你点击退出按钮执行的代码
      
1139. 
      
1140. 线程.关闭(线程句柄)
      
1141. 
      
1142. 辅助.等待(100)
      
1143. 
      
1144. 线程.关闭(线程句柄1)
      
1145. 
      
1146. 辅助.等待(100)
      
1147. 
      
1148. 线程.关闭(线程句柄2)
      
1149. 
      
1150. 辅助.等待(100)
      
1151. 
      
1152. 线程.关闭(线程句柄3)
      
1153. 
      
1154. 辅助.等待(100)
      
1155. 
      
1156. 线程.关闭(线程句柄4)
      
1157. 
      
1158. 辅助.等待(100)
      
1159. 
      
1160. 辅助.退出()
      
1161. 
      
1162. 返回 真
      
1163. 
      
1164. //函数返回语句
      
1165. 
      
1166. 功能结束
      
1167. 
      
1168. 空间结束
      
1169. 
      
1170. //命名空间结束语句

复制代码

quyi8596

虽然看不太明白，但是还是顶下，抢个沙发，支持下

章昊

回复 2楼quyi8596的帖子

呵呵呵、、、、、、

TC管理员

:D，很好,很强大

qq451604337

顶顶顶   哥哥 帮我写个天龙功能全的贝   我重谢QQ80342648

502908103

吴哥 我来顶你下  :f

章昊

回复 6楼502908103的帖子

呵呵，谢谢!:f

小风子

变量一行全部定义吧？用到才定义，好像怕出错！手机看着辛苦！
感觉不够人性化，脚本自己设置分辨率，建议加多一个单选框！设置游戏标题有时候容易出错，建议用鼠标或前台延时找句柄来实现多开！大漠.按键不能用吗？按下弹起很麻烦！

章昊

回复 8楼小风子的帖子

恩，你的建议不错，以后我会慢慢采纳!!感谢、、、辛苦了。

章昊

回复 6楼502908103的帖子

呵呵 谢谢了