dos33fsprogs/basic/appleiibot/split.bas

3 lines
243 B
QBasic

1FORI=0TO115:POKE900+I,4*PEEK(2125+I)-204+(PEEK(2241+I/3)-35)/4^(I-INT(I/3)*3):NEXT
2&"/@qP:U];LdZ>O=]3;=oe7f9kg<Ga[3W2]?8Hn[3]V[Z9AjZ3Z8[C9Ak]9W<q]9c4q>Hc>Gc;j3>Hc>Gc;j3>@amP>[:egrUgmEd2\3QF[2egrUgqKFQ3SQ#W8#+FF+3S+$F<0C8S(/%$/%#/FO-$3*K-$#/