fixed inkey bytes

This commit is contained in:
Luxferre
2022-07-29 09:07:05 +03:00
parent 91919c03e8
commit 6cd8c459bb
3 changed files with 4 additions and 3 deletions
+1 -1
View File
@@ -41,7 +41,7 @@
( jump to label or subroutine if a particular key is pressed )
( label* keymask* -- )
%JMPKEY { DBGSHORT INKEY AND2 SWP2 JCN2 }
%JMPKEY { INKEY AND2 SWP2 JCN2 }
%JSRKEY { INKEY AND2 SWP2 JSR2 }
( misc macros )
+2 -1
View File
@@ -9,10 +9,11 @@
BRK
@on-frame
DUP2 PXL
,&adv KP-A JMPKEY
BRK
&adv
INC DUP2 PXL
INC
BRK
@putc