COMPACTADATVCOMPACTA$$$ORY h-1:LOAD "!compacta.dat",h 8 POKE h+1,! ! >:^#V# #go DMq#p= as far as we are aware, is the best on the marke@@@@@@@`x~~x`3c3????000``0<|gc` ?33???33067pAII6$$#gMy34xxxxxx1;99880x{7|xp8xxx0?s>p܌ |xp`8pp8p88p??????>><8<<|xp8x?acf?08888acccc>`cccc?8scC>cccca?ffgg`````??cc?>cc?ppptxp8p`@p8 @`p88p0ppac~<?pgoy?p0?cc?cg=?``x8xp```?ccc``ccc``?`c{;```px}x88??``?cc>?``?cc<>cc{{9pxx````88ppx||xxx~~``acg~|xx08<p0 ?? ?cpp08x8880p880?fvv066777777 x8`0000p???88pp88668xؘ?}}}}}? ?ccp0 8hȘ ` AII6` H#GMy3HH*U*U*U*U*TTTT?ab??@XpXXXX7ollm5`ذ`XXggf880Ff6pacca````Gf6???@@8xx7ff7?cc????0008<77777767706gg77778xxswFvsq@wwCpwwGp 0???0???0ppssssspp8888888887vfFpx|ogc`pp8xؘ8837737777773773xxؘ6fg7p7NN7````7ff7:>607``7???"">@HXXpXXp??333?000=gccaXXX?ccc?x}}x@fw7x8p8 88}ogff`666>> <000!+C~#+++6!",:_2]!@6 #!\pOyC0P&233*|!@:\_ (E :^2]>80 :_2]2`> > L (w:\<2\!]87:` 7!a*:\G!@( ~#L4> L> LFx#~L#!h*2m>2m4!o* !a(!v*!@[}:]G~!DO >  2 88 88 > = :(  N:(9:( (=2:y˿L## y?0673ppp  8pp88000 `lll|8Ac7/vKI ,*H:/hz,}HJIKILӴ8HHIL#MH,8 888#T&*k.Y4k7Y: >[AD GM]b`c,gijImkkmml8 !ì0w#Si!i[i~͕#z 2 a$="?#8,chr$(2":b$=")"+CHR$(13) 4 KEY 0,a$+"12);":KEY 10,a$+"44);":KEY 3,a$+"16"+b$:KEY 9,a$+"46"+b$ 6 SYMBOL AFTER 256:h=HIMEM:h=h-5119:MEMORY h-1:LOAD "!compacta.dat",h 8 POKE h+1,h-256*INT(h/256):POKE h+2,INT(h/256):CALL h:NEW 7fFG`p7Gf6XXp