'
' This simple basic program will print hello world to
' serial port 0
'
' Compile using the following command lines
'
' 912B32
' sbasic hello12.bas /c8000 /v0800 /s0c00 /m6812 > hello12.asm
'
' 912d60
' sbasic hello12.bas /c1000 /v0400 /s0800 /m6812 > hello12.asm
'
' 812A4
' sbasic hello12.bas /cF000 /v0800 /s0c00 /m6812 > hello12.asm
'
'
' as12 hello12.asm > hello12.lst
'
include "regs12.lib"

main:
        ' Turn off the COP
        pokeb copctl,peekb(copctl) AND $f8

        ' Enable serial port
        poke  sc0bdh, 26        ' Set for 19200 baud
				' (9600 on the 8mhz D60)
        pokeb   sc0cr2,$0c      ' Enable transceiver

        print
	print "Hello World!"
	do
	loop