![]() |
BCX Console Demonstration Program S82.bas |
' ------------------------------------------------------------
' Very simple example for sending data to the default printer
' using BCX - The BASIC TO C Translator
' ------------------------------------------------------------
DIM
iOPEN
"PRN"
FOR
OUTPUT
AS
fp1FOR
i=
1
TO
60
"This is line number"
, iNEXT
iCHR$
(
12
)
'seemingly universal Form Feed Character
CLOSE
fp1