Farben nach R,G,B umwandeln in 4-stell. hex-code?

[Moppi]

Demnach müsste es so sein, von R,G,B Einzelwerten zu 16Bit-Werten:

rgb =  ((rot/8)*2048) | ((grün/4)*32) | (blau/8);

und zurück müsste dann so sein:

rot = (rgb/2048)*8; 
grün = (rgb&2016)/8;
blau = (rgb&31)*8;