From a1f077401be1a873257ec3885fcd47ebb1c89262 Mon Sep 17 00:00:00 2001 From: David Schmenk Date: Thu, 23 Apr 2026 13:42:03 -0700 Subject: [PATCH] Support mouse button1 --- images/apple/PLEIADES-2.21.po | Bin 33553920 -> 33553920 bytes src/inc/mouse.plh | 24 ++++++++++++++---------- src/libsrc/apple/mouse.pla | 4 ++-- 3 files changed, 16 insertions(+), 12 deletions(-) diff --git a/images/apple/PLEIADES-2.21.po b/images/apple/PLEIADES-2.21.po index ecbc5aab3320363c6aeabdcbcfe83b31bd7930e4..e6f31bbbcd9d39776d07785dadb20d0ecc60b6d6 100644 GIT binary patch delta 2132 zcmZwHd6d^v7{~Fx%`cLfYDlHfG@5ABOcN4C8GALQNw$n+UnNE<#Bl71*PGx9+Q zGiihtjZkFGo{Y8ZBx{zE_vHACd(P{g=iKMs=bn4cJ59}W zg1oHio(+aIsTg07bgW*{Y+R#cTXpX?jZ3%hsUA4KIHPGgqh8&ChV|Ch+a6R`O`6@R zWlpc0c0Ka5au_2E30XwZeDQ=aLw`aPG)tvgJgsFK5Upxq-ZcyrbMu-brpG?<{A^S#o2!iQH7qmUoeN zm7B@C$<5^!a!Yx4xs}{n-b3C~-b-#H=g4j4TzPM~ot!7Pm-mtPl{?5CHcq1;{GUp_!SQ0^fgB=?jLmJgA8$-U)6<-_DYa$osyxkx@jK2knPK3YCT zK2|{~xTbLAO&gfr1wJBp`lA6_Fdd)zV79<&qmo7_ZZ`eAo zbV^cLTbQI2QxsDbH!5yY+^m?UxJ5BtajRm6BCWVhal7IU#Z1L4#hr@TiaClhMY*Cv zahGDQ;%lisRJ^5lTk($KUBz0(dx~|6_Z78@4-_9NK2m(F_(bukV!dL6;xonPiZ2vjD!x*D zt@uXqt>QbyM#cAvO^P2BKPrAw{H*vz@vCC9;y1a8$ozMt7BNJI@j3#J`Z0v$v(G0txIa;74c1J6;#va%cd!Y?-&=$Ga8|{#X z_Sgseq60dj6FQ>{_Cr_Xqaaxx-I6(rnk^|x)mxpSbLIWp!t%0es=5{?gXUKyHQkb= za$O;h<#$c1?T-C%01iYC9E6@Y7>A%2dgD+WhCb+v!%>7Ia3qex(KrUj;yCm}e+)n| z24WD7$6%CT2u{FIoQRWfGETv%7>3hOiqkP1XJ7=*#925S=ipqNhx2g(F2qF`iBTAh zi*X6YU@R`hWw;zy;7afzYOlgLT#fOVfQgud$+!mB;yMV|;|5H@RNRQ0a5JXi7EH&j zn1M8I!|k{OGcgNyVm9WW4CSc6U6_lzVcdgzaUbU4emsB&F&_`%VLXCLRAB)g#X?l$ zF)YI4cmhviF_vH{mf)P9o|PRKEQ|g2p{7Ue2VqhfY0zbzQC9G3SZ+Je2ed}5#M7Ie!!3T2|wc( Y{EE%^4Zq_L{E02tiofW_+mhVB0nG8-IRF3v delta 4038 zcmY+{cU078)(7wqaji53q{+-MFa-vX0YV31DAET3m0kvzp$#y7o+-a+T&f_9SWr

o&8F;b;%+vZY~So=Yqn%J?|t9@-gCa6d+tBax#v0OK7Ty6Z@%@h zp=NO)Klg&?5zhllFfc!J|jMfE2(y5Yo2?$@#Z z6nUKDxVfhW=)#LDv!|3EZuS?m4hqx*=!-zt0QCgA7U*|?t^>Lr=mwx0fo=l28K@Uf zZ=gOveS!J`-2!wgP=BBSKm&np0~!Q07-$I4P@rKzw*w6a$^yy;$^jYylnXQxXcSN$ zP(DxrP$AH0pfNy2Kx2W%0gVT`184$JG0;SyNkEfC0-6mp z2k1_qxj^%PN`U4AEdW{wvrDbOmQyMa~%tpQpKbPv$I zK=%Qy16mKX0ca!8CZNqgTY$C#Z3Eg4R0gyIXeZDvpmLxJpxr=wfc66I1KJN%33LGH zAkZP8Dxhkh8lYOBI-q)>2B1cu1gHt98K?!Q6(|GL2GkDJ0n`c91#}oF03A6`N1rjB z@`O%JOusW)H<2(nEYgf5SZA_3O;K_yug@7Hw?_8b1--WD4rA1yU97Su>uniYTbkJ^ z8PJKxVCR96LW?ffsFCz2vP|0IA$j_QrSQab3Fr#k4yoH!s!?P%)+Fze#AT!ic|3Me zj<{}jYFTl7TC$*Mr>Kdk&1~46QC5_+dsq6PtjyHE+c8vg(9(2rxb5P!VqvV^IaoVq zX?VI!P7d#0oN8J>UOcG0LG5%# zd3I*t=xEP8wA+=H$6ZbB)u|cD;Z}9Av2Uk!P~y-@4E-s`rGq9m8P{eXWERplMabppKI4k z7+wCPy@;7)a_1*Yz#us`S!^1}tf~+Yb>@^aclmVHTQ`~>ueN;rcK6deZBO59`QV{q z`K0v9sWQ7hrK>Rp%mvluTv=1RMwwb)6Ep5eH*3U3O;U4RY_(KaS}2m1CbPnPVxvPO zJGtti)cSp~p&^?>L%l>XK0R$hZI5u;mUM=h$(eJ-Ke|!z(fxXhN+7EbZ{EW$D+sJC z4lI^zk+()wm2T^iMRhcCa?<^FNrJl?lB)_h9d)raC7hIm&D!2nR`|xq2%qrnn^@tS zqPSiHp07ygA14YF^8MmP{%Og9=`RIIvcqyRLb6hVOY(SL-k$#c>$U}M2n<-iJ&f7J zi}V)oyaWOt4re2qy(yHvksZB-9lw>mV{2sEwphvbopt;+OID9Fe_*^=M)K;FS+(-C z7DcwCTqMqkNG@X4v?r8Eg@whuE?H7%VoKpYOU2 z>(}^f_T1v@858AQksn!>&yr*YCCB;XrUn&c1Q%w8l;wsuR7Pt%Qr^5c^!{t6XRm1A zdb#h(s`AlF?}KZK+m~A1P$1nEQj^c_C>0qR(u{4H^Y)5c=ekcb2TD#)7tOf}TlNO6 zoN2vxb?E+8_2R+$yNima%UvH{?|QZ@zq{D}&MJB5mhI-*=6jbr?k)9Rn%jNnV%OpE zVrg|~Ref-IT|i~imVMnp_5Fc+x_#^V{d$=2;(c30vEDJftz5QO6xW*<<;7udUL`*k*p*_l(el}aie5u< zQtr0Orl|3S(q3IQU+kS(5GqRX6()JJL>r>SUJ;^Ap&T!7+#|oW-kV?a@>+x0?6oGC zwV5sOV@3P2V*J=5oEH!o?Jr6QDXbRmKax6pFk$pi^2Fhck+~$>bewg+$TgcZ$sElw zPbL^AV)bJp$4t_YBT79i>@`OWI`~Q(uiwH~7$aL$tPUebY3B_&`I=$DfGwie!fsIq zH>!g7^#{rHku5{)esf&AhAY$ZT23fRE`mg{$oRK}#fK91)qv;|7=rwUgg(DhfYzG@_1Jr=K>NKg*P^f`o@u^svev1uyNFuB7xxkED+qh-cLR(FEcy~8paZT%ZAdiQ(^}-wj5%%8l{;!LvKewF zNCoJnE=_^HJG-+kWr7sWL&-r`xk{F;R}`vcMLi8!`mUl&huWazzcY-)*hD09?Q$?toCk6N$Rd!7KrR8f4CD%st3Z~3ECaa)iNoYasss@=qZD0`hMl-vId!kpBYtcAR)j5fAhtT7x{%TJ#;X4y{KU&_=WgZAMq5e5sF1| zC?4%V2_A0{vB$Ah|1XbvzVO)d|Nj~8EXOB$R9#y7B+9H8^`aBUOp=9(DNxXHp)ReQ7+0u5|ob$P$4QpyHGJIL8Yh+m7@w&iKM6s?MBt82GycHXfN7_ z>QFsuK#iygHKP{PirP>+lA#XNiMo&+DNr}+LA|IC^&=%3K!a!qsgN3JkQV8X9vP4k z;XXV!Av3ZdD`Joh*^vV|kqZqYKqF`rjiGTgfhN&@G=-+o0W^bVksBREbLbE{jEq4VehT0|GoC3G2GL08cdT1MB<%jh~3kAM{_3rRU#zMEnn+W|tfQ diff --git a/src/inc/mouse.plh b/src/inc/mouse.plh index defda2c..0df8f2f 100644 --- a/src/inc/mouse.plh +++ b/src/inc/mouse.plh @@ -2,19 +2,23 @@ import mouse // // Status bits // - const BUTTON_DOWN = $80 - const BUTTON_LAST_DOWN = $40 - const MOUSE_MOVED = $20 - const VBL_INT = $08 - const BUTTON_INT = $04 - const MOVE_INT = $02 + const BUTTON_DOWN = $80 + const BUTTON0_DOWN = $80 + const BUTTON_LAST_DOWN = $40 + const BUTTON0_LAST_DOWN = $40 + const MOUSE_MOVED = $20 + const BUTTON1_DOWN = $10 + const VBL_INT = $08 + const BUTTON_INT = $04 + const MOVE_INT = $02 + const BUTTON1_LAST_DOWN = $01 // // Mode bits // - const VBL_INT_ENABLE = $08 - const BUTTON_INT_ENABLE= $04 - const MOVE_INT_ENABLE = $02 - const MOUSE_ENABLE = $01 + const VBL_INT_ENABLE = $08 + const BUTTON_INT_ENABLE = $04 + const MOVE_INT_ENABLE = $02 + const MOUSE_ENABLE = $01 // // Mouse API // diff --git a/src/libsrc/apple/mouse.pla b/src/libsrc/apple/mouse.pla index fe53908..2d906c3 100644 --- a/src/libsrc/apple/mouse.pla +++ b/src/libsrc/apple/mouse.pla @@ -31,7 +31,7 @@ end asm vblEvent INC VBLINT ; INC VBL EVENT + TYA ; MOUSE MOVE OR BUTTON ACTIVE - AND #$82 + AND #$92 end asm bttnEvent EOR LASTBTTN @@ -40,7 +40,7 @@ end asm mouseEvent INC MOUINT ; INC MOUSE EVENT + TYA - AND #$80 + AND #$90 end asm updateBttn STA LASTBTTN