关于识图、找色中的颜色偏色的个人理解，附源码（代码主要是大漠）

searchjack · 发表于 2017-11-12 13:34:50

本帖最后由 searchjack 于 2017-11-12 13:35 编辑

子程序名	返回值类型	公开	备注
取色差	文本型		返回十六进制色差，如：“002201”
参数名	类型	参考	可空	数组	备注
c1	文本型
c2	文本型

变量名	类型	静态	数组	备注
ca1	文本型		0	颜色数组
ca2	文本型		0	颜色数组
r1	长整数型			红1
g1	长整数型			绿1
b1	长整数型			蓝1
r2	长整数型			红2
g2	长整数型			绿2
b2	长整数型			蓝2

r1 ＝进制_十六到十 (取文本中间 (c1, 1, 2))
g1 ＝进制_十六到十 (取文本中间 (c1, 3, 2))
b1 ＝进制_十六到十 (取文本中间 (c1, 5, 2))
r2 ＝进制_十六到十 (取文本中间 (c2, 1, 2))
g2 ＝进制_十六到十 (取文本中间 (c2, 3, 2))
b2 ＝进制_十六到十 (取文本中间 (c2, 5, 2))
返回 (取差值 (r1, r2) ＋取差值 (g1, g2) ＋取差值 (b1, b2))

子程序名	返回值类型	公开	备注
取差值	文本型		取两个十进制数的差，返回：十六进制文本
参数名	类型	参考	可空	数组	备注
p1	整数型
p2	整数型

变量名	类型	静态	数组	备注
色值	文本型

色值＝到文本 (进制_十到十六 (取绝对值 (p1 － p2), ))

如果真 (取文本长度 (色值) ＝ 2)

返回 (色值)

如果真 (取文本长度 (色值) ＝ 1)

返回 (“0” ＋色值)

如果真 (取文本长度 (色值) ＝ 0)

返回 (“00”)

调试输出 (色值)
信息框 (“两个十进制数：取差值：结果为(十六进制): ” ＋色值, 0, , )
返回 (“”)

i支持库列表	支持库注释
spec	特殊功能支持库

' 使用示例' 模块只使用了精易的进制转换函数
c1 ＝ “00ba0c”
c2 ＝ “00d00d”
调试输出 (取色差 (c1, c2))

i支持库列表	支持库注释
spec	特殊功能支持库

看了很多关于偏色的定义，说明，以上代码是个人的理解（主要是针对大漠写的），下面是使用实例。
相对的要科学一点，识别准确性还是跟颜色的选取有关系。

aosheng · 发表于 2024-1-23 20:30:57

66666666666666666666666

qinwyin · 发表于 2023-5-8 20:06:10

超级模块的找字怎么弄？

fyzmkl · 发表于 2023-1-7 00:19:10

大佬厉害！

534945698 · 发表于 2022-8-7 12:00:29

AAAAAAAAAAAAAAAAAAAAAAAAAAA

888z · 发表于 2022-2-10 11:36:11

下载下来学习一下，试试能不能应用

78522394 · 发表于 2021-10-9 04:34:11

感谢感谢感谢

ptjyyi · 发表于 2021-4-4 22:44:02

谢谢提供

o飞越o · 发表于 2020-10-24 22:28:55

122运行代码就行了就几行代码

searchjack · 发表于 2017-11-23 19:00:06

2278218063 发表于 2017-11-18 17:22
有使用的视屏教程吗？》

运行代码就行了就几行代码

		自动登录	找回密码
密码			注册

[易源码分享] 关于识图、找色中的颜色偏色的个人理解，附源码（代码主要是大漠）

评分