RosettaCodeData/Task/Hello-world-Line-printer/BASIC/hello-world-line-printer-2.basic
2017-09-25 22:28:19 +02:00

8 lines
180 B
Text

' Hello, printer
READ msg$
DATA "Hello World!\n"
' Assume printer is on /dev/lp0
OPEN "/dev/lp0" FOR DEVICE AS printer
PUTBYTE msg$ TO printer SIZE LEN(msg$)
CLOSE DEVICE printer