• 新浪微博:
  • 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:03-18

按键精灵安卓版
立即下载

软件版本:3.7.0
软件大小:46.2M
更新时间:03-02

按键精灵iOS版
立即下载

软件版本:1.7.7
软件大小:29.2M
更新时间:12-06

按键手机助手
立即下载

软件版本:3.7.7
软件大小:262M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

【作者成长之路】按键初学者-多点找色应用,如何准确识别数字 [复制链接]

1#
本帖最后由 专员小兔 于 2015-7-29 14:00 编辑 D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

多点找色应用,如何准确识别数字[转载自:showtopic.aspx?topicid=327017&forumpage=1&page=1]D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

原理概述:D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

主要通过0-9个多点特征,对一个范围内进行找色识别,找出所有的数字,并按照从左往右的方式拼接,最终可得出我们想要的数字内容。当然该方法也适合用于其他字符识别,这里主要讲解下数字识别为例子。D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

优点:只需确认写入大致范围,无需对每个数字做专门的特征记录,计算每个字符宽高等令人纠结的判断,只需要简单的使用按键抓抓获取每个数字的多点字符串信息即可。该方法即可把范围内数字等字符信息获取下来并按照从左往右拼接好返回。(多点字符串信息获取时注意起点必须最靠左)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

一、首先你得收集09十个数字图片,必须有每个数字的清晰图片整如下图:D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

二、把每个数字以多点特征形式使用按键抓抓获取并保存为数组。D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

三、原理详细讲解。D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

步骤一:在以上红圈范围内从左往右执行多点找色判断,0-9十个数字全部扫描,得出它们横坐标X,每识别到一个对比X坐标,保留最小的那位,最终十次判断结束,我们可以得到数字3,在最前面,保存在一个变量中str_number = 3D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

步骤二:从已获取的数字3为起点,继续往后搜索,我们可以得到数字1,以此类推全部识别完毕即可获得完整的一串字符串。D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

这里提醒大家,目前获取的变量类型属于字符串,如需要数字计算对比大小等操作可用Int函数转换下即可。D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

例子:number=Int(str_number)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

最后把以上数字识别判断源代码列出以供大家参考。D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

图片原图大小:D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

大家可以以这张图片中的数字大小进行测试。D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

  1. Dim Arr_number(9)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  2. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  3. Arr_number(0) = array("000000", "2|0|000000,-1|1|000000,3|1|000000,-1|3|000000,3|3|000000,-1|5|000000,3|5|000000,-1|6|000000,3|6|000000,0|7|000000,2|7|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  4. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  5. Arr_number(1) = array("000000", "1|-1|000000,1|1|000000,1|3|000000,1|5|000000,0|6|000000,2|6|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  6. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  7. Arr_number(2) = array("000000", "1|-1|000000,3|-1|000000,4|0|000000,4|1|000000,3|2|000000,2|3|000000,1|4|000000,0|6|000000,2|6|000000,4|6|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  8. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  9. Arr_number(3) = array("000000", "1|-1|000000,3|-1|000000,4|0|000000,2|2|000000,3|2|000000,4|3|000000,4|5|000000,0|5|000000,1|6|000000,3|6|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  10. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  11. Arr_number(4) = array("000000", "3|-4|000000,2|-3|000000,1|-2|000000,3|-2|000000,3|-1|000000,3|0|000000,1|1|000000,3|1|000000,4|1|000000,3|3|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  12. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  13. Arr_number(5) = array("000000", "2|0|000000,4|0|000000,0|2|000000,1|3|000000,3|3|000000,4|4|000000,0|6|000000,4|6|000000,1|7|000000,3|7|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  14. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  15. Arr_number(6) = array("000000", "1|-1|000000,3|-1|000000,3|0|000000,0|2|000000,1|2|000000,2|2|000000,3|2|000000,0|3|000000,4|3|000000,0|5|000000,4|5|000000,1|6|000000,3|6|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  16. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  17. Arr_number(7) = array("000000", "2|0|000000,4|0|000000,0|1|000000,3|1|000000,2|3|000000,2|5|000000,2|7|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  18. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  19. Arr_number(8) = array("000000", "1|-1|000000,3|-1|000000,4|0|000000,0|1|000000,4|1|000000,1|2|000000,2|2|000000,3|2|000000,0|3|000000,4|3|000000,0|5|000000,4|5|000000,1|6|000000,3|6|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  20. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  21. Arr_number(9) = array("000000", "1|-1|000000,2|-1|000000,3|-1|000000,4|0|000000,0|1|000000,0|2|000000,4|2|000000,1|3|000000,2|3|000000,3|3|000000,4|3|000000,4|4|000000,1|5|000000,4|5|000000,1|6|000000,2|6|000000,3|6|000000")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  22. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  23. '开始判断D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  24. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  25. TracePrint GetNumber(0, 0, Plugin.Sys.GetScRX, Plugin.Sys.GetScRY, Arr_number, 0)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  26. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  27. EndScriptD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  28. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  29. 'a,b,c,d 传入范围四个坐标参数D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  30. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  31. 'arr 传入数字多点字符串特征的数组参数D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  32. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  33. 'n 是表示每个字符的间距超过多少像素则中间以竖线隔开。例子123|456,0表示无需判断。D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  34. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  35. Function GetNumber(a, b, c, d, arr, n)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  36. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  37. GetNumber = - 1D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  38. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  39. Dim i, temp_number_a, temp_number_c, xy, temp_number, temp_Fm, temp_txt, s, temp_arr, temp_n, temp_xD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  40. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  41. temp_number_a = a : temp_txt = - 1 : s = - 1D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  42. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  43. DoD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  44. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  45. temp_number = - 1 : temp_number_c = cD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  46. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  47. For i = 0 To UBound(arr)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  48. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  49. temp_Fm = Plugin.Color.FindMutiColorEx(temp_number_a, b, c, d, arr(i)(0), arr(i)(1), 0.9, 0)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  50. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  51. If temp_Fm <> "-1|-1" ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  52. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  53. xy = Split(temp_Fm, "|")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  54. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  55. If temp_number = - 1 or Clng(xy(0)) < temp_number_c ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  56. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  57. temp_number = i : temp_number_c = Clng(xy(0))D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  58. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  59. End IfD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  60. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  61. End IfD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  62. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  63. NextD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  64. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  65. If temp_number = - 1 ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  66. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  67. If n > 0 and s > - 1 ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  68. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  69. GetNumber = Mid(GetNumber, 1, s) & "|" & Mid(GetNumber, s + 1, Len(GetNumber) - s)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  70. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  71. End IfD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  72. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  73. Exit FunctionD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  74. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  75. End IfD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  76. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  77. temp_arr = Split(arr(temp_number)(1), ",")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  78. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  79. temp_x = 0D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  80. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  81. For i = 0 To UBound(temp_arr)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  82. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  83. temp_n = Int(Split(temp_arr(i), "|")(0))D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  84. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  85. If temp_n > temp_x ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  86. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  87. temp_x = temp_nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  88. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  89. End IfD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  90. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  91. NextD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  92. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  93. temp_number_a = temp_number_c + temp_xD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  94. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  95. If n > 0 ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  96. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  97. If temp_txt = - 1 ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  98. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  99. temp_txt = temp_number_aD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  100. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  101. ElseD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  102. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  103. If temp_number_a - temp_txt > n Then s = Len(GetNumber)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  104. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  105. temp_txt = temp_number_aD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  106. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  107. End IfD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  108. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  109. End IfD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  110. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  111. If GetNumber = - 1 ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  112. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  113. GetNumber = temp_numberD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  114. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  115. ElseD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  116. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  117. GetNumber = GetNumber * 10 + temp_numberD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  118. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  119. End IfD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  120. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  121. LoopD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  122. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
  123. End FunctionD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
  124. D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#nD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n D¢Eü¡2©\à+bbs.anjian.comöGbeD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n |iG#n
复制代码
D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

附件:您需要登录才可以下载或查看附件。没有帐号? 注册
最后编辑专员小兔 最后编辑于 2016-01-07 17:20:55
本主题由 超级版主 瑞祥幽冥狼 于 2022/3/27 17:35:49 执行 审核帖子 操作
Don't frown。
2#

D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

3#

2222222222222222D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

4#

回复 1楼专员小兔的帖子D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
源码怎么不全呢D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

5#

好东西,标记一下,学习学习D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

6#

没看明白~D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

7#

看不明!D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

8#

可以,学习一下D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

9#

D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

10#

偶也表示没有看明白D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

11#

新手看不懂D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

12#

认真学D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

13#

问下同时有两个子程序,我先调用第一个,当判断满足条件必须马上调用第二个子程序时,就会调用第二个子程序,但是第一个子程序要也要立刻停止,该怎么写呢?D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

14#

结构太繁琐看不懂。IF语句循环嵌套太复杂,咋没有注释D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

15#

temp_Fm = Plugin.Color.FindMutiColorEx(temp_number_a, b, c, d, arr(i)(0), arr(i)(1), 0.9, 0)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
一次性找两个颜色数组a(i)0和a(i)1的特征码,并把第一个找到的对应颜色坐标返回作为数组FmD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
If temp_Fm <> "-1|-1" ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
xy = Split(temp_Fm, "|")D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
只要颜色坐标存在(-1代表不存在)将坐标数组Fm(比如(x|y))的字符串进行找分隔符“|”剪切D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

16#

If temp_number = - 1 or Clng(xy(0)) < temp_number_c ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
当临时数不存在(就是没找到)或者D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
数组xy(0)的值就是找的对应第一个颜色特征码的横坐标的值,它小于临时数c就在找图范围,感觉多余D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

17#

If temp_number = - 1 or Clng(xy(0)) < temp_number_c ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
当临时数不存在(就是没找到)或者D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
数组xy(0)的值就是找的对应第一个颜色特征码的横坐标的值,它小于临时数c就在找图范围,感觉多余数组D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
temp_number = i : temp_number_c = Clng(xy(0))D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
给临时数赋值颜色特征码数组的下标,同时临时数c(找图右边界)赋值颜色特征码横坐标D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

18#

NextD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
If temp_number = - 1 ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
If n > 0 and s > - 1 ThenD¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
GetNumber = Mid(GetNumber, 1, s) & "|" & Mid(GetNumber, s + 1, Len(GetNumber) - s)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n
这里NEXT承接for循环找图返回坐标数组Fm(x|y)D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

19#

大家好!!D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

Discuz!代码 效果
粗体文字 Abc 粗体文字 Abc
斜体文字 Abc 斜体文字 Abc
下划线文字 Abc 下划线文字 Abc
红颜色 红颜色

QQ814567029


字体为仿宋 字体为仿宋

内容居中


蜀门脚本
http://blog.sina.com.cn/s/blog_b2f9058d0102x04j.html http://blog.sina.com.cn/s/blog_b2f9058d0102x04j.html(超级链接)
20#

过来学习 过来学习D¢Eü¡2©\à+bbs.anjian.comöGbe |iG#n

发新话题 回复该主题