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

子程序名	返回值类型	公开	备注
取色差	文本型		返回十六进制色差，如：“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	特殊功能支持库