（XD::COLOR:LONG->RGB）长整数颜色转换成RGB

Lispboy · 发表于 2016-11-26 20:12:26

您需要登录才可以下载或查看，没有账号？立即注册

×

本帖最后由 Lispboy 于 2016-11-26 20:14 编辑

(defun XD::COLOR:LONG->RGB (Val)
  (list (lsh Val -16) (lsh (lsh Val 16) -24) (lsh (lsh Val 24) -24))
)

(XD::COLOR:LONG->RGB 1262316)
(19 66 236)

qqqincccken · 发表于 2016-11-27 00:40:15

謝謝提供,有空試試!!!!!!!

yjch · 发表于 2016-11-29 08:02:49

谢谢Lispboy。好好学习天天向上

账号		自动登录	找回密码
密码			立即注册

[其他] （XD::COLOR:LONG->RGB）长整数颜色转换成RGB