0
0
Fork 0
mirror of https://git.sr.ht/~rabbits/uxn synced 2024-11-08 15:25:05 +00:00
uxn/examples/hello.usm

31 lines
379 B
Text
Raw Normal View History

2021-02-06 18:39:13 +00:00
( hello world )
;iterator
|0100 @RESET
2021-02-09 18:58:06 +00:00
@word1 "hello_world ( len: 0x0b )
2021-02-06 18:39:13 +00:00
@loop
2021-02-10 19:59:26 +00:00
IOW ( write to device#0 )
2021-02-08 04:49:00 +00:00
,incr JSR ( increment itr )
,word1 ,strlen JSR ( get strlen )
NEQ ,loop ROT JSR? ( loop != strlen )
2021-02-06 18:39:13 +00:00
BRK
@strlen
2021-02-07 20:13:38 +00:00
,0001 ADD^ LDR
2021-02-08 04:49:00 +00:00
RTS
2021-02-06 18:39:13 +00:00
@incr
,iterator LDR
,01 ADD
,iterator STR
,iterator LDR
2021-02-08 04:49:00 +00:00
RTS
2021-02-06 18:39:13 +00:00
|c000 @FRAME BRK
|d000 @ERROR BRK
|FFFA .RESET .FRAME .ERROR