COMPACTOR
FILE INFORMATION
FILENAME(S): COMPACTOR
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-11-30 21:15:43
APPEARS ON: 1 disk(s)
FILE HASH
47d716bd55d998f748761961bf3c7085d328b01c51e53f8b7c48868d146522d6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISKINPUT64 856 | COMPACTOR | PRG | DuncanTwain | 9 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3C 08 0A 00 8F 20 42 41 53 49 43 2D 43 4F |..<.... BASIC-CO|
00000010: 4D 50 41 43 54 4F 52 20 55 4E 44 20 52 45 4E 55 |MPACTOR UND RENU|
00000020: 4D 42 45 52 20 20 49 4E 50 55 54 20 36 34 20 20 |MBER INPUT 64 |
00000030: 41 55 53 47 41 42 45 20 36 2F 38 35 00 46 08 14 |AUSGABE 6/85.F..|
00000040: 00 9E 32 31 32 38 00 00 00 4E 55 4D 2E 53 52 43 |..2128...NUM.SRC|
00000050: 22 A9 13 85 2C A9 00 8D 00 13 20 59 A6 4C AE A7 |"...,..... Y.L..|
00000060: 7F 08 31 00 20 20 22 52 45 4E 55 4D 2B 2E 3E EE |..1. "RENUM+.>.|
00000070: DE EE 22 E2 EE EE 31 EE D0 DE EE EE ED EF EC ED |.."...1.........|
00000080: EF EB EE DE E6 EE D2 DE EA DE D0 DA EE E6 DE EE |................|
00000090: D0 EE EE EE DE ED EE EE EE DE EE DA DE EE EE FB |................|
000000A0: E2 DE E3 EE D2 DE EE EE ED EF EC ED EF EE E3 ED |................|
000000B0: EE E2 EE D2 EE EE EE EE EE EE EA E6 D5 EB EE E2 |................|
000000C0: E6 DE DE D0 EE EE EE FA EF 4E E2 E6 EF 3D E2 BE |.........N...=..|
000000D0: E3 ED ED E3 EB EE EE EC FE BE E3 ED EE E3 FF E7 |................|
000000E0: EE E7 E3 EF FE EE EE EE EE EE EF F3 3E EF BE 11 |............>...|
000000F0: EE E6 63 C2 EE E3 ED EB E3 2E E6 A3 EE 7D AB A6 |..c..........}..|
00000100: 2C E8 86 FC A5 2B 85 FB A9 00 85 FD A9 C0 85 FE |,....+..........|
00000110: A0 00 A2 09 B1 FB 91 FD 88 D0 F9 E6 FC E6 FE CA |................|
00000120: D0 F2 60 58 00 00 00 00 00 00 50 52 47 20 20 00 |..`X......PRG .|
00000130: DF 08 09 00 20 20 20 22 54 52 41 4E 53 2E 53 52 |.... "TRANS.SR|
00000140: 43 22 20 20 20 20 20 20 20 20 50 52 47 20 20 00 |C" PRG .|
00000150: FD 08 F4 01 42 4C 4F 43 4B 53 20 46 52 45 45 2E |....BLOCKS FREE.|
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 | ...|
00000170: 30 39 A9 37 85 01 A0 C3 A9 1E 20 1E AB A9 FF 8D |09.7...... .....|
00000180: D0 C3 20 E4 FF C9 31 F0 07 C9 32 D0 F5 CE D0 C3 |.. ...1...2.....|
00000190: 20 03 C3 20 C9 C1 4C 7B C0 B1 7A F0 4C C9 83 D0 | .. ..L{..z.L...|
000001A0: 16 91 A7 20 DE C1 B1 7A 91 A7 F0 41 C9 22 D0 03 |... ...z...A."..|
000001B0: 20 19 C2 C9 20 D0 EA B2 22 D0 03 20 08 C8 EE EA | ... ...".. ....|
000001C0: 2F E7 9E E8 E9 CF BD EE FE 0F E8 9E 4E EF 9E 5E |/...........N..^|
000001D0: EF EF BD 4F 0E AF E9 EE 9E 0F E0 8E 4E EF EF E1 |...O........N...|
000001E0: DF 8E 9E 5E EF EF 81 DF BD EF E1 EF CF CE EE DF |...^............|
000001F0: BD EE EA EF EE 9E 5E EF EE EF 0D 0F 9C A2 05 A0 |......^.........|
00000200: 00 20 DE C1 B1 7A 91 A7 CA D0 F6 4C 27 C0 20 33 |. ...z.....L'. 3|
00000210: A5 18 A5 22 69 02 85 2D A5 23 20 55 A6 20 03 C3 |..."i..-.# U. ..|
00000220: 2C D0 C3 30 03 4C 74 A4 EE D0 C3 20 C9 C1 20 D5 |,..0.Lt.... .. .|
00000230: C1 A0 03 20 32 C2 AD D2 C3 D0 05 85 AB E2 D2 C3 |... 2...........|
00000240: 20 F5 C1 90 0B 2C D0 C3 10 C4 EE D0 C3 4C 4D C1 | ....,.......LM.|
00000250: 20 73 00 E6 AB C9 00 F0 DD C9 22 D0 08 85 08 20 | s........".... |
00000260: ED C2 4C 0F C1 C9 89 F0 25 C9 8D F0 21 C9 A7 F0 |..L.....%...!...|
00000270: 1D C9 8A F0 19 C9 CB F0 10 C9 8B F0 34 C9 91 F0 |............4...|
00000280: 30 A5 AB C9 AD B0 2A 90 C7 20 73 00 E6 AB 20 73 |0.....*.. s... s|
00000290: 00 B0 C0 8D D1 C3 A5 AB 18 69 06 85 AB 20 61 C2 |.........i... a.|
000002A0: 20 42 C2 AD D1 C3 D0 03 4C C4 C0 C9 2C F0 DF E0 | B......L...,...|
000002B0: D0 0E DF BD 4F 0D F0 10 10 E2 EE 2E 32 E5 30 E2 |....O.......2.0.|
000002C0: 27 EF 48 0F DF 48 08 9F 5C 4E 1F 07 E1 E8 8E E0 |'.H..H..\N......|
000002D0: E1 E9 8E E8 E8 0E FF 5E 1B EF EC 4E 1F 88 DF EC |.......^...N....|
000002E0: 4E 0F 81 58 88 11 E5 1E 4E 08 1C FF 4F 16 D9 68 |N..X....N...O..h|
000002F0: CF 0D E1 EC DE D8 58 80 50 88 B1 7A C1 A7 F0 0A |......X.P..z....|
00000300: 20 AB C1 20 AB C1 90 EE B0 0B 20 AB C1 C8 B1 7A | .. ...... ....z|
00000310: C1 A7 D0 2F 18 AF 17 85 01 88 A0 00 60 26 A7 D0 |.../........`&..|
00000320: 02 26 A8 A5 A8 C5 AA 90 04 A5 A7 C5 A9 1E C8 EE |.&..............|
00000330: 8E 5E EF DC 8E EF BD ED 4F 0B 1E 8E EE C1 CE BD |.^......O.......|
00000340: EE D1 DE BD EE DE BE CE FE EE D0 DE EE EE DC 1E |................|
00000350: 51 C1 EF E8 51 CE E1 1D 4F E8 51 1D DE BD 67 95 |Q...Q...O.Q...g.|
00000360: EF EE CE BD E7 94 BE EE DE F8 BE BD E7 BD EF 51 |...............Q|
00000370: 51 1D EF 58 CE BD 8E EE FE E7 BD CF E8 EB 1D DE |Q..X............|
00000380: D1 9E EE FE E7 D1 DF E8 EB CE BE EF D1 9E 4E EF |..............N.|
00000390: DF BD EF D1 EF EE 9E E6 69 CE EE CE 98 EF D1 6E |........i......n|
000003A0: 98 4F 5C 1E CF BD E7 F7 EE DF BD E7 F7 DE FE E7 |.O\.............|
000003B0: DC EE E9 E9 DE EE CE F7 EF DE 6E DE F7 EF DE EE |..........n.....|
000003C0: FE DE F8 1E DE E7 DE EF E8 51 CC CE DC 8F E8 7E |.........Q.....~|
000003D0: 97 DE 1E CE BD EE DE BD 7E D4 EF 69 9E 1C DE EE |........~..i....|
000003E0: EF 69 9E E9 D1 EF EE BE BE FE EF E0 DE E8 CF 7A |.i.............z|
000003F0: E7 F7 E7 B8 7E 6E DF 7A 85 15 85 62 68 A2 90 38 |....~n.z...bh..8|
00000400: 20 49 BC 20 DF BD 68 85 A8 68 85 A7 A0 00 B1 A7 | I. ..h..h......|
00000410: F0 06 C9 2C D0 1B A9 00 19 00 01 F0 1E A5 A7 85 |...,............|
00000420: 5F A5 A8 85 60 20 D4 C2 20 33 A5 20 E4 C1 4C 9A |_...` .. 3. ..L.|
00000430: C2 B9 00 01 F0 05 91 A7 C8 D0 D3 A0 00 60 A5 7A |.............`.z|
00000440: 85 5F A5 7B 85 60 A5 2D 85 5A A5 2E 85 5B E6 2D |._.{.`.-.Z...[.-|
00000450: D0 02 E6 2E A5 2D 85 58 A5 2E 85 59 4C BF A3 A0 |.....-.X...YL...|
00000460: 00 C8 E6 AB B1 7A F0 06 C5 08 D0 F5 F0 01 88 20 |.....z......... |
00000470: FB A8 A0 00 60 A0 C3 A9 B6 20 1E AB 38 A5 2D E5 |....`.... ..8.-.|
00000480: 2B AA A5 2E E5 2C 20 CD BD A0 C3 A9 C7 4C 1E AB |+...., ......L..|
00000490: 93 12 20 20 20 20 20 20 20 20 20 20 20 20 42 41 |.. BA|
000004A0: 53 49 43 2D 43 4F 4D 50 41 43 54 4F 52 20 20 20 |SIC-COMPACTOR |
000004B0: 20 20 20 20 20 20 20 20 20 20 0D 20 20 20 20 20 | . |
000004C0: 20 20 20 20 20 20 56 4F 4E 20 48 4F 52 53 54 20 | VON HORST |
000004D0: 52 45 49 43 48 45 52 54 0D 0D 0D 20 12 20 31 20 |REICHERT... . 1 |
000004E0: 92 20 52 45 4D 27 53 20 55 4E 44 20 53 50 41 43 |. REM'S UND SPAC|
000004F0: 45 53 20 45 4E 54 46 45 52 4E 45 4E 0D 0D 20 12 |ES ENTFERNEN.. .|
00000500: 20 32 20 92 20 43 4F 4D 50 41 43 54 49 45 52 45 | 2 . COMPACTIERE|
00000510: 4E 0D 0D 20 42 49 54 54 45 20 57 41 45 48 4C 45 |N.. BITTE WAEHLE|
00000520: 4E 20 53 49 45 0D 0D 00 50 52 4F 47 52 41 4D 4D |N SIE...PROGRAMM|
00000530: 4C 41 45 4E 47 45 3A 20 00 20 42 59 54 45 53 0D |LAENGE: . BYTES.|
00000540: 0D 00 00 00 00 A0 04 84 60 20 6E C1 A4 60 99 61 |........` n..`.a|
00000550: 00 20 E9 C0 88 10 F0 20 77 C1 8D 16 03 8C 17 03 |. ..... w.......|
00000560: 4C 00 C1 A9 24 2C A9 40 2C A9 25 85 6D 20 FB C0 |L...$,.@,.%.m ..|
00000570: F0 38 4C 4B C8 11 11 20 45 52 53 54 45 20 5A 45 |.8LK... ERSTE ZE|
00000580: 49 4C 45 4E 4E 55 4D 4D 45 52 3A 20 20 31 30 30 |ILENNUMMER: 100|
00000590: 30 9D 9D 9D 9D 00 20 20 20 20 20 20 20 20 53 43 |0..... SC|
000005A0: 48 52 49 54 54 57 45 49 54 45 3A 20 31 30 9D 9D |HRITTWEITE: 10..|
000005B0: 00 FF FF FF FF FF FF 64 00 64 00 0A 00 F4 66 FF |.......d.d....f.|
000005C0: FF FF FF FF FF FF 20 38 C8 20 C0 C4 A9 00 8D 4F |...... 8. .....O|
000005D0: C4 8D 50 C4 8D 53 C4 8D 52 C4 20 B7 C7 A5 2B 8D |..P..S..R. ...+.|
000005E0: 4B C4 A5 2C 8D 4C C4 20 92 C4 20 31 C5 AD 52 C4 |K..,.L. .. 1..R.|
000005F0: D0 0F EE 53 C4 20 B7 C7 20 D7 AA 20 31 C5 20 92 |...S. .. .. 1. .|
00000600: C4 4C F7 C6 20 0A C7 A5 2C F0 F6 A6 2B A0 01 85 |.L.. ...,...+...|
00000610: FC 86 FB AD 53 C4 F0 0C C8 AD 45 C4 91 FB C8 AD |....S.....E.....|
00000620: 46 C4 91 FB 20 00 C5 A0 00 B1 FB C8 AA B1 FB D0 |F... ...........|
00000630: DE 60 A2 00 86 FB 20 6C C7 20 D2 C7 20 79 00 20 |.`.... l. .. y. |
00000640: 6B A9 A5 15 8D 48 C4 A5 14 8D 47 C4 20 D7 AA A2 |k....H....G. ...|
00000650: 21 86 FB 20 6C C7 20 D2 C7 20 79 00 20 6B A9 A5 |!.. l. .. y. k..|
00000660: 15 8D 4A C4 A5 14 8D 49 C4 05 15 D0 04 A9 64 85 |..J....I......d.|
00000670: 14 60 18 AD 45 C4 6D 49 C4 8D 45 C4 AD 46 C4 6D |.`..E.mI..E..F.m|
00000680: 4A C4 8D 46 C4 90 09 20 3D C7 20 20 C7 4C F7 C6 |J..F... =. .L..|
00000690: 60 CB 8A A7 8D 89 FF FF FF FF FF FF 00 00 00 00 |`...............|
000006A0: 00 00 00 A5 2C 85 FE A5 2B 85 FD AD 53 C4 D0 0A |....,...+...S...|
000006B0: EE 4F C4 D0 08 EE 50 C4 D0 03 20 4C C7 A0 01 B1 |.O....P... L....|
000006C0: FD D0 01 60 85 FC 88 84 D4 B1 FD 85 FB A5 FD 8D |...`............|
000006D0: 4B C4 A5 FE 8D 4C C4 20 E3 C6 86 FD 85 FE A0 00 |K....L. ........|
000006E0: B1 FD F0 2A 48 20 84 E6 A5 D4 D0 18 68 10 16 C9 |...*H ......h...|
000006F0: 8F F0 1B A2 04 DD 1F C5 D0 06 20 A7 C5 4C 93 C5 |.......... ..L..|
00000700: CA 10 F2 48 68 E6 FD D0 02 E6 FE 4C 6E C5 A5 FB |...Hh......Ln...|
00000710: 85 FD A5 FC 85 FE 4C 39 C5 A5 FD 85 7A A5 FE 85 |......L9....z...|
00000720: 7B E0 02 F0 11 E0 00 D0 03 20 73 00 20 73 00 20 |{........ s. s. |
00000730: CC C5 F0 07 D0 F6 20 73 00 90 F4 A0 00 60 A5 7A |...... s.....`.z|
00000740: 8D 2A C5 A5 7B 8D 2B C5 20 79 00 20 6B A9 A5 7B |.*..{.+. y. k..{|
00000750: 8D 2D C5 A6 7A 8E 2C C5 A9 00 8D 2E C5 20 20 C6 |.-..z.,...... .|
00000760: AD 2E C5 D0 1E 20 59 C6 AE 45 C4 AD 46 C4 C9 FA |..... Y..E..F...|
00000770: 90 09 20 3D C7 20 20 C7 4C F7 C6 AC 53 C4 F0 03 |.. =. .L...S...|
00000780: 20 76 C6 AD 2C C5 85 7A AD 2D C5 85 7B 4C 79 00 | v..,..z.-..{Ly.|
00000790: FF FF A9 00 8D 1E C6 8D 1F C6 A0 01 A5 2C A6 2B |.............,.+|
000007A0: 86 5F 85 60 C8 B1 5F C5 14 D0 07 C8 B1 5F C5 15 |._.`.._......_..|
000007B0: F0 18 EE 1E C6 D0 03 EE 1F C6 A0 00 B1 5F AA C8 |............._..|
000007C0: B1 5F D0 DC 20 3D C7 20 17 C7 60 20 0A C7 AD 1E |._.. =. ..` ....|
000007D0: C6 0D 1F C6 F0 11 20 00 C5 AD 1E C6 D0 03 CE 1F |...... .........|
000007E0: C6 CE 1E C6 4C 5C C6 60 85 62 86 63 A2 90 38 20 |....L\.`.b.c..8 |
000007F0: 49 BC 20 DD BD A2 FF E8 BD 01 01 9D 24 C5 D0 F7 |I. .........$...|
00000800: 38 AD 2C C5 ED 2A C5 8D 30 C5 8A 8D 2F C5 38 ED |8.,..*..0.../.8.|
00000810: 30 C5 A8 10 02 C6 FC 18 65 FB 85 FB A9 00 65 FC |0.......e.....e.|
00000820: 85 FC 98 48 20 DB C7 68 18 10 03 CE 2D C5 6D 2C |...H ..h....-.m,|
00000830: C5 8D 2C C5 A9 00 6D 2D C5 8D 2D C5 AD 2A C5 85 |..,...m-..-..*..|
00000840: 14 AD 2B C5 85 15 AC 2F C5 88 B9 24 C5 91 14 88 |..+..../...$....|
00000850: 10 F8 4C 38 C8 A9 04 2C A9 02 18 6D 4B C4 AA AD |..L8...,...mK...|
00000860: 4C C4 69 00 86 14 85 15 60 20 38 C8 AD 4E C4 85 |L.i.....` 8..N..|
00000870: 2E AD 4D C4 85 2D 20 59 A6 4C 74 A4 AD 47 C4 8D |..M..- Y.Lt..G..|
00000880: 45 C4 AD 48 C4 8D 46 C4 60 A9 7F 8D 52 C4 8D 2E |E..H..F.`...R...|
00000890: C5 2C A9 5A 85 14 A9 A2 85 15 20 D7 AA B1 14 48 |.,.Z...... ....H|
000008A0: 29 7F 20 47 AB C8 68 10 F4 20 C2 BD 4C D7 AA 20 |). G..h.. ..L.. |
000008B0: E6 C6 A0 01 B1 14 85 3A 88 B1 14 85 39 60 AD 4F |.......:....9`.O|
000008C0: C4 D0 03 CE 50 C4 CE 4F C4 A9 0A 85 D3 20 6C E5 |....P..O..... l.|
000008D0: AE 4F C4 AD 50 C4 20 CD BD A9 20 4C D2 FF A6 FB |.O..P. ... L....|
000008E0: A0 00 20 D7 AA BD 03 C4 F0 06 20 D2 FF E8 D0 F5 |.. ....... .....|
000008F0: 20 CF FF C9 0D F0 15 C9 30 90 05 E9 3A 38 E9 C6 | .......0...:8..|
00000900: 90 DC C0 05 B0 EA 99 3F C4 C8 D0 E4 A9 00 99 3F |.......?.......?|
00000910: C4 60 20 2A 2A 2A 2A 2A 2A 20 20 2E 20 50 41 53 |.` ****** . PAS|
00000920: 53 20 2A 2A 2A 2A 2A 2A 00 20 D7 AA AE 53 C4 E8 |S ******. ...S..|
00000930: 8A 09 30 8D A8 C7 A2 00 BD A0 C7 F0 06 20 D2 FF |..0.......... ..|
00000940: E8 D0 F5 60 A9 3F 85 7A A9 C4 85 7B 60 AD 2C C5 |...`.?.z...{`.,.|
00000950: 85 5F AD 2D C5 85 60 18 AD 4D C4 85 5A AD 4E C4 |._.-..`..M..Z.N.|
00000960: 85 5B 98 30 0D 65 5A 85 58 A5 5B 69 00 85 59 4C |.[.0.eZ.X.[i..YL|
00000970: BF A3 38 A5 5B E5 60 AA A5 5F E5 5A 85 22 B0 01 |..8.[.`.._.Z."..|
00000980: E8 A5 60 E9 00 85 60 A5 5A 85 5F 18 98 65 5F 85 |..`...`.Z._..e_.|
00000990: 14 A9 00 65 60 85 15 C6 15 A4 22 B1 5F 91 14 C8 |...e`....."._...|
000009A0: D0 F9 E6 60 E6 15 CA D0 F2 60 20 33 A5 18 A5 22 |...`.....` 3..."|
000009B0: 69 02 8D 4D C4 A5 23 69 00 8D 4E C4 60 A9 65 A0 |i..M..#i..N.`.e.|
000009C0: C8 20 1E AB 20 E4 FF F0 FB C9 43 D0 03 4C 00 C0 |. .. .....C..L..|
000009D0: C9 52 D0 F0 4C 54 C4 93 0D 12 49 4E 50 55 54 20 |.R..LT....INPUT |
000009E0: 36 34 20 C0 20 42 41 53 49 43 2D 43 4F 4D 50 41 |64 . BASIC-COMPA|
000009F0: 43 54 4F 52 20 55 4E 44 20 52 45 4E 55 4D 42 45 |CTOR UND RENUMBE|
00000A00: 52 92 0D 0D 42 49 54 54 45 20 57 41 45 48 4C 45 |R...BITTE WAEHLE|
00000A10: 4E 3A 20 43 4F 4D 50 41 43 54 4F 52 20 20 12 43 |N: COMPACTOR .C|
00000A20: 92 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
00000A30: 20 20 82 45 42 88 4D 42 45 52 20 20 20 12 52 A2 | .EB.MBER .R.|
00000A40: 00 11 FF 08 08 FF FF 00 08 FF FF 08 08 FF FF 00 |................|
00000A50: 00 20 FD AE 20 EB B7 E0 28 B0 13 A8 14 B2 73 6E |. .. ...(.....sn|
00000A60: FA 2D BC EE 6A 88 C0 8E 80 E7 08 97 81 18 B1 24 |.-..j..........$|
00000A70: EF CC C0 22 2F CC 50 22 2F CC C0 22 2F CC C0 20 |..."/.P"/.."/.. |
00000A80: 22 26 AA 22 27 CC C0 22 27 C4 BA 22 2F CC C0 22 |"&."'.."'.."/.."|
00000A90: 2F CC C0 22 2F C4 BA 22 2F CC C0 22 27 CC C0 22 |/.."/.."/.."'.."|
00000AA0: 26 E4 BA 22 26 BD C0 22 2F CD C0 22 26 BD C0 22 |&.."&.."/.."&.."|
00000AB0: 2F CC C0 22 26 AD C0 22 2F CC C0 26 0D CC C0 22 |/.."&.."/..&..."|
00000AC0: 27 7F C0 22 2F CC C0 22 2F CC C0 22 2F CC C0 22 |'.."/.."/.."/.."|
00000AD0: 2F CC C0 22 2F CC C0 22 2F CC C0 22 22 0D C0 22 |/.."/.."/.."".."|
00000AE0: 2F 5C C0 22 2F CC C0 22 2F CC FF 00 00 FF FF 00 |/\."/.."/.......|
00000AF0: 00 FF FF 00 00 FF F5 00 00 FF FF 00 00 FF FF 00 |................|
00000B00: 00 00 19 13 01 00 8B C2 28 35 30 33 30 37 29 B3 |........(50307).|
00000B10: B1 37 AC 31 36 AA 38 A7 35 00 59 13 03 00 97 35 |.7.16.8.5.Y....5|
00000B20: 30 32 35 37 2C 38 3A 97 35 30 32 35 39 2C 37 AC |0257,8:.50259,7.|
00000B30: 31 36 AA 31 3A 97 35 30 32 36 30 2C 38 3A 97 35 |16.1:.50260,8:.5|
00000B40: 30 32 36 31 2C 34 AC 31 36 AA 31 3A 97 35 30 32 |0261,4.16.1:.502|
00000B50: 36 32 2C 31 AC 31 36 AA 32 00 E4 13 05 00 99 22 |62,1.16.2......"|
00000B60: 93 90 22 3B C7 28 31 34 29 3B C7 28 38 29 3B 3A |..";.(14);.(8);:|
00000B70: 97 35 33 32 38 30 2C 31 35 3A 97 35 33 32 38 31 |.53280,15:.53281|
00000B80: 2C 31 35 3A 50 52 B2 34 36 38 38 3A 54 24 B2 22 |,15:PR.4688:T$."|
00000B90: 12 1F C2 C1 D3 C9 C3 2D C3 4F 4D 50 41 43 54 4F |.......-.OMPACTO|
00000BA0: 52 20 55 4E 44 20 D2 45 4E 55 4D 42 45 52 92 90 |R UND .ENUMBER..|
00000BB0: 22 3A 99 54 24 3A 99 22 11 11 C4 49 45 20 46 4F |":.T$:."...IE FO|
00000BC0: 4C 47 45 4E 44 45 20 C1 4E 5A 45 49 47 45 20 57 |LGENDE .NZEIGE W|
00000BD0: 45 52 44 45 4E 20 D3 49 45 20 4B 55 45 4E 46 54 |ERDEN .IE KUENFT|
00000BE0: 49 47 22 3B 00 B9 14 0B 00 99 22 48 41 45 55 46 |IG";......"HAEUF|
00000BF0: 49 47 20 41 55 46 20 44 45 4D 20 C2 49 4C 44 53 |IG AUF DEM .ILDS|
00000C00: 43 48 49 52 4D 8E E9 12 12 E2 17 E2 EE E2 3A 36 |CHIRM.........:6|
00000C10: 9E C9 88 EF E9 E0 71 79 EE 74 74 7E 7E 7E 75 E1 |......qy.tt~~~u.|
00000C20: 7E 9D 8E 89 8E 9E 9F 8F 8E E8 EE 77 EE 79 98 8D |~..........w.y..|
00000C30: E8 EE D9 89 8E 9E 9F 8F 8D E8 EE 9E C9 E7 8E 78 |...............x|
00000C40: EE 9E 9D EE 98 EF FF FF FF FA 98 EF EE 9E 8D EE |................|
00000C50: 98 EF 98 EF EE 9E 8D EF 78 EE D9 89 8E 9E 9F 8F |........x.......|
00000C60: CE 89 8E 9F 8F 8F CE DC 9F 9F 8D E8 EE 9E C9 E7 |................|
00000C70: 8E 78 EE 9E 9D EE EF E9 8E 9F 9F 9E 9F 9B 8E 9E |.x..............|
00000C80: 6E 9E 78 EE 9E 8E 69 9E 78 EE 9E 8E DC 9F 9E 9E |n.x...i.x.......|
00000C90: 9D E9 8D EE EF E9 8E 9F 99 9E 9F 8E 98 EF E9 E0 |................|
00000CA0: 71 79 EE 74 74 7E 7E 7E 75 E1 7E 9D 8E 89 8E 97 |qy.tt~~~u.~.....|
00000CB0: 9F 8F 8E E8 EE 77 EE 79 98 EE ED E7 FE FE EF 7E |.....w.y.......~|
00000CC0: D9 E8 EE DE 89 87 97 8E 9E DE DC 9F 9F 8D E8 EE |................|
00000CD0: 9E C9 E7 8E 7E 9E 9D EE EF E9 8E 9F 99 9E 9F 9B |....~...........|
00000CE0: 8E 9E 6E 9E 78 EE 24 2C C3 28 42 59 24 29 AB 31 |..n.x.$,.(BY$).1|
00000CF0: 29 29 3A 82 3A 9E 50 52 2C 31 36 2C 30 2C 22 52 |)):.:.PR,16,0,"R|
00000D00: 45 41 44 59 2E 90 22 3A 8D 31 31 39 3A 99 22 93 |EADY..":.119:.".|
00000D10: 22 54 24 22 11 11 22 3A 99 22 C4 41 53 20 D4 45 |"T$"..":.".AS .E|
00000D20: 4D 50 4F 20 57 41 52 20 45 54 57 41 53 20 55 45 |MPO WAR ETWAS UE|
00000D30: 42 45 52 54 52 49 45 42 45 4E 2C 20 44 49 45 22 |BERTRIEBEN, DIE"|
00000D40: 3A 99 22 D7 49 52 4B 55 4E 47 20 44 41 46 55 45 |:.".IRKUNG DAFUE|
00000D50: 52 20 55 4E 54 45 52 54 52 49 45 42 45 4E 3A 22 |R UNTERTRIEBEN:"|
00000D60: 3A 99 3A 99 22 C4 45 52 20 32 2D D0 41 53 53 2D |:.:.".ER 2-.ASS-|
00000D70: C2 C1 D3 C9 C3 2D C3 4F 4D 50 41 43 54 4F 52 20 |.....-.OMPACTOR |
00000D80: 56 45 52 4B 55 45 52 5A 54 22 00 60 16 27 00 99 |VERKUERZT".`.'..|
00000D90: 22 D0 52 4F 47 52 41 4D 4D 45 20 42 49 53 20 41 |".ROGRAMME BIS A|
00000DA0: 55 46 20 37 30 20 25 20 44 45 52 20 CF 52 49 47 |UF 70 % DER .RIG|
00000DB0: 49 4E 41 4C 4C 41 45 4E 2D 22 3B 3A 99 22 47 45 |INALLAEN-";:."GE|
00000DC0: 2E 20 C4 49 45 20 C1 4E 5A 45 49 47 45 20 41 55 |. .IE .NZEIGE AU|
00000DD0: 46 20 44 45 52 20 56 4F 52 49 47 45 4E 20 D3 45 |F DER VORIGEN .E|
00000DE0: 49 54 45 22 3A 99 22 47 41 42 20 44 49 48 20 41 |ITE":."GAB DIH A|
00000DF0: 4E 46 41 48 4E 47 4C 49 43 48 45 20 CC 41 45 4E |NFAHNGLICHE .AEN|
00000E00: 47 45 2C 20 44 49 45 20 CC 41 45 4E 47 45 22 3A |GE, DIE .AENGE":|
00000E10: 99 22 4E 41 43 48 20 44 45 4D 20 45 52 53 54 45 |."NACH DEM ERSTE|
00000E20: 4E 20 C4 55 52 43 48 47 41 4E 47 20 28 D0 41 53 |N .URCHGANG (.AS|
00000E30: 53 20 31 29 20 55 4E 44 22 3A 99 22 44 49 45 20 |S 1) UND":."DIE |
00000E40: D0 52 4F 47 52 41 4D 4D 4C 41 45 4E 47 45 20 4E |.ROGRAMMLAENGE N|
00000E50: 41 43 48 20 44 45 4D 20 5A 57 45 49 54 45 4E 22 |ACH DEM ZWEITEN"|
00000E60: 00 29 17 31 00 99 22 C4 55 52 43 48 47 41 4E 47 |.).1..".URCHGANG|
00000E70: 20 28 D0 41 53 53 20 32 29 20 41 4E 2E 22 3A 99 | (.ASS 2) AN.":.|
00000E80: 3A 99 22 C9 4E 20 D0 41 53 53 20 31 20 57 45 52 |:.".N .ASS 1 WER|
00000E90: 44 45 4E 20 4E 55 52 20 D2 C5 CD 2D DA 45 49 4C |DEN NUR ...-.EIL|
00000EA0: 45 4E 20 55 4E 44 22 3A 99 22 CC 45 45 52 5A 45 |EN UND":.".EERZE|
00000EB0: 49 43 48 45 4E 20 45 4E 54 46 45 52 4E 54 2C 20 |ICHEN ENTFERNT, |
00000EC0: D0 41 53 53 20 32 20 43 4F 4D 50 41 43 54 49 45 |.ASS 2 COMPACTIE|
00000ED0: 52 54 22 3B 3A 99 22 44 49 45 20 C2 C1 D3 C9 C3 |RT";:."DIE .....|
00000EE0: 2D DA 45 49 4C 45 4E 2E 20 28 C4 49 45 53 45 20 |-.EILEN. (.IESE |
00000EF0: 53 49 4E 44 20 44 41 4E 4E 20 4E 49 43 48 54 22 |SIND DANN NICHT"|
00000F00: 3B 3A 99 22 4D 45 48 52 20 45 44 49 54 49 45 52 |;:."MEHR EDITIER|
00000F10: 42 41 52 2C 20 44 41 53 20 D0 52 4F 47 52 41 4D |BAR, DAS .ROGRAM|
00000F20: 4D 20 53 4F 4C 4C 54 45 22 00 DF 17 3B 00 99 22 |M SOLLTE"...;.."|
00000F30: 41 4C 53 4F 20 46 45 52 54 49 47 20 53 45 49 4E |ALSO FERTIG SEIN|
00000F40: 21 29 22 3A 8D 31 31 39 3A 99 22 93 22 54 24 22 |!)":.119:."."T$"|
00000F50: 11 11 22 3A 99 22 D3 49 45 20 4B 4F 45 4E 4E 45 |..":.".IE KOENNE|
00000F60: 4E 20 41 55 43 48 20 4E 55 52 20 44 45 4E 20 45 |N AUCH NUR DEN E|
00000F70: 52 53 54 45 4E 20 D0 41 53 53 22 3A 99 22 57 41 |RSTEN .ASS":."WA|
00000F80: 45 48 4C 45 4E 2C 20 45 49 4E 20 C1 4E 46 41 4E |EHLEN, EIN .NFAN|
00000F90: 47 53 4D 45 4E 55 45 20 53 54 45 4C 4C 54 20 C9 |GSMENUE STELLT .|
00000FA0: 48 4E 45 4E 22 3A 99 22 44 49 45 53 20 5A 55 52 |HNEN":."DIES ZUR|
00000FB0: 20 C1 55 53 57 41 48 4C 3A 22 3A 99 22 11 11 1F | .USWAHL:":."...|
00000FC0: 20 20 31 20 52 45 4D 27 53 20 55 4E 44 20 53 50 | 1 REM'S UND SP|
00000FD0: 41 43 45 53 20 45 4E 54 46 45 52 4E 45 4E 22 00 |ACES ENTFERNEN".|
..<.... BASIC-COMPACTOR UND RENUMBER IN
PUT 64 AUSGABE 6/85.F....2128...NUM.SRC
"...,..... Y.L...1. "RENUM+.>..."...1.
P.............R...PZ....P..........Z....
....R..............R........U......P....
.N...=..............................>...
..CB.........}..,....+.......... .......
.P.....JP.`X......PRG ..... "TRANS.SR
C" PRG .....BLOCKS FREE.
...09.7.. C.. .....PC ..I1..I2P.NPC
.C IAL{..Z.LI.P... .A.Z...AI"P. .BI P..
"P. .H../....O......N..^...O........N...
...^........ON........^........ . .A.Z..
JP.L'. 3..."I..-.# U. .C,PC0.LT..PC IA U
A . 2B.RCP....RC .A..,PC.D.PCLMA S...I..
.I"P... .BL.AI..%I..!I...I...IK..I..4I..
0..I..*.G S... S....QC...I... AB BB.QCP.
LD.I,...P...O.......2.0.'.H..H..\N......
.......^...N....N..X....N...O.YHO....XX.
P..ZA... .A .A.... .AH.ZA.P/...... .`&.P
.&...E.....E..H..^......O....AN..Q.....N
..P.....QA..QN..O.Q...G...N............Q
Q..XN......O....Q....Q...N..Q.N....Q....
IN.N..QN.O\.O.................N...N.....
.........QLN...~...N....~T.I.....I..Q...
......OZ....~N.Z...BH..8 I. ..H..H.. ...
..I,P..........._...` TB 3. .AL.B.......
HPS .`.Z._.{.`.-.Z...[.-P....-.X...YL..
.H...Z..E.P.... .. .` C.. ..8.-.+...., M
. C.GL.... BASIC-COMPACTOR
. VON HORST REICHERT
... . 1 . REM'S UND SPACES ENTFERNEN.. .
2 . COMPACTIEREN.. BITTE WAEHLEN SIE...
PROGRAMMLAENGE: . BYTES...... ..` NA.`.A
. ..... WA......L.A.$,.@,.%.M ...8LKH..
ERSTE ZEILENNUMMER: 1000..... SC
HRITTWEITE: 10.........D.D....F....... 8
H .D...OD.PD.SD.RD .G.+.KD.,.LD .D 1E.RD
P..SD .G W. 1E .DL.F .G.,...+ ......SD..
H.ED..H.FD.. .E ...H...P.`.... LG RG Y.
K....HD...GD W..!.. LG RG Y. K....JD...I
D..P..D..`..EDMID.ED.FDMJD.FD.. =G GL.F
`K..................,...+...SDP..ODP..PD
P. LG ...P.`....T.......KD...LD .F.... .
...*H ...TP.H..I.......EP. .EL.EJ..HH..P
...LNE........L9E...Z...{......P. S. S.
LE..P. S... .`.Z.*E.{.+E Y. K..{.-E.Z.,E
....E F..EP. YF.ED.FDI... =G GL.F.SD..
VF.,E.Z.-E.{LY.......F..F ..,.+._.`H._E
.P.H._E.....FP...F .._.H._P. =G .G` .G..
F..F.. .E..FP.N.FN.FL\F`.B.C..8 I. .....
....$EP.8.,E.*E.0E../E8.0E...F..E.....E.
...H .GH...N-EM,E.,E..M-E.-E.*E...+E.../
E..$E.....L8H..,...MKD..LDI.....` 8H.ND.
..MD.- Y.LT..GD.ED.HD.FD`..RD..E,.Z....
.. W...H) G.HH.. B.LW. .F ....:....9`.O
DP.NPDNOD...S L..OD.PD M.. LR... . W...D
.. R..P. O.I...I0...:8.F.......?DHP....?
D` ****** . PASS ******. W..SD...0..G..
. G.. R..P.`.?.Z.D.{`.,E._.-E.`..MD.Z.ND
.[.0.EZ.X.[I..YL..8.[.`.._.Z."....`...`.
Z._..E_....E`..F.."._..HP..`..JP.` 3..."
I..MD.#I..ND`.E H .. ....ICP.L..IRP.LTD.
..INPUT 64 . BASIC-COMPACTOR UND RENUMBE
R...BITTE WAEHLEN: COMPACTOR .C...
.EB.MBER .R.................
. .. ...(.....SN.-..J..........$.L."/LP"
/L."/L. "&."'L."'D."/L."/L."/D."/L."'L."
&.."&.."/M."&.."/L."&.."/L.&.L."'."/L."
/L."/L."/L."/L."/L."".."/\."/L."/L......
.......................B(50307)..7.16.8.
5.Y....50257,8:.50259,7.16.1:.50260,8:.5
0261,4.16.1:.50262,1.16.2......"..";G(14
);G(8);:.53280,15:.53281,15:PR.4688:T$."
..BASIC-COMPACTOR UND RENUMBER..":.T$:."
..DIE FOLGENDE ANZEIGE WERDEN SIE KUENFT
IG";......"HAEUFIG AUF DEM BILDSCHIRM...
......:6.I....QY.TT~~~U.~..........W.Y..
..Y.........I..X........................
X.Y.....N.....N.......I..X..............
N.X...I.X.......................QY.TT~~~
U.~..........W.Y.......~Y...............
.I..~.............N.X.$,C(BY$).1)):.:.PR
,16,0,"READY..":.119:."."T$"..":."DAS TE
MPO WAR ETWAS UEBERTRIEBEN, DIE":."WIRKU
NG DAFUER UNTERTRIEBEN:":.:."DER 2-PASS-
BASIC-COMPACTOR VERKUERZT".`.'.."PROGRAM
ME BIS AUF 70 % DER ORIGINALLAEN-";:."GE
. DIE ANZEIGE AUF DER VORIGEN SEITE":."G
AB DIH ANFAHNGLICHE LAENGE, DIE LAENGE":
."NACH DEM ERSTEN DURCHGANG (PASS 1) UND
":."DIE PROGRAMMLAENGE NACH DEM ZWEITEN"
.).1.."DURCHGANG (PASS 2) AN.":.:."IN PA
SS 1 WERDEN NUR REM-ZEILEN UND":."LEERZE
ICHEN ENTFERNT, PASS 2 COMPACTIERT";:."D
IE BASIC-ZEILEN. (DIESE SIND DANN NICHT"
;:."MEHR EDITIERBAR, DAS PROGRAMM SOLLTE
"...;.."ALSO FERTIG SEIN!)":.119:."."T$"
..":."SIE KOENNEN AUCH NUR DEN ERSTEN PA
SS":."WAEHLEN, EIN ANFANGSMENUE STELLT I
HNEN":."DIES ZUR AUSWAHL:":."... 1 REM'
S UND SPACES ENTFERNEN".
> CLICK IMAGE PREVIEW FOR FULL MODAL