--- a/FixedPalette.st	Fri Aug 25 12:38:00 2017 +0200
+++ b/FixedPalette.st	Fri Aug 25 12:38:12 2017 +0200
@@ -130,7 +130,7 @@
 
     blueMask == 0 ifTrue:[^ 0]. "/ no blue component
     
-    b := ((index-1 bitShift:blueShift negated) bitAnd:blueMask).
+    b := ((index-1 rightShift:blueShift) bitAnd:blueMask).
     bb := (b * 255.0 / (blueMask)) rounded.
     ^ bb
 
@@ -142,6 +142,8 @@
      (FixedPalette redShift:11 redMask:16r1F greenShift:5 greenMask:16r3F blueShift:0 blueMask:16r1F) blueByteAt:0+1  
      (FixedPalette redShift:11 redMask:16r1F greenShift:5 greenMask:16r3F blueShift:0 blueMask:16r1F) blueByteAt:16r7FFF+1  
     "
+
+    "Modified: / 25-08-2017 / 12:22:30 / cg"
 !
 
 greenByteAt:index
@@ -152,7 +154,7 @@
 
     greenMask == 0 ifTrue:[^ 0]. "/ no green component
 
-    g := ((index-1 bitShift:greenShift negated) bitAnd:greenMask).
+    g := ((index-1 rightShift:greenShift) bitAnd:greenMask).
     gb := (g * 255.0 / (greenMask)) rounded.
     ^ gb
 
@@ -164,6 +166,8 @@
      (FixedPalette redShift:11 redMask:16r1F greenShift:5 greenMask:16r3F blueShift:0 blueMask:16r1F) greenByteAt:0+1  
      (FixedPalette redShift:11 redMask:16r1F greenShift:5 greenMask:16r3F blueShift:0 blueMask:16r1F) greenByteAt:16r7FFF+1  
     "
+
+    "Modified: / 25-08-2017 / 12:22:42 / cg"
 !
 
 isFixedPalette
@@ -178,7 +182,7 @@
 
     redMask == 0 ifTrue:[^ 0]. "/ no red component
 
-    r := ((index-1 bitShift:redShift negated) bitAnd:redMask).
+    r := ((index-1 rightShift:redShift) bitAnd:redMask).
     rb := (r * 255.0 / (redMask)) rounded.
     ^ rb
 
@@ -190,6 +194,8 @@
      (FixedPalette redShift:11 redMask:16r1F greenShift:5 greenMask:16r3F blueShift:0 blueMask:16r1F) redByteAt:0+1  
      (FixedPalette redShift:11 redMask:16r1F greenShift:5 greenMask:16r3F blueShift:0 blueMask:16r1F) redByteAt:16r7FFF+1  
     "
+
+    "Modified: / 25-08-2017 / 12:22:50 / cg"
 !
 
 size