From 23272a30fd70e3b3d830a9d0c071449f2e9a5c02 Mon Sep 17 00:00:00 2001 From: blondie7575 Date: Fri, 22 Dec 2017 15:57:55 -0700 Subject: [PATCH] =?UTF-8?q?Moved=20WeeGUI=20down,=20clear=20of=20BASIC.SYS?= =?UTF-8?q?TEM=E2=80=99s=20buffer?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Temporarily removed memory map management, pending more evaluation of the right way to do that. --- Makefile | 2 +- WeeGUI_MLI.s | 2 +- weegui.dsk | Bin 143360 -> 143360 bytes weegui.s | 50 +++++++++++++++++++++++++------------------------- 4 files changed, 27 insertions(+), 27 deletions(-) diff --git a/Makefile b/Makefile index aef267f..85be004 100644 --- a/Makefile +++ b/Makefile @@ -11,7 +11,7 @@ CL65=cl65 AC=AppleCommander.jar -ADDR=7a00 +ADDR=7800 ADDRDEMO=6000 PGM=weegui diff --git a/WeeGUI_MLI.s b/WeeGUI_MLI.s index f49c4f9..240d839 100644 --- a/WeeGUI_MLI.s +++ b/WeeGUI_MLI.s @@ -21,7 +21,7 @@ PARAM3 = $09 ; WeeGUI entry point ; Set up your call, then do a JSR to this address. ; -WeeGUI = $7a04 +WeeGUI = $7804 ; Offset of WGDispatch from 7800 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; diff --git a/weegui.dsk b/weegui.dsk index f37acc31205b754506e4991de22f8f8926d97bc2..690924a411572382b5b7e22944a473e64f749a61 100644 GIT binary patch delta 6103 zcma)A32;+Knr}Tv}KdG%ZNe!$aMn>RgBU`q?AcKi#24-z?jCLx!o3NS0v&j-qs-Tq2W`|9xhW-0V z@&Tl34E4JE@Bjb$zxwZPF~b^WSQAcF$P_(kiZb=Gz7+J9$@Ih=^o30GwrPo8j*Nvl z1%-tv=PcACi48h(K_<@^Vwnk8?~Sw<$2lXT>0UU5#& zOGUXG6A(z1h4ko8X26KEd7#sCDs@+muwv7UsSSsXLA6WEn$D?j_Ye75OMjPNDBJX` z@y#QA(LhjRHm_?HOB*fUk9=v0UT|DKBJ^#V^;-K8zVP8m1xz~T9|@|m`7=1E&gKJH zETtMNf-0j+10-=94DJCjpAgmAMwgbbY)VjRXg>t5JTj{SeqlxaEaQU1V_Iw<)uQ|` zXknfW1jnw!W11ux6pr%4j?WJX?fJ9RNt2@aHvguX@`l60>`gO;6$RP)e?KHy-X=O& zljF=mfh{;VcLD`~nOl$bj!{@qXjGdIf^N(#Av`c$I8eB5?O!TE;(ND~$o-f7c4^RL z51Q@g)VIXXSyR%ttTm`wXLMOui-=rSGTMU`jtz%`nju+K;mAECI6i!qZbqTA_=5`= zn?o)5gLWJ)47KBBcUy2Pw0sL@)-XQ}h5dwb(;RlTLZ487`YYql!hWD^NK!T@aPEZS zIBCGqosbVwI?^J^42k)K1_gZL7*u(zV^bbNfmc|UbS+kopRf2IK z-$~ZI+j{RTCg2@7_NPBy!Ld&PB9qGk#j*{onyl&#`@x}9pC_n}&22`v-v`}NyHuybjU$5t`e;l< z&~+Pkhgp?~b~na_KmtM$$QW~dv%i}f&4{iNYGDA6O@_|k@qvNip0E}o?Dkt6H!A?i z?e`bWpzlqqqLWmoO1x?8oS`nzgBE3#j+vYKBUpIKYW z(8nr0@6wZ)ES4C5)I;s&nkoISq{SqQYYpFu5BT$#KZl8z?BWArhZ|#h z&bZqUROmdet_jfu@n_P=oQy-Yfc2O(Tt(zjds_F(s^i}>^< ze7aW}UzWaC@aYIX-G@(K#iy^~)BV^@sj4K~ZkINrE|py}o?s;rMcJute5wbZx{Oa< z!J={$bQB1<=~LGv_`d^>U<2S~48VX2kc!7bJ`ORF39XR`wlb_KsIt;2rV|ldNt5XO zm<5lnm@e^vTEVo51QA4{$*q7&ViT2)gitrt|;gKB$FV=oM9?Mar%MQqi_ zUbIKTm{mo(FsqJqV^$OC!K~IjB#%v^8V?RBW0QwcV#XmwOwUZC4jrbRKE|X|la4YP z>fljEL3JIaE(Ug_({*kTVl{47?PgUZPJjxv8(^WfOKylh0nHw)6xT2Yv6)FrjB*&c zNI`axdIMD-5;t;<=+h7SG$W$pi%~t)5u=uga}6@zz)+hUeCZ^r(`r%1Y5|hf#L^^# zN}DNaq_PrBTK0bt95aAnVQj1b4pnnA%s7LK?PDv!{$0nKfqC7s|2DH`seHlbEQZnu zs8%MbA*zAiD)9wqsQ~)Y98OQ@-Gb#KjzIZj+NuYK$(czYk}EqA!J%^)(w1swh#gFH zO5`ezE#__2kv_~Xtfq>qnYpk^D~55*z>65>`8G&6ATc_^oB}h<9VzciLr%_?$Erd* zI95%S)xdTidJucTs)rR4A)VSP#dJs>Rfo=FYb=%tjqv-U8MMe!Q>v)DRq-m}h`Lop@-GymNo9f_&_M&KTMB(}k9o)tn-3J|k{#U&A&8BP4oHR$ zDe-^Aftt=?=6zDP+N(Ow;afI~ccR?a56gW*G8FOU9 zk4l^hk<>E42r(oZmw@aX1-Xd7Ick?uG^WT}aLi4;S8=@?*O)t6@PzCbp&h1UZg#PA zEa9Tcpepv_gtRkOB)1H?GCi962B2I9uA&+0v#qmzt%0Z8o!7 zDfu7Xto9#6VO4`stsM*2R45U5V2lNBYXI&lqdd?)%b2|LLIDW*W~Bjl?OlgX@3 zxA`JIaZ#EIstj^z>jl+P=Pbz?=?)lFgG1dgA+W_;#C6b+$&fBGJNv$};EU7qL#;l1WI5$nU6yRe_K@({v6Ix7ekZ36qMCJF7 z;PwJ8{U~q`RGlkv;NCcJZyXpJ0Pc+g!+-$y!l6wf89*E##7X_gPEb)dk3r^*3>%_f z!WNC6fXNGGK+h5PwMJ;*d_A%Aq544)H<2Q4h8o+A&C&pBT2S>#7~>a$>QA~bUItM$ zx=c4!_~}>{6i}nfd{d1xV^jhrS{P@@zNw04N+MAmr!_DuZrRo_b#a00?3?On7N@0@ z%)Cffpi$PdNYNz|!gm+-%<|8Y(R^WUp(6)uT3wW1kdIFD1*`MnEt2MicGYGy&zqCK zvLFYo_x4FIluP{DT!#apeD5!%akV#Z19|>*kai_Pm%O}0zvg{;V-d&=d-K+;TwRF1 z^In(eTHks}eu1wzH!laF%%#4Zl3YMo?#s*H_!2^U8wzp?UqL9+P*9j(j8L=z-cQ@p zLajI|b2_&Bs6TUp{q0#r_c4crqV+idnw$W=JE$q#0>T+{)d#%pr5sd zhT*9M`6iX|j`O~g!H7M0#U4Ch558#^!}gGf*}PC27LNSED%|@_O<$~ElT)xBp{w=9 zxf|9Lqu>xJ>{j?Sy=mBv#do3BpYwjtQH04BQRJ>llxn z0&`+Y>KDhI)XZ8ZISp0RmTF+A^Cg5isgqIft@kxFNd3%uFYjyc`ao7Z4rcmju*SwD z_n63-q~ep*NwS-q*dzzwz$CuNjyL<_&0W%rPZ=tszD8B81_^3f+|8MzguhjjV`G9h z>3UEAcwdV1UPeQi(dpCyNkp=+74EhoYE(f$-Hj^e&`R4>>Wk0e%3Eb0?5cu#3?DV~ zZxCi)=Ot$8z$~6mx?r5Cu#lOK7mzV8(){rxYi+U<_aC^5^EK3uxeDa>j+XYvdg@29 zKsks-(&qs5ZW5@t^|45j>5y=fm?2MEd0uWMz2^M zi@E;$O1^}nF4Qp#q?^)I%3j;CjqCTQ`ORF`X3p?rXeSq)1Xt3XT&S4iom{Ad<9Bdw zgPHv3VGK+Vu#GhBRwAh1IduYahJ@g6} zEAJ@bhK*tOxR-b_HTOiO?4U%u@N+id)BIq?gIx~x#YbxaeCQv`TJ}`~ASs!&dd>>Y@6IOIdCs+5{ORHK2JpRi!F<+C|mgKOy;~Due)Gkt#&<3fG*4W z2{i@@s75HqHFIXx zoE$Xx_k96Up0gKPpeMJ{`nghC}`UCO>-r{O! zrInwK!Sj+wwX>AWTlVWZTVuELw$|P%$uaLI=4MWu-xi3oT4y!Lg+AMN-B&E(L$2GL zv~k{8*L6-TcycoaHeJ8u0@@7m91iF*#Pe7lJkkY6p4$K-+?i*dmZp8nXLBuMB_?l_ z`XCEOSf$)NP10WW;W5BLb%=2tWL-(Dv?_0`E~;-;oHCEo|K1ayeSz@6&W*ivu z2X7B(ae-O4U<0^>8!I)nB}o|tv)Gr3N#A+g#IQ@w&ccAj8L&F{>&_4#N1aK8XPKAU zc$h?jcE;^S_oGDM=Q645l8EaPxGoQG z_3)M=a0kf$jhxxr(AR|{CMXxreS?*+0OWHS5j6yuc7)vfRBDxfp=yPxDdqszFC$*d z>)c=+xP-Y|6woQ->rrR3wgW<>ukDe#+uMv`MMg07n3whNS{W^qcpW*k;t8QoK_tFe z`?QdB@#u4g!NlS1_4o**jjW^zM_yphM&&M2E#mdQ7i=kP1|)qEpw zFWp%>x$JD&)v^iYQ_F)}7I{w+2ok{^hA6E|MoW<#?y8CjUW8o8!J8F`6Rjr8oaY zTjV#9>8dw>qAEJN|II>Gb|GA)fY!V;4(`0X7#4kS>+=XvmtkJ2CpBQ+AeDvjEO6zL zT`l3y8Ke*pDedwM?)U0(tC&MEijjMcInFZ6OSnX4&Sox-IkuULVR|<+%2p2u@Nphq=i#*^ zPJjvt0FaO%)D7WbFf6as$TK;UT+by8uCh3_%s_VZontW+Y?9M01E5gLx1dZtB1%pR z8=;n%^&Dlx?c6O`>Z6M*ZmPGe;`IQ@$0-Tapu&2F8NZd?pWC3uF=FV4AuyaTwWWj6?h%fP!5$K^gwydZhT5nbyyd?jO~h&5*g-%OiD_K zQT{pPP^N^Yh2!N1%+)d`hiB}ik&03yK%&ShW@US_t#tB^Fyj+lfF5 zM*Z4{mF}ShNm_`+|3rXlE@AFd@+!H`AHIaoIBXS<%iVZV?h7IZ>FGCepTVBPGQ{gO zUlG09k4Gv4Zcs1Ip!eBor8gReX9VjzkG~|IC7Hl=Lt0ENXO_^#myivRBay|~NUkt{ zDPmUeaM`)m!;p(HhiZjLbZPzvwABO96;^+XNrXwzqvX4UeD6sz*)0Ur< zQd5Tqbac{15`?}-0y^-?qo8K!WWZtOwYNx>F+&Towij0Yq}ssgg+oQo;{eF&TO<*S z+?|C7qFQ-PV`*u)jd_dL%mU77iz5~oIZMDoh7kl?QJW|YIyRs|Blje5|1*JaLe2Sx z0)s{rw?Bdl1K{>YaA84k`vI3Fk@O?4co9bx1nm?pqawwqyUP^50X& zYaop8L~4&3Y9Ewu3n|}LsIYz5N*9pG0qqw(xbn4t?u%YrnGToOywq}9Tltcb3Ta~2 zEVZ82`F*OGSgjV{NIH7=OM^->sZUEyy(38j$7a5P+!dMg3kv3yTFx&KHfHCeqMea>fDw;BMWK0N#K}!E|7#6zRr5<(!=PAeijS zokA!T|@?FA#}jw#dWdrX#Pd?2!KVe4v{TkZyw7+y!rhkPA!7q5*t5?)qRh>sf_^$#6f z1aIPhNMeczod|HUZnzLsVq^J3LGc_MHm5kc^)OmM_LMzF7Ek&j$BU<;lhe`3$8?e} zR(#?U+Ub0;SP}9GXMDt2C&5e~3)ZYGj$Trkvyk#d+JT44z&!!=@NSOq9z&s&a1wI_L}>Cxjni{KXdVRr zlc>QFBY_f%QXVlC4qC7&Qh^>C$Nr%Iz*Qgn1b~jZ3gi!M`n#U`K`hV+V(|#j{V32+ z8=mQNnyUj!Qa$3%d#to9UiOJrvE_=$hce|&v??$fq?+0(YGhlZHliQp@EGVlER|#F_CeI^Zjgk<`ZCd!)m!l*sZ<+{S zj;TJuq|P06#1_g_V#FN+tba2}&crruVsM9`q`+h>d{;);dZTO_!Y8HgnZ*9DSB0Fi zOS}^!9~1A!$bxt;#^e5=;9YjSIJ3V zJ@TW@mXkh3f9|R;tZ(n;`dhF16r;yVK9~-475YaqC0_V-Lfjg+hFA!?9NsOouF=^w z;eT&kldQ9=;a8SFZDqQ)`bPn4WK-NO1a}I!#;leEiK#KOiw9yi4rp2jG-8#&CA6;5 zh>{RlG2L6aNwmXyOgweFVER$8P6!W&=C)183oF2@XPg&sgg%m7O#Z4p9eq39C=HZN!xw#%$Ippn($0Qr$+G#DUv4G~n7 zz)h^d0u76f=+|=g7}`mpcB*g3E(mK zjiTIp7@exvCB&^^s=PM$;cDT~9%1D!!P)88dG&4L`(E)6Uh$+?JmVGr;tk@H|HSSV zKVsOZVP#rFSTZ5oYsX?y?Tb5Fi3!PGVK7uv0lA{GY(=95RLRgT{1h^tF_$1*$=GZ zb!esfu=q7@xedQJeT~Jx;g){7(+xW}v3P^_Yv32A*4y;E;L-abZTQ#0w)^2&aN17d zkZF5`@Goj4p{7cx*&+BX;J2pP{^v+Qj1e!cfe49fG%|5^9FS?aj_e(+mPQ9!hMkX_ ziWwt*Vu# z?#mkDRKL$L?n=Uq_-3Re)ElGcp~M5mN6%v<{h_hLUyg5$N;^_t zv7;}f^h2_0mXvU8;`E3D;3bQp9UWov=FeqZIXSs#yy3r5W2B3E+3*!={Kz)_MLU{q zxQ2q$Ukp#4{K~<};1vg2EX@igtJX`tmN832gGNPm(|&rYk#>HyhGCTOGrFFOf(A2P zPk!Z8Bk9ln%aE!%m2=Oxqeam63(|3J0+ F{{cWoO#lD@ diff --git a/weegui.s b/weegui.s index dce8272..ce45109 100644 --- a/weegui.s +++ b/weegui.s @@ -7,7 +7,7 @@ ; -.org $7a00 +.org $7800 ; Common definitions @@ -84,7 +84,7 @@ WGInit: ; ; See section 5.1.4 in the ProDOS 8 Technical Reference Manual ; for an explanation of these values. We're reserving memory - ; pages $7b-$95 so that ProDOS won't use our memory for file + ; pages $78-$94 so that ProDOS won't use our memory for file ; buffers, or allow Applesoft to step on us ; ; Byte in System Bitmap : Bit within byte @@ -101,20 +101,20 @@ WGInit: ; 12:100 ; 12:011 ; 12:010 - lda #%00001111 - tsb MEMBITMAP + $0f - lda #%11111111 - tsb MEMBITMAP + $10 - tsb MEMBITMAP + $11 - lda #%11111100 - tsb MEMBITMAP + $12 +; lda #%00001111 +; tsb MEMBITMAP + $0f +; lda #%11111111 +; tsb MEMBITMAP + $10 +; tsb MEMBITMAP + $11 +; lda #%11111100 +; tsb MEMBITMAP + $12 ; Protect us from Applesoft by setting up HIMEM - lda #$79 ; 7a00 (really 79ff) - sta LINNUMH - lda #$ff - sta LINNUML - jsr SETHI +; lda #$77 ; 7800 (really 77ff) +; sta LINNUMH +; lda #$ff +; sta LINNUML +; jsr SETHI jsr WG80 ; Enter 80-col text mode jsr WGInitApplesoft ; Set up Applesoft API @@ -150,19 +150,19 @@ WGExit: sta INVERSE ; Restore HIMEM to ProDOS default - lda #$96 - sta LINNUMH - stz LINNUML - jsr SETHI +; lda #$96 +; sta LINNUMH +; stz LINNUML +; jsr SETHI ; Remove ourselves from ProDOS memory map - lda #%00001111 - trb MEMBITMAP + $0f - lda #$ff - trb MEMBITMAP + $10 - trb MEMBITMAP + $11 - lda #%11111100 - trb MEMBITMAP + $12 +; lda #%00001111 +; trb MEMBITMAP + $0f +; lda #$ff +; trb MEMBITMAP + $10 +; trb MEMBITMAP + $11 +; lda #%11111100 +; trb MEMBITMAP + $12 pla rts