WIDTH 16 COLOR 0 PRINT "EXAMPLE" FOR X=0 TO 24 FOR Y=0 TO 14 BGPUT 0,X,Y,CHKCHR(X,Y) NEXT NEXT