Мир искусства полон цвета, но мир сети полнее, чем мир искусства разных цветов и его визуализации. Вот почему нам нужно знать, как преобразовать один тип цветового формата в другой.

Задача самоочевидна:

Напишите программу / функцию, которая преобразует данный код HEX ( #00ff0080например) в RGBA (например rgba(0, 255, 0, 0.5)).

Правила:

• Внешние библиотеки / встроенные модули для преобразования HEX в RGBA запрещены. Тем не менее, jQuery и синтаксические заменители, как это приемлемо.
• Применяются стандартные правила ввода / вывода.
• Формат альфа может быть между (1 == 100%) или другим (100 == 100%), что не очень важно.
• Вывод является гибким , если он возвращает 4 преобразованных значения (как String, Array, List, ваш выбор).
• Вы можете принять вход без #начала. Таким образом, вы можете взять вход или как #RRGGBBAAили RRGGBBAA. Вы можете предположить, что шестнадцатеричный код (исключая #) всегда будет иметь длину 8 символов.
• Вы должны разделить все значения на 255, включая альфа. Минимальная десятичная точность (для альфы будет 2 десятичных знака).

Тестовые случаи

Input:  00ff0080
Output: 0, 255, 0, 0.5

счет

code-golf , выигрывает код с наименьшим количеством байтов.

JavaScript (ES6), 73 54 50 байт

(Сохранено несколько байтов благодаря @LeakyNun, отредактированному вызову и @CraigAyre.)

s=>s.match(/../g).map((c,i)=>('0x'+c)/(i-3?1:255))

let f=

s=>s.match(/../g).map((c,i)=>('0x'+c)/(i-3?1:255))

console.log(f('00ff0080'));

Japt , 13 байт

Принимает ввод в виде строки, без ведущего #. Выводит значение rgba в виде массива.

ò ®nG
pUo /#ÿ

Попробуй это

объяснение

Мы неявно принимаем строку как ввод через переменную U.
"00ff0080"

ò

Разбейте строку на массив элементов длиной 2.
["00","ff","00","80"]

®nG

Сопоставьте массив и преобразуйте каждый элемент из базовой строки 16 в десятичное число. Из-за следующей новой строки этот массив неявно назначается переменной U.
[0,255,0,128]

Uo

Вставьте последний элемент из массива.
128

/#ÿ

Разделите это на 255.
0.5019607843137255

p

Вставьте результат обратно, а Uзатем неявно выведите окончательный массив.
[0,255,0,0.5019607843137255]

PHP , 63 байта

Вывод в виде массива

$h=array_map(hexdec,str_split($argn,2));$h[3]/=255;print_r($h);

Попробуйте онлайн!

PHP , 80 байт

Вывод в виде значения rgba, Ввод без #

$h=array_map(hexdec,str_split($argn,2));$h[3]/=255;echo"rgba(",join(",",$h),")";

Попробуйте онлайн!

PHP , 88 байт

Вывести как значение rgba, ввести с #

for(;$i<7;)$h[]=hexdec($argn[++$i].$argn[++$i]);$h[3]/=255;echo"rgba(",join(",",$h),")";

Попробуйте онлайн!

C (gcc) , 139 байтов

C(x){x=x>57?x-87:x-48;}
#define Z C(h[i])*16+C(h[++i]))
i;f(char*h){printf("rgba(");for(i=0;i<6;i++)printf("%i, ",Z;printf("%g)",(Z/256.);}

Попробуйте онлайн!

Моя другая попытка достигла 145 байтов . Я не очень большой игрок в гольф, так что это может быть короче.

05AB1E , 9 байт

2ôH`255/)

Попробуйте онлайн!

По крайней мере, у нас есть сторонники, такие как Эминья, которые часто используют здравый смысл ... (это то, что вы получаете за гольф в течение всего дня, а затем вы начинаете создавать такие вещи, как 2ô16öRć255/¸ìRಠ_ಠ)

Желе , 15 14 байт

Øhi$€’s2ḅ⁴÷4¦⁹

Попробуйте онлайн!

Как это работает

Øhi$€’s2ḅ⁴÷4¦⁹ - main link, takes input without # and all lowercase
   $€             - to each input character:
  i               - return its 1-based index in
Øh                - the string "0123456789abcdef"
     ’            - decrement (otherwise 0 is mapped to 1 and f to 16)
      s2          - split the characters into groups of two
        ḅ⁴        - convert from base 16 to decimal
           4¦     - on the fourth element:
          ÷       - divide by
             ⁹    - 256

-1 байт благодаря @EricTheOutgolfer

PHP, 72 байта

Версия вывода массива Jörg непобедима; но есть и другие варианты:

<?=($a=hexdec($argn))>>24,",",255&$a>>16,",",255&$a>>8,",",(255&$a)>256;

Беги как труба с -F. #не имеет значения, простой вывод CSV

или 73 байта (запустить с -R):

for($a=hexdec($argn);$i++<4;)echo(255&$a>>32-8*$i)/($i<4?:256),","[$i>3];

74 байта с пробелами:

<?=($a=hexdec($argn))>>24,$c=", ",255&$a>>16,$c,255&$a>>8,$c,(255&$a)>256;

не так просто, 81 байт :

rgba(<?=($a=hexdec($argn))>>24,$c=", ",255&$a>>16,$c,255&$a>>8,$c,(255&$a)/256?>)

Stacked , 47 45 41 байт

[2#<$unhexmap(1::256)/', '#`'rgba(@id)'!]

Попробуйте онлайн!

Excel, 99 байт

=HEX2DEC(LEFT(A1,2))&","&HEX2DEC(MID(A1,3,2))&","&HEX2DEC(MID(A1,5,2))&","&HEX2DEC(RIGHT(A1,2))/256

SmileBASIC, 50 байтов

INPUT H$RGBREAD VAL("&H"+H$)OUT R,G,B,A?R,G,B,A/#L

Шестнадцатеричная строка преобразуется в число с помощью VAL (), затем RGBREAD извлекает каждый байт. #L является константой со значением 256.

RGBREAD предназначен для извлечения каналов из цвета ARGB, но на самом деле он просто разбивает 4-байтовое целое число на 4 отдельных байта, поэтому порядок не имеет значения.

Perl 6 , 42 байта

{m:g/../.map({:16(~$_)}) »/«(1,1,1,255)}

Попробуйте онлайн!

JS ES2015, 84 байта

$=>{a=[1,3,5,7].map(b=>eval("0x"+$.substr(b,2)));a[3]=(a[3]/256);return a.join(",")}

это функция. Запустите его, используя

( CODE )("#00ff0080")

Python 3 , 62 байта

lambda h:[int(h[x:x+2],16)for x in(0,2,4)]+[int(h[6:],16)/255]

Попробуйте онлайн!

q / kdb +, 43 байта

Решение:

{(16 sv'(.Q.n,6#.Q.a)?/:2 cut x)%1 1 1 256}

Пример:

q){(16 sv'(.Q.n,6#.Q.a)?/:2 cut x)%1 1 1 256}"00ff0080"
0 255 0 0.5

Объяснение:

{                                         } / anonymous lambda function
                        2 cut x             / split input into 2-char length lists
                     ?/:                    / returns index where (each-right) item is found in 'the list'
        (           )                       / 'the list'
              6#.Q.a                        / Q.a is lowercase alphabet, 6# takes first 6 chars
         .Q.n,                              / Q.n is "012..89", so prepend this onto the "abcdef"                         
  16 sv'                                    / converts each index from base 16 to base 10
 (                            )%1 1 1 256   / divide this output by 1,1,1,256 to get alpha in 0..1 range 

APL (Dyalog) , 24 байта

требует ⎕IO←0 по умолчанию во многих системах. Запрашивает ввод в верхнем регистре без #.

256÷⍨@3⊢16⊥⍉4 2⍴⍞⍳⍨⎕D,⎕A

Попробуйте онлайн!

⎕D,⎕A D igits следует A lphabet

⍞⍳⍨ запросить ввод текста (мнемоника: консоль с кавычками) и найти запросить кавычками индекс каждой буквы в этом

4 2⍴ R- форма в виде четырехрядной двухколоночной матрицы

⍉ транспонировать (потому что базовое преобразование работает по столбцам)

16⊥ оценивать как базу шестнадцать

⊢ yield (служит для разделения 3 и 16)

256÷⍨@3 разделить 4- ^й элемент на 256

Python 2 , 54 байта

lambda h:[int(h[i-2:i],16)/2.**(8&i)for i in(2,4,6,8)]

Попробуйте онлайн!

Ябасич , 96 байт

Еще один основной ответ; Принимает ввод в виде строки и выводит на консоль.

Input""a$
For i=1To 7Step 2
?Dec(Mid$(a$,i,2))/(j+1);
If i=5Then j=255Fi
If i<7Then?", ";Fi
Next

Попробуйте онлайн!

Excel VBA, 90 байт

Функция анонимного непосредственного окна VBE, которая берет входные данные из диапазона [A1]и выводит в непосредственное окно VBE.

For i=1To 7Step 2:[B1]=i:?[Hex2Dec(Mid(A1,B1,2))]/IIf(i=7,256,1)&""+IIf(i<7,", ","");:Next

Vim, 46 байт

:s/../$((16#&)) /g␊iecho ␛$hhi*100/255␛:w !sh␊

Принимает ввод без #и возвращает, печатая на экране.