function main () 
	str hello is $0

	load_heap_immediate "nuqneH 'u'?" -> hello
	call pln hello
	exit 0

function pln (str message is $0) 
	str ts is $1 
	int msg_length is $2 
	str nl is $3 
	int nl_length is $4
	int mode is $5

	load_heap_immediate "/dev/term/0" -> ts # get terminal device
	load_immediate 0 -> mode
	syscall OPEN ts mode -> ts
	strlen message -> msg_length
	syscall WRITE ts message msg_length	
	load_heap_immediate "\n" -> nl
	strlen nl -> nl_length
	syscall WRITE ts nl nl_length
	return