use PAL_COLOR_SIZE

engine/color.asm

@@ -497,7 +497,7 @@ LoadHLPaletteIntoDE:
 	push af
 	ld a, BANK(wOBPals1)
 	ld [rSVBK], a
-	ld c, PALETTE_SIZE
+	ld c, 1 palettes
 .loop
 	ld a, [hli]
 	ld [de], a

home/palettes.asm

@@ -253,7 +253,7 @@ CopyPals:: ; d50
 
 ; get pal color
 	ld a, b
-	and %11 ; color
+	maskbits 1 << PAL_COLOR_SIZE
 ; 2 bytes per color
 	add a
 	ld l, a
@@ -271,8 +271,9 @@ CopyPals:: ; d50
 	ld [hl], d
 	inc hl
 ; next pal color
+rept PAL_COLOR_SIZE
 	srl b
-	srl b
+endr
 ; source
 	pop de
 ; done pal?