2021-04-21 12:09:18 -04:00
|
|
|
( dev/console )
|
2021-02-20 18:00:34 -05:00
|
|
|
|
2021-05-17 18:13:46 -04:00
|
|
|
|10 @Console [ &pad $8 &char ]
|
2021-04-21 08:45:17 -04:00
|
|
|
|
2021-04-21 12:48:04 -04:00
|
|
|
( init )
|
2021-04-21 08:45:17 -04:00
|
|
|
|
2021-04-21 12:48:04 -04:00
|
|
|
|0100 ( -> )
|
2021-02-20 18:00:34 -05:00
|
|
|
|
2021-05-17 18:13:46 -04:00
|
|
|
;hello-word
|
2021-02-20 18:00:34 -05:00
|
|
|
|
2021-04-20 14:32:26 -04:00
|
|
|
&loop
|
2021-05-17 18:13:46 -04:00
|
|
|
( send ) LDAk .Console/char DEO
|
|
|
|
|
( incr ) #0001 ADD2
|
|
|
|
|
( loop ) LDAk ,&loop JCN
|
|
|
|
|
POP2
|
2021-05-13 11:47:18 -04:00
|
|
|
|
|
|
|
|
BRK
|
2021-02-20 18:00:34 -05:00
|
|
|
|
2021-05-17 18:13:46 -04:00
|
|
|
@hello-word "Hello 20 "World!
|
