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

SQUEEZER.Z

FILE INFORMATION

FILENAME(S): SQUEEZER.Z

FILE TYPE(S): PRG

FILE SIZE: 5.5K

FIRST SEEN: 2025-11-02 16:39:41

APPEARS ON: 13 disk(s)

FILE HASH

5081ed5c139d6919d7e0e83cd1334984ba9823ffe13dae193c824a8ac5d3a2f6

FOUND ON DISKS (13 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
TPUG APRIL 84 C SQUEEZER.Z PRG Treasure Chest - Plattfuss 17 7 DOWNLOAD FILE
FREESOFT DISK NR SQUEEZER.Z PRG Treasure Chest - Wolfgang Rauprich 17 1 DOWNLOAD FILE
D F UE SQUEEZER.Z PRG Treasure Chest - Wolfgang Rauprich 32 5 DOWNLOAD FILE
U TILITIE SQUEEZER.Z PRG Treasure Chest - Wolfgang Rauprich 17 1 DOWNLOAD FILE
PD DISK 08 SQUEEZER.Z PRG Treasure Chest - Wolfgang Rauprich 22 1 DOWNLOAD FILE
FREESOFT DISK NR SQUEEZER.Z PRG Treasure Chest - Wolfgang Rauprich 32 5 DOWNLOAD FILE
FREESOFT NR SQUEEZER.Z PRG Treasure Chest - Wolfgang Rauprich 22 1 DOWNLOAD FILE
TPUG APRIL 84 C SQUEEZER.Z PRG Sailor, Ganheden 17 7 DOWNLOAD FILE
TPUG APRIL 84 C SQUEEZER.Z PRG DuncanTwain 17 7 DOWNLOAD FILE
CCS64 3 KOPIA SQUEEZER.Z PRG hedning, Mattias H00r 12 0 DOWNLOAD FILE
CCS 64 3 SQUEEZER.Z PRG hedning, Mattias H00r 12 0 DOWNLOAD FILE
C64 3 SQUEEZER.Z PRG hedning, Mattias H00r 12 0 DOWNLOAD FILE
PD S 08803 9377 SQUEEZER.Z PRG HOL2001, Misc 32 5 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 04 19 04 64 00 8F 20  20 20 20 20 20 20 20 27  |....d..        '|
00000010: 53 51 55 45 45 5A 45 52  27 00 1F 04 6E 00 3A 00  |SQUEEZER'...n.:.|
00000020: 43 04 78 00 8F 20 54 48  49 53 20 50 52 4F 47 52  |C.x.. THIS PROGR|
00000030: 41 4D 20 43 4F 4D 50 52  45 53 53 45 53 20 42 41  |AM COMPRESSES BA|
00000040: 53 49 43 00 62 04 82 00  8F 20 50 52 4F 47 52 41  |SIC.b.... PROGRA|
00000050: 4D 53 20 49 4E 54 4F 20  52 45 53 54 52 49 43 54  |MS INTO RESTRICT|
00000060: 45 44 00 86 04 8C 00 8F  20 4D 45 4D 4F 52 59 20  |ED...... MEMORY |
00000070: 53 50 41 43 45 53 2E 20  49 54 20 53 48 4F 55 4C  |SPACES. IT SHOUL|
00000080: 44 20 57 4F 52 4B 00 A6  04 96 00 8F 20 4F 4E 20  |D WORK...... ON |
00000090: 41 4E 59 20 43 4F 4D 4D  4F 44 4F 52 45 20 43 4F  |ANY COMMODORE CO|
000000A0: 4D 50 55 54 45 52 00 AC  04 A0 00 3A 00 CD 04 AA  |MPUTER.....:....|
000000B0: 00 8F 20 4D 4F 44 49 46  49 45 44 20 42 59 20 44  |.. MODIFIED BY D|
000000C0: 41 56 49 44 20 57 49 4C  4C 49 41 4D 53 00 F1 04  |AVID WILLIAMS...|
000000D0: B4 00 8F 20 41 4E 44 20  44 4F 43 55 4D 45 4E 54  |... AND DOCUMENT|
000000E0: 45 44 20 42 59 20 4A 4F  48 4E 20 45 41 53 54 4F  |ED BY JOHN EASTO|
000000F0: 4E 00 12 05 BE 00 8F 20  53 54 41 52 54 49 4E 47  |N...... STARTING|
00000100: 20 46 52 4F 4D 20 54 48  45 20 50 52 4F 47 52 41  | FROM THE PROGRA|
00000110: 4D 3A 00 2F 05 C8 00 8F  20 20 20 20 20 20 43 20  |M:./....      C |
00000120: 4F 20 4D 20 50 20 41 20  43 20 54 20 4F 20 52 00  |O M P A C T O R.|
00000130: 4C 05 D2 00 8F 20 20 20  20 20 20 42 59 3A 20 20  |L....      BY:  |
00000140: 52 4F 42 45 52 54 20 42  41 4B 45 52 00 69 05 DC  |ROBERT BAKER.i..|
00000150: 00 8F 20 20 20 20 20 20  42 41 4B 45 52 20 45 4E  |..      BAKER EN|
00000160: 54 45 52 50 52 49 53 45  53 00 84 05 E6 00 8F 20  |TERPRISES...... |
00000170: 20 20 20 20 20 20 31 35  20 57 49 4E 44 53 4F 52  |      15 WINDSOR|
00000180: 20 44 52 2E 00 A1 05 F0  00 8F 20 20 20 20 20 20  | DR.......      |
00000190: 41 54 43 4F 2C 20 4E 2E  4A 2E 20 20 30 38 30 30  |ATCO, N.J.  0800|
000001A0: 34 00 A7 05 FA 00 3A 00  C0 05 04 01 8F 20 2A 2A  |4.....:...... **|
000001B0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001C0: 00 D9 05 0E 01 8F 20 43  48 45 43 4B 20 4D 41 43  |...... CHECK MAC|
000001D0: 48 49 4E 45 20 54 59 50  45 00 F2 05 18 01 8F 20  |HINE TYPE...... |
000001E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001F0: 2A 2A 00 F8 05 22 01 3A  00 08 06 2C 01 50 4B B2  |**...".:...,.PK.|
00000200: C2 28 35 37 33 34 35 29  00 3B 06 36 01 53 4B B2  |.(57345).;.6.SK.|
00000210: 35 36 3A 8B 20 50 4B B2  37 32 20 B0 20 50 4B B2  |56:. PK.72 . PK.|
00000220: 31 32 37 20 B0 20 50 4B  B2 35 34 20 B0 20 50 4B  |127 . PK.54 . PK|
00000230: B2 37 35 20 A7 20 53 4B  B2 35 33 00 41 06 40 01  |.75 . SK.53.A.@.|
00000240: 3A 00 5D 06 4A 01 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |:.].J.. ********|
00000250: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 00 77 06  |*************.w.|
00000260: 54 01 8F 20 20 20 53 45  54 20 55 50 20 46 4C 41  |T..   SET UP FLA|
00000270: 47 20 53 50 41 43 45 00  93 06 5E 01 8F 20 2A 2A  |G SPACE...^.. **|
00000280: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000290: 2A 2A 2A 00 99 06 68 01  3A 00 C1 06 72 01 53 41  |***...h.:...r.SA|
000002A0: B2 32 35 36 AC C2 28 53  4B 29 3A 8B 20 C2 28 53  |.256..(SK):. .(S|
000002B0: 41 AA 38 30 30 30 29 B2  32 35 34 20 A7 20 34 31  |A.8000).254 . 41|
000002C0: 30 00 DC 06 7C 01 97 20  53 4B 2C C2 28 53 4B 29  |0...|.. SK,.(SK)|
000002D0: AB 33 32 3A 97 20 53 4B  AB 31 2C 30 00 F5 06 86  |.32:. SK.1,0....|
000002E0: 01 97 20 32 35 36 AC C2  28 53 4B 29 AA 38 30 30  |.. 256..(SK).800|
000002F0: 30 2C 32 35 34 00 FB 06  90 01 8A 00 17 07 9A 01  |0,254...........|
00000300: 99 20 22 93 49 4E 49 54  49 41 4C 49 5A 49 4E 47  |. ".INITIALIZING|
00000310: 2E 2E 2E 2E 2E 2E 22 00  34 07 A4 01 81 20 49 B2  |......".4.... I.|
00000320: 53 41 20 A4 20 53 41 AA  37 39 39 39 3A 97 20 49  |SA . SA.7999:. I|
00000330: 2C 30 3A 82 00 54 07 AE  01 86 20 54 28 37 29 3A  |,0:..T.... T(7):|
00000340: 81 20 49 B2 30 20 A4 20  37 3A 54 28 49 29 B2 32  |. I.0 . 7:T(I).2|
00000350: AE 49 3A 82 00 5A 07 B8  01 3A 00 71 07 C2 01 8F  |.I:..Z...:.q....|
00000360: 20 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  | ***************|
00000370: 2A 00 88 07 CC 01 8F 20  52 45 41 44 59 20 44 49  |*...... READY DI|
00000380: 53 4B 20 46 49 4C 45 53  00 9F 07 D6 01 8F 20 2A  |SK FILES...... *|
00000390: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 00  |***************.|
000003A0: A5 07 E0 01 3A 00 D5 07  EA 01 99 20 22 93 27 53  |....:...... ".'S|
000003B0: 51 55 45 45 5A 45 52 27  20 2D 20 4D 4F 44 49 46  |QUEEZER' - MODIF|
000003C0: 49 45 44 20 46 52 4F 4D  20 27 43 4F 4D 50 41 43  |IED FROM 'COMPAC|
000003D0: 54 4F 52 27 22 00 FD 07  F4 01 99 20 22 11 11 54  |TOR'"...... "..T|
000003E0: 48 49 53 20 50 52 4F 47  52 41 4D 20 27 53 51 55  |HIS PROGRAM 'SQU|
000003F0: 45 45 5A 45 53 27 20 42  41 53 49 43 22 00 24 08  |EEZES' BASIC".$.|
00000400: FE 01 99 20 22 50 52 4F  47 52 41 4D 53 20 49 4E  |... "PROGRAMS IN|
00000410: 54 4F 20 52 45 44 55 43  45 44 20 53 50 41 43 45  |TO REDUCED SPACE|
00000420: 20 42 59 22 00 55 08 08  02 99 20 22 44 45 4C 45  | BY".U.... "DELE|
00000430: 54 49 4E 47 20 27 52 45  4D 27 53 2C 20 4C 45 4E  |TING 'REM'S, LEN|
00000440: 47 54 48 45 4E 49 4E 47  20 4C 49 4E 45 53 2C 20  |GTHENING LINES, |
00000450: 45 54 43 2E 22 00 74 08  12 02 99 3A 99 3A 85 20  |ETC.".t....:.:. |
00000460: 22 49 4E 50 55 54 20 46  49 4C 45 4E 41 4D 45 22  |"INPUT FILENAME"|
00000470: 3B 46 49 24 00 8A 08 1C  02 99 3A 99 20 22 44 52  |;FI$......:. "DR|
00000480: 49 56 45 20 23 20 3F 20  22 3B 00 AE 08 26 02 A1  |IVE # ? ";...&..|
00000490: 20 49 44 24 3A 8B 20 49  44 24 B3 22 30 22 20 B0  | ID$:. ID$."0" .|
000004A0: 20 49 44 24 B1 22 31 22  20 A7 20 35 35 30 00 B8  | ID$."1" . 550..|
000004B0: 08 30 02 99 20 49 44 24  00 D8 08 3A 02 99 3A 99  |.0.. ID$...:..:.|
000004C0: 3A 85 20 22 4F 55 54 50  55 54 20 46 49 4C 45 4E  |:. "OUTPUT FILEN|
000004D0: 41 4D 45 22 3B 4F 46 24  00 EE 08 44 02 99 3A 99  |AME";OF$...D..:.|
000004E0: 20 22 44 52 49 56 45 20  23 20 3F 20 22 3B 00 12  | "DRIVE # ? ";..|
000004F0: 09 4E 02 A1 20 4F 44 24  3A 8B 20 4F 44 24 B3 22  |.N.. OD$:. OD$."|
00000500: 30 22 20 B0 20 4F 44 24  B1 22 31 22 20 A7 20 35  |0" . OD$."1" . 5|
00000510: 39 30 00 1C 09 58 02 99  20 4F 44 24 00 22 09 62  |90...X.. OD$.".b|
00000520: 02 3A 00 34 09 6C 02 8F  20 2A 2A 2A 2A 2A 2A 2A  |.:.4.l.. *******|
00000530: 2A 2A 2A 2A 00 46 09 76  02 8F 20 52 45 41 44 59  |****.F.v.. READY|
00000540: 20 54 4F 20 47 4F 00 58  09 80 02 8F 20 2A 2A 2A  | TO GO.X.... ***|
00000550: 2A 2A 2A 2A 2A 2A 2A 2A  00 5E 09 8A 02 3A 00 73  |********.^...:.s|
00000560: 09 94 02 99 22 93 53 43  41 4E 4E 49 4E 47 20 46  |....".SCANNING F|
00000570: 49 4C 45 00 94 09 9E 02  99 22 20 20 20 46 4F 52  |ILE......"   FOR|
00000580: 20 54 41 52 47 45 54 20  4C 49 4E 45 53 2E 2E 2E  | TARGET LINES...|
00000590: 2E 2E 11 11 00 A9 09 A8  02 9F 20 31 35 2C 38 2C  |.......... 15,8,|
000005A0: 31 35 3A 8D 20 32 37 32  30 00 C8 09 B2 02 9F 20  |15:. 2720...... |
000005B0: 35 2C 38 2C 35 2C 49 44  24 AA 22 3A 22 AA 46 49  |5,8,5,ID$.":".FI|
000005C0: 24 AA 22 2C 50 2C 52 22  00 CE 09 BC 02 3A 00 F0  |$.",P,R".....:..|
000005D0: 09 C6 02 8F 20 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.... ***********|
000005E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000005F0: 00 12 0A D0 02 8F 20 52  45 41 44 20 4C 4F 41 44  |...... READ LOAD|
00000600: 20 41 44 52 2C 20 4C 49  4E 4B 20 26 20 4C 49 4E  | ADR, LINK & LIN|
00000610: 45 23 00 34 0A DA 02 8F  20 2A 2A 2A 2A 2A 2A 2A  |E#.4.... *******|
00000620: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000630: 2A 2A 2A 2A 00 3A 0A E4  02 3A 00 4E 0A EE 02 8D  |****.:...:.N....|
00000640: 20 32 37 32 30 20 3A 20  8D 20 32 36 36 30 00 6B  | 2720 : . 2660.k|
00000650: 0A F8 02 8D 20 32 36 36  30 20 3A 20 8B 20 56 AA  |.... 2660 : . V.|
00000660: 56 31 B2 30 20 A7 20 31  32 32 30 00 86 0A 02 03  |V1.0 . 1220.....|
00000670: 8D 20 32 36 36 30 20 3A  20 4C 4E B2 56 31 AA 28  |. 2660 : LN.V1.(|
00000680: 32 35 36 AC 56 29 00 8C  0A 0C 03 3A 00 B1 0A 16  |256.V).....:....|
00000690: 03 8F 20 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.. *************|
000006A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000006B0: 2A 00 CF 0A 20 03 8F 20  20 20 20 20 20 20 20 53  |*... ..        S|
000006C0: 43 41 4E 20 42 41 53 49  43 20 4C 49 4E 45 53 00  |CAN BASIC LINES.|
000006D0: F4 0A 2A 03 8F 20 46 4F  52 20 47 4F 54 4F 2C 20  |..*.. FOR GOTO, |
000006E0: 47 4F 53 55 42 2C 20 26  20 54 48 45 4E 20 54 4F  |GOSUB, & THEN TO|
000006F0: 4B 45 4E 53 00 19 0B 34  03 8F 20 2A 2A 2A 2A 2A  |KENS...4.. *****|
00000700: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000710: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 1F 0B 3E 03 3A 00  |*********...>.:.|
00000720: 2A 0B 48 03 8D 20 32 36  38 30 00 3A 0B 52 03 8B  |*.H.. 2680.:.R..|
00000730: 20 56 B2 30 20 A7 20 37  36 30 00 54 0B 5C 03 8B  | V.0 . 760.T.\..|
00000740: 20 56 B2 31 33 37 20 B0  20 56 B2 31 34 31 20 A7  | V.137 . V.141 .|
00000750: 20 39 33 30 00 67 0B 66  03 8B 20 56 B3 B1 31 36  | 930.g.f.. V..16|
00000760: 37 20 A7 20 38 34 30 00  6D 0B 70 03 3A 00 84 0B  |7 . 840.m.p.:...|
00000770: 7A 03 8F 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |z.. ************|
00000780: 2A 2A 2A 2A 00 9B 0B 84  03 8F 20 47 45 54 20 54  |****...... GET T|
00000790: 41 52 47 45 54 20 4C 49  4E 45 23 00 B2 0B 8E 03  |ARGET LINE#.....|
000007A0: 8F 20 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |. **************|
000007B0: 2A 2A 00 B8 0B 98 03 3A  00 C1 0B A2 03 4C 54 B2  |**.....:.....LT.|
000007C0: 30 00 DB 0B AC 03 8D 20  32 36 38 30 20 3A 20 8B  |0...... 2680 : .|
000007D0: 20 56 B2 33 32 20 A7 20  39 34 30 00 F4 0B B6 03  | V.32 . 940.....|
000007E0: 8B 20 56 B3 34 38 20 B0  20 56 B1 35 37 20 A7 20  |. V.48 . V.57 . |
000007F0: 31 30 33 30 00 09 0C C0  03 4C 54 B2 28 31 30 AC  |1030.....LT.(10.|
00000800: 4C 54 29 AA C5 28 43 24  29 00 1C 0C CA 03 8D 20  |LT)..(C$)...... |
00000810: 32 36 38 30 20 3A 20 89  20 39 35 30 00 22 0C D4  |2680 : . 950."..|
00000820: 03 3A 00 3A 0C DE 03 8F  20 2A 2A 2A 2A 2A 2A 2A  |.:.:.... *******|
00000830: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 52 0C E8 03 8F  |**********.R....|
00000840: 20 46 4C 41 47 20 54 41  52 47 45 54 20 4C 49 4E  | FLAG TARGET LIN|
00000850: 45 53 00 6A 0C F2 03 8F  20 2A 2A 2A 2A 2A 2A 2A  |ES.j.... *******|
00000860: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 70 0C FC 03 3A  |**********.p...:|
00000870: 00 82 0C 06 04 8B 20 4C  54 B2 30 20 A7 20 31 31  |...... LT.0 . 11|
00000880: 34 30 00 91 0C 10 04 42  59 B2 B5 28 4C 54 AD 38  |40.....BY..(LT.8|
00000890: 29 00 9F 0C 1A 04 5A B2  4C 54 AB 38 AC 42 59 00  |).....Z.LT.8.BY.|
000008A0: AC 0C 24 04 41 44 B2 42  59 AA 53 41 00 C2 0C 2E  |..$.AD.BY.SA....|
000008B0: 04 97 20 41 44 2C C2 28  41 44 29 20 B0 20 54 28  |.. AD,.(AD) . T(|
000008C0: 5A 29 00 CC 0C 38 04 99  20 4C 54 2C 00 D2 0C 42  |Z)...8.. LT,...B|
000008D0: 04 3A 00 F4 0C 4C 04 8F  20 2A 2A 2A 2A 2A 2A 2A  |.:...L.. *******|
000008E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000008F0: 2A 2A 2A 2A 00 16 0D 56  04 8F 20 43 48 45 43 4B  |****...V.. CHECK|
00000900: 20 46 4F 52 20 27 4F 4E  2E 2E 2E 47 4F 54 4F 2F  | FOR 'ON...GOTO/|
00000910: 47 4F 53 55 42 27 00 38  0D 60 04 8F 20 2A 2A 2A  |GOSUB'.8.`.. ***|
00000920: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000930: 2A 2A 2A 2A 2A 2A 2A 2A  00 3E 0D 6A 04 3A 00 4F  |********.>.j.:.O|
00000940: 0D 74 04 8B 20 56 B2 34  34 20 A7 20 39 33 30 00  |.t.. V.44 . 930.|
00000950: 61 0D 7E 04 8B 20 56 B3  B1 33 32 20 A7 20 38 35  |a.~.. V..32 . 85|
00000960: 30 00 75 0D 88 04 8D 20  32 36 38 30 20 3A 20 89  |0.u.... 2680 : .|
00000970: 20 31 31 34 30 00 7B 0D  92 04 3A 00 97 0D 9C 04  | 1140.{...:.....|
00000980: 8F 20 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |. **************|
00000990: 2A 2A 2A 2A 2A 2A 2A 00  B3 0D A6 04 8F 20 47 45  |*******...... GE|
000009A0: 54 20 52 45 41 44 59 20  46 4F 52 20 43 4F 4D 50  |T READY FOR COMP|
000009B0: 41 43 54 00 CF 0D B0 04  8F 20 2A 2A 2A 2A 2A 2A  |ACT...... ******|
000009C0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 00  |***************.|
000009D0: D5 0D BA 04 3A 00 F4 0D  C4 04 99 20 22 93 43 4F  |....:...... ".CO|
000009E0: 4D 50 41 43 54 49 4E 47  20 4C 49 4E 45 53 2E 2E  |MPACTING LINES..|
000009F0: 2E 2E 11 11 00 FC 0D CE  04 A0 20 35 00 1B 0E D8  |.......... 5....|
00000A00: 04 9F 20 35 2C 38 2C 35  2C 49 44 24 AA 22 3A 22  |.. 5,8,5,ID$.":"|
00000A10: AA 46 49 24 AA 22 2C 50  2C 52 22 00 26 0E E2 04  |.FI$.",P,R".&...|
00000A20: 8D 20 32 37 32 30 00 3D  0E EC 04 46 4F 24 B2 C8  |. 2720.=...FO$..|
00000A30: 28 46 4C 24 2C 31 34 29  AA 22 2F 43 22 00 4F 0E  |(FL$,14)."/C".O.|
00000A40: F6 04 98 31 35 2C 22 53  31 3A 22 AA 46 4F 24 00  |...15,"S1:".FO$.|
00000A50: 6E 0E 00 05 9F 20 36 2C  38 2C 36 2C 4F 44 24 AA  |n.... 6,8,6,OD$.|
00000A60: 22 3A 22 AA 4F 46 24 AA  22 2C 50 2C 57 22 00 79  |":".OF$.",P,W".y|
00000A70: 0E 0A 05 8D 20 32 37 32  30 00 7F 0E 14 05 3A 00  |.... 2720.....:.|
00000A80: 94 0E 1E 05 8F 20 20 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.....  *********|
00000A90: 2A 2A 2A 2A 00 A8 0E 28  05 8F 20 43 4F 50 59 20  |****...(.. COPY |
00000AA0: 4C 4F 41 44 20 41 44 52  00 BC 0E 32 05 8F 20 2A  |LOAD ADR...2.. *|
00000AB0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 00 C2 0E 3C  |************...<|
00000AC0: 05 3A 00 CD 0E 46 05 8D  20 32 36 36 30 00 DB 0E  |.:...F.. 2660...|
00000AD0: 50 05 98 36 2C C7 28 56  31 29 3B 00 ED 0E 5A 05  |P..6,.(V1);...Z.|
00000AE0: 98 36 2C C7 28 56 29 3B  3A 20 52 B2 30 00 F3 0E  |.6,.(V);: R.0...|
00000AF0: 64 05 3A 00 13 0F 6E 05  8F 20 2A 2A 2A 2A 2A 2A  |d.:...n.. ******|
00000B00: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000B10: 2A 2A 2A 00 33 0F 78 05  8F 20 43 4F 50 59 20 4C  |***.3.x.. COPY L|
00000B20: 49 4E 4B 20 41 4E 44 20  4C 49 4E 45 20 4E 55 4D  |INK AND LINE NUM|
00000B30: 42 45 52 00 53 0F 82 05  8F 20 2A 2A 2A 2A 2A 2A  |BER.S.... ******|
00000B40: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000B50: 2A 2A 2A 00 59 0F 8C 05  3A 00 72 0F 96 05 8D 20  |***.Y...:.r.... |
00000B60: 32 36 36 30 20 3A 20 4B  31 B2 56 31 20 3A 4B 32  |2660 : K1.V1 :K2|
00000B70: B2 56 00 8B 0F A0 05 46  B2 30 20 3A 8B 20 56 AA  |.V.....F.0 :. V.|
00000B80: 56 31 B2 30 20 A7 20 32  35 38 30 00 A5 0F AA 05  |V1.0 . 2580.....|
00000B90: 8D 20 32 36 36 30 20 3A  20 4C 31 B2 56 31 20 3A  |. 2660 : L1.V1 :|
00000BA0: 20 4C 32 B2 56 00 C0 0F  B4 05 4C 4E B2 4C 31 AA  | L2.V.....LN.L1.|
00000BB0: 28 32 35 36 AC 4C 32 29  20 3A 20 99 20 4C 4E 2C  |(256.L2) : . LN,|
00000BC0: 00 CB 0F BE 05 8D 20 32  36 38 30 00 E4 0F C8 05  |...... 2680.....|
00000BD0: 8B 20 56 B2 33 32 20 B0  20 56 B2 35 38 20 A7 20  |. V.32 . V.58 . |
00000BE0: 31 34 37 30 00 F5 0F D2  05 8B 20 56 B2 30 20 A7  |1470...... V.0 .|
00000BF0: 20 31 35 32 30 00 09 10  DC 05 8B 20 56 B3 B1 31  | 1520...... V..1|
00000C00: 34 33 20 A7 20 31 35 38  30 00 23 10 E6 05 8D 20  |43 . 1580.#.... |
00000C10: 32 36 38 30 20 3A 20 8B  20 56 B1 30 20 A7 20 31  |2680 : . V.0 . 1|
00000C20: 35 31 30 00 2B 10 F0 05  46 B2 31 00 3A 10 FA 05  |510.+...F.1.:...|
00000C30: 42 59 B2 B5 28 4C 4E AD  38 29 00 48 10 04 06 5A  |BY..(LN.8).H...Z|
00000C40: B2 4C 4E AB 38 AC 42 59  00 55 10 0E 06 41 44 B2  |.LN.8.BY.U...AD.|
00000C50: 42 59 AA 53 41 00 71 10  18 06 8B 20 28 54 28 5A  |BY.SA.q.... (T(Z|
00000C60: 29 20 AF 20 C2 28 41 44  29 29 20 A7 20 31 35 38  |) . .(AD)) . 158|
00000C70: 30 00 7C 10 22 06 89 20  31 34 33 30 00 90 10 2C  |0.|.".. 1430...,|
00000C80: 06 98 36 2C C7 28 4B 31  29 3B C7 28 4B 32 29 3B  |..6,.(K1);.(K2);|
00000C90: 00 AA 10 36 06 98 36 2C  C7 28 4C 31 29 3B C7 28  |...6..6,.(L1);.(|
00000CA0: 4C 32 29 3B 20 3A 20 52  B2 34 00 C5 10 40 06 3A  |L2); : R.4...@.:|
00000CB0: 20 20 8B 20 46 20 A7 20  98 36 2C 22 3A 22 3B 20  |  . F . .6,":"; |
00000CC0: 3A 20 52 B2 35 00 D6 10  4A 06 46 B2 30 20 3A 20  |: R.5...J.F.0 : |
00000CD0: 89 20 31 37 30 30 00 DC  10 54 06 3A 00 FE 10 5E  |. 1700...T.:...^|
00000CE0: 06 8F 20 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.. *************|
00000CF0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 20  |**************. |
00000D00: 11 68 06 8F 20 2A 2A 2A  2A 20 20 53 43 41 4E 20  |.h.. ****  SCAN |
00000D10: 42 41 53 49 43 20 4C 49  4E 45 20 20 2A 2A 2A 2A  |BASIC LINE  ****|
00000D20: 00 42 11 72 06 8F 20 2A  2A 2A 2A 20 26 20 43 4F  |.B.r.. **** & CO|
00000D30: 4D 50 41 43 54 20 50 52  4F 47 52 41 4D 20 2A 2A  |MPACT PROGRAM **|
00000D40: 2A 2A 00 64 11 7C 06 8F  20 2A 2A 2A 2A 2A 2A 2A  |**.d.|.. *******|
00000D50: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000D60: 2A 2A 2A 2A 00 6A 11 86  06 3A 00 7D 11 90 06 98  |****.j...:.}....|
00000D70: 36 2C 43 24 3B 20 3A 20  52 B2 52 AA 31 00 88 11  |6,C$; : R.R.1...|
00000D80: 9A 06 8D 20 32 36 38 30  00 9D 11 A4 06 3A 20 20  |... 2680.....:  |
00000D90: 8B 20 56 B2 31 33 37 20  A7 20 46 B2 31 00 BA 11  |. V.137 . F.1...|
00000DA0: AE 06 3A 20 20 8B 20 56  B2 31 33 39 20 B0 20 56  |..:  . V.139 . V|
00000DB0: B2 31 36 37 20 A7 20 46  B2 31 00 CE 11 B8 06 3A  |.167 . F.1.....:|
00000DC0: 20 20 8B 20 56 B2 30 20  A7 20 32 31 36 30 00 E3  |  . V.0 . 2160..|
00000DD0: 11 C2 06 3A 20 20 8B 20  56 B2 33 32 20 A7 20 31  |...:  . V.32 . 1|
00000DE0: 36 39 30 00 E9 11 CC 06  3A 00 04 12 D6 06 8F 20  |690.....:...... |
00000DF0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000E00: 2A 2A 2A 2A 00 18 12 E0  06 8F 20 27 52 45 4D 27  |****...... 'REM'|
00000E10: 20 54 4F 4B 45 4E 20 2D  00 33 12 EA 06 8F 20 44  | TOKEN -.3.... D|
00000E20: 49 53 43 41 52 44 20 52  45 53 54 20 4F 46 20 4C  |ISCARD REST OF L|
00000E30: 49 4E 45 00 4E 12 F4 06  8F 20 2A 2A 2A 2A 2A 2A  |INE.N.... ******|
00000E40: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 54  |**************.T|
00000E50: 12 FE 06 3A 00 68 12 08  07 8B 20 56 B3 B1 31 34  |...:.h.... V..14|
00000E60: 33 20 A7 20 31 38 39 30  00 82 12 12 07 8D 20 32  |3 . 1890...... 2|
00000E70: 36 38 30 20 3A 20 8B 20  56 B1 30 20 A7 20 31 38  |680 : . V.0 . 18|
00000E80: 31 30 00 8D 12 1C 07 89  20 32 31 36 30 00 93 12  |10...... 2160...|
00000E90: 26 07 3A 00 B4 12 30 07  8F 20 2A 2A 2A 2A 2A 2A  |&.:...0.. ******|
00000EA0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000EB0: 2A 2A 2A 2A 00 C2 12 3A  07 8F 20 51 55 4F 54 45  |****...:.. QUOTE|
00000EC0: 20 2D 00 E3 12 44 07 8F  20 43 4F 50 59 20 54 49  | -...D.. COPY TI|
00000ED0: 4C 4C 20 4E 45 58 54 20  4F 52 20 4C 49 4E 45 20  |LL NEXT OR LINE |
00000EE0: 45 4E 44 00 04 13 4E 07  8F 20 2A 2A 2A 2A 2A 2A  |END...N.. ******|
00000EF0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000F00: 2A 2A 2A 2A 00 0A 13 58  07 3A 00 1D 13 62 07 8B  |****...X.:...b..|
00000F10: 20 56 B3 B1 33 34 20 A7  20 32 30 33 30 00 30 13  | V..34 . 2030.0.|
00000F20: 6C 07 98 36 2C 43 24 3B  20 3A 20 52 B2 52 AA 31  |l..6,C$; : R.R.1|
00000F30: 00 3B 13 76 07 8D 20 32  36 38 30 00 4D 13 80 07  |.;.v.. 2680.M...|
00000F40: 8B 20 56 B2 33 34 20 A7  20 31 36 38 30 00 5E 13  |. V.34 . 1680.^.|
00000F50: 8A 07 8B 20 56 B1 30 20  A7 20 31 39 30 30 00 75  |... V.0 . 1900.u|
00000F60: 13 94 07 8B 20 46 20 A7  20 56 B2 30 20 3A 20 89  |.... F . V.0 : .|
00000F70: 20 31 33 37 30 00 8B 13  9E 07 98 36 2C C7 28 33  | 1370......6,.(3|
00000F80: 34 29 3B 20 3A 20 52 B2  52 AA 31 00 96 13 A8 07  |4); : R.R.1.....|
00000F90: 89 20 32 31 36 30 00 9C  13 B2 07 3A 00 BB 13 BC  |. 2160.....:....|
00000FA0: 07 8F 20 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.. *************|
00000FB0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 DA 13 C6 07  |***********.....|
00000FC0: 8F 20 49 46 20 43 4F 4C  4F 4E 20 2D 20 43 48 4B  |. IF COLON - CHK|
00000FD0: 20 4E 45 58 54 20 43 48  41 52 00 F4 13 D0 07 8F  | NEXT CHAR......|
00000FE0: 20 20 20 20 20 20 45 4C  53 45 20 43 4F 50 59 20  |      ELSE COPY |
00000FF0: 43 48 41 52 00 13 14 DA  07 8F 20 2A 2A 2A 2A 2A  |CHAR...... *****|
00001000: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001010: 2A 2A 2A 00 19 14 E4 07  3A 00 2C 14 EE 07 8B 20  |***.....:.,.... |
00001020: 56 B3 B1 35 38 20 A7 20  31 36 38 30 00 37 14 F8  |V..58 . 1680.7..|
00001030: 07 8D 20 32 36 38 30 00  50 14 02 08 8B 20 56 B2  |.. 2680.P.... V.|
00001040: 33 32 20 B0 20 56 B2 35  38 20 A7 20 32 30 34 30  |32 . V.58 . 2040|
00001050: 00 63 14 0C 08 8B 20 56  B2 31 34 33 20 A7 20 31  |.c.... V.143 . 1|
00001060: 38 31 30 00 74 14 16 08  8B 20 56 B2 30 20 A7 20  |810.t.... V.0 . |
00001070: 32 31 36 30 00 88 14 20  08 98 36 2C 22 3A 22 3B  |2160... ..6,":";|
00001080: 20 3A 20 52 B2 52 AA 31  00 93 14 2A 08 89 20 31  | : R.R.1...*.. 1|
00001090: 37 30 30 00 99 14 34 08  3A 00 BC 14 3E 08 8F 20  |700...4.:...>.. |
000010A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000010B0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 00 D0 14 48  |************...H|
000010C0: 08 8F 20 45 4E 44 20 4F  46 20 4C 49 4E 45 20 2D  |.. END OF LINE -|
000010D0: 00 F3 14 52 08 8F 20 43  41 4E 20 57 45 20 43 4F  |...R.. CAN WE CO|
000010E0: 4D 50 41 43 54 20 54 48  45 53 45 20 4C 49 4E 45  |MPACT THESE LINE|
000010F0: 53 20 3F 00 16 15 5C 08  8F 20 2A 2A 2A 2A 2A 2A  |S ?...\.. ******|
00001100: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001110: 2A 2A 2A 2A 2A 2A 00 1C  15 66 08 3A 00 3B 15 70  |******...f.:.;.p|
00001120: 08 8B 20 46 20 B0 20 28  52 B1 31 37 30 29 20 A7  |.. F . (R.170) .|
00001130: 20 56 B2 30 3A 89 20 31  33 37 30 00 46 15 7A 08  | V.0:. 1370.F.z.|
00001140: 8D 20 32 36 36 30 00 5A  15 84 08 8B 20 56 AA 56  |. 2660.Z.... V.V|
00001150: 31 B2 30 20 A7 20 32 35  38 30 00 75 15 8E 08 8D  |1.0 . 2580.u....|
00001160: 20 32 36 36 30 20 3A 20  4C 4E B2 56 31 AA 28 32  | 2660 : LN.V1.(2|
00001170: 35 36 AC 56 29 00 8E 15  98 08 4C 31 B2 56 31 20  |56.V).....L1.V1 |
00001180: 3A 20 4C 32 B2 56 20 3A  20 99 20 4C 4E 2C 00 94  |: L2.V : . LN,..|
00001190: 15 A2 08 3A 00 B3 15 AC  08 8F 20 2A 2A 2A 2A 2A  |...:...... *****|
000011A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000011B0: 2A 2A 2A 00 D2 15 B6 08  8F 20 43 48 4B 20 49 46  |***...... CHK IF|
000011C0: 20 4C 49 4E 45 23 20 49  53 20 41 20 54 41 52 47  | LINE# IS A TARG|
000011D0: 45 54 00 F1 15 C0 08 8F  20 2A 2A 2A 2A 2A 2A 2A  |ET...... *******|
000011E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000011F0: 2A 00 F7 15 CA 08 3A 00  06 16 D4 08 42 59 B2 B5  |*.....:.....BY..|
00001200: 28 4C 4E AD 38 29 00 14  16 DE 08 5A B2 4C 4E AB  |(LN.8).....Z.LN.|
00001210: 38 AC 42 59 00 21 16 E8  08 41 44 B2 42 59 AA 53  |8.BY.!...AD.BY.S|
00001220: 41 00 3D 16 F2 08 8B 20  28 54 28 5A 29 20 AF 20  |A.=.... (T(Z) . |
00001230: C2 28 41 44 29 29 20 A7  20 32 34 36 30 00 43 16  |.(AD)) . 2460.C.|
00001240: FC 08 3A 00 5E 16 06 09  8F 20 2A 2A 2A 2A 2A 2A  |..:.^.... ******|
00001250: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 6F  |**************.o|
00001260: 16 10 09 8F 20 4E 4F 54  20 55 53 45 44 20 2D 00  |.... NOT USED -.|
00001270: 8A 16 1A 09 8F 20 44 49  53 43 41 52 44 20 4C 49  |..... DISCARD LI|
00001280: 4E 4B 20 26 20 4C 49 4E  45 23 00 A5 16 24 09 8F  |NK & LINE#...$..|
00001290: 20 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  | ***************|
000012A0: 2A 2A 2A 2A 2A 00 AB 16  2E 09 3A 00 C7 16 38 09  |*****.....:...8.|
000012B0: 8D 20 32 36 38 30 20 3A  20 8B 20 56 B2 31 34 33  |. 2680 : . V.143|
000012C0: 20 A7 20 31 38 31 30 00  E0 16 42 09 8B 20 56 B2  | . 1810...B.. V.|
000012D0: 33 32 20 B0 20 56 B2 35  38 20 A7 20 32 33 36 30  |32 . V.58 . 2360|
000012E0: 00 F1 16 4C 09 8B 20 56  B2 30 20 A7 20 32 31 37  |...L.. V.0 . 217|
000012F0: 30 00 0E 17 56 09 98 36  2C 22 3A 22 3B 20 3A 20  |0...V..6,":"; : |
00001300: 52 B2 52 AA 31 20 3A 20  89 20 31 37 30 30 00 14  |R.R.1 : . 1700..|
00001310: 17 60 09 3A 00 37 17 6A  09 8F 20 2A 2A 2A 2A 2A  |.`.:.7.j.. *****|
00001320: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001330: 2A 2A 2A 2A 2A 2A 2A 00  4C 17 74 09 8F 20 4C 49  |*******.L.t.. LI|
00001340: 4E 45 23 20 4E 45 45 44  45 44 20 2D 00 6F 17 7E  |NE# NEEDED -.o.~|
00001350: 09 8F 20 57 52 49 54 45  20 4C 49 4E 45 20 45 4E  |.. WRITE LINE EN|
00001360: 44 2C 20 4C 49 4E 4B 20  26 20 4C 49 4E 45 23 00  |D, LINK & LINE#.|
00001370: 92 17 88 09 8F 20 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..... **********|
00001380: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001390: 2A 2A 00 98 17 92 09 3A  00 AF 17 9C 09 98 36 2C  |**.....:......6,|
000013A0: C7 28 30 29 3B C7 28 31  29 3B C7 28 31 29 3B 00  |.(0);.(1);.(1);.|
000013B0: C9 17 A6 09 98 36 2C C7  28 4C 31 29 3B C7 28 4C  |.....6,.(L1);.(L|
000013C0: 32 29 3B 20 3A 20 52 B2  34 00 D4 17 B0 09 8D 20  |2); : R.4...... |
000013D0: 32 36 38 30 00 ED 17 BA  09 8B 20 56 B2 33 32 20  |2680...... V.32 |
000013E0: B0 20 56 B2 35 38 20 A7  20 32 34 38 30 00 09 18  |. V.58 . 2480...|
000013F0: C4 09 8B 20 56 B2 30 20  B0 20 56 B2 31 34 33 20  |... V.0 . V.143 |
00001400: A7 20 98 36 2C 22 3A 22  3B 00 1A 18 CE 09 46 B2  |. .6,":";.....F.|
00001410: 30 20 3A 20 89 20 31 37  30 30 00 20 18 D8 09 3A  |0 : . 1700. ...:|
00001420: 00 3B 18 E2 09 8F 20 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.;.... *********|
00001430: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 52 18 EC 09  |***********.R...|
00001440: 8F 20 45 4E 44 20 4F 46  20 43 4F 4D 50 41 43 54  |. END OF COMPACT|
00001450: 20 2D 00 6D 18 F6 09 8F  20 57 52 49 54 45 20 45  | -.m.... WRITE E|
00001460: 4E 44 20 4F 46 20 50 52  4F 47 52 41 4D 00 88 18  |ND OF PROGRAM...|
00001470: 00 0A 8F 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |... ************|
00001480: 2A 2A 2A 2A 2A 2A 2A 2A  00 8E 18 0A 0A 3A 00 A5  |********.....:..|
00001490: 18 14 0A 98 36 2C C7 28  30 29 3B C7 28 30 29 3B  |....6,.(0);.(0);|
000014A0: C7 28 30 29 3B 00 B8 18  1E 0A 99 22 93 11 11 11  |.(0);......"....|
000014B0: 12 44 4F 4E 45 11 11 22  00 C3 18 28 0A 89 20 32  |.DONE.."...(.. 2|
000014C0: 37 38 30 00 C9 18 32 0A  3A 00 E8 18 3C 0A 8F 20  |780...2.:...<.. |
000014D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000014E0: 2A 2A 2A 2A 2A 2A 2A 2A  00 07 19 46 0A 8F 20 2A  |********...F.. *|
000014F0: 2A 2A 2A 2A 20 20 53 55  42 52 4F 55 54 49 4E 45  |****  SUBROUTINE|
00001500: 53 20 2A 2A 2A 2A 2A 00  26 19 50 0A 8F 20 2A 2A  |S *****.&.P.. **|
00001510: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001520: 2A 2A 2A 2A 2A 2A 00 2C  19 5A 0A 3A 00 3E 19 64  |******.,.Z.:.>.d|
00001530: 0A 8D 20 32 36 38 30 20  3A 20 56 31 B2 56 00 44  |.. 2680 : V1.V.D|
00001540: 19 6E 0A 3A 00 58 19 78  0A A1 23 35 2C 43 24 20  |.n.:.X.x..#5,C$ |
00001550: 3A 20 8D 20 32 37 32 30  00 6E 19 82 0A 8B 20 43  |: . 2720.n.... C|
00001560: 24 B2 22 22 20 A7 20 56  B2 30 20 3A 20 8E 00 7E  |$."" . V.0 : ..~|
00001570: 19 8C 0A 56 B2 C6 28 43  24 29 20 3A 20 8E 00 84  |...V..(C$) : ...|
00001580: 19 96 0A 3A 00 99 19 A0  0A 84 31 35 2C 45 4E 2C  |...:......15,EN,|
00001590: 45 4D 24 2C 45 54 2C 45  53 00 A8 19 AA 0A 8B 20  |EM$,ET,ES...... |
000015A0: 45 4E B2 30 20 A7 20 8E  00 AE 19 B4 0A 3A 00 C9  |EN.0 . ......:..|
000015B0: 19 BE 0A 99 20 3A 20 99  22 11 11 11 12 44 49 53  |.... : ."....DIS|
000015C0: 4B 20 45 52 52 4F 52 11  22 00 DC 19 C8 0A 99 20  |K ERROR."...... |
000015D0: 45 4E 3B 45 4D 24 3B 45  54 3B 45 53 00 E2 19 D2  |EN;EM$;ET;ES....|
000015E0: 0A 3A 00 F7 19 DC 0A A0  20 35 20 3A 20 A0 20 36  |.:...... 5 : . 6|
000015F0: 20 3A 20 A0 20 31 35 00  0D 1A E6 0A 97 20 53 4B  | : . 15...... SK|
00001600: 2C C2 28 53 4B 29 AA 33  32 3A 9C 3A 80 00 00 00  |,.(SK).32:.:....|

....D..        'SQUEEZER'...N.:.C.X.. TH
IS PROGRAM COMPRESSES BASIC.B.... PROGRA
MS INTO RESTRICTED...... MEMORY SPACES. 
IT SHOULD WORK...... ON ANY COMMODORE CO
MPUTER... .:.M.... MODIFIED BY DAVID WIL
LIAMS...... AND DOCUMENTED BY JOHN EASTO
N...... STARTING FROM THE PROGRAM:./.H..
      C O M P A C T O R.L.R..      BY:  
ROBERT BAKER.I....      BAKER ENTERPRISE
S......       15 WINDSOR DR.......      
ATCO, N.J.  08004.....:...... **********
********.Y.... CHECK MACHINE TYPE...... 
******************...".:...,.PK.B(57345)
.;.6.SK.56:. PK.72 . PK.127 . PK.54 . PK
.75 . SK.53.A.@.:.].J.. ****************
*****.W.T..   SET UP FLAG SPACE...^.. **
*******************...H.:.A.R.SA.256.B(S
K):. B(SA.8000).254 . 410...|.. SK,B(SK)
.32:. SK.1,0...... 256.B(SK).8000,254...
......... ".INITIALIZING......".4.... I.
SA . SA.7999:. I,0:..T.... T(7):. I.0 . 
7:T(I).2.I:..Z...:.Q.B.. ***************
*...L.. READY DISK FILES...V.. *********
*******.....:.U.... ".'SQUEEZER' - MODIF
IED FROM 'COMPACTOR'"...... "..THIS PROG
RAM 'SQUEEZES' BASIC".$.... "PROGRAMS IN
TO REDUCED SPACE BY".U.... "DELETING 'RE
M'S, LENGTHENING LINES, ETC.".T....:.:. 
"INPUT FILENAME";FI$......:. "DRIVE # ? 
";...&.. ID$:. ID$."0" . ID$."1" . 550..
.0.. ID$.X.:..:.:. "OUTPUT FILENAME";OF$
...D..:. "DRIVE # ? ";...N.. OD$:. OD$."
0" . OD$."1" . 590...X.. OD$.".B.:.4.L..
 ***********.F.V.. READY TO GO.X.... ***
********.^...:.S....".SCANNING FILE.....
."   FOR TARGET LINES............. 15,8,
15:. 2720.H.... 5,8,5,ID$.":".FI$.",P,R"
.N...:...F.. ***************************
...P.. READ LOAD ADR, LINK & LINE#.4.Z..
 ***************************.:...:.N....
 2720 : . 2660.K.... 2660 : . V.V1.0 . 1
220...... 2660 : LN.V1.(256.V).....:....
.. ******************************.O. .. 
       SCAN BASIC LINES...*.. FOR GOTO, 
GOSUB, & THEN TOKENS...4.. *************
*****************...>.:.*.H.. 2680.:.R..
 V.0 . 760.T.\.. V.137 . V.141 . 930.G.F
.. V..167 . 840.M.P.:...Z.. ************
****...... GET TARGET LINE#...... ******
**********.....:.A...LT.0...... 2680 : .
 V.32 . 940...... V.48 . V.57 . 1030....
.LT.(10.LT).E(C$)...J.. 2680 : . 950.".T
.:.:.... *****************.R.... FLAG TA
RGET LINES.J.... *****************.P...:
...... LT.0 . 1140.....BY..(LT.8).....Z.
LT.8.BY...$.AD.BY.SA.B.... AD,B(AD) . T(
Z).L.8.. LT,.R.B.:...L.. ***************
************...V.. CHECK FOR 'ON...GOTO/
GOSUB'.8.`.. ***************************
.>.J.:.O.T.. V.44 . 930.A.~.. V..32 . 85
0.U.... 2680 : . 1140.{...:...... ******
***************...... GET READY FOR COMP
ACT.O.... *********************.U...:...
D.. ".COMPACTING LINES.........N.  5...X
.. 5,8,5,ID$.":".FI$.",P,R".&.... 2720.=
...FO$.H(FL$,14)."/C".O....15,"S1:".FO$.
N.... 6,8,6,OD$.":".OF$.",P,W".Y.... 272
0....:......  *************...(.. COPY 
LOAD ADR...2.. *************.B.<.:.M.F..
 2660...P..6,G(V1);...Z..6,G(V);: R.0...
D.:...N.. *************************.3.X.
. COPY LINK AND LINE NUMBER.S.... ******
*******************.Y...:.R.... 2660 : K
1.V1 :K2.V... .F.0 :. V.V1.0 . 2580.....
. 2660 : L1.V1 : L2.V.....LN.L1.(256.L2)
 : . LN,.K.... 2680...H.. V.32 . V.58 . 
1470...R.. V.0 . 1520...... V..143 . 158
0.#.... 2680 : . V.0 . 1510.+...F.1.:...
BY..(LN.8).H...Z.LN.8.BY.U...AD.BY.SA.Q.
... (T(Z) . B(AD)) . 1580.|.".. 1430...,
..6,G(K1);G(K2);...6..6,G(L1);G(L2); : R
.4.E.@.:  . F . .6,":"; : R.5.V.J.F.0 : 
. 1700...T.:...^.. *********************
******. .H.. ****  SCAN BASIC LINE  ****
.B.R.. **** & COMPACT PROGRAM ****.D.|..
 ***************************.J...:.}....
6,C$; : R.R.1...... 2680.....:  . V.137 
. F.1.....:  . V.139 . V.167 . F.1.N...:
  . V.0 . 2160...B.:  . V.32 . 1690...L.
:...V.. ********************...... 'REM'
 TOKEN -.3.... DISCARD REST OF LINE.N...
. ********************.T...:.H.... V..14
3 . 1890...... 2680 : . V.0 . 1810......
 2160...&.:...0.. **********************
****.B.:.. QUOTE -...D.. COPY TILL NEXT 
OR LINE END...N.. **********************
****...X.:...B.. V..34 . 2030.0.L..6,C$;
 : R.R.1.;.V.. 2680.M.... V.34 . 1680.^.
... V.0 . 1900.U.... F . V.0 : . 1370...
...6,G(34); : R.R.1...... 2160.....:....
.. ************************.Z.F.. IF COL
ON - CHK NEXT CHAR...P..      ELSE COPY 
CHAR...Z.. ************************.....
:.,.... V..58 . 1680.7.... 2680.P.... V.
32 . V.58 . 2040.C.... V.143 . 1810.T...
. V.0 . 2160... ..6,":"; : R.R.1...*.. 1
700...4.:...>.. ************************
****.P.H.. END OF LINE -...R.. CAN WE CO
MPACT THESE LINES ?...\.. **************
**************...F.:.;.P.. F . (R.170) .
 V.0:. 1370.F.Z.. 2660.Z.... V.V1.0 . 25
80.U.... 2660 : LN.V1.(256.V).....L1.V1 
: L2.V : . LN,.....:...... *************
***********.R.... CHK IF LINE# IS A TARG
ET...... ************************...J.:.
..T.BY..(LN.8).....Z.LN.8.BY.!...AD.BY.S
A.=.... (T(Z) . B(AD)) . 2460.C...:.^...
. ********************.O.... NOT USED -.
..... DISCARD LINK & LINE#...$.. *******
*************.....:.G.8.. 2680 : . V.143
 . 1810...B.. V.32 . V.58 . 2360...L.. V
.0 . 2170...V..6,":"; : R.R.1 : . 1700..
.`.:.7.J.. ****************************.
L.T.. LINE# NEEDED -.O.~.. WRITE LINE EN
D, LINK & LINE#...... ******************
**********.....:......6,G(0);G(1);G(1);.
I....6,G(L1);G(L2); : R.4.T.... 2680....
.. V.32 . V.58 . 2480...D.. V.0 . V.143 
. .6,":";...N.F.0 : . 1700. .X.:.;.... *
*******************.R.... END OF COMPACT
 -.M.... WRITE END OF PROGRAM...... ****
****************.....:......6,G(0);G(0);
G(0);......".....DONE..".C.(.. 2780.I.2.
:...<.. ************************...F.. *
****  SUBROUTINES *****.&.P.. **********
**************.,.Z.:.>.D.. 2680 : V1.V.D
.N.:.X.X..#5,C$ : . 2720.N.... C$."" . V
.0 : ..~...V.F(C$) : ......:... ..15,EN,
EM$,ET,ES...... EN.0 . ......:.I.... : .
"....DISK ERROR."...H.. EN;EM$;ET;ES...R
.:.....  5 :   6 :   15...... SK,B(SK).3
2:.:....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL