1' Print character set
10 FOR Y=2 TO 7
20 D=Y*16: E=D+15
30 AT 32: FOR C=D TO E
40 PUT C: NEXT C
50 PRINT: NEXT Y