_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

COMPACTOR       

FILE INFORMATION

FILENAME(S): COMPACTOR       

FILE TYPE(S): PRG

FILE SIZE: 2K

FIRST SEEN: 2025-11-30 21:15:35

APPEARS ON: 1 disk(s)

FILE HASH

ca3c1dd9e20d4eea66d49a5aca1b9ef63b9eb47f6cfca9598047989b3dda6ac0

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
027A COMPACTOR        PRG DuncanTwain 15 4 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 B1 08 0A 00 9C 3A  86 54 31 28 31 30 30 30  |.......:.T1(1000|
00000010: 29 3A 97 35 33 32 38 30  2C 30 30 3A 97 35 33 32  |):.53280,00:.532|
00000020: 38 31 2C 30 30 3A 99 22  93 12 9E 43 4F 4D 50 41  |81,00:."...COMPA|
00000030: 43 54 4F 52 11 11 22 3A  99 22 11 9E 49 4E 53 45  |CTOR..":."..INSE|
00000040: 52 54 20 50 52 4F 47 52  41 4D 2D 44 49 53 4B 20  |RT PROGRAM-DISK |
00000050: 49 4E 54 4F 20 44 52 49  56 45 20 23 31 11 11 22  |INTO DRIVE #1.."|
00000060: 3A 85 22 50 52 4F 47 52  41 4D 20 4E 41 4D 45 20  |:."PROGRAM NAME |
00000070: 3A 20 05 92 22 3B 46 31  24 3A 99 22 11 11 1E 53  |: ..";F1$:."...S|
00000080: 43 41 4E 4E 49 4E 47 20  46 49 4C 45 20 46 4F 52  |CANNING FILE FOR|
00000090: 20 54 41 52 47 45 54 2D  4C 49 4E 45 53 2E 2E 2E  | TARGET-LINES...|
000000A0: 2E 22 3A 9F 31 35 2C 38  2C 31 35 3A 8D 31 31 36  |.":.15,8,15:.116|
000000B0: 30 00 D6 08 5A 00 9F 35  2C 38 2C 35 2C 22 22 AA  |0...Z..5,8,5,"".|
000000C0: 46 31 24 AA 22 2C 50 2C  52 22 3A 8D 31 31 36 30  |F1$.",P,R":.1160|
000000D0: 3A 8D 31 31 32 30 00 EC  08 6E 00 8D 31 31 32 30  |:.1120...n..1120|
000000E0: 3A 8B 56 AA 56 31 B2 30  A7 33 33 30 00 04 09 78  |:.V.V1.0.330...x|
000000F0: 00 8D 31 31 32 30 3A 4C  4E B2 56 31 AA 28 32 35  |..1120:LN.V1.(25|
00000100: 36 AC 56 29 00 0E 09 82  00 8D 31 31 33 30 00 1B  |6.V)......1130..|
00000110: 09 8C 00 8B 56 B2 30 A7  31 31 30 00 30 09 96 00  |....V.0.110.0...|
00000120: 8B 56 B2 31 33 37 B0 56  B2 31 34 31 A7 31 37 30  |.V.137.V.141.170|
00000130: 00 40 09 A0 00 8B 56 B1  B3 31 36 37 A7 31 33 30  |.@....V..167.130|
00000140: 00 49 09 AA 00 4C 54 B2  30 00 5D 09 B4 00 8D 31  |.I...LT.0.]....1|
00000150: 31 33 30 3A 8B 56 B2 33  32 A7 31 38 30 00 70 09  |130:.V.32.180.p.|
00000160: BE 00 8B 56 B3 34 38 B0  56 B1 35 37 A7 32 32 30  |...V.48.V.57.220|
00000170: 00 90 09 C8 00 4C 54 B2  28 31 30 AC 4C 54 29 AA  |.....LT.(10.LT).|
00000180: C5 28 43 24 29 3A 8D 31  31 33 30 3A 89 31 39 30  |.(C$):.1130:.190|
00000190: 00 A9 09 DC 00 81 58 B2  30 A4 4E 3A 8B 54 31 28  |......X.0.N:.T1(|
000001A0: 58 29 B2 4C 54 A7 33 30  30 00 D0 09 F0 00 82 58  |X).LT.300......X|
000001B0: 3A 54 31 28 4E 29 B2 4C  54 3A 4E B2 4E AA 31 3A  |:T1(N).LT:N.N.1:|
000001C0: 99 4C 54 2C 3A 8B 4E B3  31 30 30 30 A7 33 30 30  |.LT,:.N.1000.300|
000001D0: 00 F7 09 18 01 99 22 11  11 90 54 4F 4F 20 4D 41  |......"...TOO MA|
000001E0: 4E 59 20 54 41 52 47 45  54 2D 4C 49 4E 45 53 21  |NY TARGET-LINES!|
000001F0: 22 3A 89 31 32 30 30 00  05 0A 2C 01 8B 56 B2 34  |":.1200...,..V.4|
00000200: 34 A7 31 37 30 00 14 0A  36 01 8B 56 B1 B3 33 32  |4.170...6..V..32|
00000210: A7 31 34 30 00 23 0A 40  01 8D 31 31 33 30 3A 89  |.140.#.@..1130:.|
00000220: 33 30 30 00 30 0A 4A 01  8B 4E B3 32 A7 33 39 30  |300.0.J..N.2.390|
00000230: 00 57 0A 54 01 81 58 B2  30 A4 4E AB 31 3A 81 59  |.W.T..X.0.N.1:.Y|
00000240: B2 30 A4 4E AB 32 3A 8B  54 31 28 59 29 B3 54 31  |.0.N.2:.T1(Y).T1|
00000250: 28 58 29 A7 33 38 30 00  77 0A 72 01 56 B2 54 31  |(X).380.w.r.V.T1|
00000260: 28 59 29 3A 54 31 28 59  29 B2 54 31 28 58 29 3A  |(Y):T1(Y).T1(X):|
00000270: 54 31 28 58 29 B2 56 00  80 0A 7C 01 82 59 2C 58  |T1(X).V...|..Y,X|
00000280: 00 04 0B 86 01 99 22 93  81 12 20 4E 4F 57 20 43  |......"... NOW C|
00000290: 4F 4D 50 41 43 54 49 4E  47 20 54 48 45 20 4C 49  |OMPACTING THE LI|
000002A0: 4E 45 53 20 92 11 11 22  3A A0 35 3A 9F 35 2C 38  |NES ...":.5:.5,8|
000002B0: 2C 35 2C 22 22 AA 46 31  24 AA 22 2C 50 2C 52 22  |,5,"".F1$.",P,R"|
000002C0: 3A 8D 31 31 36 30 3A 46  4F 24 B2 22 43 2F 22 AA  |:.1160:FO$."C/".|
000002D0: C8 28 46 31 24 2C 31 34  29 3A 9F 36 2C 38 2C 36  |.(F1$,14):.6,8,6|
000002E0: 2C 22 22 AA 46 4F 24 AA  22 2C 50 2C 57 22 3A 8D  |,"".FO$.",P,W":.|
000002F0: 31 31 36 30 3A 8D 31 31  32 30 3A 98 36 2C C7 28  |1160:.1120:.6,.(|
00000300: 56 31 29 3B 00 15 0B EA  01 98 36 2C C7 28 56 29  |V1);......6,.(V)|
00000310: 3B 3A 52 B2 30 00 3B 0B  F4 01 8D 31 31 32 30 3A  |;:R.0.;....1120:|
00000320: 4B 31 B2 56 31 3A 4B 32  B2 56 3A 46 B2 30 3A 8B  |K1.V1:K2.V:F.0:.|
00000330: 56 AA 56 31 B2 30 A7 31  30 39 30 00 64 0B 08 02  |V.V1.0.1090.d...|
00000340: 8D 31 31 32 30 3A 4C 31  B2 56 31 3A 4C 32 B2 56  |.1120:L1.V1:L2.V|
00000350: 3A 4C 4E B2 4C 31 AA 28  32 35 36 AC 4C 32 29 3A  |:LN.L1.(256.L2):|
00000360: 99 4C 4E 2C 00 7D 0B 1C  02 8D 31 31 33 30 3A 8B  |.LN,.}....1130:.|
00000370: 56 B2 33 32 B0 56 B2 35  38 A7 35 34 30 00 8A 0B  |V.32.V.58.540...|
00000380: 30 02 8B 56 B2 30 A7 35  39 30 00 9A 0B 3A 02 8B  |0..V.0.590...:..|
00000390: 56 B1 B3 31 34 33 A7 36  33 30 00 AD 0B 44 02 8D  |V..143.630...D..|
000003A0: 31 31 33 30 3A 8B 56 B1  30 A7 35 38 30 00 C9 0B  |1130:.V.0.580...|
000003B0: 4E 02 46 B2 31 3A 81 58  B2 30 A4 4E 3A 8B 54 31  |N.F.1:.X.0.N:.T1|
000003C0: 28 58 29 B3 4C 4E A7 82  58 00 DB 0B 62 02 8B 54  |(X).LN..X...b..T|
000003D0: 31 28 58 29 B2 4C 4E A7  36 33 30 00 E4 0B 6C 02  |1(X).LN.630...l.|
000003E0: 89 35 30 30 00 1B 0C 76  02 98 36 2C C7 28 4B 31  |.500...v..6,.(K1|
000003F0: 29 3B C7 28 4B 32 29 3B  3A 98 36 2C C7 28 4C 31  |);.(K2);:.6,.(L1|
00000400: 29 3B C7 28 4C 32 29 3B  3A 52 B2 34 3A 8B 46 A7  |);.(L2);:R.4:.F.|
00000410: 98 36 2C 22 3A 22 3B 3A  52 B2 35 00 28 0C 94 02  |.6,":";:R.5.(...|
00000420: 46 B2 30 3A 89 36 39 30  00 39 0C 9E 02 98 36 2C  |F.0:.690.9....6,|
00000430: 43 24 3B 3A 52 B2 52 AA  31 00 43 0C A8 02 8D 31  |C$;:R.R.1.C....1|
00000440: 31 33 30 00 52 0C B2 02  8B 56 B2 31 33 37 A7 46  |130.R....V.137.F|
00000450: B2 31 00 67 0C BC 02 8B  56 B2 31 33 39 B0 56 B2  |.1.g....V.139.V.|
00000460: 31 36 37 A7 46 B2 31 00  74 0C C6 02 8B 56 B2 30  |167.F.1.t....V.0|
00000470: A7 39 31 30 00 82 0C D0  02 8B 56 B2 33 32 A7 36  |.910......V.32.6|
00000480: 38 30 00 92 0C DA 02 8B  56 B1 B3 31 34 33 A7 37  |80......V..143.7|
00000490: 36 30 00 A5 0C E4 02 8D  31 31 33 30 3A 8B 56 B1  |60......1130:.V.|
000004A0: 30 A7 37 34 30 00 AE 0C  EE 02 89 39 31 30 00 BD  |0.740......910..|
000004B0: 0C F8 02 8B 56 B1 B3 33  34 A7 38 34 30 00 DE 0C  |....V..34.840...|
000004C0: 02 03 98 36 2C 43 24 3B  3A 52 B2 52 AA 31 3A 8D  |...6,C$;:R.R.1:.|
000004D0: 31 31 33 30 3A 8B 56 B2  33 34 A7 36 37 30 00 EB  |1130:.V.34.670..|
000004E0: 0C 20 03 8B 56 B1 30 A7  37 37 30 00 FB 0C 2A 03  |. ..V.0.770...*.|
000004F0: 8B 46 A7 56 B2 30 3A 89  34 39 30 00 14 0D 34 03  |.F.V.0:.490...4.|
00000500: 98 36 2C C7 28 33 34 29  3B 3A 52 B2 52 AA 31 3A  |.6,.(34);:R.R.1:|
00000510: 89 39 31 30 00 23 0D 48  03 8B 56 B1 B3 35 38 A7  |.910.#.H..V..58.|
00000520: 36 37 30 00 3C 0D 52 03  8D 31 31 33 30 3A 8B 56  |670.<.R..1130:.V|
00000530: B2 33 32 B0 56 B2 35 38  A7 38 35 30 00 4B 0D 66  |.32.V.58.850.K.f|
00000540: 03 8B 56 B2 31 34 33 A7  37 34 30 00 58 0D 70 03  |..V.143.740.X.p.|
00000550: 8B 56 B2 30 A7 39 31 30  00 6F 0D 7A 03 98 36 2C  |.V.0.910.o.z..6,|
00000560: 22 3A 22 3B 3A 52 B2 52  AA 31 3A 89 36 39 30 00  |":";:R.R.1:.690.|
00000570: 89 0D 8E 03 8B 28 46 29  B0 28 52 B1 31 37 30 29  |.....(F).(R.170)|
00000580: A7 56 B2 30 3A 89 34 39  30 00 A0 0D 98 03 8D 31  |.V.0:.490......1|
00000590: 31 32 30 3A 8B 56 AA 56  31 B2 30 A7 31 30 39 30  |120:.V.V1.0.1090|
000005A0: 00 DC 0D AC 03 8D 31 31  32 30 3A 4C 4E B2 56 31  |......1120:LN.V1|
000005B0: AA 28 32 35 36 AC 56 29  3A 4C 31 B2 56 31 3A 4C  |.(256.V):L1.V1:L|
000005C0: 32 B2 56 3A 99 4C 4E 2C  3A 81 58 B2 30 A4 4E 3A  |2.V:.LN,:.X.0.N:|
000005D0: 8B 54 31 28 58 29 B3 4C  4E A7 82 58 00 EF 0D D4  |.T1(X).LN..X....|
000005E0: 03 8B 54 31 28 58 29 B2  4C 4E A7 31 30 33 30 00  |..T1(X).LN.1030.|
000005F0: 04 0E DE 03 8D 31 31 33  30 3A 8B 56 B2 31 34 33  |.....1130:.V.143|
00000600: A7 37 34 30 00 17 0E E8  03 8B 56 B2 33 32 B0 56  |.740......V.32.V|
00000610: B2 35 38 A7 39 39 30 00  24 0E F2 03 8B 56 B2 30  |.58.990.$....V.0|
00000620: A7 39 32 30 00 3B 0E FC  03 98 36 2C 22 3A 22 3B  |.920.;....6,":";|
00000630: 3A 52 B2 52 AA 31 3A 89  36 39 30 00 66 0E 06 04  |:R.R.1:.690.f...|
00000640: 98 36 2C C7 28 30 29 3B  C7 28 31 29 3B C7 28 31  |.6,.(0);.(1);.(1|
00000650: 29 3B 3A 98 36 2C C7 28  4C 31 29 3B C7 28 4C 32  |);:.6,.(L1);.(L2|
00000660: 29 3B 3A 52 B2 34 00 80  0E 1A 04 8D 31 31 33 30  |);:R.4......1130|
00000670: 3A 8B 56 B2 33 32 B0 56  B2 35 38 A7 31 30 35 30  |:.V.32.V.58.1050|
00000680: 00 97 0E 2E 04 8B 56 B2  30 B0 56 B2 31 34 33 A7  |......V.0.V.143.|
00000690: 98 36 2C 22 3A 22 3B 00  A4 0E 38 04 46 B2 30 3A  |.6,":";...8.F.0:|
000006A0: 89 36 39 30 00 D7 0E 42  04 98 36 2C C7 28 30 29  |.690...B..6,.(0)|
000006B0: 3B C7 28 30 29 3B C7 28  30 29 3B 3A 99 22 93 12  |;.(0);.(0);:."..|
000006C0: 20 41 4C 4C 20 49 53 20  44 4F 4E 45 20 92 11 11  | ALL IS DONE ...|
000006D0: 22 3A 89 31 32 30 30 00  E6 0E 60 04 8D 31 31 33  |":.1200...`..113|
000006E0: 30 3A 56 31 B2 56 00 04  0F 6A 04 A1 23 35 2C 43  |0:V1.V...j..#5,C|
000006F0: 24 3A 8D 31 31 36 30 3A  8B 43 24 B2 22 22 A7 56  |$:.1160:.C$."".V|
00000700: B2 30 3A 8E 00 12 0F 7E  04 56 B2 C6 28 43 24 29  |.0:....~.V..(C$)|
00000710: 3A 8E 00 2F 0F 88 04 84  31 35 2C 45 4E 2C 45 4D  |:../....15,EN,EM|
00000720: 24 2C 45 54 2C 45 53 3A  8B 45 4E B2 30 A7 8E 00  |$,ET,ES:.EN.0...|
00000730: 5A 0F 9C 04 99 3A 99 22  11 11 11 12 20 44 49 53  |Z....:.".... DIS|
00000740: 4B 20 45 52 52 4F 52 20  92 11 11 22 3A 99 45 4E  |K ERROR ...":.EN|
00000750: 3B 45 4D 24 3B 45 54 3B  45 53 00 68 0F B0 04 A0  |;EM$;ET;ES.h....|
00000760: 35 3A A0 36 3A A0 31 35  00 00 00 00 00 00 00 00  |5:.6:.15........|
00000770: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00000780: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00000790: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
000007A0: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
000007B0: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
000007C0: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
000007D0: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
000007E0: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
000007F0: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
.......:.T1(1000):.53280,00:.53281,00:."
...COMPACTOR..":."..INSERT PROGRAM-DISK 
INTO DRIVE #1..":."PROGRAM NAME : ..";F1
$:."...SCANNING FILE FOR TARGET-LINES...
.":.15,8,15:.1160.V.Z..5,8,5,"".F1$.",P,
R":.1160:.1120...N..1120:.V.V1.0.330...X
..1120:LN.V1.(256.V)......1130......V.0.
110.0....V.137.V.141.170.@. ..V..167.130
.I...LT.0.]....1130:.V.32.180.P....V.48.
V.57.220...H.LT.(10.LT).E(C$):.1130:.190
......X.0.N:.T1(X).LT.300.P....X:T1(N).L
T:N.N.1:.LT,:.N.1000.300......"...TOO MA
NY TARGET-LINES!":.1200...,..V.44.170...
6..V..32.140.#.@..1130:.300.0.J..N.2.390
.W.T..X.0.N.1:.Y.0.N.2:.T1(Y).T1(X).380.
W.R.V.T1(Y):T1(Y).T1(X):T1(X).V...|..Y,X
......"... NOW COMPACTING THE LINES ..."
: 5:.5,8,5,"".F1$.",P,R":.1160:FO$."C/".
H(F1$,14):.6,8,6,"".FO$.",P,W":.1160:.11
20:.6,G(V1);......6,G(V);:R.0.;....1120:
K1.V1:K2.V:F.0:.V.V1.0.1090.D....1120:L1
.V1:L2.V:LN.L1.(256.L2):.LN,.}....1130:.
V.32.V.58.540...0..V.0.590...:..V..143.6
30...D..1130:.V.0.580.I.N.F.1:.X.0.N:.T1
(X).LN..X...B..T1(X).LN.630...L..500...V
..6,G(K1);G(K2);:.6,G(L1);G(L2);:R.4:.F.
.6,":";:R.5.(...F.0:.690.9....6,C$;:R.R.
1.C....1130.R....V.137.F.1.G....V.139.V.
167.F.1.T.F..V.0.910...P..V.32.680...Z..
V..143.760......1130:.V.0.740......910..
....V..34.840......6,C$;:R.R.1:.1130:.V.
34.670... ..V.0.770...*..F.V.0:.490...4.
.6,G(34);:R.R.1:.910.#.H..V..58.670.<.R.
.1130:.V.32.V.58.850.K.F..V.143.740.X.P.
.V.0.910.O.Z..6,":";:R.R.1:.690......(F)
.(R.170).V.0:.490. ....1120:.V.V1.0.1090
......1120:LN.V1.(256.V):L1.V1:L2.V:.LN,
:.X.0.N:.T1(X).LN..X...T..T1(X).LN.1030.
.....1130:.V.143.740......V.32.V.58.990.
$....V.0.920.;....6,":";:R.R.1:.690.F...
.6,G(0);G(1);G(1);:.6,G(L1);G(L2);:R.4..
....1130:.V.32.V.58.1050......V.0.V.143.
.6,":";...8.F.0:.690.W.B..6,G(0);G(0);G(
0);:.".. ALL IS DONE ...":.1200...`..113
0:V1.V...J..#5,C$:.1160:.C$."".V.0:....~
.V.F(C$):../....15,EN,EM$,ET,ES:.EN.0...
Z....:.".... DISK ERROR ...":.EN;EM$;ET;
ES.H... 5: 6: 15........................
........................................
........................................
........................................
........
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL