0
0
Fork 0
mirror of https://git.sr.ht/~rabbits/uxn synced 2024-11-19 04:15:10 +00:00
uxn/projects/examples/devices/console.tal
2021-08-10 19:36:07 +01:00

20 lines
No EOL
276 B
Tal

( dev/console )
|00 @System $e &debug
|10 @Console $8 &write
( init )
|0100 ( -> )
;hello-word
&while
( send ) LDAk .Console/write DEO
( incr ) #0001 ADD2
( loop ) LDAk ,&while JCN
POP2
( show debugger ) #01 .System/debug DEO
BRK
@hello-word "Hello 20 "World!