screen imrpvoements

2020-09-29 00:22:42 +02:00
parent d19c4e5bea
commit 532df6eb04
8 changed files with 145 additions and 15 deletions
@@ -78,6 +78,8 @@ fn main() {
    (
        (main
            (sc-init 640 480)
+            (sc-opt 1 0) ; auto blit
+            (sc-opt 2 60) ; frame rate

            (ld r0 39) ; x
            (ld r1 0) ; y
@@ -88,9 +90,10 @@ fn main() {
            (ld r5 0xffffff)

            (:loop)
-            (add r5 0x123456)
+            (add r5 0x010001)
            (and r5 0xffffff)
            (sc-px r0 r1 r5)
+            (sc-blit 0)
            (add r0 r2)
            (add r1 r3)
            (cmp r0 639 (eq? (ld r2 -1)))