Code reorg

2022-07-30 21:04:16 +03:00
parent c5a76c5a9a
commit 626b31bb4b
2 changed files with 16 additions and 10 deletions
@@ -0,0 +1,29 @@
+( test program to verify the correctness of graphics and input on ESOP )
+
+~esop-lib-macro.tal
+
+|0100
+  ;on-frame SETSCRVEC
+  #10 #12
+BRK
+
+@on-frame
+  ;moveme ;draw-str JSR2
+  NIP #10 SWP ( reset x coordinate )
+  ;&adv KP-A JMPKEY 
+  ;&back KP-B JMPKEY 
+  BRK
+  &adv
+    #fa DBG
+    DEC
+  BRK
+  &back
+    #fb DBG
+    INC
+  BRK
+
+@moveme "MOVE 20 "ME! 00
+
+( include ESOP stdlib routines )
+
+~esop-lib-subs.tal