60 GRAPHICS = CHR$(27)+CHR$(75)
70 DIM LOG0$(4)
80 WIDTH "LPT1:",255
90' READ DATA
100 FOR ROW = 1 TO 4
110 FOR COLUMN = 1 TO 100
120 READ P
130 LOGO$(ROW) = LOGO$(ROW) + CHR$(P) 140 NEXT COLUMN
150 NEXT ROW
160' PRINT LOGO
170LPRINT LINE.8$;
180FOR ROW = 1 TO 4
190LPRINT GRAPHIC$;CHR$(l00);CHR$(0);
200LPRINT LOGO$(ROW)
210NEXT ROW
220LPRINT LINE.12$
230'ROW 1
240 DATA 0,0,0,0,1,3,7,7,7,15
250 DATA 14,14,14,14,14,7,7,3,3,15
260 DATA 15,15,0,0,0,0,0,0,0,0
270 DATA 0,1,3,3,7,7,15,14,14,14
280 DATA 14,15,7,7,7,3,0,0,0,0
290 DATA 8,8,0,8,8,0,8,8,8,8
300DATA 0,0,0,0,0,0,0,0,0,0
310DATA 0,0,0,0,1,3,7,7,7,15
320DATA 14,14,14,14,14,7,7,3,3,15
330DATA ~5,15,0,0,0,0,0,0,0,0
340'ROW 2
350DATA 0,0,60,255,255,255,255,255,143,15
360DATA 7,7,7,7,3,3,3,131,193,241
370 DATA 240,240,0,0,0,0,0,0,0,~
380 DATA 121,253,253,255,255,255,143,7,7,7
390 DATA 31,253,252,248,248,240,192,0,7,15
400 DATA 31,31,15,7,3,0,0,0,0,0
410DATA 0,0,0,0,0,0,~,0,0,0
420 DATA 0,0,60,255,255,255,255,255,143,15
430 DATA 7,7,7,7,3,3,3,131,193,241
440DATA 240,240,0,0,0,0,0,0,0,0
450'ROW 3
460DATA 0,31,31,3,129,128,192,192,192,192
470DATA 192,224,224,224,224,240,255,255,255,255
480DATA 255,127,0,0,0,0,63,127,255,255
490DATA 255,255,193,128,128,128,128,192,224,240
109
