get draw-h-line working

2025-06-29 13:44:44 +02:00 · 2025-06-29 13:44:44 +02:00 · d4999d2dec
commit d4999d2dec
parent d44f6ede1d
2 changed files with 57 additions and 34 deletions
--- a/playground.tal
+++ b/playground.tal
@ -0,0 +1,34 @@
+|00 @System &vector $2 &expansion $2 &wst $1 &rst $1 &metadata $2 &r $2 &g $2 &b $2 &debug $1 &state $1
+|10 @Console &vector $2 &read $1 &pad $4 &type $1 &write $1 &error $1
+
+
+|0100
+@on-reset
+    #02 #04 SUB
+    ( mem-test )
+	BRK
+
+@mem-test ( a b c -- x)
+    !{
+    &a $1
+    &b $1
+    &c $1
+    }
+    ,/a STR
+    ,/b STR
+    ,/c STR
+
+    ,/a LDR
+    ,/b LDR
+    ADD
+    ,/c LDR
+    ADD ( 06 )
+
+    STH
+    #00 STH
+    SWP2r
+   	JMP2r
+
+
+
+    ( !{ &a $1 } )