( hello world )
;iterator
:dev1r FFF0
:dev1w FFF1
|0100 @RESET
"hello
@loop
,dev1w STR
,incr JSU ( call incr )
,05 NEQ ,loop ROT JSC
BRK ( RESET )
@incr
,iterator LDR
,01 ADD
,iterator STR
RTS
|c000 @FRAME BRK
|d000 @ERROR BRK
|FFFA .RESET .FRAME .ERROR