,LT!}CD l0C)HCC YhL*h `CmCD`  R@P1 - L Y!ή0@R !L`L C D  :CS S) )CDD 0 CD CDL / ˅ͩ@̩΢ˑ  L@T8(8:AUTORUN.SYS =ONO  c}E q0 \C)CC8`DCeECiD` RP h1$E ȍ @y b Y)hܭ]L]` q  DMD   u j)`0  J8j1f0( )* I8H23xԌԌթΘh ձ2Ց00ձ0Hh2XԦ`  *'  } *(L `(  L l pL[,L] C i0  p  gފދLh ( LD 0  C  C  \i +$+0'; $(%)  b L[C `D P^߰")(݃   $DDG@НL]S")M T H0 G$Ș݃ b 8$}$%8(() T `$E0(0)8`$GE` P Li 8GD }L[ PH >iJ ;  yyB ' |L[ "E( % H$ H#`L]B  0 G LO<  ( d lH۪!A3 A jA !B EIC Y$E0 F  < 7 JN 8Ndâ!,P h0ʠJd,6 ' r/ $ ɛ ` '  L[  l }-        L[L  }  '  L[   p   ` g  l }) g ' L[) ̠,L]T-0 |LM N݃:ː6UV LM N L(TU N,)MLL[IL3GDIɛ ɜ DI  , JȊGм   G I) GȦ=*GG ȄI1200820I H1E 1h0hIGI2ȢI`FE 0ɛ rɛ$ l '蚦TTUVD`M L$:;Pyȱ$` r  iȱ$/ :ȱ$VWyA**⩀ / `$***? mL]-+ȱ$ɛ m* ? g. $0f.?'@BrAsTt[ 0: gL  `$0`j`& CpCi s L0J Cܢj? I#𴽎F ގМގ& & 0 C4 08L`0   | 레L] EGȽGȽG | E` 8,  }EG)݀G)ȱGȱG`"!L] l!i栠$8  (IƭIp  h,g+j? 8 ii(Lq)! S S0$}) E9`H)N,L]8GH Lq`gNgfj****8jHi h`  2J  &e2i`"%?&;^$IM ! ! <u hh`$Ev옝^! 1EHFHjm GHm H`u$Ev`L=? +`!,pFE ȄD8 q D&E`I0` i`+DOS SYSMOC.I  J ٍ = ) F)8`Ll T!U<; Ln <JM -18    HH =D 1 :  /1[F:M #.! 0`>C #   #`>   eL'>/b;\I\o@ @LK~ L  % /e  L ; HH0S0N:;=91D,1ɛK$ɛ`:;ʾ  ,ɛ`XYȄ #`DTDRLUFFFCICLRSJ==CIYEEONS DLNOOUAOOOARPLNCL#####PANVBNFR*),-PQORa/%<) j ө  RES L%-, # 3 0 %   4(H 4(`( 3  #  ZOiۨ L4RE 3 =F S Z +8 0+  FF % 4 4& 4(X)Y    # 4 ʤ Ȅ LF F LH hL4`*J 0 B B 0a   8    Lkl  );<  : ` 0 } T T 7̀΀LIl <;`<L 3   #/ ! R( 7 7   7 89i L7 ,(&   L480  ` Ln    `   HJJJJ h) ii0HI B V`0  ,BLV[J  B Vso Fhh` GH ,H hɐɀɡ)HDCȱCɛeCDD hN MSп` ED` OIH`hhXhh  nL Free FilesBreakI/O-Error 163Disk fullWrite protectedFile MismatchBad Filename(c) by Stefan Dorndorf RUN: * RAM-CART VERSION by UM'1991 *File lockedDevice doneDirectory fullFile not foundBad Load FileNot DOS II+Bad HexAbort-> Source-> DestinationD1:+DOS SY+DOS SYy@CD  @  8CxԎխ1 BB SWITCH TO WRITE AND RUN INIT AGAIN !LX@խ( BB RAM-CART NOT INSTALLED !!!LX@ʎթ@X BB * PRESS ANY KEY TO INIT RAM-CART * Xi Yi0i  ˅̩@ mC̽C0&CCB 8C bB!pi ̩q Ю  0 B   B   B   B 8C BB ALL CORRECT ? (Y/N) NDY 8C BB SWITCH TO READ xԭԠLwL@˩ mC ii`hh΢Ρ HH`R BB ENTER NAME OR ESC TO SKIP U BB* *R BB >> <<"S EH hɛD?EIHB VCCi 晩'S `R BB}RAM-CART INITIALIZER by UNERRING MASTER`0 )J 1f0  )* I8 23xԌԭձ2Ց00ձ0Hh2X`AAyyB 'խЍD   Lt DR BƢ2 3   Xi|Yi ɛBi! i挱ȱ@i%挥i ж Lw8Aŏ誽 @ R BJ VBDE VLl B 2i23i3Ƌ`E:}RAMCART INITIALIZER by UNERRING MASTER2 3 B - L      l ŏ楎Ő Ll`  %`-  `23 B% ) & ' 拠`0 )J 1f0  )* I8 xԌԎձ0Hh2X`掦01` i i  L! 230 )J 1f0  )* I8 xԌԎձ0Hh2XԠ}) ȱ ȥ鿰ei  Ї 8ƐL ; l `掦01`"L˾0 )J 1f0  )* I8 ՠ02`4 2i23i34`xԎԽ L]  23 .  l23 . `#3 . ` ( (vLB`LELExԍծIբ@X`H B hY#Hޠ BhxԮբ@X`RAM-CART NOT INSTALLED !DO YOU WANT TO SWITCH TO WRITE (Y/N) ? DO YOU WANT TO SWITCH TO READ (Y/N) ? NOW YOU CAN SWITCH !`{ ADEMK ""---------------------------- . Odczyt danych RAM-CART'a  "". 06.03.2006. ZENON/DIAL""---------------------------- & Zmienne.6-@#@;,.Bufor na dane567@,.67,..67@,.56.$;AU,$Procedury maszyn.!;@ ,!Zmienne ogolne;@(,Zapis (dysk) &&6.hhhhhBhEhDhIhHLV2. '@.@@K:d- MENU -nXAdAU"(>:A%,4-@@X(R A M -- C A R T odczyt danychs++(#  64/128k t( Dane: x(-@%@%(Bufor=B:,(( (1B:,"$-@1@.(Pusty1(5-C:,C:,%@%(F:, ) ,(/(2(5($$( - Odczyt z RAM-CART'a%%( - Zapis danych na dysk""( - Kasowanie pamieci( - RestartWybor opcji2 )-@@2(Zenon Rakoczy 05.03.2008,,($!(!( Jakie polecenie? )@"@'%!! @I)!@QA +&@H,$A Odczyt danych z RAM-CART'a4-@ *@4(Odczyt danych z RAM-CART'aTT6.Jhhhxԍԍ/˩̩ՠˑͥ@X@ԩ< 67B:,%@,.>:@4,<67B:,%@,.ԍ/`V("(Numer banku (0-3/0-7) &<6-$@%@V67 +@3<@3,.>:,67,. (>:A%,6-?:C:,:@4,<67B:,%@,.ԍ/` 6-?:C:,, - A'Podprogramy'B:,!@$'I-@@1(W buforze brak danych E-@AI $' A.': Koniec programu D:ODCZYT.BAS7B:,%@,.>:@4,<67B:,%@,.ԍ/` 6-?:C:,, * RAM-CART \ ROM-CART 128/256k* Odczyt bloku danych 16k* --------------- 04.03.2008. - opt 22 ;kod do pamieci org 1536 ;adres ladowania* Pobierz ze stosu parametry* Wywolanie z BASICA* X=USR((1536),ADR(A$))* 1536 adres procedur/y* A$ bufor na dane bloku 16k* START procedury pla ;dla BASICA pla ;A$=bufor na dane sta 1 ;MSB bufora pla sta 0 ;LSB bufora lda #0 ;wyzeruj sta 205 ;licznik stron* Wylacz przerwania sei 0 lda #0 sta $d40e sta $d400 sta $22f* Skad dane pobierac: $8000-$BFFF lda <$8000 ;LSB adresu sta 203 ;zapamietaj lda >$8000 ;MSB adresu sta 204 ;zapamietaj* Wlacz blok RAM-CARTA (16k)* Tu mozna zmieniac nr 1bloku* Tylko bity D0, D1, D3, D4, D5* RAM-CART w trybie - ODCZYT -* wpis 1 2 8 16 32* -----------------------------* Blok0 - 3 |D0=0 D1=1 D3=0 D4=0 D5=0* Blok1 - 11|D0=0 D1=1 D3=1 D4=0 D5=0* Blok2 - 19|D0=0 D1=1 D3=0 D4=12 D5=0* Blok3 - 27|D0=0 D1=1 D3=1 D4=1 D5=0* Blok4 - 35|D0=0 D1=1 D3=0 D4=0 D5=1* Blok5 - 43|D0=0 D1=1 D3=1 D4=0 D5=1* Blok6 - 51|D0=0 D1=1 D3=0 D4=1 D5=1* Blok7 - 59|D0=0 D1=1 D3=1 D4=1 D5=1 lda #2 ;blok nr0 RD4=1 RD5=0 sta $d500 ;rej3estr sprzetowy* Odczyt danych, blok 16k, 64 strony ldy #00 ;indeksacjadal lda (203),y ;pobierz dana sta (0),y ;do bufora (A$)* Zwieksz adres bufora A$ +1 inc 00 ;zwieksz adres LSB A$ bne sk1 ;LSB=0 NIE skok inc 041 ;zwieksz adres MSB A$* Zwieksz adres danejsk1 inc 203 ;zwieksz adres LSB bne dal ;LSB=0 NIE skok inc 204 ;zwieksz adres MSB* Cz pobrano 16k danych, 64 strony inc 205 ;licznik stron +1 lda 205 ;pobierz do porownania cm5p #64 ;czy odczytano 16kB bne dal ;NIE skok, pobieraj* Odlacz blok pamieci RAM-CARTa (16k)* gdy pobrano 16k danych lda #1 ;RD4=0 RD5=0 sta $d500 ;rejestr sprzetowy* Wlacz przerwania cli lda #64 sta $d40e lda 6#34 sta $d400 sta $22f rts ;powrot do BASICA endpamieci RAM-CARTa (16k)* gdy pobrano 16k danych lda #1 ;RD4=0 RD5=0 sta $d500 ;rejestr sprzetowy* Wlacz przerwania cli lda #64 sta $d40e lda J 6.03.2008. RAM-CART 64/128k Na dysku znajduje si program do od- czytu danych z pamici RAM-CART'a. DOS.AUT - DOS, wersja plikowa INIT.COM - Inicjalizer SW.COM - Procedura "Prze cz" ODCZYT.BAS - 8Program do odczytu banku READ.ASM - Procedura odczytu banku KASUJ.ASM - Procedura zeruje RAM-CART Program ODCZYT.BAS odczytuje 16k da- nych (bank) z pamici RAM-CART'a i za- pisuje na dysk celem p niejszego za- programowania pamici EPROM.9 RAM-CART w trybie - ODCZYT - !!! Numery bankw dla wersji: 64k (0-3) Numery bankw dla wersji: 128k (0-7) bank:D5-D3, D1=RD5, D0=RD4 wpis $A000.. $8000.. bank $D500 76543210 ---------- -------- 0 2 00000x1:0 RAM-CART 64/128k 1 10 00001x10 RAM-CART 64/128k 2 18 00010x10 RAM-CART 64/128k 3 26 00011x10 RAM-CART 64/128k 4 34 00100x10 RAM-CART 128k 5 42 00101x10 RAM-CART 128k 6 50 00110x10 RAM-CART 128k ; 7 58 00111x10 RAM-CART 128k1x10 RAM-CART 64/128k 2 18 00010x10 RAM-CART 64/128k 3 26 00011x10 RAM-CART 64/128k 4 34 00100x10 RAM-CART 128k 5 42 00101x10 RAM-CART 128k 6 50 00110x10 RAM-CART 128k %* RAM-CART \ ROM-CART 128/256k* Zeruje pamiec (128k)* --------------- 06.03.2008. - opt 22 ;kod do pamieci org 1536 ;adres ladowania* Pobierz ze stosu parametry* Wywolanie z BASICA* X=USR(1536)* 1536 adres procedury* START pr=ocedury pla ;dla BASICA* Wylacz przerwania sei lda #0 sta $d40e sta $d400 sta $22f* Blok0, (kody blokow) lda #03 ;blok0 do $D5xx=03 sta 205 ;3,11,19,27,35,43,51,59* $8000-$BFFF ten obszar zerujzer >lda <$8000 ;LSB adresu sta 203 ;zapamietaj lda >$8000 ;MSB adresu sta 204 ;zapamietaj* Wlacz blok RAM-CARTA (16k)* Tu mozna zmieniac nr bloku* Tylko bity D0, D1, D3, D4, D5* RAM-CART w trybie - ZAPIS -* wpis 1 2 ? 8 16 32* -----------------------------* Blok0 - 3 |D0=1 D1=1 D3=0 D4=0 D5=0* Blok1 - 11|D0=1 D1=1 D3=1 D4=0 D5=0* Blok2 - 19|D0=1 D1=1 D3=0 D4=1 D5=0* Blok3 - 27|D0=1 D1=1 D3=1 D4=1 D5=0* Blok4 - 35|D0=1 D1=1 D3=0 D4=0 D5=1* Blok5 - 43@|D0=1 D1=1 D3=1 D4=0 D5=1* Blok6 - 51|D0=1 D1=1 D3=0 D4=1 D5=1* Blok7 - 59|D0=1 D1=1 D3=1 D4=1 D5=1 lda 205 ;zerowany blok 16k sta $d500 ;rejestr sprzetowy* Zerowany blok 16k, 64 strony lda #00 ;A=0 tay #00 ;Y=0 indekAsacja tax #00 ;X=0 licznik strondal sta (203),y ;zeruj bajt pamieci* Zwieksz adres inc 203 ;zwieksz adres LSB bne dal ;LSB=0 NIE skok inc 204 ;zwieksz adres MSB* Cz wyzerowano 16k, 64 strony inx ;licznik stron +B1 cpx #64 ;czy wyzerowano 16kB bne dal ;NIE skok, zeruj dalej* Zeruj kolejny blok clc ;C=0 lda 205 ;pobierz kod bloku adc #08 ;kod nastepnego bloku sta 205 ;zapamietaj cmp #67 ;czy wszystko? beq kon ;TAK, kConiec bne zer ;NIE, to zeruj blok+1* Odlacz blok pamieci RAM-CARTa (16k)* gdy wyzerowano 16kkon lda #0 ;RD4=0 RD5=0 sta $d500 ;rejestr sprzetowy* Wlacz przerwania cli lda #64 sta $d40e lda #34 sta $d400 D sta $22f rts ;powrot do BASICA endlok pamieci RAM-CARTa (16k)* gdy wyzerowano 16kkon lda #0 ;RD4=0 RD5=0 sta $d500 ;rejestr sprzetowy* Wlacz przerwania cli lda #64 sta $d40e lda #34 sta $d400 4BDOS AUTB INIT COMB$SW COMB %ODCZYT BASB .READ ASMB7CZYTAJ DOCB <ZERUJ ASM