32500 DIM GI$(192)¢32502 FOR B=1 TO 61:READ N:POKE 1535+B,N:NEXT B:DM=PEEK(88)+PEEK(89)*256:DM=DM+40*191¢32510 LPRINT CHR$(27);"A";CHR$(8):FOR X=DM TO DM+39¢32520 GI$=CHR$(0):GI$(192)=CHR$(0):GI$(2)=GI$¢32540 W=USR(1536,X,ADR(GI$)):LPRINT CHR$(27);"K";CHR$(192);CHR$(0);GI$¢32550 NEXT X¢32560 DATA 104,104,141,21,6,104,141,20,6,104,141,27,6,104,141,26,6,160,193,173,255,255,136,240,35,141,255,255,238¢32570 DATA 26,6,240,21,173,20,6,56,233,40,141,20,6,144,4,24,76,19,6,206,21,6,76,19,6,238,27,6,76,33,6,96¢
