my %lookup = {
    ##           0     1     2       3     4      5     6     7
    red =>   [ 0b00, 0b10, 0b01*,  0b00, 0b00,  0b00, 0b00, 0b00, ],
    green => [ 0b00, 0b00, 0b10*,  0b01, 0b00,  0b00, 0b00, 0b00, ],
    blue =>  [ 0b00, 0b00, 0b00,   0b10, 0b01*, 0b00, 0b00, 0b00, ],
};