MDR-DEPACKER.SEQ
FILE INFORMATION
FILENAME(S): MDR-DEPACKER.SEQ
FILE TYPE(S): SEQ
FILE SIZE: 1.8K
FIRST SEEN: 2025-11-30 18:06:39
APPEARS ON: 1 disk(s)
FILE HASH
596a4e7fdb7bc398113972b6143f03732621fb64b10cda41c980e6cb80ca3e39
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PUBLICATION 19 | MDR-DEPACKER.SEQ | SEQ | Xii | 8 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 3B C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..;.............| 00000010: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000020: C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 0D 3B 4D 44 52 2D |...........;MDR-| 00000030: 44 45 50 41 43 4B 45 52 20 56 32 20 28 55 4C 54 |DEPACKER V2 (ULT| 00000040: 52 41 20 53 50 45 45 44 20 56 45 52 53 49 4F 4E |RA SPEED VERSION| 00000050: 29 20 DD 0D 3B 43 4F 44 45 44 20 4F 4E 20 31 35 |) ..;CODED ON 15| 00000060: 2E 20 4A 41 4E 55 41 52 59 20 31 39 39 36 20 42 |. JANUARY 1996 B| 00000070: 59 20 4D 41 44 52 4F 4D 20 20 20 DD 0D 3B 43 4F |Y MADROM ..;CO| 00000080: 50 59 52 49 47 48 54 20 42 59 20 43 52 45 41 4D |PYRIGHT BY CREAM| 00000090: 20 44 45 53 49 47 4E 20 20 20 20 20 20 20 20 20 | DESIGN | 000000A0: 20 20 20 20 DD 0D 3B 20 20 20 20 20 20 20 20 20 | ..; | 000000B0: 20 20 20 20 41 4E 44 20 4C 45 50 53 49 20 44 45 | AND LEPSI DE| 000000C0: 56 45 4C 4F 50 4D 45 4E 54 53 20 20 20 DD 0D 3B |VELOPMENTS ..;| 000000D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000000E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000000F0: C0 C0 C0 C0 C0 C0 DD 0D 3B 4F 4E 4C 59 20 54 4F |........;ONLY TO| 00000100: 20 55 53 45 20 57 49 54 48 20 4D 44 52 2D 50 41 | USE WITH MDR-PA| 00000110: 43 4B 45 52 20 31 2E 32 20 4F 52 20 31 2E 35 DD |CKER 1.2 OR 1.5.| 00000120: 0D 3B 50 41 43 4B 45 44 20 46 49 4C 45 53 2E 20 |.;PACKED FILES. | 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000140: 20 20 20 20 20 20 20 20 DD 0D 3B 20 20 20 20 20 | ..; | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000170: 20 DD 0D 3B 45 58 41 4D 50 4C 45 20 54 4F 20 44 | ..;EXAMPLE TO D| 00000180: 45 50 41 43 4B 20 41 20 50 41 43 4B 45 44 20 46 |EPACK A PACKED F| 00000190: 49 4C 45 20 41 54 20 20 20 20 DD 0D 3B 24 36 30 |ILE AT ..;$60| 000001A0: 30 30 20 49 4E 20 4D 45 4D 4F 52 59 20 54 4F 20 |00 IN MEMORY TO | 000001B0: 24 32 30 30 30 20 20 20 20 20 20 20 20 20 20 20 |$2000 | 000001C0: 20 20 20 DD 0D 3B 20 20 20 20 20 20 20 20 20 20 | ..; | 000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 DD 0D 3B 20 | ..; | 000001F0: 20 20 20 4C 44 41 20 23 3C 24 36 30 30 30 20 3B | LDA #<$6000 ;| 00000200: 50 41 43 4B 45 44 20 20 20 20 20 20 20 20 20 20 |PACKED | 00000210: 20 20 20 20 20 DD 0D 3B 20 20 20 20 4C 44 58 20 | ..; LDX | 00000220: 23 3E 24 36 30 30 30 20 3B 46 49 4C 45 20 20 20 |#>$6000 ;FILE | 00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 0D | ..| 00000240: 3B 20 20 20 20 53 54 41 20 5A 50 31 20 20 20 20 |; STA ZP1 | 00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000260: 20 20 20 20 20 20 20 DD 0D 3B 20 20 20 20 53 54 | ..; ST| 00000270: 58 20 5A 50 32 20 20 20 20 20 20 20 20 20 20 20 |X ZP2 | 00000280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000290: DD 0D 3B 20 20 20 20 4C 44 41 20 23 3C 24 32 30 |..; LDA #<$20| 000002A0: 30 30 20 3B 44 45 50 41 43 4B 20 20 20 20 20 20 |00 ;DEPACK | 000002B0: 20 20 20 20 20 20 20 20 20 DD 0D 3B 20 20 20 20 | ..; | 000002C0: 4C 44 58 20 23 3E 24 32 30 30 30 20 3B 54 4F 20 |LDX #>$2000 ;TO | 000002D0: 2E 2E 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 |... | 000002E0: 20 20 DD 0D 3B 20 20 20 20 53 54 41 20 5A 50 33 | ..; STA ZP3| 000002F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000300: 20 20 20 20 20 20 20 20 20 20 20 DD 0D 3B 20 20 | ..; | 00000310: 20 20 53 54 58 20 5A 50 34 20 20 20 20 20 20 20 | STX ZP4 | 00000320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000330: 20 20 20 20 DD 0D 3B 20 20 20 20 4A 53 52 20 44 | ..; JSR D| 00000340: 45 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |EP | 00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 0D 3B | ..;| 00000360: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000370: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000380: C0 C0 C0 C0 C0 C0 BD 0D 0D 0D 3B 55 53 45 44 20 |..........;USED | 00000390: 5A 45 52 4F 50 41 47 45 20 42 59 54 45 53 0D 0D |ZEROPAGE BYTES..| 000003A0: 5A 50 31 20 20 20 20 20 20 3D 20 24 42 30 0D 5A |ZP1 = $B0.Z| 000003B0: 50 32 20 20 20 20 20 20 3D 20 24 42 31 0D 5A 50 |P2 = $B1.ZP| 000003C0: 33 20 20 20 20 20 20 3D 20 24 42 32 0D 5A 50 34 |3 = $B2.ZP4| 000003D0: 20 20 20 20 20 20 3D 20 24 42 33 0D 43 54 52 4C | = $B3.CTRL| 000003E0: 42 59 54 45 20 3D 20 24 42 34 0D 0D 0D 20 20 20 |BYTE = $B4... | 000003F0: 20 20 20 20 20 20 2A 3D 20 24 30 39 30 30 0D 0D | *= $0900..| 00000400: 44 45 50 20 20 20 20 20 20 4C 44 58 20 23 30 0D |DEP LDX #0.| 00000410: 20 20 20 20 20 20 20 20 20 4C 44 41 20 28 5A 50 | LDA (ZP| 00000420: 31 2C 58 29 0D 20 20 20 20 20 20 20 20 20 53 54 |1,X). ST| 00000430: 41 20 43 54 52 4C 42 59 54 45 0D 20 20 20 20 20 |A CTRLBYTE. | 00000440: 20 20 20 20 49 4E 43 20 5A 50 31 0D 20 20 20 20 | INC ZP1. | 00000450: 20 20 20 20 20 42 4E 45 20 44 45 50 2B 31 32 0D | BNE DEP+12.| 00000460: 20 20 20 20 20 20 20 20 20 49 4E 43 20 5A 50 32 | INC ZP2| 00000470: 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 30 |. LDX #0| 00000480: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 28 5A |. LDA (Z| 00000490: 50 31 2C 58 29 0D 20 20 20 20 20 20 20 20 20 49 |P1,X). I| 000004A0: 4E 43 20 5A 50 31 0D 20 20 20 20 20 20 20 20 20 |NC ZP1. | 000004B0: 42 4E 45 20 2A 2B 34 0D 20 20 20 20 20 20 20 20 |BNE *+4. | 000004C0: 20 49 4E 43 20 5A 50 32 0D 20 20 20 20 20 20 20 | INC ZP2. | 000004D0: 20 20 43 4D 50 20 43 54 52 4C 42 59 54 45 0D 20 | CMP CTRLBYTE. | 000004E0: 20 20 20 20 20 20 20 20 42 45 51 20 44 45 50 2B | BEQ DEP+| 000004F0: 33 39 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |39. LDX | 00000500: 23 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |#0. STA | 00000510: 28 5A 50 33 2C 58 29 0D 20 20 20 20 20 20 20 20 |(ZP3,X). | 00000520: 20 49 4E 43 20 5A 50 33 0D 20 20 20 20 20 20 20 | INC ZP3. | 00000530: 20 20 42 4E 45 20 44 45 50 2B 31 32 0D 20 20 20 | BNE DEP+12. | 00000540: 20 20 20 20 20 20 49 4E 43 20 5A 50 34 0D 20 20 | INC ZP4. | 00000550: 20 20 20 20 20 20 20 42 4E 45 20 44 45 50 2B 31 | BNE DEP+1| 00000560: 32 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D 20 |2. RTS. | 00000570: 20 20 20 20 20 20 20 20 4C 44 58 20 23 30 0D 20 | LDX #0. | 00000580: 20 20 20 20 20 20 20 20 4C 44 41 20 28 5A 50 31 | LDA (ZP1| 00000590: 2C 58 29 0D 20 20 20 20 20 20 20 20 20 49 4E 43 |,X). INC| 000005A0: 20 5A 50 31 0D 20 20 20 20 20 20 20 20 20 42 4E | ZP1. BN| 000005B0: 45 20 2A 2B 34 0D 20 20 20 20 20 20 20 20 20 49 |E *+4. I| 000005C0: 4E 43 20 5A 50 32 0D 20 20 20 20 20 20 20 20 20 |NC ZP2. | 000005D0: 43 4D 50 20 23 24 30 30 0D 20 20 20 20 20 20 20 |CMP #$00. | 000005E0: 20 20 42 45 51 20 44 45 50 2B 33 38 0D 20 20 20 | BEQ DEP+38. | 000005F0: 20 20 20 20 20 20 54 41 59 0D 20 20 20 20 20 20 | TAY. | 00000600: 20 20 20 4C 44 58 20 23 30 0D 20 20 20 20 20 20 | LDX #0. | 00000610: 20 20 20 4C 44 41 20 28 5A 50 31 2C 58 29 0D 20 | LDA (ZP1,X). | 00000620: 20 20 20 20 20 20 20 20 49 4E 43 20 5A 50 31 0D | INC ZP1.| 00000630: 20 20 20 20 20 20 20 20 20 42 4E 45 20 2A 2B 34 | BNE *+4| 00000640: 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 5A 50 |. INC ZP| 00000650: 32 0D 20 20 20 20 20 20 20 20 20 50 48 41 0D 20 |2. PHA. | 00000660: 20 20 20 20 20 20 20 20 54 59 41 0D 20 20 20 20 | TYA. | 00000670: 20 20 20 20 20 54 41 58 0D 20 20 20 20 20 20 20 | TAX. | 00000680: 20 20 50 4C 41 0D 20 20 20 20 20 20 20 20 20 4C | PLA. L| 00000690: 44 59 20 23 30 0D 20 20 20 20 20 20 20 20 20 53 |DY #0. S| 000006A0: 54 41 20 28 5A 50 33 29 2C 59 0D 20 20 20 20 20 |TA (ZP3),Y. | 000006B0: 20 20 20 20 49 4E 59 0D 20 20 20 20 20 20 20 20 | INY. | 000006C0: 20 44 45 58 0D 20 20 20 20 20 20 20 20 20 42 4E | DEX. BN| 000006D0: 45 20 44 45 50 2B 37 30 0D 20 20 20 20 20 20 20 |E DEP+70. | 000006E0: 20 20 54 59 41 0D 20 20 20 20 20 20 20 20 20 43 | TYA. C| 000006F0: 4C 43 0D 20 20 20 20 20 20 20 20 20 41 44 43 20 |LC. ADC | 00000700: 5A 50 33 0D 20 20 20 20 20 20 20 20 20 53 54 41 |ZP3. STA| 00000710: 20 5A 50 33 0D 20 20 20 20 20 20 20 20 20 42 43 | ZP3. BC| 00000720: 43 20 44 45 50 2B 31 32 0D 20 20 20 20 20 20 20 |C DEP+12. | 00000730: 20 20 49 4E 43 20 5A 50 34 0D 20 20 20 20 20 20 | INC ZP4. | 00000740: 20 20 20 42 4E 45 20 44 45 50 2B 31 32 0D 0D 3B | BNE DEP+12..;| 00000750: 45 4E 44 20 4F 46 20 43 4F 44 45 2E 0D 0D |END OF CODE... |
..;.....................................
...;MDR-DEPACKER V2 (ULTRA SPEED VERSION
) ..;CODED ON 15. JANUARY 1996 BY MADROM
..;COPYRIGHT BY CREAM DESIGN
..; AND LEPSI DEVELOPMEN
TS ..;................................
........;ONLY TO USE WITH MDR-PACKER 1.2
OR 1.5..;PACKED FILES.
..;
..;EXAMPLE TO DEPACK A PACKED F
ILE AT ..;$6000 IN MEMORY TO $2000
..;
..; LDA #<$6000 ;PACKED
..; LDX #>$6000 ;FILE
..; STA ZP1
..; STX ZP2
..; LDA #<$2000 ;DEPA
CK ..; LDX #>$2000 ;TO
... ..; STA ZP3
..; STX ZP4
..; JSR DEP
..;................
..........................;USED ZEROPAGE
BYTES..ZP1 = $B0.ZP2 = $B1.ZP
3 = $B2.ZP4 = $B3.CTRLBYTE = $
B4... *= $0900..DEP LDX #0.
LDA (ZP1,X). STA CTRLBY
TE. INC ZP1. BNE DEP+12.
INC ZP2. LDX #0.
LDA (ZP1,X). INC ZP1.
BNE *+4. INC ZP2. CMP CT
RLBYTE. BEQ DEP+39. LDX
#0. STA (ZP3,X). INC ZP3
. BNE DEP+12. INC ZP4.
BNE DEP+12. RTS.
LDX #0. LDA (ZP1,X). INC
ZP1. BNE *+4. INC ZP2.
CMP #$00. BEQ DEP+38.
TAY. LDX #0. LDA (
ZP1,X). INC ZP1. BNE *+4
. INC ZP2. PHA.
TYA. TAX. PLA. L
DY #0. STA (ZP3),Y. INY.
DEX. BNE DEP+70.
TYA. CLC. ADC ZP3.
STA ZP3. BCC DEP+12.
INC ZP4. BNE DEP+12..;END OF C
ODE...
> CLICK IMAGE PREVIEW FOR FULL MODAL