Metropoli BBS
VIEWER: fast.bas MODE: TEXT (ASCII)
'Run this program with and without the
'following line to see the difference
SHELL "CLS"

CLS
DIM Array$(72)
FOR X = 1 TO 72
  Array$(X) = STRING$(79, X + 32)
NEXT
FOR X = 1 TO 72
  PRINT Array$(X);
NEXT
[ RETURN TO DIRECTORY ]