trs80: add missing blk

2020-05-02 08:27:24 -04:00 · 2020-05-02 08:27:24 -04:00 · 443ed754e9
commit 443ed754e9
parent 3a27479f2b
1 changed files with 9 additions and 0 deletions
--- a/blk/497
+++ b/blk/497
@ -0,0 +1,9 @@
+CODE @PUT ( c a -- f )
+    DE POPqq,
+    BC POPqq,
+    chkPS,
+    A 0x04 LDrn, ( @PUT )
+    0x28 RSTn,
+    PUSHZ,
+;CODE
+