From ff75d6c0db9329d42f08fbe3f40cea42ee4d237c Mon Sep 17 00:00:00 2001 From: Renee Harke Date: Sat, 16 Jan 2021 00:39:27 -0500 Subject: [PATCH] Initial commit, seems to work on my 128EX --- Makefile | 56 ++++++++++++++++ README.md | 44 +++++++++++++ res/BASIC.SYSTEM | Bin 0 -> 10240 bytes res/PRODOS | Bin 0 -> 17128 bytes src/DUMPROMNEW.s | 165 +++++++++++++++++++++++++++++++++++++++++++++++ src/STARTUP.bas | 17 +++++ 6 files changed, 282 insertions(+) create mode 100644 Makefile create mode 100644 README.md create mode 100644 res/BASIC.SYSTEM create mode 100644 res/PRODOS create mode 100644 src/DUMPROMNEW.s create mode 100644 src/STARTUP.bas diff --git a/Makefile b/Makefile new file mode 100644 index 0000000..400c9aa --- /dev/null +++ b/Makefile @@ -0,0 +1,56 @@ +# https://github.com/AppleCommander/bastools/tree/master/tools/bt +BT=bt + +# https://github.com/mach-kernel/cadius +CADIUS=cadius + +# https://cc65.github.io/ +CA65=ca65 +LD65=ld65 + +BDIR=build +ODIR=$(BDIR)/obj +LDIR=$(BDIR)/lib +SDIR=src +RDIR=res + +IMGNAME=laserdump.po +VOLNAME=LASERDUMP + +# 04=TXT, 06=BIN, FC=BAS, FF=SYS +attrs.PRODOS = FF0000 +attrs.BASIC.SYSTEM = FF2000 +attrs.STARTUP = FC0801 +attrs.DUMPROMNEW = 064000 + +# Add a file to a disk image with Cadius, using the attrs.* +# map above for the file type/subtype. +define addfile + cp $3 $3\#$(attrs.$(notdir $3)) ; + $(CADIUS) addfile $1 $2 $3\#$(attrs.$(notdir $3)) ; + rm $3\#$(attrs.$(notdir $3)) ; +endef + +$(BDIR)/$(IMGNAME): \ +$(RDIR)/PRODOS \ +$(RDIR)/BASIC.SYSTEM \ +$(LDIR)/STARTUP \ +$(LDIR)/DUMPROMNEW + rm -f $@ + $(CADIUS) createvolume $@ $(VOLNAME) 140KB + $(foreach f,$^,$(call addfile,$@,/$(VOLNAME),$f)) + +$(ODIR)/%.o: $(SDIR)/%.s + mkdir -p $(ODIR) + $(CA65) -o $@ $^ + +$(LDIR)/%: $(ODIR)/%.o + mkdir -p $(LDIR) + $(LD65) -t none -o $@ $^ + +$(LDIR)/%: $(SDIR)/%.bas + mkdir -p $(LDIR) + $(BT) -o $@ $^ + +clean: + rm -rf build diff --git a/README.md b/README.md new file mode 100644 index 0000000..e2cea18 --- /dev/null +++ b/README.md @@ -0,0 +1,44 @@ +# Laser 128 ROM dumper + +This dumps the ROM from a Laser 128 while the system is live. Useful if you don't have an EEPROM programmer/reader of your own. + +I've only tested this on "new style" Laser 128s, with the red badge on the case. The old black and silver badged models might have a different ROM layout, I'm not sure. It wouldn't surprise me, they're radically different pieces of hardware. + +You need to have the Parallel/Serial switch set to Parallel to run. The reason is that the serial firmware for slot 1 is really just a copy of slot 2, so if you have the switch set to Serial, then you get two copies of the serial option ROM and zero copies of the parallel option ROM. + +The only part of this I don't quite understand is that 16 bytes from slot 1 don't end up matching the original ROM. They should be all $FF, but there is an odd pattern there instead. I suspect it is either (a) some convoluted logic with the Parallel/Serial switch or (b) something to do with the port configuration you can set by holding "P" while powering up the machine. + +## ROM layout + +``` +0000 - 00FF = empty (reserved for soft switches) +0100 - 07FF = C100-C7FF (INTCXROMON) +0800 - 0FFF = C800-CFFF slot 1 option ROM (INTCXROMON) +1000 - 1FFF = D000-DFFF ROM +2000 - 2FFF = E000-EFFF ROM +3000 - 3FFF = F000-FFFF ROM +4000 - 40FF = empty (reserved for soft switches) +4100 - 47FF = C100-C7FF (INTCXROMOFF, SLOTC3ROMON) +4800 - 4FFF = C800-CFFF Slot 1 option ROM (INTCXROMOFF) +5000 - 57FF = C800-CFFF Slot 5 option ROM +5800 - 5FFF = C800-CFFF Slot 2 option ROM +6000 - 63FF = CB00-CFFF Slot 7 option ROM bank 1 +6400 - 67FF = CB00-CFFF Slot 7 option ROM bank 2 +6800 - 6BFF = CB00-CFFF Slot 7 option ROM bank 3 +6C00 - 6FFF = CB00-CFFF Slot 7 option ROM bank 4 +7000 - 73FF = CB00-CFFF Slot 7 option ROM bank 5 +7400 - 77FF = CB00-CFFF Slot 7 option ROM bank 6 +7800 - 7FFF = C800-CFFF Slot 6 option ROM / CB00-CFFF Slot 7 option ROM bank 7+8 +``` + +There's an overlap because the slot 7 banking register uses 3 bits, which gives you 8 banks, but they only use 6. The other two really belong to the slot 7 option ROM. C800-C3FF for slot 7 is actually RAM dedicated to the disk controller. + +## License + +Copyright 2021 Renee Harke + +Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions: + +The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. + +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. diff --git a/res/BASIC.SYSTEM b/res/BASIC.SYSTEM new file mode 100644 index 0000000000000000000000000000000000000000..c68b372e4a135dee3ca1c75d260aee1111dc71e3 GIT binary patch literal 10240 zcmeHtdt4J|zV~EuAp`;et;DKzp!5`4taPb1q9BN9z=&3;*WEhZEj6epd&=(np8cHD z;;wOXJPaqEUXD_!X)u(*Oc=ZpX7V6jnXKT5H*9NbYqeknr)t%1YdOCs(Qdcz=l$b- zKj+UAF*EaAez)iQ`#rzsH?hs7hKKW`O3U&WmA$x-`2YQ|^$sQJ$SgK&_Z$D64m zlt;xPhZ=6!N2sCu)W#pE$=^{+zxO1uM8nd~ko;HnB(t=Woyn}}WJj2_olIpXv#ygp z%&hO^h)a@99?fm-Os5p1M;&}L)t;$@64zW=cbvE@Zk(#oo7V$@b(jwN|Sc-PP;vlI0Ue-4{RF<%Ur|`TX64Hvj$~yAGd}FZ4;r zyU#qB>TV0P@8JTwe5&7*zM7JOJ=G!OS-5WhrwJf0=cn9PB{izk)qzLTw|S} zz?QV|^K_0lXiAX&BpZP}Xd_Q!Ob3{|1J>9q-^LQ0tp}T! zKBn;?>vq>&YTs^2D<^u0ovCsZd(n}_I_b8wwHCsr)MHU#;g`M(qHIaS%=ExalVLhY zd$Tg;qRd}`P&#VWcD|1WV*Cl3yMUOLh*dEc5F5fqjOA7$c<`S`AO{_$6Y03ceT0-T z=F0P^B{-r=e?v0LdTt3yH_56H%Yfo$8i+$&1I{hax+JHh+eq4O8ue9W1{x% z@GO)+lt$!<&Byq524v0EcIBRDWK&ktz50xNl=+&QXlu`WLZNz#kUZ8~b!8oF z%LeRsRyTfPiVz+lW!tEJM^z&8?ctc9;=Q*+>*4kgAn4{cMCc*(EO!TlY4qM|E? zkA)t9CqT`BJUEaZZ>Cwot&&GUh;u#OY`1R(aJUJs7%8IxZ?)hEe*tf^0`Q8FomZK` zz1@7W*Uo$@cvmr>2;OR@Uw|-rLGV^Fp9wJTl0f~d8>m8Oq#cid&QApktU;9P(ZTTO zbrl3|uf9@Mq3XFH@ZrX4AmM!tNI2G;6_thiOmI{U0_Fu6{E^^YSD|7q3f_uAog>$~ zdXR9;^sZq(7Pt?Eo=*i=?$8B+IS;IcJ`{$|3q>OpWY2lQrRL7#ZeGiMDuiiK+um?qk7` zyJ==&C2&}$q~V$6xu8ThTxYgCWY~|H87j143hJvfA#$A;9Mide!I9%8HfC>};lCgZ zv}JFZ(Jg;_HRtN|kbINI+C~kX7tEC~Y`U{8*OBeCc-McO>sa5tCD#ji4|_+?K7oyO<$0?d(}(r}Pe+w^y(8N(!~5EmY-R{A z+jM4FpjI}rgarmLp9@rDBVgfxfFB*z<_ZmSS)eUpxLCc_zVQFtdGl zGq?)t@ZJ0T94la}UBIL8++^;6fCV`q014Ry@tIoONbT^zO@+qwVMrc;JDfHcA#nb! z2W&kb84TrE8&IiT;J!m3&ooCh9;>D9cwCPGWy~Q36MocN9hq%`)IYX|36%{d>rgU(7TsqaQ-(GGO-8Zt8xc&EM$72s2}-PKICsZ9fC& zH2~*T+*;CKiRW_vi%dTx9a6Mx z3!@@E$?lBcaR4bnus?HMjzDQ)z}vwV5(EvEeQ|G?<}5GU$PK8n1FXfdq6r{c+;J zz(DZn2!-o$qI`?xfZ8@K=>%4gvg96*|n9-3i}x zU5v;WL~2D7XB4A(+|C(9V~l8w73D$NV+Ox9iqw^sXN;l+h71~9I%pU+h#}}^-JS&v zDl%mHD-9`DDPk!`BeHr%D^lq#_{fmYM-@#{)V8_JR6yYG;WRgfD?qZ2+WtM>9SLSJ zVwNDrEHX7DHv=&*BQ6Iqzea$s%YuIq8W^b4id-2|UNU691Vr^#cra<%;}AmZX^K_K zfE@Sj52VSEt>wFZ5n}%c5)^{~Zi1TB;;e;~Oa(jwN#eE|(rLOIqO2{l-t~__rI?=z za&e_d(#dyhO& zgqd4K#kDw{wNNEc1E(;94_pa&gqyn4%*&YLJNymqWu$aTdOpbg8Y%6N*z5%v(vypo zXlxY?8*iaqdEARAU879n7K3!rxZkDNO;3R(izX{tT*DZP(`=2B#GAl&Ng^1IRT;sC zAmzMfJ{Pnxv;<27j7|)e1(+z&yje*t`h`M82#>{tU8AV%c2}GfCC6h9dRfit=(ReL zHCbp7(ttl!5VA;BY+sGTwF)9P#wgE9dSwz*)l34YP!WTGf%GDq$V7{H zEk2V{mE{1DJlhf0!p6{nPXo%hNiQPhCIpDsNlTDy1Vw+1Sd9_zxC8|T1LRwmIVir?ymx#Nb;nN>>dC2Q}QPBqtqHGSyw|vne z+-_Tnu-n5JGYuHDt^L4FY%_@62i35P0Kr?zAkgvS>HWy zNiBb^XovNp{4pD68G_EhtpKwch3QdCTL9|aQihTtQA(O*RHmHJimriZ0xAOF70_)K zakmk=qoI4u!|t&6LO=AWC8L=JOT*FbWfz&ga-c^eDmQ2;)1{HJT^b7zOOLm5v7+=S zp91A8gJ=zzzJ)LWe;&eY{}+SUU=Rm37pdi2&}8RFRT^-damAU3V?*%d^5n5fzf@7P;V*nmm)a?SBp&t zd3>!wtc?+2hoQN4Bz>>^6YL&y0UT=Emfg~bqL=n48rEo`t<pKr6iSW@R9CjU9k%J&a zSs45{CX`gq5{^`;XMnJL0`;7akKMRtW5veGO=~x;-n5QpRi5uD&2IhHZ!#k*=K zfFO^s4|O0%j&_DwDQsHhwQtIHOn0l=vYiRp%5!bm6R>ta%##+RC?M9xY%jFKGke&007ag#Av6|QgQu~__>d^Vt_5LV@Y`wtAiwemY@HYn&~&wYtKW7_vkPh2K-BrZy5r*nI?Y#`8pn$zzQvO z=TU7x%2{*}l_qx4MWiK0wpLb^%G;(moJLrYN$_YxXfhMEUt zRX6__-a6SB_#Z}`F@h;BgutufEOcG?tRDg9H}b11#*jF8IF^aOdc7bt{4_J&@+r z05822oY|g6vtPhG7SC}L9xV-oRhaOXm@xR$ryPJTOdAd$kOP}5I}oOSO*qQC#wzfh zWoS@nf%N#A(2U2o0%_aZt=MAh2|1PxL5booaO4N`Vek=<{U}keS>rU!xCW8|41hc( z0WWEC(1iUvn1EfI`X$fD`!pgzXWLW)aI@`sg2s)paNm%CpuNEawT`6-lJ;c?JeiOV zx*p+1PHvphmJRXHbShhpJvIXlqclACEB9D6pehm?%i#q``B{X&ckr5Fc*#Hz?2{lW zt_5O=w8gR-49{yZCSRpG+W40-y3^XI_c6vF7WpDi+-TAGhQ8$^f-ZUVDulkxOX&MM}U~76j z)EV8{@CgGNx(9j*QvN!8_Mlla&U-`v5`O&zc~Cg}2|&h^9uIGYAhT?RYz8af#qv&t zvJd1Wu%7-71jhzAD~QM+MDBmUw*hbn5m~toG!#TFcDD%{!IM>OD(i6TYvZXEbxIT=B95=!Er5RG>;)&N-_R6&0LLOx9J#3<2aXs#V24oe9B zoaW4^%0$t1m%jNAG<^q}MJ))W7fLpUNmfreth3 zeDIG*8JVl)jwAVXD{P@q9biXW=*SU$%^t{jA+Bg5yDarB)M&zUu@aHuKx*@5gQ4=W zV8!JH4U`v%tx#F`Nm0S2BJ6N(z&hi~KZ|vCMOmqZ9$@7^iR$hM*Z|=QEr`bSA%6hX zt;8!2LJFo7%^JWQ@!ABLXhp6Jf>|SBSC}v%VSOtSrK2-VRm| z4hsMVz+vWi-+W{Z3=4o3`?fG*tbsd1!yS0KgDX=2mGE1mCjluKw=uYQT7W#z{(5cUhK zMgb-7=W{%7xNn3JrHlgj0SM*g2XF9;*%bVSMg_sD_5!K{rwNBF{H`PHKD-tdbT)*T zzlAduyz{|?RA%KeNd2>*@L)LE0_wq_0%aCh&Om*=kN=8FJit%EjU;#!w~tT9_jyWk zy2S?~fktKaz?KGTnSQF4NrOWk2=E}xf|9P$kXw9piB!IfY~q)w zOZ)kcpr{R*BUHi>$W{o>kNwvbn?^P7;YWjq$Rv>#Aq>WfP>p0lSUm7&2rZC6ZN_h- z!mqgO;4gsOt>7sD-AER60v1t@g7uV0mzI(b@PcjL0f_U*QA0FTSnk#t#kx4rZHB`T z6kwi-3)f(VMuZkFP8=dcS2PTO;u4f&obpFdo-xLWW+e^iS%!>a3lJZQ6Pq`iE5X>^ zXlo_x6|kFyPzBD6SrURjvlp>PWPIX4i0MSkLBw=nU_Hxye$e3dweH<}%;)>dsk3JYTgMocTyFC(W2o zE!=3-%vo*wx1amXohkW9XEE*>9+k{N8r~R za@ToT?mB&@|I8t&_lVSYxaWw}dqz6f2Yu(d`udKZIDO%CsH^wb(L+65eO+>2PuGRe z+1}9E6J2MIpFS#|Jbb42KD&Oa>+q4I$D|WIy(jz5 zoOKh#q2t|ukx!pH-+!UCne}%(r8Vp))xD;LOG=)q`PGrmL30UVI_NGNR{ep>TSq*$ zdFtWXeexgU(T&Z6OyOjFN zdB0EnoP8^!K+*3%a%qKc){&V-x!%j;Cu+y52Ypw#Hx;@A51gvgTsi;7;_5FwngXRF zD(N?uUTE8Rq_h6ggcs-OK8qUjTUE8Pxca(5Te3;F;gDLfVgc zn>W0v=nUIU@6GGzgy&s`Fu6hBHEofSqy2sIkt?f8wrm6%mnP^8aEa9!FRfkmy1Q%# zMuwY&GR1{HL5_8rzQMmO*#5n(V#Ic%Wq#QrE%b-sL+FWj@ZkUX{NF5KGx=*62Rxq-~P6^t7}Po}S^E0BY5lYX%W3LP<*~sK`syIAdp0ABc~c0d+pB z5++l7YC5B1qZ5pgU{CC+Cn`!EV#0Hp3b-LWQY}yrY6`R*pgc==?%F9Z&V2KIe|&%3 z-|znJ4dtBuSbOcY*IsMwwb$OqS|eCr7pzWUqpF@f=8Z=2nNwT7iFwz1&wtYRS>q?( z)GxSRZaLg72iI>trCvJI`9q?|+Yi6_RF`_L=h&GBZ?yaS#s+V&Y5k{i)2ACxp7idf zU}wF%kDWbs=KQgvjk}MXJoWwIp3YO5OxihJpck7umr_OZ0Itu>$_lTO& z5*mtgeJ_W!LiDgJ&2-446`5%4jc=l43GEI~g|PL6DG> zVLU*7H6m1wRnq-gCINHS z){GW2M~j7F;e~N>e`3X0-*5U!bxNy6O<1}jriJC#BJk(C$vYa*L|M#F`bC7#khCHp zSmV1h1uu1r2n#F5D%<3`u&J=55D)Stwf5zrE>goVqBdeNih3C4B>9y{14%X}lK|X~ zC8P`i5MT(B z;d18YD1!^+tj#7hT8XoO0{*A+<;~Ga>W$D)WFq1N5g>56Mn7P=X2)_3&L}NQCB%6V z5k=GtN^>7hgO`pK>%!2hnk!kw^svv_KRPB0N?#qNrU7$pNI>DO+-Surzrvbw)EO0w zSjkE^i?6Uyu`Oe?a$8_kzL%A<90g+b=;{HZYjQ?IO{IRcGQ`UT^8?P@d^IbWU+*t4 zRIt%}*M2L~iXa3FuXsl^JubK#(wzK-LgLMAx-iQ9d3q|dd+V;f(cN2P-p@b#nzg;c zGLDUY5ObCwEbw~M$}(ad2DeuWshmU$U?umAH_INuwPaf01qU|5>^(O}<`Aj+} zCBOi?b0rOC{k-9+(OC{&DS($N&!1cB%7zX(>vWx@aqu0vUS3Mx%j5m^L0;W$%7M9y zYF*KKUwV*#Xtz#}zjC(lJzmrtZaE_*34wsu8@qJ2=UA6lJ#*@Z zGl#o?TfnZvXMQ;5^#V2^jgGfr6$*L=F@(OGH{3 zWktL3fB`5=zXN6Av>ix`IkUnTL`_6wBh*;x3LRPgOmkMtEVfSs}7K8BW_-(oVTvG;qQ#fX9q(qpzmXA|M8J@Z&EZ!1Mc(a>s z4O=Mqtzo<8)^NgEy?ors<>OolF9L9=u$W$+T^QD5*52I0pMtVFHD4|a18hrSo>SG9 zRHl*{v~>%A$)BZaz#iJHjbqdD06GE1dYkJJFX&2Z&v-o4>EzG(b2~SRt462nB{cY2 z$2hX^6mMFPr#6~$0gUu8Z)T7WwBUiDRw*m32T-q$1<+g{@*)6Ass+1voSVRx=okZ` zE90}>VbLA7A*>aQXd$<33Su={UMQ;6QV4y$UauE^H{SR-uc3t1+!EHyza8i1!!FJ( zgyr9jbLZ0JPr^1}yFVA04AtVVjD`wM{N4!l;!&gcYa?LMJMICop5~bDD0a-0c*hI@ zA#X2G%BnhXmr*!kMA&EnW46m^@6X6f$EjnYEX)EBTa6 zZ8jZu7WUsde z?2cU55zytj(ty0n=sC4d{@&=hw@*H5^w|2qn04P0rb1N;7FE*;z6s@RS{_V})B*D% zU4a>~-faS%QMBfielP~xDt={dN&wQ7X9FM}j(qwkppQZHF}U!dD)pB%mFF-t8_EYc zhC+IvV@Ua6$FLUlshawUP$^0iX=6`dA}DdAM2kG1{3!h;O$#e0G}cdS=hOj0#{}Vx z3D&(PgUvd8qHuA7wPXU+N@&esHLJchzZv&-6l@!e&#f7xYH5DUAlD@T2N-~?GnexY z-o4nu*wzfLGn5Z>41{NaqkuMd2J>q3>+r>G1=|L08_cUV zFY*sob7*NZzSL3B0j2n~e~_w66>S-WFW4IDCpv=$Va!Ciexgt`(RB(MLH_=UYHpOn z8D18uB#zenV6)rT8rBSvl4jdleod}~%(kEbIB*~^(Uo!FlZmc$I-#d+hTnfVvDRQS zlmoDfY2Gr-#cmzyFsvM6vzWMgdueGPWS{6P)RdOuOD4{yGY*-eH)c=CoG|1r`iA^J zy|oi^@6t~gku`zVPZ$CJ`|Gd0e{4DbIjvo8=-pKKy2a9iP!ErKm|J=bl@^PS)r~^v z@CQub1FoJ{nIf$iEEcYLv?UMg&j6fFS5&PNQ(&TvsbkahB*egabN z*_g(;`$Oh5i}Znzxlzz=H25^$tR}>oG8~ij`tr&86%1?cRNk8Gbb=q-QD6G_4p^_?RT*ioVhbYxl)mF><)#k$f$2xzu!1PtPT6`6#pFdPZj?ZwnG;lbD9m^ zaL3~1Z?B7;$-nL1yupJC^797*Ax8>fS1Z=-H+=&eTdK$sLKgV>xNNGUM+CWUKh)Um z6ceDdM<0W=;IYb!(1(2}5Mm!nR|S2xD-4;NpwMpawV~3I*`;?cnlQ6yFNWXR2fwoEm!p>PUtykU2#x@K(>VRFeFPW7{@f> z(}S>C1YANvJ1Emz;f9=WgsIamFMBs^56GUdMgD7;u9JbM8!4}|!z zxQm2x!{To838Z9n81DLZKDn?tUA`42R;`;bfDz3C86lNcc@ z?7JL_9()VYwtzjap(@V63mxjy zi))GLu0ZIEKFYcEeZVW$=KtH1(ImN;XY#Fvr5_gYedcZIoG#l!%m2 zSG1;))S&%Ai@Gp+H#qWtBHe!?%|VNfIKN_x$o4-GfdcJ6qmjM?Z;N(WYS<0%8miXB0N=| zM@+Z`FgWkiG+P&pCbB=WC__!enG`vHA(0-rb7q*-R0 z7gg_oK^8g6=wpslByK0d9aofNUIfSjs-`4a!Pb_kgPKEVe{Gpb#Tw~md_I9sHA^?w zmKjn!R3D7$lm(VfL~V|^iqzX%Q5@ghlo=P!_cmgpj$bt^kyusI#Ka-!B!5F3r49>- zdTT2aSNSSKg}|Sd^dLo2COkr@6`0~6Kp=9XxO9)%CagUTgl;GOw3<}FqGm`u(2BY4 z9VvouY}ihmwPmt=Y8--VdAw`R29vsE6p&4Ugk@C91?1>k9%Lg;|+BvPBBMA8^q zRNYfkiR(f~iE`Fq@eT}HR@v50qM-CH$2rq0w6x_d8EaO&r>@lK1+p8e2hNb zOGzXhpO-K7iOYz5xleqCz(V+IBF`b>3L?)X;tPa|dAs^E-^kEB;?cB0S0#m_rVaM@ z7yCTE``DVtN$6hU8Bby4Vj@mx17<0=i{+&HSHw}gawZ*>vD-o=r-TT< zIjRh^PCL=hj>h{*iX+9ub+Ml#HrW+cua59HbcFJ=B>O`G=l+A zZ73$rrg@~+;sn=f4%u3aGl2Z9GgY2;`Y9AO&P@T=dzmH+agS|-xQ;x7h@(=|H&52I znbZ?p?R zK?`)aE@*Mg6y87KYOqQ7fdrwpY^DwO&<@(8?f68$1ZDxjK?_Vv9nfJDe&|qsfzAD_ z0AaWxRppEf#^;+(_W_hMl7r7l7$#L_+p@Vftn;$fj}vG0uSv?TiEj`ysKDz)sO@ms z2=8!h>WM}WU(X5GW*bO79(KJvSGWqfv5t;32!b8xwu)J10!GX~qv8eft(u3Ev~tn)?pokCikHZS|Crb;X`JBxE6;Y65a_40u!BKx_>S)W(}ZNG8J7gz^D~xHps+I4X|1`7wBvS+PV^8>szVGI&BYt9R|||;IPG+ z30s_EStj*hMpfRt0_}J8$ZvvD$#0RAv?*!A!wJ_Iu#(hr4gpYr1Un35KztD5P#Xx= z!?r`3VYWf`zy?_KAzOGVh2OJ*P^&D^=GUxmi^Td6mHmyv%7n53&?{firlDKICKVdA z@aG^0gYzcoda?sLN&}J&)BJYS?7cyHz~)21 zIXe06t_+9`(`6j&xTcMAe~CQH&YsI|%Too8rkq8T4I*s3g4HFFNo8M)RT zG7u{Qi+R>y55N!u(5aF`Ih%ita1};lYKPhT-e7~Jr$!>cSYTg4>xleTe6O&#Q*;p@ zs(F#ryhK`RK!K*6P|7I8&{jurXjp6iv`rD}I(NEAp{}DCpX!)to!XBt({HiK@@MHSelcWJv{q_+1ZqC@yJrFO%>)=*w6W}J1@gSXYVh=o!(uyu!v*j-BlCfKUz zXyd9f7kT{JfAKE_k~h^6A?Ji*kv#;U)j@Q8cgQXR2q@|A5aIq4%7g}ht)l~SX@{Wi z+~_+ceF*y2jlPvCv)x2=lkU$bN$aS~u^4OuV1xs^>N?PzZ}HG(e6hQZbiWO`?{F5) zy-kF3$6W_()qf%K+eCbc)ah?}iCp_1Fw1oy*Z{3?fM9~cCGh1^S0BtmV;zVU^s90} z#I?>rubc8)I~jL=tD^m?ptYsSUC?R(-Zi`g>I{_wTPb5&hqtPezZ%|}sB#Z)g>ljv zkob29#I#`4Bm48>JEXx)3e)JgGilNAR=xN(9T?1%L3R`Vobc8OMFl(UCN>J4f)PE$ zuwrPd_%3N0)(VF1uV8W=(?Dn~z(deZ`CY2!e+4y{=NuP4JQ1)%p^K@4FhAZ8|I;1C zt7g(BQk!-}dmRwZRm97N^5V5ciRMTeJ_nS|1{u;oc_Lv3 zZ{V*mO9u+#5K`-Can_YE_(a1h;6WVDQ(q+Vdti!Rq$yWUlm$1*OIq{e5Nw~))szue zGr*0?vM%lNuDa?tLZMhinzV6Kk(wsl*{xJiWcgQ-c~i(-BLUOU#wxJ&zXSZG*q=-nw_BMAP!L2M3*DA#r3@o}SolR(iy9Su%ZCIQ)0H2 z0LmfSxLX@9Eft1#xqdEayTHPrdhpO7Oj(k8Z7TuWP+wb0OJ=2B+h*A)_H8Ag-Jf8k75-B}E(S&9b zC~&rbGdqt^oej7%;@~lwxb|$!ni#h(4hIWq^6LaQwu8eDr2$_$=+r7QA{UyM)8;LF zx1*T$Q$usYhrP-eA$VARGwdD~2XTg2-$W_t&X2=6Gjgw{E`o6Bglo8kaw0RXrVE-Y zkW7(g2U`XLa1^W|8QBUehpy6-+e!gZ+?z(D2Ve$j2zYGbA4q*842*+$g-V=Vg^ksK zB?%RHWSuS@PD!Esz-)qf7+()~HBG6(z)4@7shuvVVel!}o)%s|Z4uU=wwoAWQW+lO z8cVw?hf-w zNB^*{+e<*bN|@4}YYEO4ET`r7Nw$xu)A1T*`;QdQQQT3IYcar1-%rd`dz40)89z}! z)GqhWf|H?CyvDWKXaO8{i}0oj?DeLbf%LBTNo`THyn}T4AYr{kEtc6|24i-V!3pJ@ zrW@i0Rc{v8kS2Xx{D3s9CRFhn-zT;ztc4+|_W{8zL2GT9a!Zvuq@@|3_0R5@L+R&$ z{*Ku*W~qnQ&%K#~!g`eMhXTw&8>jWS8noWHhRpte;H}MA|BptKW}dEIO_nihzGFOg9)@K1C$;asNGpj!1VlnJMp|os!CW@ z12Kq1=ta^Bram2Oz#5&g3HfJ2FB5k`JoGBHPyh+VT~I2-PQw$#$n!FBr9&%#fvRq> z7%9cGT@^clfaI|$$tx1RKMStFkK}4Ch?H`Sj&}?do(%OdIO{LPSE`*v{38*@cPd%5 zT%+a)x1V(lvIwFo963#O2ueY1h3C#H$A!&j0mq-u=_*rZ^1A$Vlz^WUs0FbBds$1B z5sY3H*gVSGjc4XML9(yTHI>hnU|FrTN*&pZ&t02nDyTsDY`iKp-3Qjs9ZRR1|L5u6 zbLQVnGM!;c(_Apz26;8PHrGPWC8JHKJgeM8^@)QaK>Bt%gj*@$^*}0+oFbi4PKnL| zq6fr<+q;zu4g+^*$Dw6MNtG8-MD|(> z#lS~ z)B!CV&uW)b6$GniGz3(}48acwfmEdeQ23|f$6)eAu)$5k;yd09y9&Ts!M6M39>prm z?@2{PS>`daF(NqDQ%j4hZ5@nk&j^*dhT3P`tl;*o%POJUFryYr%4w zUIxo)uqiiDRCwY)x`S@gXg38{aUVBO!mC!5mZG#oF2S4G1#+2B^qO9e!R z(&oeCrkCBr;}GTm7ZayZ7Zdz_FJpn>ryJ}rCY$}L!(fxj=y0ieol9Z-^y=d91J%JJ zfGy>Fq_h{b_Pkf)10w+j0WueSEU5f})exh_h8F(pRYwr23*s%#2&#5HuegQ6y*hCkCQt@-L^a~=d zC)rH|kC4A0=1vCcC05Da`8naWFkhe31^`a^kQEn$1RO!}6DnYz5pf+6(l2W*=KcDa7(YB=s|Lmm z_H9rOTPpE+Vu8(;_#Ak?0QhTShm9Oa$W?y@FnDvD3W(|D00i3L05HNSD(yoVE58*k z5pD!uhKAO?*kgVCyl>Kh5Bmy3DULGL9PVO_z(mz`^i0Tb)TTo&}Ii{m7~P^P`ejR zY9xhR!`opWO7VRb7u?62q$*csIxQu$}{W0SqG|nGP#rZ!;sk91o zrz=lTMvI>kUmC39pTZ{RGMo!Hk?t6kC1sWJP`}Y**!VWJN(M>{h|s9NubkeGY**3*9|W15#kW2mx0b zgj8;WFdQ6YjBA4}1tnP2q~e{!A<`FRAozz_*Jj#%CKOza1s=7fHXm>gg(~6jI9$gY z9*2u4Hqfo809S1aUHLFPLuyX|N}T;U!OvU!F3a$K(z@lcR4IN5YkIHpNW+(8`{zVm z=*xgG1%!--K#)QQkqXZiLa#nS9qwob)@&fOgumdd{*w4IYW_w-8(<70wh(oFXv@`s z zXh*{rq#1%D&}I{D6N3DY+B9Bo!`tX+I%q=^Z8)Z(iKyvLJiK8&D7qURXvUYJ2{4vU!B;5?~b6=1fW4tth{;b`d^nvx`721F+@!KWae)*m#oRKX?; zgvLK7%DRG$I|%rLos7b?7|P44%I5^y!^*qY$*Mg%2SRP&z`_9)b>}fWAyFFDk}g@7|$Q)O%I)Mf~W^5R*p#4q-6R>b=_|1@zzAI|cgTshslZ{-X? zR~+Rq>tkw`_4(-`F`N>g+9y8K7rM7kH1>sTeWIz)r&)K8=b641d{Ka7)@6Ols763C zqOogVL-#)UxiA*l4&8Vgtzk=6Cg$aST9;?nbEcl~>Cn8#is#oW7`BSaG4?Lhs?e z_6H6x?dC4{P7OaZxMx*Q+lg%_R-Ze4{EEWN0zMU_PYuhpbC!Jxq-`5T1FKfn2tQKQEgh727hz+LG* z8+Y&V_Fra|*C;{ZzZvEKB~`1hAlVSHz#UhZ>1m!22XXToH*ompYm21;!fl+FYue4Z zH3Q%vMJ41YMsC1HPTt5x!-_td4jb=k z&N__?2*+5hQdSlHM$zbaoG!i=p??4w;Vg||j^5bM5+iVpNDOlTTmR#mLU4aS%-NyV zsOaEs4g3jTvDSkeeLfDC;sFgbQ3k@5qJL_a23L#A=@p}-^*kqsxKc1v5zcXs<8C<& zmzo?!K&Io)lwM77OjU=`O32bm$kR#yO>Gj2I_~PY+a}z?37cuh*Sf5)1r>DSOSY&6 zlpq5Sh~~Jy^?|L6KIBU4oNIN!#Tacg*OlIxo8T{?`Ur#5;gmp&^Ac4le|95Rr?SpE z!&4hMy%6~^YGt7Czc_DB(WZW^7k<9WyFeNNt-TFO1pXS~>Xa)sM%-1u?i}vdl46cz2)h?H;X^5SKy8jzuwX zQB123{V@XPVxg*tQPms08G-{aU)I9ivUGWVOvu`0#5r)y!x590#R|_udvyuaJy8k{ zgSyvSR9z8UJ5{KQxrXkni19tr_??f(@ML*$%%ZR0Q`LAt!_%?ti(_gIEv?fFu|0M` z>uQ#l#&#@-;lKN*mAdkTzL*k{5H^bo0b$4)u?c9et6Q3gyC5q@VDuA0)e-9jtQVh- z31fE&r}ug`HKNwRx!%#~I_b}o+Xcp~QFestC*Ibc zJeoME_FTLIGV~V~p|`;(z60{{E|^9S%c9i`i{9f{v=;91f5sU*(R{hUxJ#Byg@mg`|y?i|N*=MlqQU>WWbEFYIShU-Nf zcZKD+K3Gi%$8rC9oA3XG;bsbrV}y|-h7VshY22tAXu_A;@pApizu+I1gCIT`OJyg3M5YoqJ`r<26`TEJ z%*lUWj|=)?58|xr2w>Z7wpHn>#l?HX=k|zy+#`DSh@b57PhT@b{CH2bvd7#xPhp(m z+k2|(AiaR5m+h&3W{+2Js<)@`mF&em*YTaXnv&tr9PWrYCO4i0nnP%pd;abjlbdn3 zH$cxm-H1iCr-2es^sWPZ+pwRPnKg81VR3TKFu0Scy z0u@d%=b(W`Z@drGPPc*ng4){FPKE1v)e%A6W3eBoj=;9Y=mf@E`n{c~)|4?JV7Hn3 zEdbA15ABsv%rP0RW4#d>Q62GWj$7;&yYRzaC%!1{6*~4x0s4^PQRkhH;S?^mD7iZj z;&!i{>H#xS9dY6l{>fgn2=S&XwA^RwFK?ow>Ga>B-sitdy}Q(ZM}M(@%JF8!un6V; zD|Bu%6mGfeKNq`pD@e(f??C+sD1B@1{82|@#=Hr&Bw2U-h_a>0$e-hwt+SfNB#L2(|CBG|i_e`-li6 z8~T&pU6#6%WWer0Af$WOOn0ul%RgPbZ?8I_Bv~Jv-hA)$e(D`}s9FBIN`uo~9F#ex zz{dwrVbSh-MmGcRI=1MLI7^nmS!z^aFRqt+~lj8a(dD5vDzvOv)Um%))rn#TPK*Md*_ z*i~cKEqH5D3%(?by3#S$n=idzYh3rJrxJXdqYq=ff3ahU|3Sw?(p`>6;Ihc#!eKbW z%hxWhS2L(vPxmap83-X%V}}tBki7KWVU#`|`$(-ZxY(5AutBG`W+gqiSXW64Be}Rs z$|+y$SPYT<2NUi2u0O0Y30Zwn5x)RmmTl|HQy#1jE>VBI@&%u;>cyzdl%w2OyQJfJ zCk)M5nAi9vFKzauao!~4w>|IVr-IY6#GNisS7zZA_&}|`e1T&@Ah^U+$--TR3wr5e z&ns|P3gC6>0btCU1;OW>YDR#+xN<=u<&?FYU;A+MEqr^z%R|q@+x4yoIu?10f(y4T zs#i<>3)d{F$N`adEL^$B`WjzyaYA6m{8G%po(%ZU!{>48N70SSPb)0ZOUmKSZ&ZD~ zQ~ilkRh$^FS>#`c^^ts>-cq>P`U>B!SI&3lD4#i9!L{?PkMO2P9B|mMX3450i8{FK zR}V~i2x!P{4lZ$Swc!&h7y2J^EV91Hw-ko!VWJ}Cs$JO+c&w4|}0I`y*cwYRHZ(g~;Y4b0DuLuFE`B|jg=l`8! z#me7H6Mfl}r12om(j;HD<0YtVS&o|3+lv1~y}3U4g6WOg7xd~uV9yKQ45ymbx^y7E zSVz0|qTCm1U+}+B!8=}Xg*sluP4&=tdvBf%mfT8K9%R}S-4ko|dN;LhO&hbRRWGzO zZrc6LH($qcM&rh9TX*k{Zp|CLd+VOPyLWyW+q!-0<~@V6x5hSqxoP9(uLm3UY~0lF z!IwL??)UEdX8T}c?DK{#!7owz$D20BqOq%={;}v4mVP0ai8PnfuV_9^dZU{*?vdqx zuaW;}OTj}n^e#cTJ=N{ZdyfbfA7X{Oa^V`e4yoC|t8Mq^xzdF9_{y`rn|PSE=*>9Y z2NQHxuDO@a()?@H@`HKeLwVva^2EpUpkmjO>lF{@iRF3nBYEPlXhqAT*D4^hz2bUi zNiNn2x8}Jt(u~SHuuGsS^hUgJl2cQmtbCx2Kh2a(L3^~f|Ysn+ZJ!? zxij@#m*->hXg!Ps`YC@R&x?=`H@M$6)F@5p@cLuT@cKQJjwpXV)3 zq&}4CN7Hr<&4RLM(zS%NcHzlW49y&T~ZAktV3D!qB6esxw_1~X3(pYv=0YY8h#L55a|2*_po}DL-RlS4ZG*j zrQ@F$p8d^IVQKmD=Y>a?Eqk)!mybSQ@$}N0^5;JL^z=FR3p1X5_UUJZJB2X<{LtXJ zPnJLWT)9xO^ttk9pBJ9DmkWdest + sta DEST+1 + lda #srcbegin + sta SRC1+1 + lda #srcend + sta SRC2+1 + ldy #$00 + jsr MOVE +.endmacro + +; Bank in a particular slot 7 ROM bank at CC00-CFFF +; Bank is in bits 4-6, so $00, $10, $20, ... $70. +.macro s7bank bank + lda $cfff + lda $c700 + lda $c0e8 + lda $c0ee + lda $c0ed + lda bank + sta $c0e8 +.endmacro + +; Fill some memory with $FF +.macro fillff base, len +.scope + lda #$ff + ldy #$00 +loop: sta base,y + iny + cpy #len + bne loop +.endscope +.endmacro + + + .org $4000 + + + ; jump table + jmp block0 + jmp block1 + jmp block2 + jmp block3 + + + ; $0000 - $1fff +block0: fillff $2000,0 ; $C000-C0FF empty (soft switches) + sta INTCXROMON + mv $2100,$c100,$c7ff ; $C100-C7FF from main ROM + sta INTCXROMOFF + + lda $cfff + lda $c100 + sta INTCXROMON + mv $2800,$c800,$cfff ; slot 1 option ROM alternate + sta INTCXROMOFF + lda $cfff + fillff $2ff8,8 + + mv $3000,$d000,$dfff ; D000-DFFF ROM + + rts + + + ; $2000 - 3fff +block1: mv $2000,$e000,$ffff ; E000-FFFF ROM + rts + + + ; $4000 - $5fff +block2: fillff $2000,0 ; $C000-C0FF empty (soft switches) + sta SLOTC3ROMON + mv $2100,$c100,$c7ff ; $C100-C7FF from slot ROM + sta SLOTC3ROMOFF + fillff $21c0,16 ; not sure, something funky with the ser/par logic + + lda $cfff + lda $c100 + mv $2800,$c800,$cfff ; slot 1 option ROM + lda $cfff + fillff $2ff8,8 + + lda $cfff + lda $c500 + mv $3000,$c800,$cfff ; slot 5 option ROM + lda $cfff + fillff $37f8,8 + + lda $cfff + lda $c200 + mv $3800,$c800,$cfff ; slot 2 option ROM + lda $cfff + fillff $3ff8,8 + + rts + + + ; $6000 - $7fff +block3: s7bank #$00 + mv $2000,$cc00,$cfff ; slot 7 option ROM bank 0 + fillff $23f8,8 + + s7bank #$10 + mv $2400,$cc00,$cfff ; slot 7 option ROM bank 1 + fillff $27f8,8 + + s7bank #$20 + mv $2800,$cc00,$cfff ; slot 7 option ROM bank 2 + fillff $2bf8,8 + + s7bank #$30 + mv $2c00,$cc00,$cfff ; slot 7 option ROM bank 3 + fillff $2ff8,8 + + s7bank #$40 + mv $3000,$cc00,$cfff ; slot 7 option ROM bank 4 + fillff $33f8,8 + + s7bank #$50 + mv $3400,$cc00,$cfff ; slot 7 option ROM bank 5 + fillff $37f8,8 + + lda $cfff + lda $c600 + mv $3800,$c800,$cfff ; slot 6 option ROM + lda $cfff + fillff $3ff8,8 + + rts diff --git a/src/STARTUP.bas b/src/STARTUP.bas new file mode 100644 index 0000000..d7a7c87 --- /dev/null +++ b/src/STARTUP.bas @@ -0,0 +1,17 @@ +10 PRINT CHR$(4) "BLOAD DUMPROMNEW" +20 PRINT "Make sure slot 5 and 7 are" +30 PRINT "set to internal, and slot 1" +40 PRINT "is set to Parallel!" +50 PRINT +60 PRINT "Dumping $0000-$1FFF" +70 CALL 16384 +80 PRINT CHR$(4) "BSAVE ROM0000,A$2000,L$2000" +90 PRINT "Dumping $2000-$3FFF" +100 CALL 16384+3 +110 PRINT CHR$(4) "BSAVE ROM2000,A$2000,L$2000" +120 PRINT "Dumping $4000-$5FFF" +130 CALL 16384+6 +140 PRINT CHR$(4) "BSAVE ROM4000,A$2000,L$2000" +150 PRINT "Dumping $6000-$7FFF" +160 CALL 16384+9 +170 PRINT CHR$(4) "BSAVE ROM6000,A$2000,L$2000"