TC官方合作论坛

 找回密码
 立即注册
查看: 2258|回复: 2

[游戏] 诺亚传说1-10主线(源码)

[复制链接]
发表于 2013-11-17 20:50:12 | 显示全部楼层 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x

  1. 空间 zx2013_11_

  2. ts,走停,hwnds

  3. 功能 鼠标左键(x,y)
  4. ret=ts.MoveTo(x,y)
  5. ret=ts.LeftClick()
  6. 辅助.等待(200)
  7. 功能结束

  8. 功能 判断走停()
  9. a=ts.Ocr(902,30,949,44,"ffffff-000000",1.0)
  10. 辅助.等待(1000)
  11. 如果( a==ts.Ocr(902,30,949,44,"ffffff-000000",1.0))
  12. 走停="停"
  13. 否则
  14. 走停="走"
  15. 如果结束
  16. 调试输出(走停)
  17. 功能结束

  18. 功能 到指定位子(x,y,a)
  19. 循环(真)
  20. ts.KeyPress(9)
  21. 辅助.等待(1000)
  22. zx2013_11_.鼠标左键(x,y)
  23. ts.KeyPress(9)
  24. 辅助.等待(500)
  25. 走停="走"
  26. 循环(走停=="走")
  27. zx2013_11_.判断走停()
  28. 循环结束
  29. 如果(ts.Ocr(902,30,949,44,"ffffff-000000",1.0)==a)
  30. 跳出
  31. 如果结束
  32. 辅助.等待(500)
  33. 循环结束
  34. 功能结束


  35. 功能 人物操作(w1,w2,d,n)//接待员丽娜坐标初临曙光:"205,233","102,89","神灵降世"
  36. x,y
  37. 循环(真)
  38. zx2013_11_.到指定位子(w1,w2,d)//+2变量:位子w,到底标志d

  39. 循环(真)
  40. ts.FindPic(388,97,626,374,"任务问号黄.bmp","101010",0.9,0,x,y)
  41. 辅助.等待(500)
  42. 调试输出(x)
  43. 如果(x>0)
  44. zx2013_11_.鼠标左键(x+18,y+100)
  45. 如果结束
  46. 跟踪=ts.GetColor(655,216)
  47. 辅助.等待(200)
  48. 如果(跟踪=="020301")//任务跟踪被打开
  49. ts.FindPic(388,97,626,500,"小问号.bmp","101010",0.9,0,x,y)
  50. 辅助.等待(500)
  51. 如果(x>0)
  52. zx2013_11_.鼠标左键(x+48,y)

  53. ss=数组[],x,y,坐标=数组[3]
  54. 循环(真)
  55. ts_ret = ts.FindPicExS(583,533,940,674,"Q完成继续.bmp|全部跳过.bmp","101010",0.9,0)
  56. 辅助.等待(1000)
  57. if(str.strleng(ts_ret)>0)
  58. str.split(ts_ret,"|",ss)
  59. size=0
  60. arraysp.size(ss,size)
  61. 如果(size>1)
  62. str.split(ss[0],",",坐标)
  63. x= 坐标[1]
  64. y=坐标[2]
  65. zx2013_11_.鼠标左键(x,y)

  66. 否则
  67. str.split(ss[0],",",坐标)
  68. x= 坐标[1]
  69. y=坐标[2]
  70. zx2013_11_.鼠标左键(x,y)

  71. 如果结束
  72. 否则
  73. ts.FindPic(719,355,776,402,"确定换装.bmp","000000",0.9,0,x,y)
  74. 辅助.等待(500)
  75. 如果(x>0)
  76. zx2013_11_.鼠标左键(x,y+3)
  77. 如果结束

  78. 步骤=ts.Ocr(824,240,936,256,"ffcc00-000000",1.0)
  79. 辅助.等待(500)
  80. 调试输出(步骤)
  81. 如果(步骤==n)//到下一个任务+变量
  82. 返回 假
  83. 如果结束
  84. 如果结束
  85. 循环结束

  86. 如果结束

  87. 如果结束

  88. 循环结束

  89. 循环结束
  90. 标记0:
  91. 功能结束

  92. 功能 开关打怪()
  93. 超级键盘.按下(164)
  94. ts.KeyPress(65)
  95. 辅助.等待(50)
  96. 超级键盘.弹起(164)
  97. 功能结束

  98. 功能 打怪任务(x,y,a)
  99. zx2013_11_.鼠标左键(x,y)
  100. 走停="走"
  101. 循环(走停=="走")
  102. zx2013_11_.判断走停()
  103. 循环结束
  104. x,y
  105. ts.FindPic(449,153,525,242,"打怪标志.bmp","151515",0.9,0,x,y)
  106. //调试输出(ts.Ocr(888,240,928,254,"ffcc00-000000",1.0))
  107. 如果(x>0)
  108. 循环(ts.Ocr(888,240,928,254,"ffcc00-000000",1.0)==a)
  109. 辅助.等待(500)

  110. 循环结束
  111. 如果结束
  112. 功能结束

  113. 功能 城下之围()
  114. 步骤=ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)
  115. 选择(步骤)
  116. 条件 "1/2":
  117. zx2013_11_.打怪任务(845,264,"1/2")

  118. 条件 "2/2":
  119. zx2013_11_.人物操作(269,264,"171130","更换装备1/3")
  120. 选择结束
  121. 功能结束

  122. 功能 更换装备()
  123. 步骤=ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)
  124. 选择(步骤)
  125. 条件 "1/3":
  126. zx2013_11_.人物操作(303,283,"207156","更换装备2/3")

  127. 条件 "2/3":
  128. 循环(真)
  129. zx2013_11_.到指定位子(323,289,"229164")//法师武器架:323,289,"229164"
  130. zx2013_11_.鼠标左键(542,307)//点击武器架
  131. 辅助.等待(3000)
  132. x,y
  133. ts.FindPic(893,638,931,677,"全部跳过.bmp","000000",0.9,0,x,y)
  134. 辅助.等待(500)
  135. 如果(x>0)
  136. zx2013_11_.鼠标左键(x,y+3)
  137. 如果结束
  138. ts.FindPic(719,355,776,402,"确定换装.bmp","000000",0.9,0,x,y)
  139. 辅助.等待(500)
  140. 如果(x>0)
  141. zx2013_11_.鼠标左键(x,y+3)
  142. 如果结束
  143. 如果(ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)=="3/3")
  144. 跳出
  145. 如果结束
  146. 循环结束

  147. 条件 "3/3":
  148. zx2013_11_.人物操作(269,264,"171130","紧急启动1/3")//奥丁269,264,"171130"

  149. 选择结束

  150. 功能结束

  151. 功能 紧急启动()
  152. 步骤=ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)
  153. 选择(步骤)
  154. 条件 "1/3":
  155. 循环(真)
  156. zx2013_11_.到指定位子(228,405,"127318")//到能量晶体228,405,"127318"
  157. zx2013_11_.鼠标左键(544,345)//点击能量晶体
  158. 辅助.等待(3000)
  159. 如果(ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)=="2/3")
  160. 跳出
  161. 如果结束
  162. 循环结束
  163. 条件 "2/3":
  164. zx2013_11_.人物操作(243,449,"143378","紧急启动3/3")//点炮

  165. 条件 "3/3":
  166. zx2013_11_.人物操作(297,484,"201424","巩固战线1/2")//巴德尔:297,484,"201424"

  167. 选择结束
  168. 功能结束

  169. 功能 巩固战线()
  170. 步骤=ts.Ocr(888,240,908,254,"ffcc00-000000",1.0)
  171. 选择(步骤)
  172. 条件 "1/2":
  173. zx2013_11_.打怪任务(856,262,"1/2")

  174. 条件 "2/2":
  175. zx2013_11_.人物操作(297,484,"201424","植物园之围1/3")//巴德尔:297,484,"201424"
  176. 选择结束
  177. 功能结束

  178. 功能 植物园之围()
  179. 步骤=ts.Ocr(900,242,920,255,"ffcc00-000000",1.0)
  180. 选择(步骤)
  181. 条件 "1/3":
  182. zx2013_11_.人物操作(424,427,"337348","植物园之围2/3")//提尔:424,427,"337348"
  183. 条件 "2/3":
  184. zx2013_11_.打怪任务(848,263,"2/3")
  185. 条件 "3/3":
  186. zx2013_11_.人物操作(424,427,"337348","拯救曙光站1/6")//提尔:424,427,"337348"
  187. 选择结束
  188. 功能结束

  189. 功能 拯救曙光站()
  190. 步骤=ts.Ocr(900,242,920,255,"ffcc00-000000",1.0)
  191. 选择(步骤)
  192. 条件 "1/6":
  193. zx2013_11_.人物操作(592,336,"516227","拯救曙光站2/6")//索尔:592,336,"516227"
  194. 条件 "2/6":
  195. zx2013_11_.打怪任务(837,263,"2/6")
  196. 条件 "3/6":
  197. zx2013_11_.人物操作(551,229,"47384","拯救曙光站4/6")//大坑:551,229,"47384"
  198. 条件 "4/6":
  199. zx2013_11_.到指定位子(489,516,"2970")//打开四周:489,516,"2970"
  200. 条件 "5/6":
  201. zx2013_11_.开关打怪()
  202. 循环(ts.Ocr(824,240,936,256,"ffcc00-000000",1.0)=="拯救曙光站5/6")
  203. 辅助.等待(500)
  204. 循环结束
  205. 条件 "6/6":
  206. zx2013_11_.人物操作(269,264,"171130","紧急启动1/3")//奥丁269,264,"171130"
  207. 选择结束
  208. 功能结束

  209. 功能 主线()
  210. 学习交流群:2596060677
  211. 循环(真)
  212. 任务=ts.Ocr(820,236,864,261,"ffcc00-000000",1.0)
  213. 辅助.等待(500)
  214. 调试输出(任务)
  215. 选择(任务)
  216. 条件 "初临曙光站":
  217. zx2013_11_.人物操作(205,233,"10289","神灵降世1/1")//

  218. 条件 "神灵降世":
  219. zx2013_11_.人物操作(269,264,"171130","城下之围1/2")//奥丁269,264,"171130"

  220. 条件 "城下之围":
  221. zx2013_11_.城下之围()

  222. 条件 "更换装备":
  223. zx2013_11_.更换装备()//装备商人特洛伊:303,283,"207156"

  224. 条件 "紧急启动":
  225. zx2013_11_.紧急启动()

  226. 条件 "巩固战线":
  227. zx2013_11_.巩固战线()

  228. 条件 "植物园之围":
  229. zx2013_11_.植物园之围()

  230. 条件 "拯救曙光站":
  231. zx2013_11_.拯救曙光站()

  232. 默认 :
  233. x,y
  234. ts.FindPic(887,638,933,674,"全部跳过.bmp","101010",0.9,0,x,y)
  235. 辅助.等待(500)
  236. 如果(x>0)
  237. zx2013_11_.鼠标左键(x,y+3)
  238. 如果结束
  239. ts.FindPic(719,355,776,402,"确定换装.bmp","000000",0.9,0,x,y)
  240. 辅助.等待(500)
  241. 如果(x>0)
  242. zx2013_11_.鼠标左键(x,y+3)
  243. 如果结束
  244. 选择结束

  245. 循环结束
  246. 功能结束
  247. 空间结束
复制代码

回复

使用道具 举报

发表于 2013-11-18 00:13:09 | 显示全部楼层
诺亚还有人么
我到都是觉得 这样的游戏发布一些防封的比较有用
回复 支持 反对

使用道具 举报

 楼主| 发表于 2013-11-18 12:28:07 | 显示全部楼层
187144831 发表于 2013-11-18 00:13
诺亚还有人么
我到都是觉得 这样的游戏发布一些防封的比较有用

没觉得怎么封号啊
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-5-12 08:48 , Processed in 0.038562 second(s), 22 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表