0
0
Fork 0
mirror of https://git.sr.ht/~rabbits/uxn synced 2024-11-27 08:13:01 +00:00
uxn/projects/examples/devices/console.usm
2021-05-17 15:13:46 -07:00

19 lines
No EOL
221 B
Text

( dev/console )
|10 @Console [ &pad $8 &char ]
( init )
|0100 ( -> )
;hello-word
&loop
( send ) LDAk .Console/char DEO
( incr ) #0001 ADD2
( loop ) LDAk ,&loop JCN
POP2
BRK
@hello-word "Hello 20 "World!