uxn/etc/hello.tal

27 lines
262 B
Tal
Raw Normal View History

2023-08-08 22:53:23 -04:00
( init )
2024-03-27 16:18:42 -04:00
%emit ( byte -- ) { #18 DEO }
2024-03-26 16:35:37 -04:00
2023-08-08 22:53:23 -04:00
|0100 @program
#1234 SWP
#010e DEO
#010f DEO
2024-03-26 16:31:11 -04:00
2023-08-08 22:53:23 -04:00
#1234 #5678 SWP2
;hello-word
&while
2024-03-26 16:35:37 -04:00
( send ) LDAk emit
( loop ) INC2 LDAk ?&while
2023-08-08 22:53:23 -04:00
POP2
#010f DEO
2024-03-26 16:41:52 -04:00
BRK
2023-08-08 22:53:23 -04:00
2024-03-26 16:31:11 -04:00
@program/extend BRK
2024-03-27 16:18:42 -04:00
@hello-word "Hello 20 "World? 00