uxn/etc/hello.tal

25 lines
224 B
Tal

( init )
|0100 @program
#1234 SWP
#010e DEO
#010f DEO
BRK
#1234 #5678 SWP2
BRK
;hello-word
&while
( send ) LDAk #18 DEO
( loop ) INC2 LDAk ,&while JCN
POP2
#010f DEO
BRK
@hello-word "Hello 20 "World! 00