00000000: 44 52 56 C0 24 30 38 00 42 55 46 C0 24 43 45 30 |DRV.$08.BUF.$CE0|
00000010: 30 00 49 4E 49 54 49 35 C0 24 46 46 42 44 00 01 |0.INITI5.$FFBD..|
00000020: 00 49 31 C0 24 41 43 00 49 32 C0 24 41 45 00 49 |.I1.$AC.I2.$AE.I|
00000030: 35 C0 24 42 42 00 42 59 C0 24 30 32 00 57 4F 52 |5.$BB.BY.$02.WOR|
00000040: 4B C0 24 30 33 00 45 4E 44 C0 24 46 46 46 46 00 |K.$03.END.$FFFF.|
00000050: 01 00 C1 24 43 30 30 30 00 CA 22 53 56 50 41 43 |...$C000.."SVPAC|
00000060: 4B 22 2C 38 00 01 00 01 2D 2D 2D 20 4D 45 4D 4F |K",8....--- MEMO|
00000070: 52 59 2D 53 43 41 4E 4E 45 52 20 26 20 53 41 56 |RY-SCANNER & SAV|
00000080: 45 2D 43 52 55 4E 43 48 45 52 20 2D 2D 2D 00 01 |E-CRUNCHER ---..|
00000090: 00 43 52 55 4E 43 48 94 41 4E 46 4C 2B 31 00 84 |.CRUNCH.ANFL+1..|
000000A0: 41 4E 46 48 2B 31 00 8D 23 44 52 56 01 4F 50 45 |ANFH+1..#DRV.OPE|
000000B0: 4E 00 8C 24 42 41 00 8D 23 24 36 31 00 8C 24 42 |N..$BA..#$61..$B|
000000C0: 39 00 B1 24 46 33 44 35 00 8D 24 42 41 00 B1 24 |9..$F3D5..$BA..$|
000000D0: 45 44 30 43 00 8D 24 42 39 00 B1 24 45 44 42 39 |ED0C..$B9..$EDB9|
000000E0: 00 8D 23 24 30 31 00 B1 24 45 44 44 44 00 8D 23 |..#$01..$EDDD..#|
000000F0: 24 30 38 00 B1 24 45 44 44 44 00 B1 53 53 43 41 |$08..$EDDD..SSCA|
00000100: 4E 00 85 23 24 30 30 01 44 45 50 41 43 4B 45 52 |N..#$00.DEPACKER|
00000110: 20 4F 55 54 00 43 52 35 8D 44 45 50 41 43 4B 2C | OUT.CR5.DEPACK,|
00000120: 59 00 B1 24 45 44 44 44 00 9E 00 86 23 3C 50 41 |Y..$EDDD....#<PA|
00000130: 43 4B 2D 44 45 50 41 43 4B 00 A6 43 52 35 00 B1 |CK-DEPACK..CR5..|
00000140: 43 52 30 00 B1 53 54 4F 53 45 51 01 4C 41 53 54 |CR0..STOSEQ.LAST|
00000150: 20 53 45 51 00 B3 24 46 36 33 46 00 01 00 43 52 | SEQ..$F63F...CR|
00000160: 30 95 41 4E 46 4C 2B 31 01 43 52 55 4E 43 48 00 |0.ANFL+1.CRUNCH.|
00000170: 85 41 4E 46 48 2B 31 00 94 49 32 00 84 49 32 2B |.ANFH+1..I2..I2+|
00000180: 31 00 95 23 24 30 31 00 85 23 24 30 30 00 B1 47 |1..#$01..#$00..G|
00000190: 45 54 42 59 54 00 8C 42 59 00 43 52 32 B1 47 45 |ETBYT..BY.CR2.GE|
000001A0: 54 42 59 54 00 8E 42 59 00 A6 43 52 31 00 9F 00 |TBYT..BY..CR1...|
000001B0: A6 43 52 32 00 BD 01 4F 56 45 52 46 4C 4F 57 00 |.CR2...OVERFLOW.|
000001C0: 43 52 31 9A 00 B1 53 54 4F 53 45 51 00 95 23 24 |CR1...STOSEQ..#$|
000001D0: 30 31 00 9B 00 8E 42 59 01 4F 56 45 52 46 4C 4F |01....BY.OVERFLO|
000001E0: 57 20 3F 00 A7 43 52 32 00 8C 42 59 01 4E 45 57 |W ?..CR2..BY.NEW|
000001F0: 20 56 41 4C 55 45 53 00 B1 43 48 4B 45 4E 44 00 | VALUES..CHKEND.|
00000200: A4 43 52 32 00 83 00 01 00 53 54 4F 53 45 51 8D |.CR2.....STOSEQ.|
00000210: 42 59 01 43 54 52 4C 2D 42 59 54 45 20 3F 00 8E |BY.CTRL-BYTE ?..|
00000220: 44 43 30 00 A7 43 52 33 00 87 23 24 30 34 00 A5 |DC0..CR3..#$04..|
00000230: 43 52 33 00 43 52 34 B1 24 45 44 44 44 01 49 4E |CR3.CR4.$EDDD.IN|
00000240: 45 46 46 49 43 49 45 4E 54 00 BD 01 2D 3E 20 4E |EFFICIENT...-> N|
00000250: 4F 20 53 45 51 00 A6 43 52 34 00 83 00 43 52 33 |O SEQ..CR4...CR3|
00000260: 8D 44 43 30 01 53 54 4F 52 45 20 53 45 51 00 B1 |.DC0.STORE SEQ..|
00000270: 24 45 44 44 44 00 B9 00 B1 24 45 44 44 44 00 8D |$EDDD....$EDDD..|
00000280: 42 59 00 B3 24 45 44 44 44 00 01 00 53 53 43 41 |BY..$EDDD...SSCA|
00000290: 4E 95 41 4E 46 4C 2B 31 00 85 41 4E 46 48 2B 31 |N.ANFL+1..ANFH+1|
000002A0: 00 94 49 32 00 84 49 32 2B 31 00 85 23 24 30 30 |..I2..I2+1..#$00|
000002B0: 01 43 4C 52 20 42 55 46 46 45 52 00 AC 00 53 43 |.CLR BUFFER...SC|
000002C0: 36 8C 42 55 46 2C 59 00 8C 42 55 46 2B 24 30 31 |6.BUF,Y..BUF+$01|
000002D0: 30 30 2C 59 00 9E 00 A6 53 43 36 00 B1 53 43 30 |00,Y....SC6..SC0|
000002E0: 00 85 23 24 46 46 01 53 45 41 52 43 48 20 4C 4F |..#$FF.SEARCH LO|
000002F0: 57 45 53 54 00 84 49 31 01 56 41 4C 55 45 00 84 |WEST..I1.VALUE..|
00000300: 49 31 2B 31 00 9E 00 53 43 34 AC 00 90 00 8C 49 |I1+1...SC4.....I|
00000310: 35 00 8D 23 3E 42 55 46 00 8B 23 24 30 30 00 8C |5..#>BUF..#$00..|
00000320: 49 35 2B 31 00 84 57 4F 52 4B 00 85 23 24 30 30 |I5+1..WORK..#$00|
00000330: 00 8D 28 49 35 29 2C 59 00 9A 00 8E 49 31 00 9E |..(I5),Y....I1..|
00000340: 00 8D 28 49 35 29 2C 59 00 BB 00 8F 49 31 2B 31 |..(I5),Y....I1+1|
00000350: 00 9B 00 85 57 4F 52 4B 00 A5 53 43 33 00 8C 49 |....WORK..SC3..I|
00000360: 31 00 94 49 31 2B 31 00 84 44 43 30 00 53 43 33 |1..I1+1..DC0.SC3|
00000370: 9E 00 A6 53 43 34 00 83 00 01 00 53 43 30 85 23 |...SC4.....SC0.#|
00000380: 24 30 30 00 53 43 31 B1 47 45 54 42 59 54 00 90 |$00.SC1.GETBYT..|
00000390: 00 8C 49 35 00 8D 23 3E 42 55 46 00 8B 23 24 30 |..I5..#>BUF..#$0|
000003A0: 30 00 8C 49 35 2B 31 00 8D 28 49 35 29 2C 59 00 |0..I5+1..(I5),Y.|
000003B0: A8 00 8B 23 24 30 31 00 8C 28 49 35 29 2C 59 00 |...#$01..(I5),Y.|
000003C0: 9E 00 8D 28 49 35 29 2C 59 00 8B 23 24 30 30 00 |...(I5),Y..#$00.|
000003D0: 8C 28 49 35 29 2C 59 00 9C 00 B1 43 48 4B 45 4E |.(I5),Y....CHKEN|
000003E0: 44 00 A4 53 43 31 00 83 00 01 00 47 45 54 42 59 |D..SC1.....GETBY|
000003F0: 54 84 57 4F 52 4B 00 85 23 24 30 30 00 8D 28 49 |T.WORK..#$00..(I|
00000400: 32 29 2C 59 00 85 57 4F 52 4B 00 97 49 32 00 A6 |2),Y..WORK..I2..|
00000410: 47 42 31 00 97 49 32 2B 31 00 47 42 31 83 00 01 |GB1..I2+1.GB1...|
00000420: 00 43 48 4B 45 4E 44 8D 49 32 00 8E 45 4E 44 00 |.CHKEND.I2..END.|
00000430: 8D 49 32 2B 31 00 8F 45 4E 44 2B 31 00 83 00 01 |.I2+1..END+1....|
00000440: 00 01 2D 2D 2D 20 44 45 43 52 55 4E 43 48 45 52 |..--- DECRUNCHER|
00000450: 20 2D 2D 2D 00 01 00 44 45 50 41 43 4B C2 24 30 | ---...DEPACK.$0|
00000460: 45 2C 24 30 38 2C 24 43 38 2C 24 30 37 2C 24 39 |E,$08,$C8,$07,$9|
00000470: 45 00 C5 22 32 30 36 34 20 54 53 22 00 C2 24 30 |E.."2064 TS"..$0|
00000480: 30 2C 24 30 30 2C 24 30 30 00 01 00 5A 50 50 4F |0,$00,$00...ZPPO|
00000490: 53 C0 24 35 43 00 01 00 AB 00 97 24 30 31 00 85 |S.$5C......$01..|
000004A0: 23 24 33 32 00 44 43 33 8D 44 43 30 2D 31 2D 4B |#$32.DC3.DC0-1-K|
000004B0: 2C 59 00 8C 5A 50 50 4F 53 2D 31 2C 59 00 9C 00 |,Y..ZPPOS-1,Y...|
000004C0: A6 44 43 33 00 84 24 41 43 01 54 52 41 4E 53 20 |.DC3..$AC.TRANS |
000004D0: 50 52 4F 47 00 84 24 41 44 00 44 43 31 96 24 41 |PROG..$AD.DC1.$A|
000004E0: 44 00 96 24 41 46 00 44 43 32 9C 00 8D 28 24 41 |D..$AF.DC2...($A|
000004F0: 45 29 2C 59 00 8C 28 24 41 43 29 2C 59 00 AC 00 |E),Y..($AC),Y...|
00000500: A6 44 43 32 00 8D 24 41 46 00 8E 23 24 30 37 00 |.DC2..$AF..#$07.|
00000510: A6 44 43 31 00 8D 24 41 45 00 8A 23 24 46 46 00 |.DC1..$AE..#$FF.|
00000520: A8 00 8B 23 3C 50 41 43 4B 2B 31 2D 4B 00 8C 24 |...#<PACK+1-K..$|
00000530: 41 43 00 A4 41 4E 46 4C 00 97 24 41 44 00 41 4E |AC..ANFL..$AD.AN|
00000540: 46 4C 95 23 24 30 31 00 41 4E 46 48 85 23 24 30 |FL.#$01.ANFH.#$0|
00000550: 38 00 94 24 41 45 00 84 24 41 46 00 85 23 24 30 |8..$AE..$AF..#$0|
00000560: 30 00 B3 5A 50 50 4F 53 2B 31 00 01 00 44 43 30 |0..ZPPOS+1...DC0|
00000570: C2 24 39 39 01 43 4F 4E 54 52 4F 4C 2D 42 59 54 |.$99.CONTROL-BYT|
00000580: 45 00 44 43 37 B1 44 43 38 2D 43 01 44 45 50 41 |E.DC7.DC8-C.DEPA|
00000590: 43 4B 45 52 00 8E 5A 50 50 4F 53 00 A6 44 43 34 |CKER..ZPPOS..DC4|
000005A0: 00 B1 44 43 38 2D 43 00 BB 00 B1 44 43 38 2D 43 |..DC8-C....DC8-C|
000005B0: 00 C2 24 32 43 00 44 43 34 95 23 24 30 31 00 44 |..$2C.DC4.#$01.D|
000005C0: 43 36 8C 28 24 41 45 29 2C 59 00 97 24 41 45 00 |C6.($AE),Y..$AE.|
000005D0: A6 44 43 35 00 97 24 41 46 00 44 43 35 BD 00 A6 |.DC5..$AF.DC5...|
000005E0: 44 43 36 00 8D 24 41 44 00 A6 44 43 37 00 50 52 |DC6..$AD..DC7.PR|
000005F0: 43 8D 23 24 33 37 00 8C 24 30 31 00 AA 00 4A 55 |C.#$37..$01...JU|
00000600: 4D 50 B3 24 46 46 46 46 00 44 43 38 8D 28 24 41 |MP.$FFFF.DC8.($A|
00000610: 43 29 2C 59 00 97 24 41 43 00 A6 44 43 39 00 97 |C),Y..$AC..DC9..|
00000620: 24 41 44 00 44 43 39 83 00 50 41 43 4B C2 24 30 |$AD.DC9..PACK.$0|
00000630: 30 00 01 00 43 C0 44 43 30 2D 5A 50 50 4F 53 00 |0...C.DC0-ZPPOS.|
00000640: 4B C0 44 45 50 41 43 4B 2D 24 30 38 30 31 00 01 |K.DEPACK-$0801..|
00000650: 00 C6 00 00 4D |....M |
DRV.$08.BUF.$CE00.INITI5.$FFBD...I1.$AC.
I2.$AE.I5.$BB.BY.$02.WORK.$03.END.$FFFF.
..A$C000.J"SVPACK",8....--- MEMORY-SCANN
ER & SAVE-CRUNCHER ---...CRUNCH.ANFL+1..
ANFH+1..#DRV.OPEN..$BA..#$61..$B9..$F3D5
..$BA..$ED0C..$B9..$EDB9..#$01..$EDDD..#
$08..$EDDD..SSCAN..#$00.DEPACKER OUT.CR5
.DEPACK,Y..$EDDD....#<PACK-DEPACK..CR5..
CR0..STOSEQ.LAST SEQ..$F63F...CR0.ANFL+1
.CRUNCH..ANFH+1..I2..I2+1..#$01..#$00..G
ETBYT..BY.CR2.GETBYT..BY..CR1....CR2...O
VERFLOW.CR1...STOSEQ..#$01....BY.OVERFLO
W ?..CR2..BY.NEW VALUES..CHKEND..CR2....
.STOSEQ.BY.CTRL-BYTE ?..DC0..CR3..#$04..
CR3.CR4.$EDDD.INEFFICIENT...-> NO SEQ..C
R4...CR3.DC0.STORE SEQ..$EDDD....$EDDD..
BY..$EDDD...SSCAN.ANFL+1..ANFH+1..I2..I2
+1..#$00.CLR BUFFER...SC6.BUF,Y..BUF+$01
00,Y....SC6..SC0..#$FF.SEARCH LOWEST..I1
.VALUE..I1+1...SC4.....I5..#>BUF..#$00..
I5+1..WORK..#$00..(I5),Y....I1....(I5),Y
....I1+1....WORK..SC3..I1..I1+1..DC0.SC3
...SC4.....SC0.#$00.SC1.GETBYT....I5..#>
BUF..#$00..I5+1..(I5),Y....#$01..(I5),Y.
...(I5),Y..#$00..(I5),Y....CHKEND..SC1..
...GETBYT.WORK..#$00..(I2),Y..WORK..I2..
GB1..I2+1.GB1....CHKEND.I2..END..I2+1..E
ND+1......--- DECRUNCHER ---...DEPACKB$0
E,$08,$C8,$07,$9E.E"2064 TS".B$00,$00,$0
0...ZPPOS.$5C......$01..#$32.DC3.DC0-1-K
,Y..ZPPOS-1,Y....DC3..$AC.TRANS PROG..$A
D.DC1.$AD..$AF.DC2...($AE),Y..($AC),Y...
.DC2..$AF..#$07..DC1..$AE..#$FF....#<PAC
K+1-K..$AC..ANFL..$AD.ANFL.#$01.ANFH.#$0
8..$AE..$AF..#$00..ZPPOS+1...DC0B$99.CON
TROL-BYTE.DC7.DC8-C.DEPACKER..ZPPOS..DC4
..DC8-C....DC8-C.B$2C.DC4.#$01.DC6.($AE)
,Y..$AE..DC5..$AF.DC5...DC6..$AD..DC7.PR
C.#$37..$01...JUMP.$FFFF.DC8.($AC),Y..$A
C..DC9..$AD.DC9..PACKB$00...C.DC0-ZPPOS.
K.DEPACK-$0801...F..M
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL