From cf2cb41deb2c56d3228c7e1994084da928f9d05c Mon Sep 17 00:00:00 2001 From: Bobbi Webber-Manners Date: Fri, 14 Oct 2022 00:47:42 -0400 Subject: [PATCH] Enable Ensoniq if machine is a GS. --- applecorn.po | Bin 819200 -> 819200 bytes applecorn.s | 1 + mainmem.ldr.s | 10 +++++++--- 3 files changed, 8 insertions(+), 3 deletions(-) diff --git a/applecorn.po b/applecorn.po index 7ecfd63ec4263fde921506be79e0238379d8ed6d..ca6f0f252a2633a3b9c7bc5d4ec48e0759f3088f 100644 GIT binary patch delta 5586 zcmaht3se+WmQ`KQG*5w6L|Xjt@Dsrgq9)p7@B?n7MMTtN(=@M}GGk(^W0KiDVU_F- zm6*=VCKk4%=3xd++h}4j7M7XG_=zoT)JP+0yV-Mg$7s}q%$i+sdeoU@FthG`)ijEp zv)iYNdhfn_@4Nr|9+EUolBQ{^6Vk%PT>0dDj+4ITFbp=;Cj7iMfrr-suK+KbC&Ful zHwj)7yvc`a6VRS5Dc&5lu`TaT_@k&$=A~n|qtSy`kk&bd2v!T)U##cmwFJRwl~}sHXLi< z`Bsj%94Q-eDzKG-m&dlu@T1XY0-J4T;sic>WQq9EfYfST4$-thP6)|P`l=r}co)6k zM;3k>ow^5&f?35LG=U%3Z?>1shSPW9PpV62k@tPLF`5~0u!Rgm;Ai@mn*At|M)#m! zj~v2wUi5^l%{rLLYN3$;nqmBpK0pTTo{h5jztX~H@OV4>WYK?WMkV|SI(09~$O-e2 zX}aK>Yskl(ERv6Tc_sN6%tLf#6&;PH?L|iZm_9a!A4D<(JJ@&yKa57^gHv=7_v}T7 z_<|U|4p_ert>uT)t+V17clM#Vd^iTM6rnM6?FZ-IS`G@8606q(NeAM>F;IHG@?k4$u+f`%EhWBzF?2ICg|9Wos*SJ1OYet^F3 z;r9=sUkUvB!_WQ(X*};feCxNUp68d*pZpHx8oy$sZr$sL5B?4<=Z*i(AkW3(VB`^$ z${(VWjv&If(EK@Q7)@DPfQ;DnrqE&TY1kwjI8>r=A)_xf zWQrn%4<-2$lq5eVzagNOMzsIv#1cR~I*I=KQS?-rkp#U0%RMQ;S@B17;4yGrCmnwb z-5)%=#8$Gb#9gwkq^{(xk{u;`OK9nEw3`0v6J&mh+8W-qH8t7-T<~?nu43WlEy>`! z*AXlh!c!vOt4882RFeq3^a;u?fc$2A;D2%XX6E{M5oq4C#gb9_a~#z>+s_>;ly}-X zcT#*D4Oxze{1nMGX^BcJq%Ec{Z6@S>q2hx&z(F1OrFX9SuFYGlQd?`I?K&4t%*yJJ zzVps!H28HQ2~ZtwH`=66RA5z3u+K$(!%)_!_gY^M!Gk+(8(QB9!4p`|EPe-q+&Za~ zwjD>q!319%N8@L85=cz3m%xFy+3`dNeoY^&cHp@Vg_Coba-)e-B#&XEv8>#EiV3|D zMCnU)`abd)?Q)%bTopFDYZTrcIi)>iv&Q&xKx{sw^nIW)$CHaNRWPmTj=#58d9$dfm@u) z0_g_(xTVYN!%3gp;Omh(IS%w#L*#)>fwe?VA@~`WRthQsa8xfan<;j3BvF!N4^d9Z z>)1TxApz9jA=*fV!{-XIyQqG~4c4AMGy(XIn7V61PI zLSj_uI@PLvRCY$NfV8GF0^ro~4DlJmWl@V%q&`dJg+whRaw*&6+;c>mEM2jf6wanD z==C(v?LOdAXTTIO&%?$rrw2!&;q}|>TBgSqmZAdIz0d-dMjo?CDYALWHZAgmrO2SS zqltJ^xi&Mv`8k|dq21fi?!;IEInWEYdNV(Bs)?X6hWG@NyAYSuQ4cH!TmL@dmDpPQb`Y z4~EcyjDGRCxtEw;451ORsEG?8bH2^}nYlEB!o_vOOvkGab?hTsML=ed=+ckLer*N} zF1leb*{Z%kxhttJPolA7 z`|W}Y%j1fzV~Ty*TNtK%iYyt0OUgbf$AuMTIWG8%b6hrv6Ph*}4Xgj5!sZdd)_TUo z(?tXI73eAX%8L=2h2!@0m1s&$^S#g1IEUpM+Eji3bO%oO-t|=Up6%EXcVP>II>@Lx`Bvi$eD~0ZvepL?#fF9X>k1 zHykp=pcIw;cFE)FX%kyR!hw?l%aQ9$wlA1$pY)T>6w`IN!iUR&%@R?DP~uoz8Xzv! zT(FOp%0}ZW0GLutq6@7s?k*xs!rY4PVgeFc)OG=M0${t)qJ{;~tC-M(V^EfTw@VYs zPAn0jj`7UOMmd8t3?-X0N!el-r~xep_FEGxWKh~5XMU(q*AqD;$fpJMB_f{`8zlxBQ$#~vLyWjv8`4Ap3pgCQNeW3?`dZASWLSK1QJLCktBx&6{5F8 zXgVkKc}3w{UnX?VSd>#=NBWwGoUjZEj8N9PRON(dMz7nAuBZ{hBuzlFfSa)Mhf)F$WLFei9GT4i==>9%f(6%a26IhWg$80x8{v4mE(ypns&hP^$j3=sm_x_Llxj3y8_-mOE)#*yUW(F4!<^mVX z;m@im{tRU}`XwG1Bx1VF3CcW~7Z~kx{oJO_P+unDw8->FQ~4F>1$Wh-LNB<>Ji6#E zb7$FII`1izwLG2a`_)6s#09f4<|Yekw?^LpWuBDF8sY*er~iI~JvP?n3SH1veO-Fb z?9uyrfiAYPT>3iBkul5yesI=WAPr=#BZ(3H1$q**r%nZjilt}KwBh}AW+(aW*t{JN z-L5+6?z8&&>*!fDdYX=>y6kxZoR||;r(H^eJTzIAq;41ss!myE-rgs}w=|_4We)Dg zAAh?X52NOGG~`M6I31q$7(T5BCg#V0%V||E%A*(C(Evjyp<8m%%%Q~I1d>nO4krR< zuM$nwc6u!rjZbph;b2x{rzv@8EaGFf8O{?l^4RZBF|hGpt?+{R0YBM?bH_40G|T9s1pBk@59pA3H^5!!=Dmy!GctZ z_t8iPnph7=(-|H^G6Pap3@M!<9mS26c#8v{sl-~PMO5Zl#nvuIbZ|$o%MqRuP3pML zNA5{NLzhFetcBloer^0VP1L!DytJ0AEV;{}Op(8F?D~TPx?XZ{u3^_Vjt=Rr*vg8F zpVpm2Lx*-b0^BW_qaZKr{Klc58M_>mOhjX*byxb*Lwq#(=mP`nX^@OcIsR*9d%N_7 z7@nmW!v#J#yjeus=1j){PH6AUbkIW+QNc^ia07RE=VOaQRGQ&b?$A%=#ftD4tO)Sp zFm`%}x~)74E9!-@8+{zF>j{3_md?%IW;U#Z^*fDYVKTIi-PtX1@dfqtlm)E1e9ftp|?t z7BN=h{?KEEX42ZsY-$cRgEu0^4%kJi7doU{jLZaNj}Y7f*FA~-1hQ51>y8)!jsR;T zJjl88&1&$+e{J4Wt#E8?5#vLv7=8^Lu+nG9y9QULTbrt*gX@EDR);4F)t z#GBH$7SSpmXoe`*x!2JiLqmWCGu_Y4j()50o5RCZj$=AUq5V9F4wXhf>^2#!+q~+G zH5^|ubO)hnRISq@;-FJB+0<8^(d5|qwdqx-Cs%B(b<*|uC^PM*vqv-Cyq*%d7kFT4 zsHImgpy_-G9dr>5!KbVDhv0N}sBq`$>R(9rtk9VK+}1)1DCmCxV$=KiXe4^GI@_KZUco9-^kLC7Z3uGis|oJti2Zn=`%sVVm9#jg zU7Wiv*CKl0&9#b`-%d_wIf6I3dt$>$N8S3w^h%aBnBe{!=QazLH5q;`S2MJT3m;h5 zWVDE|u#2mA@BX4Dx9_Cl?6Kv(G7=wiU#^P_wec~b`Ypco*rM&SQ{Gt9R96!auj?`5 znKZuk+_Ae|K)NB|ary?#?{E`hcy#NF3G$?rrkL4zXN_8$$e+z-Mvi-6;S znYdrUv00r{nHL)YFR5?j?;C|+lnG?aN|yDC*dlUjVW{A~2nUP9E&qlV3m^QDkoDFb K^ue704gU){tO42p delta 5698 zcma(#3vd(XnY&s)q(>xMH&OB@qEQ12(VOf@b*_&LFIyAn4&XuF4 zS8tmb7~-`>W9A3P5FsFVIo4g8qd-7o0WDbKB}$LEU?^~5IC_Jb4RD3AL%8o>SvJtz zT{K$l|M=d||Cc09m87ZKj}p>D1>B;EFL0dnHHTsF;p&9-s}p#5Oz;Tsuz4apN$@1Y zV}>W?;OYdlqapR@Bh@W!IrqZ9)dk1T>6k_|YM_I(&NfA{n%gE95zMvy!A@O`Xe|FT z`in+XT7j$IP~Mdvdz6v#cOIoNz*(_UsI2T=QF>OU)aEIpYG)}^YG*4;Yv(9jZGnPo z=h^Up6UsIDo}k#}`$Exf`GKIEl65xyM!?A>w91Mm@F(bs&1fXQi`H#MR({*T-J8+Y zl(Z7(?u)Y1DJO=qD+A-G_8H2cq8}w%Me`atA=J9XRPS=OHksgdPE3Emlp66RR-g?OK!im5JI$7yqPKW!^sD8_U zV;HSphum<(#p#=JP2in8;qn4d)w~4*8 z=%oOf$)9KA=}9_M%t4O@kTuO(S=}XGb_d#GYfG42?XyvTx@jl+JN^J2u?r2xd~~W| z zZnT0QNN?;$WqgQkdJSb9EdCs&^Sqhfm<@R63lO3;d(b2>N#DZRJqYvP8sH2foepe4 zW0PKEk}oy1p(QP73xAN_Z2`7}4}zcmK8ZKQ=(qd^eJb$p#5`2zK>ZKC`vq#?`4VI0 zAUXgN@kMm|@4#3Mze8#KR|jES#q<9``yWEtrj|k~7o!ohR3R)K9!;+wMlX$f>K-t?a86-SVM*cJg{unxxv;MAQ<`@K zt$C^5UN7658|(ot_)F8a0^#-@$>e(w2^I+9$Kw04%C+n*=<>}Py--Q2!E54NTIxc)J|+AV#j@DAkR6-^IzA_QDu8=fm&~GZLnYG^u(;Ji1e^_UbZwM+k}_UO%{=;fLd3`A^d{bdNg zF1*o+N4fA%j6t~zzv@yr*-Aj~AwsC2?xLAP-&uz+sapSj`G&S7*h7#0z-a zcY4){@o5U1R%X-v!_knMjZQ7I(jJy{0UM6m3%)>=7PFFXuXI!|tPD%h0UPy1T)jw} z5#anB#>LvCn5bI~QS)M=g4KHT=utHVgl^qxNPNFI?h48R=1O0{C=&{zH@JA%1h_5H zD32cwi^-d)dp39F{6o46n4_nZRo`uC-IvOe=KY*B^xXcf!Vnd;u9SIHAz+G{ z0vxm*R#41LloBE(#U$y{vdwGMk3;a4Q$lJf+03afvYA)Q$Yy%)7#g+Y8T;UAi{c9Z zn2GY|K2gG)o*sUpr-hUBLB4)rvp!#ROk3=e5ToM5a5`U1ADyI`A-H5f9i?t*?lOcce?nPlo6ud6l)H6b7yC4rQR?iBZ zVL={Itez7(BSO@yo)uMHp7EIW zs`?%Yr$?tfo$x;*a?yRYlE@40GiNTm&phe4Pv^b_CphgS>i7CH`EO^^n603%mgMWF z%$2fP=bSH%e3sL|N;~U^)4b4*eK+wA`s5_aj8RgSNngk9!iZ%7EnfnV=+D|qGDG+) zG%jYq@72wH3Qc|W8JSdeNod5DMm)GtUD7j-<6dLl`YKkX=DI{K>K(@;Zx2-HG6_J@Gs>>mI{Tiekq zrW1rVWTP1w%bd+%hVhMXAcCJX+;?2On=69cgvh;Z_o|fL65U` z-tF6LoX5tq0^B~AbAR5Zg7!0I^k^83cYHr)3_6AxqauA4w+fI~W4wX5!U4%rr$Nw3 zujimlx*&r3!By26LG$JgFI9OV{95#t>jG4wmr7MZu>EDqUeyGzTwG9!|FP%GQr-=1 z{v8HCIqHQCX#sAgUq#UP8UPx{;24kvfU;shgBZ|Z+)#?wx$x0ayrVjsP5}ae& zcEuHu?u)Ig5c%ncr_tby4i_9zVUB{lu=R?|IHGpY*3)Rr)SIQgK_OmGIsC)~EKO1p z^hdq4y?&c;anda4y~fSF3q)%6WY(Dx#<4!D7UH!F8{9Dc{trADot=v*0X-Eju3tAU!f!!0(iFY^iK)|WM}D+_S- zO|HvbxPxsdx?JUkopoiG)oKqU(z-JJCY0R{e}mI zfd|0O2%Fto*LuJa|5aD*Q8+fXit(XM46g;#zvVOKT!UNPoobIhFu1nH6CS6hhDYlu z;W>KZZRsyo(I)O|0{3tI)Wz-~0EU8VJuovI+~j&@H-1Cu+vPZ>vkpD#i9T2w)z^|T zSWEiA9qUTI6lftrbCr9jRmA`57R`3`1GkIb==0=I+wWx38y0 z9|WFQ>#OLkb7li*tV=6N(6t@Y?#8|_={xPbojJi5tuPQEb^1_ERuW{Rtc6-}H8Bvp;+j8}xSGT}?TelYr<&~Sds>LU*4FKu=fyNSq^^&vEc-* z+?beGX4!(>-p3EU7Qy;{hM&vUOnb$mC${%9_KL6pRJQ-IBKs-+_Ux4};{D~rF84P0 zpRvZH_cb28pQc}oOK89BmRD9Zuc`9A=Pp)6-&7Lii+~fnRG}yS`BH^6 z)6c=>&ml5aMH6$^bKmt$*?DCsq za|x7nh}$oLjt@n!K)qkIw;T?=)dIpbi2zdxGqFX%v01fSnHw7cEva|p?;V9;lnH3e pNY*O9xL4%Vyijhp2#1k_U;GKZDL|;DeEw}h*1CJ>^Lzd3{|7u@aK-=t diff --git a/applecorn.s b/applecorn.s index bbefe6e..fa795e1 100644 --- a/applecorn.s +++ b/applecorn.s @@ -18,6 +18,7 @@ BELL EQU $FBDD PRBYTE EQU $FDDA COUT1 EQU $FDED CROUT EQU $FD8E +IDROUTINE EQU $FE1F HOME EQU $FC58 AUXMOVE EQU $C311 XFER EQU $C314 diff --git a/mainmem.ldr.s b/mainmem.ldr.s index 6cb7fb6..b7ca68d 100644 --- a/mainmem.ldr.s +++ b/mainmem.ldr.s @@ -110,9 +110,13 @@ DISCONN LDA MACHID LDA DEVADR01+1 STA DEVADR32+1 DEC DEVCNT -:S1 -* JSR ENSQINIT ; INITIALIZE ENSONIQ - JSR ROMMENU ; This really needs to happen elsewhere + +:S1 SEC + JSR IDROUTINE ; See if we have a GS + BCS :NOTGS + JSR ENSQINIT ; Initialize Ensoniq + +:NOTGS JSR ROMMENU ; This really needs to happen elsewhere LDA #<:FDFILE STA OPENPL+1