mkchunk
        ld de,chpalette
        ld b,#c0
mkchunkHSB
        inc b
        ld hl,chpalette
        ld c,#c0
mkchunkLSB
        push de ;left chunk
        ;push hl ;right chunk
        ld a,(de)
        xor (hl)
        and #f0
        xor (hl)
        ld (bc),a
        inc de
        inc hl
        dec b
        ld a,(de)
        xor (hl)
        and #f0
        xor (hl)
        ld (bc),a
        inc de
        inc hl
        inc c
        ld a,(de)
        xor (hl)
        and #f0
        xor (hl)
        ld (bc),a
        inc de
        inc hl
        inc b
        ld a,(de)
        xor (hl)
        and #f0
        xor (hl)
        ld (bc),a
        inc hl ;pop hl ;right chunk (LSB, т.к. c2p зеркально)
        pop de ;left chunk (HSB, т.к. c2p зеркально)
        inc c ;уже есть c+1
        jr nz,mkchunkLSB
        inc de
        inc de
        inc de
        inc de
        inc b ;уже есть b+1
        jr nz,mkchunkHSB
        ret
        
chpalette
           ;b  g  r  0
        db c0,c0,c0,c0
        db c4,c4,c4,c4
        db c1,c0,c4,c0
        db c0,c0,c0,c1
        db c4,c2,c4,c2
        db c2,c0,c2,c3
        db c1,c0,c0,c2
        db c4,c0,c0,c1
        ;        
        db c4,c1,c1,c0
        db c4,c3,c2,c1
        db c3,c3,c3,c2
        db c1,c4,c0,c0
        db c2,c4,c2,c0
        db c0,c4,c0,c2
        db c1,c1,c1,c1
        db c0,c1,c1,c0
        ;        
        db c1,c4,c4,c2
        db c2,c3,c3,c4
        db c1,c3,c3,c4
        db c3,c4,c4,c3
        db c3,c4,c4,c2
        db c2,c3,c4,c1
        db c2,c3,c4,c3
        db c3,c4,c4,c1
        ;        
        db c1,c2,c4,c1
        db c1,c2,c3,c3
        db c3,c3,c4,c4
        db c3,c3,c3,c4
        db c0,c1,c4,c2
        db c0,c1,c4,c0
        db c1,c1,c2,c1;1,0,0,4
        db c0,c0,c4,c0        
