|0100
    LIT2r 0000 main POP2r BRK

@msg 6e 75 71 6e 65 48 20 27 75 27 3f 00

@main ( -- )
    OVR2r LIT2r 0002 SUB2r 
	;msg STH2kr STA2
	STH2kr LDA2 str/<println> 

    &return
       POP2r JMP2r

@str/<print> ( str* -- )
	LDAk DUP ?{ POP POP2 JMP2r }
	#18 DEO
	INC2 !/<print>

@str/<println> ( str* -- )
	str/<print>	#0a #18 DEO