nn xx              ; run of n consecutive identical bytes (2 to 255) or non-identical bytes (1), value xx
00 nn xx xx xx ... ; run of n consecutive non-identical bytes (2 to 255), values xx follow
00 01 xx           ; apply write ptr offset xx 1 to 254 (decode should use abx to apply offset)
00 01 ff xx xx     ; apply write ptr offset xx 1 to 32767      
00 00              ; end of bitplane   

        // nn xx              ; run of n consecutive identical bytes (2 to 254) or non-identical bytes (1), value xx
      // 00 nn xx xx xx ... ; run of n consecutive non-identical bytes (2 to 255), values xx follow
      // ff xx              ; apply write ptr offset xx (1 to 255) (decode should use abx to apply offset)
      // ff 00 xx xx        ; apply write ptr offset xx (1 to 32767)      
      // 00 00              ; end of bitplane   

bits
00000000 -> fin
0nnnnnn0 XX -> répète XX nn+1 fois (1 à 64 inclus)
0nnnnnn1  -> n octets transparents
10nnnnnn XX YY ... -> recopie XX YY ... (nn + 1 octets)
11xxxxxx XX --> saute au dessus des 1 +xxxxxxXX (14 bits = 16384 octets, soit une page RAM)

LOOP
  LDB ,Y+
  BMI  L1xxxx
  BPL  L0xxxx
  RTS
L1xxxx
  LSLB
  BPL  L10xxx
  LDD -1,Y
  LEAY 1,Y <-- beurk lent, mais rare
  LEAY 1,X <-- beurk lent, mais rare
  ANDA #%00111111
  LEAX D,X
  BRA LOOP
L10xxx
  LDA ,Y+
  STA ,X+
  SUBB #2 <-- ben oui on a fait LSL
  BGE  L10xxx
  BRA LOOP
L0xxxx
  LSRB
  BCC L0xxx0
  ABX
  BRA LOOP
L0xxx0
  LDA ,Y+
LOOP2
  STA ,X+
  DECB
  BGE LOOP2
  BRA LOOP

LOOP
  LDA ,Y+
  LSLA
  BCC L0x
  BPL L10x
L11x (skip 14 bits)
  LSLA 
  ASRA     extension de signe
  ASRA     extension de signe
  BEQ INUTILISE
  LDB ,Y+
  LEAX D,X
  BRA LOOP
L10x (recopie)
  LDB ,Y+
  STB ,X+
  SUBA #2
  BCC L10x
  BRA LOOP
L0x
  BEQ FIN
  BMI L01x
SKIP (saute 6 bits)
  LDB -1,Y
  ABX
  BRA LOOP
L01x
  ANDA #%00111111
  BEQ MASK
  LDB ,Y+
REPETE (répète octet)
  STB ,X+
  SUBA #2
  BCC  REPETE
  BRA LOOP
MASK
  LDB ,Y+
  ANDB ,X
  ORB ,Y+
  STB ,X+
  BRA LOOP