uxn/projects/examples/devices/console.usm

23 lines
251 B
Plaintext

( 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!