org #A500
;decompiler la palette
ld a,&A410
CALL &BC0E
;decompiler l'image
ld hl,&C000 ; debut de la zone ram video du cpc
ld de,&4000 ; zone ram ou est charge le fichier compacte
loc_0005: ld a, (de)
cp &1
jr z, loc_0016
cp &4D
jr z, loc_0025
loc_000E: ld (hl), a
inc hl
inc de
call sub_0034
jr loc_0005
loc_0016: inc de
ld a, (de)
ld b, a
inc de
ld a, (de)
loc_001B: ld (hl), a
inc hl
call sub_0034
djnz loc_001B
inc de
jr loc_0005
loc_0025: inc de
ld a, (de)
dec de
cp &4A
ld a, (de)
jr nz, loc_000E
inc de
inc de
inc de
inc de
inc de
jr loc_0005
sub_0034: ld c, a
ld a, h
or l
jr z, loc_003B
ld a, c
ret
loc_003B: pop hl
ret