天龙八部种植小工具-热键多线程的使用

mxng

闲的蛋疼，弄了这么个
刚刚学习TC，有用的不好的地方请指正

天龙八部三.t

1. #include "种植.t"
   
2. 空间 天龙八部三
   
3. 整型 种植句柄
   
4. 字符型 种植线程状态
   
5. 
   
6. 功能 逻辑型 初始化()
   
7. 种植句柄=0
   
8. 种植线程状态="停止"
   
9. 返回 真
   
10. 功能结束
    
11. 
    
12. 功能 逻辑型 种植启动_热键()
    
13. 种植句柄=线程.开启("种植.开始")
    
14. 如果 (种植句柄==0)
    
15. 辅助.消息框("线程开启失败")
    
16. 否则
    
17. //辅助.消息框("线程开启成功")
    
18. 种植线程状态="执行"
    
19. 如果结束
    
20. 
    
21. 返回 真
    
22. 功能结束
    
23. 
    
24. 功能 逻辑型 种植停止_热键()
    
25. 如果 (种植句柄!=0)
    
26. 如果(线程.关闭(种植句柄))
    
27. 种植句柄=0
    
28. 种植线程状态="停止"
    
29. 否则
    
30. 辅助.消息框("线程关闭失败")
    
31. 如果结束
    
32. 如果结束
    
33. 返回 真
    
34. 功能结束
    
35. 
    
36. 功能 逻辑型 种植暂停_热键()
    
37. 如果 (种植句柄!=0)
    
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. 编辑框.设置文本("稻草人坐标X","")
    
79. 编辑框.设置文本("稻草人坐标Y","")
    
80. 返回 真
    
81. 功能结束
    
82. 
    
83. 空间结束

复制代码

种植.t

1. 
   
2. 空间 种植
   
3. 整型 稻草人X,稻草人Y
   
4. 整型 坐标数字X,坐标数字Y,十位偏移,百位偏移,数字像素宽,坐标数字颜色
   
5. 整型 人物坐标X,人物坐标Y
   
6. 整型 图片坐标X,图片坐标Y
   
7. 整型 屏幕宽,屏幕高
   
8. 整型 鼠标状态对话,鼠标状态打怪,鼠标状态拾取
   
9. 字符型 坐标字样,早产字样,全部拾取,验证字样
   
10. 
    
11. 功能 逻辑型 初始化()
    
12. 
    
13. 坐标数字颜色=#73FFFD
    
14. 坐标数字X=1297//这个懒得取色找坐标了,反正自己用.1366x768全屏
    
15. 坐标数字Y=6
    
16. 十位偏移=24
    
17. 百位偏移=30
    
18. 数字像素宽=6
    
19. 
    
20. 系统.获得分辨率(屏幕宽,屏幕高)
    
21. 
    
22. 鼠标状态对话=28769865
    
23. 鼠标状态打怪=21823155
    
24. 鼠标状态拾取=36044250
    
25. 
    
26. 坐标字样 = "#63F2FF,0|-6|080D18,0|-5|63F2FF,-6|5|080D18,-5|5|63F2FF,18|4|63F2FF,19|4|080D18"
    
27. 早产字样= "#55D5FF,0|-1|080D18,0|-2|55D5FF,5|2|55D5FF,0|5|55D5FF"
    
28. 全部拾取= "#78EBFD,-22|-5|78EBFD,-27|5|78EBFD,-7|5|78EBFD,22|5|78EBFD,21|-4|78EBFD,6|-5|78EBFD"
    
29. 验证字样="#63F2FF,-5|-5|63F2FF,-7|5|63F2FF,3|5|63F2FF,10|-1|63F2FF"
    
30. 
    
31. 如果 (编辑框.获得文本("稻草人坐标X")!="")
    
32. 稻草人X=转换.字符型转整型(编辑框.获得文本("稻草人坐标X"),0)
    
33. 稻草人Y=转换.字符型转整型(编辑框.获得文本("稻草人坐标Y"),0)
    
34. 否则
    
35. 种植.得到人物坐标()
    
36. 稻草人X=人物坐标X
    
37. 稻草人Y=人物坐标Y
    
38. 如果结束
    
39. 返回 真
    
40. 功能结束
    
41. 
    
42. 功能 逻辑型 开始()
    
43. 种植.初始化()
    
44. //稻草人X=197
    
45. //稻草人Y=392
    
46. 循环(真)
    
47. 种植.移动到坐标(稻草人X,稻草人Y) //稻草人坐标
    
48. //点击稻草人
    
49. 循环(!种植.鼠标渐开(屏幕宽/2,屏幕高/2,鼠标状态对话,1,40,1,辅助.随机数(0,360),30,50))
    
50. 辅助.等待(100)
    
51. 循环结束
    
52. //找到 早产 字样 ,点击
    
53. 循环(!种植.查找图片坐标(0,0,屏幕宽,屏幕高,早产字样))
    
54. //辅助.消息框("没找到")
    
55. 辅助.等待(500)
    
56. 循环结束
    
57. 辅助.等待(100)
    
58. 鼠标.移动(图片坐标X, 图片坐标Y)
    
59. 辅助.等待(100)
    
60. 鼠标.左键单击(1)
    
61. 辅助.等待(1000)
    
62. //
    
63. 辅助.等待(100)
    
64. 鼠标.移动(图片坐标X, 图片坐标Y)
    
65. 辅助.等待(100)
    
66. 鼠标.左键单击(1)
    
67. 辅助.等待(500)
    
68. 辅助.等待(5*60*1000+辅助.随机数(10000,20000))//等待5分钟+10秒627, 368
    
69. 
    
70. 整型 次数=1
    
71. 循环(次数<5)
    
72. 种植.移动到坐标(稻草人X,稻草人Y)
    
73. 如果(种植.鼠标渐开(屏幕宽/2,屏幕高/2,鼠标状态拾取,80,130,1,辅助.随机数(0,360),30,100))
    
74. 辅助.等待(辅助.随机数(5500,7000))//收割
    
75. //验证码检查
    
76. 种植.是否有验证()
    
77. 辅助.等待(100)
    
78. //如果找到 全部拾取 字样 点击
    
79. 如果 (!种植.查找图片坐标(0,0,屏幕宽,屏幕高,全部拾取))
    
80. 继续
    
81. 如果结束
    
82. 辅助.等待(100)
    
83. 鼠标.移动(图片坐标X, 图片坐标Y)
    
84. 辅助.等待(100)
    
85. 鼠标.左键单击(1)
    
86. 辅助.等待(500)
    
87. 次数=次数+1
    
88. 如果结束
    
89. 循环结束
    
90. 循环结束
    
91. 返回 真
    
92. 功能结束
    
93. 
    
94. 
    
95. 
    
96. 
    
97. 
    
98. 功能 逻辑型 是否有验证()
    
99. 如果 (种植.查找图片坐标(0,0,屏幕宽,屏幕高,验证字样))
    
100. 辅助.播放("D:\\Backup\\桌面\\alarm.mp3")
     
101. 返回 真
     
102. 如果结束
     
103. 返回 假
     
104. 功能结束
     
105. 
     
106. 功能 逻辑型 鼠标渐开(整型 中点坐标X,整型 中点坐标Y,整型 鼠标状态,整型 初始半径,整型 最大半径,整型 步长 ,整型 初始角度 ,整型 转角,整型 速度)
     
107. 整型 鼠标坐标X,鼠标坐标Y
     
108. //鼠标.移动(中点坐标X,中点坐标Y)
     
109. 鼠标.移动(中点坐标X+辅助.随机数(50,300),中点坐标Y+辅助.随机数(50,300))
     
110. 辅助.等待(100)
     
111. 循环(鼠标.获取特征码()!=鼠标状态)
     
112. 初始半径=初始半径+步长
     
113. 如果(初始半径>最大半径)
     
114. //出现异常
     
115. 返回 假
     
116. 跳出
     
117. 如果结束
     
118. 初始角度=初始角度+转角
     
119. 鼠标坐标X=中点坐标X+转换.浮点型转整型(初始半径*数学.余弦值(初始角度*3.14/180))
     
120. 鼠标坐标Y=中点坐标Y+转换.浮点型转整型(初始半径*数学.正弦值(初始角度*3.14/180))
     
121. 鼠标.移动(鼠标坐标X,鼠标坐标Y)
     
122. //辅助.消息框(转换.整型转字符型(鼠标坐标X)+","+转换.整型转字符型(鼠标坐标Y))
     
123. 辅助.等待(速度)
     
124. 循环结束
     
125. 辅助.等待(100)
     
126. 鼠标.左键单击(1)
     
127. 辅助.等待(100)
     
128. 返回 真
     
129. 功能结束
     
130. 
     
131. 功能 逻辑型 移动到坐标(整型 X,整型 Y)
     
132. 种植.得到人物坐标()
     
133. 如果 (人物坐标X==X&&人物坐标Y==Y)
     
134. 返回 真
     
135. 如果结束
     
136. 循环(!种植.查找图片坐标(0,0,屏幕宽,屏幕高,坐标字样))
     
137. //辅助.消息框("测试"+转换.整型转字符型(图片坐标X)+","+转换.整型转字符型(图片坐标Y))
     
138. 键盘.按下(18)
     
139. 辅助.等待(100)
     
140. 键盘.按键(192,1) //按alt+`开启自动寻路界面
     
141. 辅助.等待(100)
     
142. 键盘.弹起(18)
     
143. 辅助.等待(200)
     
144. 循环结束
     
145. //点击坐标输入框，然后输入坐标
     
146. 辅助.等待(100)
     
147. 鼠标.移动(图片坐标X+46, 图片坐标Y)
     
148. 辅助.等待(100)
     
149. 鼠标.左键单击(1)
     
150. 辅助.等待(100)
     
151. 键盘.按键(8,3) //删除原来的坐标
     
152. 辅助.等待(100)
     
153. 键盘.发送字符串(转换.整型转字符型(X))
     
154. 辅助.等待(100)
     
155. 鼠标.移动(图片坐标X+78, 图片坐标Y)
     
156. 辅助.等待(100)
     
157. 鼠标.左键单击(1)
     
158. 辅助.等待(100)
     
159. 键盘.按键(8,3) //删除原来的坐标
     
160. 辅助.等待(100)
     
161. 键盘.发送字符串(转换.整型转字符型(Y))
     
162. //点击移动按钮
     
163. 辅助.等待(100)
     
164. 鼠标.移动(图片坐标X+122, 图片坐标Y)
     
165. 辅助.等待(100)
     
166. 鼠标.左键单击(1)
     
167. 循环(真)
     
168. 种植.得到人物坐标()
     
169. 如果 (人物坐标X!=X||人物坐标Y!=Y)
     
170. 辅助.等待(500) //人物移动中,静默等待
     
171. 否则
     
172. 跳出//人物到达指定坐标
     
173. 如果结束
     
174. 循环结束
     
175. 返回 真
     
176. 功能结束
     
177. 
     
178. 功能 逻辑型 查找图片坐标(整型 x1,整型 y1,整型 x2,整型 y2,字符型 图片)
     
179. 图片坐标X=0
     
180. 图片坐标Y=0
     
181. 整型 x,y
     
182. 图像.多点找色(x1,y1,x2,y2,转换.字符型转整型(字符串.截取(图片,0,7),1),字符串.截取(图片,8,字符串.长度(图片)),0.9,0,x,y)
     
183. 如果 (x<0||y<0)
     
184. 返回 假
     
185. 如果结束
     
186. 图片坐标X=x
     
187. 图片坐标Y=y
     
188. 返回 真
     
189. 功能结束
     
190. 
     
191. 功能 逻辑型 得到人物坐标()
     
192. 整型 X1,X2,X3,Y1,Y2,Y3,偏移
     
193. X1=种植.查找坐标数字(坐标数字X,坐标数字Y)
     
194. X2=种植.查找坐标数字(坐标数字X+数字像素宽,坐标数字Y)
     
195. X3=种植.查找坐标数字(坐标数字X+数字像素宽*2,坐标数字Y)
     
196. 如果(X3==-1)
     
197. 人物坐标X=X1*10+X2
     
198. 偏移=十位偏移
     
199. 否则
     
200. 人物坐标X=X1*100+X2*10+X3
     
201. 偏移=百位偏移
     
202. 如果结束
     
203. Y1=种植.查找坐标数字(坐标数字X+偏移,坐标数字Y)
     
204. Y2=种植.查找坐标数字(坐标数字X+偏移+数字像素宽,坐标数字Y)
     
205. Y3=种植.查找坐标数字(坐标数字X+偏移+数字像素宽*2,坐标数字Y)
     
206. 如果(Y3==-1)
     
207. 人物坐标Y=Y1*10+Y2
     
208. 否则
     
209. 人物坐标Y=Y1*100+Y2*10+Y3
     
210. 如果结束
     
211. 返回 真
     
212. 功能结束
     
213. 
     
214. 功能 整型 查找坐标数字(整型 坐标X,整型 坐标Y)
     
215. 整型 数字
     
216. 如果(图像.坐标点取色(坐标X+1,坐标Y+1 )==坐标数字颜色)
     
217. 数字=1
     
218. 否则
     
219. 如果(图像.坐标点取色(坐标X+0,坐标Y+7 )==坐标数字颜色)
     
220. 数字=2
     
221. 否则
     
222. 如果(图像.坐标点取色(坐标X+3,坐标Y+5 )==坐标数字颜色)
     
223. 数字=4
     
224. 否则
     
225. 如果(图像.坐标点取色(坐标X+1,坐标Y+6 )==坐标数字颜色)
     
226. 数字=9
     
227. 否则
     
228. 如果(图像.坐标点取色(坐标X+2,坐标Y+6 )==坐标数字颜色)
     
229. 数字=7
     
230. 否则
     
231. 如果(图像.坐标点取色(坐标X+4,坐标Y+3 )==坐标数字颜色)
     
232. 数字=0
     
233. 否则
     
234. 如果(图像.坐标点取色(坐标X+4,坐标Y+0 )==坐标数字颜色)
     
235. 数字=5
     
236. 否则
     
237. 如果(图像.坐标点取色(坐标X+3,坐标Y+1 )==坐标数字颜色)
     
238. 数字=6
     
239. 否则
     
240. 如果(图像.坐标点取色(坐标X+0,坐标Y+2 )==坐标数字颜色)
     
241. 数字=8
     
242. 否则
     
243. 如果(图像.坐标点取色(坐标X+1,坐标Y+0 )==坐标数字颜色)
     
244. 数字=3
     
245. 否则
     
246. 数字=-1
     
247. 如果结束
     
248. 如果结束
     
249. 如果结束
     
250. 如果结束
     
251. 如果结束
     
252. 如果结束
     
253. 如果结束
     
254. 如果结束
     
255. 如果结束
     
256. 如果结束
     
257. 返回 数字
     
258. 功能结束
     
259. 
     
260. 
     
261. 空间结束

复制代码

btbcagf

能给做个神仙传的脚本吗？    我QQ 332031326  YY号2317095  常在YY频道1530779
等待大神回复

Abin

楼主的分享精神很不错啊！  菜鸟们多学习下啊！！  呵呵。。

Mr.u

界面设置按键，学习下。

610004856

顶一个

610004856

顺便请教下怎么才能发帖

qaz670589896

积分多少才可以下东西

qaz670589896

怎么用啊

qaz670589896

积分多少才可以下东西v

VIP

楼主，下载解压后文件就变成这样，这是什么原因？