JJ Bliss
19 lines
210 B
Tal
19 lines
210 B
Tal
( uxncli hello.rom )
|
|
|
|
|10 @Console/vector $2 &read $5 &type $1 &write $1 &error $1
|
|
|
|
|000
|
|
|
|
|
|
|100
|
|
|
|
@on-reset ( -> )
|
|
;text
|
|
&while ( -- )
|
|
LDAk .Console/write DEO
|
|
INC2 LDAk ?&while
|
|
POP2
|
|
BRK
|
|
|
|
@text "Hello $1
|