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