BCX Console Demonstration Program s82.bas

 ' ------------------------------------------------------------ 
 ' Very simple example for sending data to the default printer 
 ' using BCX - The BASIC TO C Translator 
 ' ------------------------------------------------------------ 
 
 DIM i
 
 OPEN "PRN" FOR OUTPUT AS FP1
 
 FOR i = 1 TO 60
   PRINT #FP1,"This is line number" , i
 NEXT i
 
 PRINT #FP1, CHR$(12)   'seemingly universal Form Feed Character 
 
 CLOSE FP1