2021-02-20 18:00:34 -05:00
|
|
|
( hello world )
|
|
|
|
|
|
2021-03-01 12:38:54 -05:00
|
|
|
&Console { pad 8 char 1 byte 1 short 2 }
|
2021-02-20 18:00:34 -05:00
|
|
|
|
|
|
|
|
|0100 @RESET
|
|
|
|
|
|
2021-03-01 12:38:54 -05:00
|
|
|
,text1 ,print-label JSR
|
|
|
|
|
,text2 ,print-label JSR
|
|
|
|
|
#ab =dev/console.byte
|
|
|
|
|
#cdef =dev/console.short
|
2021-02-20 18:00:34 -05:00
|
|
|
|
|
|
|
|
BRK
|
|
|
|
|
|
2021-02-23 16:49:36 -05:00
|
|
|
@print-label ( text )
|
2021-02-21 19:52:51 -05:00
|
|
|
|
2021-03-01 14:18:11 -05:00
|
|
|
@print-label-loop
|
2021-03-01 11:55:16 -05:00
|
|
|
DUP2 LDR =dev/console.char ( write pointer value to console )
|
2021-02-20 18:00:34 -05:00
|
|
|
#0001 ADD2 ( increment string pointer )
|
2021-03-01 14:18:11 -05:00
|
|
|
DUP2 LDR #00 NEQ ,print-label-loop ROT JMP? POP2 ( while *ptr!=0 goto loop )
|
2021-02-23 16:49:36 -05:00
|
|
|
POP2
|
2021-03-01 11:55:16 -05:00
|
|
|
|
2021-02-23 16:49:36 -05:00
|
|
|
RTS
|
2021-02-20 18:00:34 -05:00
|
|
|
|
2021-03-05 16:58:43 -05:00
|
|
|
@text1 [ Hello 20 World 0a00 ] ( store text with a linebreak and null byte )
|
|
|
|
|
@text2 [ Welcome 20 to 20 UxnVM 0a00 ]
|
2021-02-20 18:00:34 -05:00
|
|
|
|
|
|
|
|
|c000 @FRAME
|
|
|
|
|
|d000 @ERROR
|
|
|
|
|
|
2021-02-26 17:36:48 -05:00
|
|
|
|FF00 ;dev/console Console
|
|
|
|
|
|
2021-02-28 14:41:28 -05:00
|
|
|
|FFF0 .RESET .FRAME .ERROR ( vectors )
|
2021-02-28 23:52:41 -05:00
|
|
|
|FFF8 [ 13fd 1ef3 1bf2 ] ( palette )
|
