commit 8845a326d89c64100858b7f8ab44efb1a7134c0a
parent bceed46348f10ea05567268683e10551cf2e3c27
Author: neauoire <aliceffekt@gmail.com>
Date: Thu, 13 May 2021 08:47:18 -0700
Fixed hello world
Diffstat:
2 files changed, 14 insertions(+), 22 deletions(-)
diff --git a/README.md b/README.md
@@ -34,19 +34,15 @@ Read more in the [Uxambly Guide](https://wiki.xxiivv.com/site/uxambly.html).
|0100 ( -> )
- ;hello-word ,print JSR
-
-BRK
+ ,hello-word
-@print ( addr* -- )
-
&loop
- ( send ) DUP2 LDA .Console/char DEO
- ( incr ) #0001 ADD2
- ( loop ) DUP2 LDA #00 NEQ ,&loop JCN
- POP2
-
-RTN
+ ( send ) LDRk .Console/char DEO
+ ( incr ) #01 ADD
+ ( loop ) DUP ,&loop JCN
+ POP
+
+BRK
@hello-word "hello 20 "World!
```
diff --git a/projects/examples/devices/console.usm b/projects/examples/devices/console.usm
@@ -10,18 +10,14 @@
|0100 ( -> )
- ,hello-word ,print JSR
-
-BRK
+ ,hello-word
-@print ( addr* -- )
-
&loop
- ( send ) LDAk .Console/char DEO
- ( incr ) #0001 ADD2
- ( loop ) LDAk ,&loop JCN
- POP2
-
-RTN
+ ( send ) LDRk .Console/char DEO
+ ( incr ) #01 ADD
+ ( loop ) DUP ,&loop JCN
+ POP
+
+BRK
@hello-word "hello 20 "World!
\ No newline at end of file