TC官方合作论坛

标题: 诺亚传说1-10主线（源码） [打印本页]

---

作者: 2596060677    时间: 2013-11-17 20:50
标题: 诺亚传说1-10主线（源码）

1. 
   
2. 空间 zx2013_11_
   
3. 
   
4. ts,走停,hwnds
   
5. 
   
6. 功能 鼠标左键(x,y)
   
7. ret=ts.MoveTo(x,y)
   
8. ret=ts.LeftClick()
   
9. 辅助.等待(200)
   
10. 功能结束
    
11. 
    
12. 功能 判断走停()
    
13. a=ts.Ocr(902,30,949,44,"ffffff-000000",1.0)
    
14. 辅助.等待(1000)
    
15. 如果( a==ts.Ocr(902,30,949,44,"ffffff-000000",1.0))
    
16. 走停="停"
    
17. 否则
    
18. 走停="走"
    
19. 如果结束
    
20. 调试输出(走停)
    
21. 功能结束
    
22. 
    
23. 功能 到指定位子(x,y,a)
    
24. 循环(真)
    
25. ts.KeyPress(9)
    
26. 辅助.等待(1000)
    
27. zx2013_11_.鼠标左键(x,y)
    
28. ts.KeyPress(9)
    
29. 辅助.等待(500)
    
30. 走停="走"
    
31. 循环(走停=="走")
    
32. zx2013_11_.判断走停()
    
33. 循环结束
    
34. 如果(ts.Ocr(902,30,949,44,"ffffff-000000",1.0)==a)
    
35. 跳出
    
36. 如果结束
    
37. 辅助.等待(500)
    
38. 循环结束
    
39. 功能结束
    
40. 
    
41. 
    
42. 功能 人物操作(w1,w2,d,n)//接待员丽娜坐标初临曙光:"205,233","102,89","神灵降世"
    
43. x,y
    
44. 循环(真)
    
45. zx2013_11_.到指定位子(w1,w2,d)//+2变量:位子w,到底标志d
    
46. 
    
47. 循环(真)
    
48. ts.FindPic(388,97,626,374,"任务问号黄.bmp","101010",0.9,0,x,y)
    
49. 辅助.等待(500)
    
50. 调试输出(x)
    
51. 如果(x>0)
    
52. zx2013_11_.鼠标左键(x+18,y+100)
    
53. 如果结束
    
54. 跟踪=ts.GetColor(655,216)
    
55. 辅助.等待(200)
    
56. 如果(跟踪=="020301")//任务跟踪被打开
    
57. ts.FindPic(388,97,626,500,"小问号.bmp","101010",0.9,0,x,y)
    
58. 辅助.等待(500)
    
59. 如果(x>0)
    
60. zx2013_11_.鼠标左键(x+48,y)
    
61. 
    
62. ss=数组[],x,y,坐标=数组[3]
    
63. 循环(真)
    
64. ts_ret = ts.FindPicExS(583,533,940,674,"Q完成继续.bmp|全部跳过.bmp","101010",0.9,0)
    
65. 辅助.等待(1000)
    
66. if(str.strleng(ts_ret)>0)
    
67. str.split(ts_ret,"|",ss)
    
68. size=0
    
69. arraysp.size(ss,size)
    
70. 如果(size>1)
    
71. str.split(ss[0],",",坐标)
    
72. x= 坐标[1]
    
73. y=坐标[2]
    
74. zx2013_11_.鼠标左键(x,y)
    
75. 
    
76. 否则
    
77. str.split(ss[0],",",坐标)
    
78. x= 坐标[1]
    
79. y=坐标[2]
    
80. zx2013_11_.鼠标左键(x,y)
    
81. 
    
82. 如果结束
    
83. 否则
    
84. ts.FindPic(719,355,776,402,"确定换装.bmp","000000",0.9,0,x,y)
    
85. 辅助.等待(500)
    
86. 如果(x>0)
    
87. zx2013_11_.鼠标左键(x,y+3)
    
88. 如果结束
    
89. 
    
90. 步骤=ts.Ocr(824,240,936,256,"ffcc00-000000",1.0)
    
91. 辅助.等待(500)
    
92. 调试输出(步骤)
    
93. 如果(步骤==n)//到下一个任务+变量
    
94. 返回 假
    
95. 如果结束
    
96. 如果结束
    
97. 循环结束
    
98. 
    
99. 如果结束
    
100. 
     
101. 如果结束
     
102. 
     
103. 循环结束
     
104. 
     
105. 循环结束
     
106. 标记0:
     
107. 功能结束
     
108. 
     
109. 功能 开关打怪()
     
110. 超级键盘.按下(164)
     
111. ts.KeyPress(65)
     
112. 辅助.等待(50)
     
113. 超级键盘.弹起(164)
     
114. 功能结束
     
115. 
     
116. 功能 打怪任务(x,y,a)
     
117. zx2013_11_.鼠标左键(x,y)
     
118. 走停="走"
     
119. 循环(走停=="走")
     
120. zx2013_11_.判断走停()
     
121. 循环结束
     
122. x,y
     
123. ts.FindPic(449,153,525,242,"打怪标志.bmp","151515",0.9,0,x,y)
     
124. //调试输出(ts.Ocr(888,240,928,254,"ffcc00-000000",1.0))
     
125. 如果(x>0)
     
126. 循环(ts.Ocr(888,240,928,254,"ffcc00-000000",1.0)==a)
     
127. 辅助.等待(500)
     
128. 
     
129. 循环结束
     
130. 如果结束
     
131. 功能结束
     
132. 
     
133. 功能 城下之围()
     
134. 步骤=ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)
     
135. 选择(步骤)
     
136. 条件 "1/2":
     
137. zx2013_11_.打怪任务(845,264,"1/2")
     
138. 
     
139. 条件 "2/2":
     
140. zx2013_11_.人物操作(269,264,"171130","更换装备1/3")
     
141. 选择结束
     
142. 功能结束
     
143. 
     
144. 功能 更换装备()
     
145. 步骤=ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)
     
146. 选择(步骤)
     
147. 条件 "1/3":
     
148. zx2013_11_.人物操作(303,283,"207156","更换装备2/3")
     
149. 
     
150. 条件 "2/3":
     
151. 循环(真)
     
152. zx2013_11_.到指定位子(323,289,"229164")//法师武器架:323,289,"229164"
     
153. zx2013_11_.鼠标左键(542,307)//点击武器架
     
154. 辅助.等待(3000)
     
155. x,y
     
156. ts.FindPic(893,638,931,677,"全部跳过.bmp","000000",0.9,0,x,y)
     
157. 辅助.等待(500)
     
158. 如果(x>0)
     
159. zx2013_11_.鼠标左键(x,y+3)
     
160. 如果结束
     
161. ts.FindPic(719,355,776,402,"确定换装.bmp","000000",0.9,0,x,y)
     
162. 辅助.等待(500)
     
163. 如果(x>0)
     
164. zx2013_11_.鼠标左键(x,y+3)
     
165. 如果结束
     
166. 如果(ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)=="3/3")
     
167. 跳出
     
168. 如果结束
     
169. 循环结束
     
170. 
     
171. 条件 "3/3":
     
172. zx2013_11_.人物操作(269,264,"171130","紧急启动1/3")//奥丁269,264,"171130"
     
173. 
     
174. 选择结束
     
175. 
     
176. 功能结束
     
177. 
     
178. 功能 紧急启动()
     
179. 步骤=ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)
     
180. 选择(步骤)
     
181. 条件 "1/3":
     
182. 循环(真)
     
183. zx2013_11_.到指定位子(228,405,"127318")//到能量晶体228,405,"127318"
     
184. zx2013_11_.鼠标左键(544,345)//点击能量晶体
     
185. 辅助.等待(3000)
     
186. 如果(ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)=="2/3")
     
187. 跳出
     
188. 如果结束
     
189. 循环结束
     
190. 条件 "2/3":
     
191. zx2013_11_.人物操作(243,449,"143378","紧急启动3/3")//点炮
     
192. 
     
193. 条件 "3/3":
     
194. zx2013_11_.人物操作(297,484,"201424","巩固战线1/2")//巴德尔:297,484,"201424"
     
195. 
     
196. 选择结束
     
197. 功能结束
     
198. 
     
199. 功能 巩固战线()
     
200. 步骤=ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)
     
201. 选择(步骤)
     
202. 条件 "1/2":
     
203. zx2013_11_.打怪任务(856,262,"1/2")
     
204. 
     
205. 条件 "2/2":
     
206. zx2013_11_.人物操作(297,484,"201424","植物园之围1/3")//巴德尔:297,484,"201424"
     
207. 选择结束
     
208. 功能结束
     
209. 
     
210. 功能 植物园之围()
     
211. 步骤=ts.Ocr(900,242,920,255,"ffcc00-000000",1.0)
     
212. 选择(步骤)
     
213. 条件 "1/3":
     
214. zx2013_11_.人物操作(424,427,"337348","植物园之围2/3")//提尔:424,427,"337348"
     
215. 条件 "2/3":
     
216. zx2013_11_.打怪任务(848,263,"2/3")
     
217. 条件 "3/3":
     
218. zx2013_11_.人物操作(424,427,"337348","拯救曙光站1/6")//提尔:424,427,"337348"
     
219. 选择结束
     
220. 功能结束
     
221. 
     
222. 功能 拯救曙光站()
     
223. 步骤=ts.Ocr(900,242,920,255,"ffcc00-000000",1.0)
     
224. 选择(步骤)
     
225. 条件 "1/6":
     
226. zx2013_11_.人物操作(592,336,"516227","拯救曙光站2/6")//索尔:592,336,"516227"
     
227. 条件 "2/6":
     
228. zx2013_11_.打怪任务(837,263,"2/6")
     
229. 条件 "3/6":
     
230. zx2013_11_.人物操作(551,229,"47384","拯救曙光站4/6")//大坑:551,229,"47384"
     
231. 条件 "4/6":
     
232. zx2013_11_.到指定位子(489,516,"2970")//打开四周:489,516,"2970"
     
233. 条件 "5/6":
     
234. zx2013_11_.开关打怪()
     
235. 循环(ts.Ocr(824,240,936,256,"ffcc00-000000",1.0)=="拯救曙光站5/6")
     
236. 辅助.等待(500)
     
237. 循环结束
     
238. 条件 "6/6":
     
239. zx2013_11_.人物操作(269,264,"171130","紧急启动1/3")//奥丁269,264,"171130"
     
240. 选择结束
     
241. 功能结束
     
242. 
     
243. 功能 主线()
     
244. 学习交流群:2596060677
     
245. 循环(真)
     
246. 任务=ts.Ocr(820,236,864,261,"ffcc00-000000",1.0)
     
247. 辅助.等待(500)
     
248. 调试输出(任务)
     
249. 选择(任务)
     
250. 条件 "初临曙光站":
     
251. zx2013_11_.人物操作(205,233,"10289","神灵降世1/1")//
     
252. 
     
253. 条件 "神灵降世":
     
254. zx2013_11_.人物操作(269,264,"171130","城下之围1/2")//奥丁269,264,"171130"
     
255. 
     
256. 条件 "城下之围":
     
257. zx2013_11_.城下之围()
     
258. 
     
259. 条件 "更换装备":
     
260. zx2013_11_.更换装备()//装备商人特洛伊:303,283,"207156"
     
261. 
     
262. 条件 "紧急启动":
     
263. zx2013_11_.紧急启动()
     
264. 
     
265. 条件 "巩固战线":
     
266. zx2013_11_.巩固战线()
     
267. 
     
268. 条件 "植物园之围":
     
269. zx2013_11_.植物园之围()
     
270. 
     
271. 条件 "拯救曙光站":
     
272. zx2013_11_.拯救曙光站()
     
273. 
     
274. 默认 :
     
275. x,y
     
276. ts.FindPic(887,638,933,674,"全部跳过.bmp","101010",0.9,0,x,y)
     
277. 辅助.等待(500)
     
278. 如果(x>0)
     
279. zx2013_11_.鼠标左键(x,y+3)
     
280. 如果结束
     
281. ts.FindPic(719,355,776,402,"确定换装.bmp","000000",0.9,0,x,y)
     
282. 辅助.等待(500)
     
283. 如果(x>0)
     
284. zx2013_11_.鼠标左键(x,y+3)
     
285. 如果结束
     
286. 选择结束
     
287. 
     
288. 循环结束
     
289. 功能结束
     
290. 空间结束

复制代码

---

作者: 187144831    时间: 2013-11-18 00:13
诺亚还有人么
我到都是觉得 这样的游戏发布一些防封的比较有用

---

作者: 2596060677    时间: 2013-11-18 12:28

187144831 发表于 2013-11-18 00:13
诺亚还有人么
我到都是觉得 这样的游戏发布一些防封的比较有用

没觉得怎么封号啊

---

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)

Powered by Discuz! X3.1