clear
set printer to dump.dmp
set printer on
?
eject
set printer off
set printer to

cPrinter = getprinter()
if !empty(cPrinter)
	set printer to name (cPrinter)
	set printer on
         ???chr(27)+chr(77)+chr(27)+chr(112)+'0'
	? "Hello world online"
	eject
	set printer off
	set printer to
endif