Just a fun little bit of code

Give it a spin in BAM or in your goto BASIC implementation:

(from page 422, Handbook of BASIC: for the IBM PC, XT, AT, PS/2, and compatibles)

SCREEN 0
PRINT "ABCDEFG"
FOR J = 0 TO 7
LOCATE 2 + J, 1
FOR K = 0 TO 55
IF POINT(K,J) = 0 THEN PRINT " "; ELSE PRINT "*";
NEXT K
PRINT
NEXT J