Emacsでカラーコード文字列をrgba文字列に変換
16進数のカラーコードからrgba形式に変換するスクリプトです。opacityの指定はとりあえずせずに100%になるようにしました。CSSで16進数から10進数に直すのが面倒臭いときに使えます。
(defun colorcode2rgba (code)
(interactive "sColor Code: #")
(let* ((conv (lambda (s e) (string-to-number (substring code s e) 16)))
(r (funcall conv 0 2))
(g (funcall conv 2 4))
(b (funcall conv 4 6)))
(insert (format "rgba(%d, %d, %d, 1)" r g b))))
使い方。
M-x colorcode2rgba⏎
Color Code: #FFAAAA⏎
上記で、rgba(255, 170, 170, 1)がバッファに出力されます。