软件运行cpu使用率40%多

whq6824500

1. .版本 2
   
2. 
   
3. .程序集 窗口程序集1
   
4. .程序集变量 窗口, 整数型
   
5. .程序集变量 比对宽度, 整数型, , "4"
   
6. .程序集变量 总注, 坐标
   
7. .程序集变量 矩形, 矩形, , "4"
   
8. .程序集变量 坐标pd, 坐标, , "4"
   
9. .程序集变量 图|片, 字节集, , "4"
   
10. .程序集变量 起始坐标, 坐标, , "4"
    
11. 
    
12. .子程序 __启动窗口_创建完毕
    
13. 
    
14. 起始坐标 [1].横 ＝ 731
    
15. 起始坐标 [1].纵 ＝ 42
    
16. 起始坐标 [2].横 ＝ 473
    
17. 起始坐标 [2].纵 ＝ 252
    
18. 起始坐标 [3].横 ＝ 966
    
19. 起始坐标 [3].纵 ＝ 252
    
20. 起始坐标 [4].横 ＝ 811
    
21. 起始坐标 [4].纵 ＝ 502
    
22. 
    
23. 矩形 [1].左边 ＝ 581  ' 1代表对家，2代表上家，3代表下家，4代表自己
    
24. 矩形 [1].顶边 ＝ 41
    
25. 矩形 [1].宽度 ＝ 150
    
26. 矩形 [1].高度 ＝ 50
    
27. 
    
28. 矩形 [2].左边 ＝ 323
    
29. 矩形 [2].顶边 ＝ 251
    
30. 矩形 [2].宽度 ＝ 150
    
31. 矩形 [2].高度 ＝ 50
    
32. 
    
33. 矩形 [3].左边 ＝ 816
    
34. 矩形 [3].顶边 ＝ 251
    
35. 矩形 [3].宽度 ＝ 150
    
36. 矩形 [3].高度 ＝ 50
    
37. 
    
38. 矩形 [4].左边 ＝ 661
    
39. 矩形 [4].顶边 ＝ 501
    
40. 矩形 [4].宽度 ＝ 150
    
41. 矩形 [4].高度 ＝ 50
    
42. '
    
43. 总注.横 ＝ 735
    
44. 总注.纵 ＝ 444
    
45. 坐标pd [1].横 ＝ 598  ' 1代表对家，2代表上家，3代表下家，4代表自己
    
46. 坐标pd [1].纵 ＝ 76
    
47. 坐标pd [2].横 ＝ 340
    
48. 坐标pd [2].纵 ＝ 286
    
49. 坐标pd [3].横 ＝ 833
    
50. 坐标pd [3].纵 ＝ 286
    
51. 坐标pd [4].横 ＝ 678
    
52. 坐标pd [4].纵 ＝ 536
    
53. 比对宽度 [1] ＝ 65
    
54. 比对宽度 [2] ＝ 65
    
55. 比对宽度 [3] ＝ 65
    
56. 比对宽度 [4] ＝ 65
    
57. 
    
58. ' 窗口 ＝ 窗口_取窗口句柄 (, “五张牌”, )
    
59. 
    
60. 
    
61. .子程序 _按钮1_被单击
    
62. 
    
63. 画板1.底图 ＝ {  }
    
64. 画板2.底图 ＝ {  }
    
65. 画板3.底图 ＝ {  }
    
66. 画板4.底图 ＝ {  }
    
67. 画板1.底图 ＝ {  }
    
68. 时钟2.时钟周期 ＝ 350
    
69. 
    
70. 
    
71. .子程序 _按钮2_被单击
    
72. 
    
73. 时钟1.时钟周期 ＝ 0
    
74. 时钟2.时钟周期 ＝ 0
    
75. 
    
76. 
    
77. .子程序 _时钟1_周期事件
    
78. 
    
79. 
    
80. .' 如果 (取坐标颜色 (0, 总注) ＝ 1777180)
    
81.     ' 时钟2.时钟周期 ＝ 50
    
82. .否则
    
83.     ' 时钟2.时钟周期 ＝ 0
    
84.     ' 画板1.底图 ＝ {  }
    
85.     ' 画板2.底图 ＝ {  }
    
86.     ' 画板3.底图 ＝ {  }
    
87.     ' 画板4.底图 ＝ {  }
    
88.     ' 比对宽度 [1] ＝ 65
    
89.     ' 比对宽度 [2] ＝ 65
    
90.     ' 比对宽度 [3] ＝ 65
    
91.     ' 比对宽度 [4] ＝ 65
    
92. .如果结束
    
93. ' 时钟1.时钟周期 ＝ 50
    
94. 
    
95. 
    
96. .子程序 _时钟2_周期事件
    
97. 
    
98. ' 时钟2.时钟周期 ＝ 0
    
99. .如果 (取坐标颜色 (0, 总注) ＝ 1777180)
    
100.     调用子程序 (&记牌)
     
101. .否则
     
102.     画板1.底图 ＝ {  }
     
103.     画板2.底图 ＝ {  }
     
104.     画板3.底图 ＝ {  }
     
105.     画板4.底图 ＝ {  }
     
106. .如果结束
     
107. 
     
108. 
     
109. 
     
110. 
     
111. .子程序 记牌
     
112. 
     
113. .' 如果真 (取坐标颜色 (0, 坐标pd [1]) ＝ 16777215)
     
114.     .' 如果真 (直线找色 (0, 16777215, 起始坐标 [1], 150, 4, 颜色坐标 [1]))
     
115.         ' a [1] ＝ 取绝对值 (颜色坐标 [1].横 － 起始坐标 [1].横)
     
116.         .' 如果真 (比对宽度 [1] ＞ a [1])
     
117.             ' 矩形截图 (0, 矩形 [1], 图|片 [1], 假)
     
118.             ' 画板1.底图 ＝ 图|片 [1]
     
119.             ' 比对宽度 [1] ＝ a [1]
     
120.         .如果真结束
     
121. 
     
122.     .如果真结束
     
123. 
     
124. 
     
125. .如果真结束
     
126. 
     
127. 
     
128. .' 如果真 (取坐标颜色 (0, 坐标pd [2]) ＝ 16777215)
     
129.     .' 如果真 (直线找色 (0, 16777215, 起始坐标 [2], 150, 4, 颜色坐标 [2]))
     
130.         ' a [2] ＝ 取绝对值 (颜色坐标 [2].横 － 起始坐标 [2].横)
     
131.         .' 如果真 (比对宽度 [2] ＞ a [2])
     
132.             ' 矩形截图 (0, 矩形 [2], 图|片 [2], 假)
     
133.             ' 画板2.底图 ＝ 图|片 [2]
     
134.             ' 比对宽度 [2] ＝ a [2]
     
135.         .如果真结束
     
136. 
     
137.     .如果真结束
     
138. 
     
139. .如果真结束
     
140. 
     
141. 
     
142. .' 如果真 (取坐标颜色 (0, 坐标pd [3]) ＝ 16777215)
     
143.     .' 如果真 (直线找色 (0, 16777215, 起始坐标 [3], 150, 4, 颜色坐标 [3]))
     
144.         ' a [3] ＝ 取绝对值 (颜色坐标 [3].横 － 起始坐标 [3].横)
     
145.         .' 如果真 (比对宽度 [3] ＞ a [3])
     
146.             ' 矩形截图 (0, 矩形 [3], 图|片 [3], 假)
     
147.             ' 画板3.底图 ＝ 图|片 [3]
     
148.             ' 比对宽度 [3] ＝ a [3]
     
149.         .如果真结束
     
150. 
     
151.     .如果真结束
     
152. 
     
153. .如果真结束
     
154. 
     
155. 
     
156. .' 如果真 (取坐标颜色 (0, 坐标pd [4]) ＝ 16777215)
     
157.     .' 如果真 (直线找色 (0, 16777215, 起始坐标 [4], 150, 4, 颜色坐标 [4]))
     
158.         ' a [4] ＝ 取绝对值 (颜色坐标 [4].横 － 起始坐标 [4].横)
     
159.         .' 如果真 (比对宽度 [4] ＞ a [4])
     
160.             ' 矩形截图 (0, 矩形 [4], 图|片 [4], 假)
     
161.             ' 画板4.底图 ＝ 图|片 [4]
     
162.             ' 比对宽度 [4] ＝ a [4]
     
163.         .如果真结束
     
164. 
     
165. 
     
166.     .如果真结束
     
167. 
     
168. .如果真结束
     
169. 
     
170. .如果真 (取坐标颜色 (0, 坐标pd [1]) ＝ 16777215)
     
171.     矩形截图 (0, 矩形 [1], 图|片 [1], 假)
     
172.     画板1.底图 ＝ 图|片 [1]
     
173. 
     
174. 
     
175. 
     
176. 
     
177. .如果真结束
     
178. 
     
179. 
     
180. .如果真 (取坐标颜色 (0, 坐标pd [2]) ＝ 16777215)
     
181.     矩形截图 (0, 矩形 [2], 图|片 [2], 假)
     
182.     画板2.底图 ＝ 图|片 [2]
     
183. 
     
184. 
     
185. .如果真结束
     
186. 
     
187. 
     
188. .如果真 (取坐标颜色 (0, 坐标pd [3]) ＝ 16777215)
     
189.     矩形截图 (0, 矩形 [3], 图|片 [3], 假)
     
190.     画板3.底图 ＝ 图|片 [3]
     
191. 
     
192. 
     
193. .如果真结束
     
194. 
     
195. 
     
196. .如果真 (取坐标颜色 (0, 坐标pd [4]) ＝ 16777215)
     
197.     矩形截图 (0, 矩形 [4], 图|片 [4], 假)
     
198.     画板4.底图 ＝ 图|片 [4]
     
199. 
     
200. 
     
201. 
     
202. .如果真结束
     
203. 
     

复制代码

whq6824500

万挂作坊的模块
支持库两个：核心支持库与特殊功能支持库
软件是一个五张牌记牌用的
命令用到了矩形截图和取坐标颜色

whq6824500

刚学易语言，还不会写自定义参数的子程序，程序看着费劲……
万挂作坊的教程强调要卸载句柄，可是我句柄直接用的0，0代表屏幕，应该不需要卸载吧。
时钟周期是350毫秒，周期事件&子程序记牌……
睡觉了{:3_239:}

airpppp

模块滴不知道
GetDC(取场景) 和 ReleaseDC(释放场景) 这两个函数吧
0是整个窗口,也要释放

whq6824500

这看来不是软件的问题，而是截图记牌器固有的弊端，将就着用了。

fsjoe

恭喜楼主终于把这个记牌程序做好了
识图功能肯定会对CPU占用有一定影响
向你学习

670645920

截图当然占CPU啊

识图取色也损耗CPU

whq6824500

总结下过程吧
首先得找到一个截图模块，技术高的自己做一个也行。（用核心库的快照也可以，前提得获取DC句柄，精易模块里好像有这个功能。
起初我用矩形找图功能，运行效果不理想，一副牌28张，找一遍得7秒多。找图不行只能换思路，用截图去实现。
截图方式，一开始是定义了一个矩形数组（5，4），感觉太繁琐了，五张牌四个人玩，定义一个一维数组就可以了。
要实现自动记牌，需要时钟周期事件去判断什么时候该抓牌，这个难度也不大。
比较繁琐的事情是要用工具去取得一些坐标（用的按键精灵的抓抓）……
最后的结案陈词是，截图方式记牌不适合自动化，太耗CPU了，手动就可以了。

airpppp

有见过一两个记牌器,好像都是找内存,不懂哦

取什么名

做个标记留待备用