请问下十六的颜色如何转换

一C

请教下大佬~  十六到十后 是 16765702，尝试效果。结果在E里面是 变成了 青色 ；根据网页转换后是黄色





到E后结果是:




补充内容 (2024-3-18 18:22):
想尝试直接用 长整数进行实现一键变色，不用 RGB预制颜色

风度猫

网页_取十进制颜色值 (“FFD306”)

凌哥

RGB BGR 颠倒一下就好了

houtian

16765702 到字节集是 {6,211,255,0}, 前三个成员是BGR

whb666

  

子程序名	返回值类型	公开	备 注
rgba	整数型
参数名	类 型	参考	可空	数组	备 注
红
绿
蓝
透明度

变量名	类 型	静态	数组	备 注
cr	字节集

cr ＝ 取空白字节集 (4)
cr [3] ＝ 红
cr [2] ＝ 绿
cr [1] ＝ 蓝
cr [4] ＝ 透明度
返回 (取字节集数据 (cr, #整数型, ))

子程序名	返回值类型	公开	备 注
rgba10	整数型
参数名	类 型	参考	可空	数组	备 注
颜色值	整数型
透明度	整数型

变量名	类 型	静态	数组	备 注
cr	字节集
tmp	整数型

cr ＝ 到字节集 (颜色值)
tmp ＝ cr [1]
cr [1] ＝ cr [3]
cr [3] ＝ tmp
cr [4] ＝ 透明度
返回 (取字节集数据 (cr, #整数型, ))

子程序名	返回值类型	公开	备 注
rgba16	整数型		将十六进制颜色转换到RGBA颜色，支持3位缩写颜色，如#333
参数名	类 型	参考	可空	数组	备 注
颜色值	文本型				#号会自动过滤
透明度	整数型

变量名	类 型	静态	数组	备 注
十六进制颜色	文本型
文本长度	整数型
i	整数型
文本	文本型
rgb	整数型
cr	字节集
tmp	整数型

十六进制颜色 ＝ 颜色值
十六进制颜色 ＝ 子文本替换 (十六进制颜色, “#”, “”, , , 真)
十六进制颜色 ＝ 删全部空 (十六进制颜色)
文本长度 ＝ 取文本长度 (十六进制颜色)
如果真 (文本长度 ＝ 3)
十六进制颜色 ＝ 取重复文本 (2, 取文本中间 (十六进制颜色, 1, 1)) ＋ 取重复文本 (2, 取文本中间 (十六进制颜色, 2, 1)) ＋ 取重复文本 (2, 取文本中间 (十六进制颜色, 3, 1))
文本长度 ＝ 取文本长度 (十六进制颜色)

' 过滤掉多余的，只计算前面六位16进制颜色
计次循环首 (6, i)
文本 ＝ 到小写 (取文本中间 (十六进制颜色, i, 1))
判断 (文本 ＝ “a”)
文本 ＝ “10”
判断 (文本 ＝ “b”)
文本 ＝ “11”
判断 (文本 ＝ “c”)
文本 ＝ “12”
判断 (文本 ＝ “d”)
文本 ＝ “13”
判断 (文本 ＝ “e”)
文本 ＝ “14”
判断 (文本 ＝ “f”)
文本 ＝ “15”



判断 (i ＝ 1)
rgb ＝ 到整数 (文本)
rgb ＝ rgb × 16 ＋ 到整数 (文本)

计次循环尾 ()
cr ＝ 到字节集 (rgb)
tmp ＝ cr [1]
cr [1] ＝ cr [3]
cr [3] ＝ tmp
cr [4] ＝ 透明度
返回 (取字节集数据 (cr, #整数型, ))

.版本 2<br /> <br /> .子程序 rgba, 整数型<br /> .参数 红<br /> .参数 绿<br /> .参数 蓝<br /> .参数 透明度<br /> .局部变量 cr, 字节集<br /> <br /> cr ＝ 取空白字节集 (4)<br /> cr [3] ＝ 红<br /> cr [2] ＝ 绿<br /> cr [1] ＝ 蓝<br /> cr [4] ＝ 透明度<br /> 返回 (取字节集数据 (cr, #整数型, ))<br /> <br /> .子程序 rgba10, 整数型<br /> .参数 颜色值, 整数型<br /> .参数 透明度, 整数型<br /> .局部变量 cr, 字节集<br /> .局部变量 tmp, 整数型<br /> <br /> cr ＝ 到字节集 (颜色值)<br /> tmp ＝ cr [1]<br /> cr [1] ＝ cr [3]<br /> cr [3] ＝ tmp<br /> cr [4] ＝ 透明度<br /> 返回 (取字节集数据 (cr, #整数型, ))<br /> <br /> .子程序 rgba16, 整数型, , 将十六进制颜色转换到RGBA颜色，支持3位缩写颜色，如#333<br /> .参数 颜色值, 文本型, , #号会自动过滤<br /> .参数 透明度, 整数型<br /> .局部变量 十六进制颜色, 文本型<br /> .局部变量 文本长度, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 文本, 文本型<br /> .局部变量 rgb, 整数型<br /> .局部变量 cr, 字节集<br /> .局部变量 tmp, 整数型<br /> <br /> 十六进制颜色 ＝ 颜色值<br /> <br /> 十六进制颜色 ＝ 子文本替换 (十六进制颜色, “#”, “”, , , 真)<br /> 十六进制颜色 ＝ 删全部空 (十六进制颜色)<br /> <br /> 文本长度 ＝ 取文本长度 (十六进制颜色)<br /> .如果真 (文本长度 ＝ 3)<br />     十六进制颜色 ＝ 取重复文本 (2, 取文本中间 (十六进制颜色, 1, 1)) ＋ 取重复文本 (2, 取文本中间 (十六进制颜色, 2, 1)) ＋ 取重复文本 (2, 取文本中间 (十六进制颜色, 3, 1))<br />     文本长度 ＝ 取文本长度 (十六进制颜色)<br /> .如果真结束<br /> <br /> <br /> ' 过滤掉多余的，只计算前面六位16进制颜色<br /> .计次循环首 (6, i)<br /> <br />     文本 ＝ 到小写 (取文本中间 (十六进制颜色, i, 1))<br />     .判断开始 (文本 ＝ “a”)<br />         文本 ＝ “10”<br />     .判断 (文本 ＝ “b”)<br />         文本 ＝ “11”<br />     .判断 (文本 ＝ “c”)<br />         文本 ＝ “12”<br />     .判断 (文本 ＝ “d”)<br />         文本 ＝ “13”<br />     .判断 (文本 ＝ “e”)<br />         文本 ＝ “14”<br />     .判断 (文本 ＝ “f”)<br />         文本 ＝ “15”<br />     .默认<br /> <br />     .判断结束<br /> <br />     .判断开始 (i ＝ 1)<br />         rgb ＝ 到整数 (文本)<br />     .默认<br />         rgb ＝ rgb × 16 ＋ 到整数 (文本)<br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> <br /> cr ＝ 到字节集 (rgb)<br /> <br /> tmp ＝ cr [1]<br /> cr [1] ＝ cr [3]<br /> cr [3] ＝ tmp<br /> cr [4] ＝ 透明度<br /> 返回 (取字节集数据 (cr, #整数型, ))