Fix readport again

2026-01-22 18:15:59 +00:00 · 2025-10-30 14:37:38 -07:00
parent 997ab30f44
commit 1647a06a21
4 changed files with 1 additions and 1 deletions
--- a/images/apple/PLEIADES-2.20-SYS.po
+++ b/images/apple/PLEIADES-2.20-SYS.po
--- a/images/apple/PLEIADES-2.20.po
+++ b/images/apple/PLEIADES-2.20.po
--- a/images/apple/PLFORTH.po
+++ b/images/apple/PLFORTH.po
--- a/src/libsrc/apple/portio.pla
+++ b/src/libsrc/apple/portio.pla
@@ -68,7 +68,7 @@ export asm portRead#1
 +       BIT     FLAG3
        BPL     +
        ORA     #$08
-+       STA     ESTKL,Y
+       STA     ESTKL,X
        RTS
 end
 //export def digitalWrite(pin, val)#0