From 1647a06a21ced74c8bf8aead998d568614f3afb6 Mon Sep 17 00:00:00 2001 From: David Schmenk Date: Thu, 30 Oct 2025 14:37:38 -0700 Subject: [PATCH] Fix readport again --- images/apple/PLEIADES-2.20-SYS.po | Bin 143360 -> 143360 bytes images/apple/PLEIADES-2.20.po | Bin 33553920 -> 33553920 bytes images/apple/PLFORTH.po | Bin 143360 -> 143360 bytes src/libsrc/apple/portio.pla | 2 +- 4 files changed, 1 insertion(+), 1 deletion(-) diff --git a/images/apple/PLEIADES-2.20-SYS.po b/images/apple/PLEIADES-2.20-SYS.po index edebb2abdf8ad071b602d57823a074d0a3460d84..6ce3908b44176636ed2eecf5f0da6b483b358142 100644 GIT binary patch delta 139 zcmV;60CfL=;0S==2(Wbo10)UtvjGB#0kQ@e#t$R`0A8&m4hR6_003UCB(o^Y*Z~W- z00LzI0F4j>0JD<|&O`#0z>`wWX$_4K00N>A0Fj#j3X!gp$j&elgG|5EKv~9&(hS_(#h0C u2wxD>)Y8wwMF@!y!Op?V&&Sfm!9)m-5X8mI!C45S5R(A{+=9@i&;ejaDmV@R diff --git a/images/apple/PLEIADES-2.20.po b/images/apple/PLEIADES-2.20.po index f006f4e9d79b9a8ea6e8ae4d017ec44b58893f08..db736c75c891f4d8f6b1882da210aa7ccaa43ec3 100644 GIT binary patch delta 2151 zcmWm2WmFUj7=+QWI&2v_v{0J&}RPNMs^16IqC?L^dKjk%P!dqBv24C`pteN)u%WAEGQ#jwnx5ASx1-h{{A2qAF31@Fl7fHHex-EuuD2hp0=` zBkB_kh=xQXqA}q|G$EQ2&4}hi3!){_ifB!=A=(n{2!EnI(ShhlbRs$vU5Ktk0MU&A z(Vgf)^dx!_y@@_VU!ot;pBO+4BnA%pv9y^N9Jx0wRQ1NGu{26HADt#4=(zv4U7h ztRg~*)x;WNEwPSRPi!DI5}Sz4#1>*J5k_nywi7#uoy0C;H?fDsTG_1ZRt_ttmCMR)<+1Ww`KWI3co~SPxh=!t(Xe|6h6VX&O6U{{n(NeS$ ztwkHrR}3iSc5Bm?$O*ipgS%m@1};>0*Wm5;MgtF(Ku6W7HJaZ}t9x5XWCSKJf##RKtBJQ9z^6Y*3$6VJs9@lw1Juf-ejR=gAM l#Ru_Gd=j6<7x7hm6W_%T@l*T~zr`Q%*LgJT%Ri@|$Nv}M6dC{k delta 2152 zcmWm2WmFUj7=+Edt%xjh`aLc9Wes(LIu<_Pf*@adK)$nA&|>UIP#aU=-d8WI`c zQz)Om`(kuV?6sIPv3{<0?#r<;(Z~Hf{5G{#TL~EiA(UxdOv?n?c9f?jvXQB%cKy)QQ zbR)VGJ&2w}FQPZmhv-Z6Bl;5qh=If)VlXj;7)lHyh7%)*k;EusG%(Ku6W7HJaZ}t9x5XWCSKJf##RKtBJQ9z^6Y*3$6VJs9@lw1Juf-ejR=gAM l#Ru_Gd=j6<7x7hm6W_%T@l*T~zr`Q%*LgJT%RgsB*Z;0S==2(ZEg0<9&p#02sA4%0A8&nv&8;99SgSr0%ZUI zjSvF>vzH4T0Yn0oz?V`S0cj155C8(A5CD;z01A<=m&hCeFf33I(9hD;*V4(!bJ#(5W&vD%+JTt#lb`fjS$4e%)wa*q7ah-0^Nol0j3@T67rokYybcN delta 139 zcmV;60CfL=;0S==2(ZEg0y7=6#02sA4qYwa*oB#@uub0Oh0Wd645YW%k)YsC<)I|ti t5YyDs&%#9ri4eig!OYLc(#63<2#yfM#mvE32%`{_0Rr5H9s#Bv0un`PG|d12 diff --git a/src/libsrc/apple/portio.pla b/src/libsrc/apple/portio.pla index ef76d98..49fa771 100644 --- 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