10 REM-S3,T          Starting  Steps              ++/++/++
   20 REM... Adds The  Printing  Option 
   30 PRINT : SET OF=#0: CURSOR 15,0: GOTO 160
   40 PRINT "PAUSE   ";: INPUT (1,0)Z9$
   50 PRINT "\K": CURSOR 15,000: RETURN 
   60 PRINT : PRINT : PRINT : RETURN 
   70 REM... *    .    +    *    $    *    +    .    * ...REM 
   80 PRINT TAB(11);"*";TAB(45);"*"
   90 PRINT "         * * * * * * * * * * * * * * * * * * * *"
  100 PRINT TAB(11);"*";TAB(45);"*": RETURN 
  110 INPUT (1,0)"*** 0=DISPLAY   1=PRINTER ***",P9$
  120 IF P9$="0" THEN 50
  130 IF P9$<>" " THEN 140 ELSE  GOSUB 50: END 
  140 IF P9$="1" THEN 150 ELSE  GOSUB 50: GOTO 110
  150 SET OF="L": RETURN 
  160 REM... * DIMENSION   STATEMENT
  170 REM... * START OF  THE PROGRAM