It works!

This commit is contained in:
Pecusx
2024-05-13 20:56:06 +02:00
parent 4a66d2730c
commit c1cec0d265
4 changed files with 2087 additions and 2119 deletions
+4 -20
View File
@@ -79,13 +79,13 @@ IRQENS = $10
; zmienne procedury ladowania pliku (w miejscu zmiennych CIO - ktore sa nieuzywane) ; zmienne procedury ladowania pliku (w miejscu zmiennych CIO - ktore sa nieuzywane)
; adres komorki pamieci do ktorej zapisujemy kolejny ladowany bajt pliku ; adres komorki pamieci do ktorej zapisujemy kolejny ladowany bajt pliku
InBlockAddr = $24 ; word InBlockAddr = $64 ; word
; dlugosc ladowanego bloku odjeta od $10000 (zwiekszana osiaga ZERO po zaladowaniu bloku w calosci) ; dlugosc ladowanego bloku odjeta od $10000 (zwiekszana osiaga ZERO po zaladowaniu bloku w calosci)
ToBlockEnd = $26 ; word ToBlockEnd = $66 ; word
BlockLen= $26 ; word BlockLen = $66 ; word
; najmlodszy z trzech bajtow zliczajacych do konca pliku - patrz ToFileEndH ; najmlodszy z trzech bajtow zliczajacych do konca pliku - patrz ToFileEndH
ToFileEndL = $28 ToFileEndL = $28
BlockATemp = $28 BlockATemp = $68
CompressedMapPos = $3D ; pozycja w skompresowanej mapie pliku CompressedMapPos = $3D ; pozycja w skompresowanej mapie pliku
CheckSUM = $30 CheckSUM = $30
@@ -199,23 +199,7 @@ movedproc
ToFileEndH ToFileEndH
.WO $0000 .WO $0000
FileInit ; skok JSR pod adres inicjalizacji po (przed) kazdym nastepnym bloku binarnym FileInit ; skok JSR pod adres inicjalizacji po (przed) kazdym nastepnym bloku binarnym
TXA
PHA
LDA ToFileEndL
PHA
LDA CompressedMapPos
PHA
LDA CompressedMapPos+1
PHA
JSR GoInitAddr JSR GoInitAddr
PLA
STA CompressedMapPos+1
PLA
STA CompressedMapPos
PLA
STA ToFileEndL
PLA
TAX
FileNextBlock FileNextBlock
; wczytanie kolejnego bloku binarnego ; wczytanie kolejnego bloku binarnego
JSR FileGetBlockStart ; pobranie dwoch bajtow (adres poczatku bloku) JSR FileGetBlockStart ; pobranie dwoch bajtow (adres poczatku bloku)
+235 -235
View File
@@ -1,4 +1,4 @@
mads 2.1.6 build 65 (4 Jun 23) mads 2.1.7 build 3 (13 Sep 23)
Label table: Label table:
00 0247 PDVMASK 00 0247 PDVMASK
00 0340 IOCB 00 0340 IOCB
@@ -70,11 +70,11 @@ Label table:
00 000A DOSVEC 00 000A DOSVEC
00 000C DOSINI 00 000C DOSINI
00 0010 IRQENS 00 0010 IRQENS
00 0024 INBLOCKADDR 00 0064 INBLOCKADDR
00 0026 TOBLOCKEND 00 0066 TOBLOCKEND
00 0026 BLOCKLEN 00 0066 BLOCKLEN
00 0028 TOFILEENDL 00 0028 TOFILEENDL
00 0028 BLOCKATEMP 00 0068 BLOCKATEMP
00 003D COMPRESSEDMAPPOS 00 003D COMPRESSEDMAPPOS
00 0030 CHECKSUM 00 0030 CHECKSUM
00 0031 SECLENUS 00 0031 SECLENUS
@@ -130,246 +130,246 @@ Label table:
00 E471 JTESTROM 00 E471 JTESTROM
00 E474 JRESETWM 00 E474 JRESETWM
00 E477 JRESETCD 00 E477 JRESETCD
00 07D7 FILESECBUFF 00 07BE FILESECBUFF
00 07D7 TEMPMEMLO 00 07BE TEMPMEMLO
00 1FFD START 00 1FFD START
00 2000 MOVEDPROC 00 2000 MOVEDPROC
00 0700 LOADER 00 0700 LOADER
00 0700 LOADER.TOFILEENDH 00 0700 LOADER.TOFILEENDH
00 0702 LOADER.FILEINIT 00 0702 LOADER.FILEINIT
00 071B LOADER.FILENEXTBLOCK 00 0705 LOADER.FILENEXTBLOCK
00 0730 LOADER.FILENOFFFFHEAD 00 071A LOADER.FILENOFFFFHEAD
00 0763 LOADER.WHATISIT 00 074D LOADER.WHATISIT
00 0772 LOADER.FILENOFIRSTBLOCK 00 075C LOADER.FILENOFIRSTBLOCK
00 077C LOADER.BLOCKREADLOOP 00 0766 LOADER.BLOCKREADLOOP
00 0788 LOADER.FILEGETBLOCKSTART 00 076F LOADER.FILEGETBLOCKSTART
00 0793 LOADER.GOINITADDR 00 077A LOADER.GOINITADDR
00 0796 LOADER.SIOJMP 00 077D LOADER.SIOJMP
00 079A LOADER.BLOKDANYCHIO_LOADER 00 0781 LOADER.BLOKDANYCHIO_LOADER
00 07A2 LOADER.SECLEN 00 0789 LOADER.SECLEN
00 07A4 LOADER.SECTORNUMBER 00 078B LOADER.SECTORNUMBER
00 07A6 LOADER.ENDOFFILE 00 078D LOADER.ENDOFFILE
00 07AF LOADER.JRTS 00 0796 LOADER.JRTS
00 07B0 LOADER.GETFILE2BYTES 00 0797 LOADER.GETFILE2BYTES
00 07B8 LOADER.GETFILEBYTES 00 079F LOADER.GETFILEBYTES
00 07D6 LOADER.INSECTORCOUNTH 00 07BD LOADER.INSECTORCOUNTH
00 07D7 LOADER.ZZZZZZ 00 07BE LOADER.ZZZZZZ
00 07D7 LOADER.FIRSTMAPSECTORNR 00 07BE LOADER.FIRSTMAPSECTORNR
00 07D9 LOADER.LOADSTART 00 07C0 LOADER.LOADSTART
00 07E2 LOADER.OUTMEMCLEARLOOP 00 07C9 LOADER.OUTMEMCLEARLOOP
00 07E4 LOADER.INMEMCLEARLOOP 00 07CB LOADER.INMEMCLEARLOOP
00 0800 LOADER.LASTMEMPAGECLEAR 00 07E7 LOADER.LASTMEMPAGECLEAR
00 0821 LOADER.TEMPTOFILEENDL 00 0808 LOADER.TEMPTOFILEENDL
00 2122 JAKIETURBO 00 2109 JAKIETURBO
00 2122 USMODE 00 2109 USMODE
00 2123 QMEG 00 210A QMEG
00 2124 BOOTDRIVE 00 210B BOOTDRIVE
00 2125 BOOTSHIFT 00 210C BOOTSHIFT
00 2126 FOLDERTURBO 00 210D FOLDERTURBO
00 2127 NEWCOLORS 00 210E NEWCOLORS
00 2128 BIN2ASCIIHEX 00 210F BIN2ASCIIHEX
00 2133 LABELKA 00 211A LABELKA
00 2134 EDRIVER 00 211B EDRIVER
00 2137 EDITOROPEN 00 211E EDITOROPEN
00 2165 MAINPROG 00 214C MAINPROG
00 2183 USSPEED 00 216A USSPEED
00 2185 USSTATPRINT 00 216C USSTATPRINT
00 218E NOUSSPEED 00 2175 NOUSSPEED
00 2191 ERROR148 00 2178 ERROR148
00 2193 ERRORDISPLAY 00 217A ERRORDISPLAY
00 21BA ERRORNUMHEX 00 21A1 ERRORNUMHEX
00 21C2 WAITKLOOP 00 21A9 WAITKLOOP
00 21D4 READMAINDIR 00 21BB READMAINDIR
00 21ED SPARTADISK 00 21D4 SPARTADISK
00 21F8 SEKTOR128B 00 21DF SEKTOR128B
00 220A READDIR 00 21F1 READDIR
00 2243 LABEL46 00 222A LABEL46
00 2251 LABEL40 00 2238 LABEL40
00 225F LABEL43 00 2246 LABEL43
00 226C PROGNAME 00 2253 PROGNAME
00 2277 LABEL42 00 225E LABEL42
00 2282 LABEL45 00 2269 LABEL45
00 2285 DATFILEFOUND 00 226C DATFILEFOUND
00 22A5 LABEL47 00 228C LABEL47
00 22BC TOSTARTOFDIR 00 22A3 TOSTARTOFDIR
00 22CD STATUSBARPRINT 00 22B4 STATUSBARPRINT
00 22D3 DENSITYDISPLAY 00 22BA DENSITYDISPLAY
00 22D5 DRIVEDISP1 00 22BC DRIVEDISP1
00 22E8 QMEGSTATUS 00 22CF QMEGSTATUS
00 22F0 BASSTATUS 00 22D7 BASSTATUS
00 22F7 USSTATUS 00 22DE USSTATUS
00 2373 LABEL68 00 235A LABEL68
00 2381 NOLASTFILEINDIR 00 2368 NOLASTFILEINDIR
00 238B LABEL50 00 2372 LABEL50
00 2395 LABEL51 00 237C LABEL51
00 23BC LABEL53 00 23A3 LABEL53
00 23C4 LABEL56 00 23AB LABEL56
00 23CD LABEL55 00 23B4 LABEL55
00 23D0 LASTFILESPAGEJUMP 00 23B7 LASTFILESPAGEJUMP
00 23D3 LABEL54 00 23BA LABEL54
00 23D6 LABEL52 00 23BD LABEL52
00 23E8 LABEL65 00 23CF LABEL65
00 23F6 LABEL60 00 23DD LABEL60
00 2404 COMPARENAMES 00 23EB COMPARENAMES
00 2406 CHECKING62 00 23ED CHECKING62
00 2412 REPLACINGNAME 00 23F9 REPLACINGNAME
00 241E CHECKNEXTNAME 00 2405 CHECKNEXTNAME
00 2429 LABEL64 00 2410 LABEL64
00 242C GAMENAMEPRINT 00 2413 GAMENAMEPRINT
00 2438 YPOSGAMENAME 00 241F YPOSGAMENAME
00 2439 GAMEKEYSYMBOL 00 2420 GAMEKEYSYMBOL
00 243C GAMENAME 00 2423 GAMENAME
00 2479 LABEL66 00 2460 LABEL66
00 2484 LABEL59 00 246B LABEL59
00 248F LABEL69 00 2476 LABEL69
00 2492 MAINDIRKEY 00 2479 MAINDIRKEY
00 2495 UPDIRKEY 00 247C UPDIRKEY
00 24A5 ESCKEY 00 248C ESCKEY
00 24B2 NOSHIFTESC 00 2499 NOSHIFTESC
00 24B9 TOSTARTOFDIRJUMP 00 24A0 TOSTARTOFDIRJUMP
00 24BC SPACEKEY 00 24A3 SPACEKEY
00 24C3 CONTARROWSPRINT 00 24AA CONTARROWSPRINT
00 24D4 LASTFILESPAGE 00 24BB LASTFILESPAGE
00 24D6 KEYBOARDPROC 00 24BD KEYBOARDPROC
00 24E8 COLORSALREADYSET 00 24CF COLORSALREADYSET
00 250D NOCTRLLETTER 00 24F4 NOCTRLLETTER
00 251E NONUMBER 00 2505 NONUMBER
00 2524 BIGLETTERS 00 250B BIGLETTERS
00 254B SUBDIRTEXT 00 2532 SUBDIRTEXT
00 2554 GOTOLOADER 00 253B GOTOLOADER
00 255C DISKNOTCHANGED1 00 2543 DISKNOTCHANGED1
00 2568 SETTURBOOFF 00 254F SETTURBOOFF
00 256B NOSHIFT 00 2552 NOSHIFT
00 2F80 COMPRESSEDMAP 00 2F80 COMPRESSEDMAP
00 25C0 GENERATECOMPRESSEDMAP 00 25A7 GENERATECOMPRESSEDMAP
00 25FF JUMPFORWARD 00 25E6 JUMPFORWARD
00 260C OFFSETTOBIG 00 25F3 OFFSETTOBIG
00 2622 GETNEXTMAPWORD 00 2609 GETNEXTMAPWORD
00 262D SECTOR00 00 2614 SECTOR00
00 2638 OPS01 00 261F OPS01
00 2644 NOTEQAL01 00 262B NOTEQAL01
00 266F ADDTOCOMPRESSEDMAP 00 2656 ADDTOCOMPRESSEDMAP
00 2681 XXXXBLA 00 2668 XXXXBLA
00 2689 NOINC013 00 2670 NOINC013
00 268A FLUSHBUFFER 00 2671 FLUSHBUFFER
00 2695 NOFLUSH 00 267C NOFLUSH
00 2696 ENDMAKINGMAP 00 267D ENDMAKINGMAP
00 2699 LOADERGO 00 2680 LOADERGO
00 26AC NORUNFROMDOS 00 2693 NORUNFROMDOS
00 26BD AFTERWORMSTART 00 26A4 AFTERWORMSTART
00 26F9 MOVELOOP1 00 26E0 MOVELOOP1
00 2711 CLEARLOOP1 00 26F8 CLEARLOOP1
00 2723 NOZPAGE 00 270A NOZPAGE
00 274A FILETOOPEN 00 2731 FILETOOPEN
00 2757 ADDSPEEDPROC 00 273E ADDSPEEDPROC
00 2771 HAPPYRELOCATE 00 2758 HAPPYRELOCATE
00 2791 LABEL72X 00 2778 LABEL72X
00 2795 TURBORELOCADDR 00 277C TURBORELOCADDR
00 27A0 LABEL73 00 2787 LABEL73
00 27BB NOHAPPYLOADER 00 27A2 NOHAPPYLOADER
00 27BC HAPPYUSMOVEDPROC 00 27A3 HAPPYUSMOVEDPROC
00 27D3 COMMANDLOOP 00 27BA COMMANDLOOP
00 27D4 HAPPYSPEED 00 27BB HAPPYSPEED
00 27DF DELAYLOOPCMD 00 27C6 DELAYLOOPCMD
00 27E9 XJSR1 00 27D0 XJSR1
00 27FD XJSR2 00 27E4 XJSR2
00 2803 XJSR3 00 27EA XJSR3
00 2809 XJSR4 00 27F0 XJSR4
00 280E XJSR5 00 27F5 XJSR5
00 2811 WAITFORENDOFTRANSMISSION 00 27F8 WAITFORENDOFTRANSMISSION
00 281A XJSR6 00 2801 XJSR6
00 2824 DOUBLEACK 00 280B DOUBLEACK
00 2824 XJSR7 00 280B XJSR7
00 2830 READSECTORLOOP 00 2817 READSECTORLOOP
00 2830 XJSR8 00 2817 XJSR8
00 2835 XJSR9 00 281C XJSR9
00 283D XJSRA 00 2824 XJSRA
00 2844 ERRORHERE 00 282B ERRORHERE
00 284F ENDOFTRANSMISSION 00 2836 ENDOFTRANSMISSION
00 285D SECTRANSREG 00 2844 SECTRANSREG
00 2873 PUTSIOBYTE 00 285A PUTSIOBYTE
00 2874 WAITFORSERIAL 00 285B WAITFORSERIAL
00 2887 ADDCHECKSUM 00 286E ADDCHECKSUM
00 288F GETSIOBYTE 00 2876 GETSIOBYTE
00 2891 EXTERNALLOOP 00 2878 EXTERNALLOOP
00 2895 INTERNALLOOP 00 287C INTERNALLOOP
00 28A5 ACKRECEIVE 00 288C ACKRECEIVE
00 28BB ENDHAPPYUSPROC 00 28A2 ENDHAPPYUSPROC
00 28BB BLOKDANYCHIO_GETUSSPEED 00 28A2 BLOKDANYCHIO_GETUSSPEED
00 28C7 DIRMAPEND 00 28AE DIRMAPEND
00 28CA LABEL39 00 28B1 LABEL39
00 28DE DISCNOTCHANGED2 00 28C5 DISCNOTCHANGED2
00 2906 LABEL80 00 28ED LABEL80
00 2914 NONEXTMAPSECTOR 00 28FB NONEXTMAPSECTOR
00 2936 NOINCH 00 291D NOINCH
00 2966 LABEL79 00 294D LABEL79
00 2993 LABEL75 00 297A LABEL75
00 29A4 LABEL81 00 298B LABEL81
00 29B2 LABEL82 00 2999 LABEL82
00 29C0 READPERCOM 00 29A7 READPERCOM
00 29C5 READPERCOMRETRY 00 29AC READPERCOMRETRY
00 29D9 PERCOMERROR 00 29C0 PERCOMERROR
00 29DE SET1SECT128 00 29C5 SET1SECT128
00 29E9 BLOKDANYCHIO_PERCOM 00 29D0 BLOKDANYCHIO_PERCOM
00 29F5 READFIRSTSECT 00 29DC READFIRSTSECT
00 2A0B READSECTOR 00 29F2 READSECTOR
00 2A14 READSECTOR1 00 29FB READSECTOR1
00 2A22 DISKREADRETRY 00 2A09 DISKREADRETRY
00 2A2F LABEL85 00 2A16 LABEL85
00 2A39 BLOKDANYCHIO 00 2A20 BLOKDANYCHIO
00 2A45 DISKRETRYCOUNT 00 2A2C DISKRETRYCOUNT
00 2A46 PRINTXY 00 2A2D PRINTXY
00 2A72 LABEL92 00 2A59 LABEL92
00 2A8F LABEL90 00 2A76 LABEL90
00 2A96 LABEL91 00 2A7D LABEL91
00 2A9E LABEL89 00 2A85 LABEL89
00 2AB0 LABEL93 00 2A97 LABEL93
00 2AC1 LABEL88 00 2AA8 LABEL88
00 2AC8 LABEL87 00 2AAF LABEL87
00 2ACE LABEL94 00 2AB5 LABEL94
00 2AD3 GOERRORDISP 00 2ABA GOERRORDISP
00 2AD6 GOSIO 00 2ABD GOSIO
00 2ADE STANDARDSPEED 00 2AC5 STANDARDSPEED
00 2AE1 TABLE2DCB 00 2AC8 TABLE2DCB
00 2AE9 IOTABLEADDR 00 2AD0 IOTABLEADDR
00 2AF3 CLOSE1 00 2ADA CLOSE1
00 2AF5 CLOSEX 00 2ADC CLOSEX
00 2AFD GETKEY 00 2AE4 GETKEY
00 2B41 GKEYERROR 00 2B28 GKEYERROR
00 2B44 KDRIVER 00 2B2B KDRIVER
00 2B47 DISCCHANGECHECK 00 2B2E DISCCHANGECHECK
00 2B50 LABEL98 00 2B37 LABEL98
00 2B5D CHANGEDD 00 2B44 CHANGEDD
00 2B5E ASTERIKS 00 2B45 ASTERIKS
00 2B7C GETHEXNUMBER 00 2B63 GETHEXNUMBER
00 2B8C GETHEX4BITS 00 2B73 GETHEX4BITS
00 2B97 ISNUMBER 00 2B7E ISNUMBER
00 2B98 SETDRIVENR 00 2B7F SETDRIVENR
00 2BAB SETDRIVELETTER 00 2B92 SETDRIVELETTER
00 2BBA SETBLOKDANYCHDRIVE 00 2BA1 SETBLOKDANYCHDRIVE
00 2BC7 MEMLOPRINT 00 2BAE MEMLOPRINT
00 2BFE MEMLOVALUE 00 2BE5 MEMLOVALUE
00 2C04 XJSRTABLEL 00 2BEB XJSRTABLEL
00 2C0E XJSRTABLEH 00 2BF5 XJSRTABLEH
00 2C18 HAPPYOFFSET 00 2BFF HAPPYOFFSET
00 2C1A DENSITYCODES 00 2C01 DENSITYCODES
00 2C1D ONTEXT 00 2C04 ONTEXT
00 2C20 OFFTEXT 00 2C07 OFFTEXT
00 2C23 PDVMASKTEMP 00 2C0A PDVMASKTEMP
00 2C24 PERCOMDATA 00 2C0B PERCOMDATA
00 2C30 FIRSTSECTORSTABLE 00 2C17 FIRSTSECTORSTABLE
00 2D00 FIRSTSECTORBUFF 00 2D00 FIRSTSECTORBUFF
00 2D00 PROGRAMEND 00 2D00 PROGRAMEND
00 2D80 DIRMAPSECTORBUFF 00 2D80 DIRMAPSECTORBUFF
00 2F80 DIRSECTORBUFF 00 2F80 DIRSECTORBUFF
00 2C24 FIRSTRUN 00 2C0B FIRSTRUN
00 2C2E NOSHIFTBOOT 00 2C15 NOSHIFTBOOT
00 2C37 BASSTATPRINT 00 2C1E BASSTATPRINT
00 2C40 BRAKBASICA 00 2C27 BRAKBASICA
00 2C42 TESTQMEGLOOP 00 2C29 TESTQMEGLOOP
00 2C54 QSTATPRINT 00 2C3B QSTATPRINT
00 2C5D BRAKQMEGA 00 2C44 BRAKQMEGA
00 2C75 QMEGSTRING 00 2C5C QMEGSTRING
00 0080 MAPCOUNTER 00 0080 MAPCOUNTER
00 0082 COMPRESSEDMAPCOUNTER 00 0082 COMPRESSEDMAPCOUNTER
00 0084 MAPCOUNTERMEM 00 0084 MAPCOUNTERMEM
+1848 -1864
View File
File diff suppressed because it is too large Load Diff
BIN
View File
Binary file not shown.