17 lines
229 B
Tal
17 lines
229 B
Tal
|
( usage: uxncli console.write.rom )
|
||
|
|
||
|
|10 @Console &vector $2 &read $1 &pad $4 &type $1 &write $1 &error $1
|
||
|
|
||
|
|0100
|
||
|
|
||
|
@on-reset ( -> )
|
||
|
;text
|
||
|
&while ( -- )
|
||
|
LDAk .Console/write DEO
|
||
|
INC2 LDAk ?&while
|
||
|
POP2 BRK
|
||
|
|
||
|
@text
|
||
|
"Hello $1
|
||
|
|