1 MEMORY &3FFF:PRINT"COMPACTEUR-2L":FOR a=0 TO 82:POKE &A500+a,VAL("&"+MID$("FE032008DD7E043291A51803FE02C0626BE501300009227AA52176A5EDB03A060021D4B7FE80200321D9B1012200EDB02100C00E0146237CB5282978BE20040C20F30DCD48A518EBEB3A91A5B8280A793D280D",2*a+1,2))
2 POKE &A553+a,VAL("&"+MID$("3D20034818053A91A5772371237023EBC9CD48A5EBD1ED52EBDD6603DD6E02732372C93A060021004011D4B7FE80200311D9B1012200EDB01100C07E23FEE928040601180546234E237912137AB3C810F818E8",2*a+1,2)):NEXT:SAVE"ZIP2L",b,&A500,&A6:PRINT"ZIP2L.BIN OK"