mirror of
https://git.sr.ht/~rabbits/uxn
synced 2024-11-23 14:25:10 +00:00
23 lines
No EOL
251 B
Text
23 lines
No EOL
251 B
Text
( dev/console )
|
|
|
|
%RTN { JMP2r }
|
|
|
|
( devices )
|
|
|
|
|10 @Console [ &pad $8 &char $1 ]
|
|
|
|
( init )
|
|
|
|
|0100 ( -> )
|
|
|
|
,hello-word
|
|
|
|
&loop
|
|
( send ) LDRk .Console/char DEO
|
|
( incr ) #01 ADD
|
|
( loop ) DUP ,&loop JCN
|
|
POP
|
|
|
|
BRK
|
|
|
|
@hello-word "hello 20 "World! |