GUENTER'S DISK
FILE INFORMATION
FILENAME(S): GUENTER'S DISK
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-11-02 16:54:43
APPEARS ON: 1 disk(s)
FILE HASH
90667a46a08cd94486e7b4e68011a98e5d7d0f91dbd651e6148e4b9091913c3b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PROGRAMMLISTE | GUENTER'S DISK | PRG | Treasure Chest - Reamigation | 27 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 E8 03 43 B2 43 AA 31 00 24 08 4C 04 |......C.C.1.$.L.|
00000010: 8B 43 B2 31 A7 20 93 22 54 4F 50 53 4F 52 54 22 |.C.1. ."TOPSORT"|
00000020: 2C 38 2C 31 00 2F 08 B0 04 9E 35 32 32 38 36 00 |,8,1./....52286.|
00000030: 35 08 14 05 9C 00 44 08 78 05 86 20 44 24 28 31 |5.....D.x.. D$(1|
00000040: 34 30 30 29 00 4C 08 DC 05 42 B2 30 00 63 08 40 |400).L...B.0.c.@|
00000050: 06 97 20 35 33 32 38 30 2C 30 3A 97 35 33 32 38 |.. 53280,0:.5328|
00000060: 31 2C 30 00 71 08 08 07 97 20 36 35 30 2C 31 32 |1,0.q.... 650,12|
00000070: 38 00 9F 08 6C 07 99 20 22 9F 11 11 11 11 11 20 |8...l.. "...... |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 | ............".|
000000A0: AD 08 34 08 8F 20 2A 20 4D 45 4E 55 45 00 B7 08 |..4.. * MENUE...|
000000B0: 98 08 99 C7 28 34 29 00 BF 08 FC 08 51 B2 30 00 |....(4).....Q.0.|
000000C0: CB 08 60 09 99 20 22 93 20 20 11 00 EF 08 C4 09 |..`.. ". ......|
000000D0: 99 20 22 20 20 20 20 20 20 20 20 20 20 20 2A 2A |. " **|
000000E0: 20 20 4D 20 45 20 4E 20 55 20 45 20 20 2A 2A 00 | M E N U E **.|
000000F0: 13 09 28 0A 99 20 22 20 20 20 20 20 20 20 20 20 |..(.. " |
00000100: 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | --------------|
00000110: 2D 2D 2D 00 3F 09 8C 0A 99 20 22 11 20 20 47 45 |---.?.... ". GE|
00000120: 4E 45 52 41 4C 44 49 52 45 43 54 4F 52 59 20 45 |NERALDIRECTORY E|
00000130: 49 4E 4C 45 53 45 4E 20 20 2D 2D 3E 20 31 22 00 |INLESEN --> 1".|
00000140: 6B 09 F0 0A 99 20 22 11 20 20 47 45 4E 45 52 41 |k.... ". GENERA|
00000150: 4C 44 49 52 45 43 54 4F 52 59 20 53 4F 52 54 49 |LDIRECTORY SORTI|
00000160: 45 52 45 4E 20 2D 2D 3E 20 32 22 00 97 09 54 0B |EREN --> 2"...T.|
00000170: 99 20 22 11 20 20 47 45 4E 45 52 41 4C 44 49 52 |. ". GENERALDIR|
00000180: 45 43 54 4F 52 59 20 5A 45 49 47 45 4E 20 20 20 |ECTORY ZEIGEN |
00000190: 20 2D 2D 3E 20 33 22 00 C3 09 B8 0B 99 20 22 11 | --> 3"...... ".|
000001A0: 20 20 47 45 4E 45 52 41 4C 44 49 52 45 43 54 4F | GENERALDIRECTO|
000001B0: 52 59 20 44 52 55 43 4B 45 4E 20 20 20 2D 2D 3E |RY DRUCKEN -->|
000001C0: 20 34 22 00 EF 09 1C 0C 99 20 22 11 20 20 4E 45 | 4"...... ". NE|
000001D0: 55 45 20 44 49 53 4B 45 54 54 45 20 55 45 42 45 |UE DISKETTE UEBE|
000001E0: 52 4E 45 48 4D 45 4E 20 20 2D 2D 3E 20 35 22 00 |RNEHMEN --> 5".|
000001F0: 1B 0A 80 0C 99 20 22 11 20 20 45 49 4E 54 52 41 |..... ". EINTRA|
00000200: 47 20 4C 4F 45 53 43 48 45 4E 20 20 20 20 20 20 |G LOESCHEN |
00000210: 20 20 20 20 20 2D 2D 3E 20 36 22 00 47 0A E4 0C | --> 6".G...|
00000220: 99 20 22 11 20 20 47 45 4E 45 52 41 4C 44 49 52 |. ". GENERALDIR|
00000230: 45 43 54 4F 52 59 20 53 50 45 49 43 48 45 52 4E |ECTORY SPEICHERN|
00000240: 20 2D 2D 3E 20 37 22 00 73 0A 48 0D 99 20 22 11 | --> 7".s.H.. ".|
00000250: 20 20 46 52 45 49 45 52 20 53 50 45 49 43 48 45 | FREIER SPEICHE|
00000260: 52 50 4C 41 54 5A 20 20 20 20 20 20 20 2D 2D 3E |RPLATZ -->|
00000270: 20 38 22 00 9F 0A AC 0D 99 20 22 11 20 20 41 45 | 8"...... ". AE|
00000280: 4E 44 45 52 55 4E 47 20 45 49 4E 45 53 20 45 49 |NDERUNG EINES EI|
00000290: 4E 54 52 41 47 53 20 20 20 2D 2D 3E 20 39 22 00 |NTRAGS --> 9".|
000002A0: CC 0A 10 0E 99 20 22 11 20 20 50 52 4F 47 52 41 |..... ". PROGRA|
000002B0: 4D 4D 20 42 45 45 4E 44 45 4E 20 20 20 20 20 20 |MM BEENDEN |
000002C0: 20 20 20 20 20 2D 2D 3E 20 31 30 22 00 FA 0A 74 | --> 10"...t|
000002D0: 0E 85 20 22 11 11 20 20 44 45 49 4E 45 20 57 41 |.. ".. DEINE WA|
000002E0: 48 4C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |HL |
000002F0: 20 20 20 2D 2D 3E 20 22 3B 51 00 3B 0B D8 0E 91 | --> ";Q.;....|
00000300: 20 51 20 89 20 38 34 30 30 2C 39 34 30 30 2C 39 | Q . 8400,9400,9|
00000310: 38 30 30 2C 31 31 33 30 30 2C 34 31 30 30 2C 31 |800,11300,4100,1|
00000320: 33 35 30 30 2C 31 34 35 30 30 2C 31 35 35 30 30 |3500,14500,15500|
00000330: 2C 31 36 30 30 30 2C 34 30 30 30 00 46 0B 3C 0F |,16000,4000.F.<.|
00000340: 89 20 32 31 30 30 00 51 0B A0 0F 9E 36 34 37 33 |. 2100.Q....6473|
00000350: 38 00 6A 0B 04 10 8F 20 44 49 52 45 43 54 4F 52 |8.j.... DIRECTOR|
00000360: 59 20 45 49 4E 4C 45 53 45 4E 00 95 0B 68 10 85 |Y EINLESEN...h..|
00000370: 22 93 11 20 20 20 44 49 53 4B 45 54 54 45 4E 20 |".. DISKETTEN |
00000380: 2D 20 4B 45 4E 4E 5A 45 49 43 48 45 4E 20 20 3A |- KENNZEICHEN :|
00000390: 22 3B 49 44 24 00 9F 0B CC 10 99 20 22 11 22 00 |";ID$...... ".".|
000003A0: AC 0B 30 11 9F 31 35 2C 38 2C 31 35 00 BC 0B 94 |..0..15,8,15....|
000003B0: 11 9F 20 32 2C 38 2C 32 2C 22 23 22 00 C9 0B F8 |.. 2,8,2,"#"....|
000003C0: 11 54 B2 31 38 3A 53 B2 31 00 DF 0B 5C 12 98 31 |.T.18:S.1...\..1|
000003D0: 35 2C 22 42 2D 52 22 3B 32 3B 30 3B 54 3B 53 00 |5,"B-R";2;0;T;S.|
000003E0: F1 0B C0 12 98 31 35 2C 22 42 2D 50 22 3B 32 3B |.....15,"B-P";2;|
000003F0: 30 00 0E 0C 24 13 A1 23 32 2C 58 24 3A 8B 20 58 |0...$..#2,X$:. X|
00000400: 24 B2 22 22 20 A7 20 58 24 B2 C7 28 30 29 00 1A |$."" . X$..(0)..|
00000410: 0C 88 13 54 B2 C6 28 58 24 29 00 37 0C EC 13 A1 |...T..(X$).7....|
00000420: 23 32 2C 58 24 3A 8B 20 58 24 B2 22 22 20 A7 20 |#2,X$:. X$."" . |
00000430: 58 24 B2 C7 28 30 29 00 43 0C 50 14 53 B2 C6 28 |X$..(0).C.P.S..(|
00000440: 58 24 29 00 51 0C B4 14 81 20 58 B2 30 20 A4 20 |X$).Q.... X.0 . |
00000450: 37 00 68 0C 18 15 98 31 35 2C 22 42 2D 50 22 3B |7.h....15,"B-P";|
00000460: 32 3B 58 AC 33 32 AA 32 00 85 0C 7C 15 A1 23 32 |2;X.32.2...|..#2|
00000470: 2C 58 24 3A 8B 20 58 24 B2 22 22 20 A7 20 58 24 |,X$:. X$."" . X$|
00000480: B2 C7 28 30 29 00 9A 0C E0 15 8B 20 C6 28 58 24 |..(0)...... .(X$|
00000490: 29 B2 30 20 A7 20 36 36 30 30 00 B1 0C 44 16 98 |).0 . 6600...D..|
000004A0: 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC 33 32 AA |15,"B-P";2;X.32.|
000004B0: 35 00 BC 0C A8 16 46 46 24 B2 22 22 00 CB 0C 0C |5.....FF$.""....|
000004C0: 17 81 20 59 B2 30 20 A4 20 31 35 00 E8 0C 70 17 |.. Y.0 . 15...p.|
000004D0: A1 23 32 2C 58 24 3A 8B 20 58 24 B2 22 22 20 A7 |.#2,X$:. X$."" .|
000004E0: 20 58 24 B2 C7 28 30 29 00 FF 0C D4 17 8B 20 C6 | X$..(0)...... .|
000004F0: 28 58 24 29 B2 31 36 30 20 A7 20 36 34 30 30 00 |(X$).160 . 6400.|
00000500: 0E 0D 38 18 46 46 24 B2 46 46 24 AA 58 24 00 16 |..8.FF$.FF$.X$..|
00000510: 0D 9C 18 82 20 59 00 21 0D 00 19 89 20 37 31 30 |.... Y.!.... 710|
00000520: 30 00 2B 0D 64 19 42 B2 42 AA 31 00 33 0D C8 19 |0.+.d.B.B.1.3...|
00000530: 82 20 58 00 45 0D 2C 1A 8B 20 54 B3 B1 30 20 A7 |. X.E.,.. T..0 .|
00000540: 20 34 37 30 30 00 4D 0D 90 1A A0 20 32 00 56 0D | 4700.M.... 2.V.|
00000550: F4 1A A0 20 31 35 00 61 0D 58 1B 89 20 38 30 30 |... 15.a.X.. 800|
00000560: 30 00 77 0D BC 1B 8F 20 2A 20 55 45 42 45 52 4E |0.w.... * UEBERN|
00000570: 45 48 4D 45 4E 20 3F 00 82 0D 20 1C 41 24 B2 22 |EHMEN ?... .A$."|
00000580: 4A 22 00 A2 0D 84 1C 99 20 46 46 24 3B A3 32 30 |J"...... FF$;.20|
00000590: 29 22 20 20 22 3B 3A 85 22 28 4A 2F 4E 29 22 3B |)" ";:."(J/N)";|
000005A0: 41 24 00 B6 0D E8 1C 8B 20 41 24 B2 22 4E 22 20 |A$...... A$."N" |
000005B0: A7 20 36 36 30 30 00 C4 0D 4C 1D 44 24 28 42 29 |. 6600...L.D$(B)|
000005C0: B2 46 46 24 00 EF 0D B0 1D 8B 20 C3 28 44 24 28 |.FF$...... .(D$(|
000005D0: 42 29 29 B3 31 37 20 A7 20 44 24 28 42 29 B2 44 |B)).17 . D$(B).D|
000005E0: 24 28 42 29 AA 22 20 22 3A 89 20 37 36 30 30 00 |$(B)." ":. 7600.|
000005F0: 03 0E 14 1E 44 24 28 42 29 B2 44 24 28 42 29 AA |....D$(B).D$(B).|
00000600: 49 44 24 00 0E 0E 78 1E 89 20 36 35 30 30 00 18 |ID$...x.. 6500..|
00000610: 0E DC 1E 4E 24 B2 22 22 00 3F 0E 40 1F 85 22 11 |...N$."".?.@..".|
00000620: 11 20 20 4E 4F 43 48 20 45 49 4E 45 20 44 49 53 |. NOCH EINE DIS|
00000630: 4B 45 54 54 45 20 28 4A 2F 4E 29 22 3B 4E 24 00 |KETTE (J/N)";N$.|
00000640: 55 0E A4 1F 8B 20 4E 24 B2 22 4A 22 20 A7 20 89 |U.... N$."J" . .|
00000650: 20 34 31 30 30 00 6B 0E 08 20 8B 20 4E 24 B2 22 | 4100.k.. . N$."|
00000660: 4E 22 20 A7 20 89 20 32 31 30 30 00 76 0E 6C 20 |N" . . 2100.v.l |
00000670: 89 20 38 30 30 30 00 96 0E D0 20 8F 20 47 45 4E |. 8000.... . GEN|
00000680: 45 52 41 4C 44 49 52 45 43 54 4F 52 59 20 45 49 |ERALDIRECTORY EI|
00000690: 4E 4C 45 53 45 4E 00 A1 0E 34 21 99 22 93 11 11 |NLESEN...4!."...|
000006A0: 22 00 BD 0E 98 21 85 20 22 50 52 4F 47 52 41 4D |"....!. "PROGRAM|
000006B0: 4D 20 2D 20 4E 41 4D 45 20 22 3B 50 24 00 D7 0E |M - NAME ";P$...|
000006C0: FC 21 9F 32 2C 38 2C 32 2C 22 30 3A 22 AA 50 24 |.!.2,8,2,"0:".P$|
000006D0: AA 22 2C 53 2C 52 22 00 E0 0E 60 22 84 32 2C 42 |.",S,R"...`".2,B|
000006E0: 00 F0 0E C4 22 81 20 49 B2 30 20 A4 20 42 AB 31 |....". I.0 . B.1|
000006F0: 00 FD 0E 28 23 84 32 2C 44 24 28 49 29 00 05 0F |...(#.2,D$(I)...|
00000700: 8C 23 82 20 49 00 0D 0F F0 23 A0 20 32 00 18 0F |.#. I....#. 2...|
00000710: 54 24 89 20 32 31 30 30 00 28 0F B8 24 8F 20 53 |T$. 2100.(..$. S|
00000720: 4F 52 54 49 45 52 45 4E 00 34 0F 1C 25 9E 20 35 |ORTIEREN.4..%. 5|
00000730: 32 32 38 36 00 42 0F 80 25 21 2C 42 2C 44 24 28 |2286.B..%!,B,D$(|
00000740: 30 29 00 4D 0F E4 25 89 20 32 31 30 30 00 66 0F |0).M..%. 2100.f.|
00000750: 48 26 8F 20 44 49 52 45 43 54 4F 52 59 20 41 4E |H&. DIRECTORY AN|
00000760: 5A 45 49 47 45 4E 00 6E 0F AC 26 5A B2 30 00 78 |ZEIGEN.n..&Z.0.x|
00000770: 0F 10 27 99 20 22 93 22 00 99 0F 74 27 99 20 22 |..'. "."...t'. "|
00000780: 20 20 20 20 20 2A 2A 2A 20 20 44 49 52 45 43 54 | *** DIRECT|
00000790: 4F 52 59 20 20 2A 2A 2A 22 00 A3 0F D8 27 99 20 |ORY ***"....'. |
000007A0: 22 11 22 00 B2 0F 3C 28 81 20 49 B2 30 20 A4 20 |"."...<(. I.0 . |
000007B0: 31 37 00 BE 0F A0 28 5A 41 20 B2 5A AA 31 00 D5 |17....(ZA .Z.1..|
000007C0: 0F 04 29 99 20 5A 41 20 3B 22 20 20 2A 20 22 20 |..). ZA ;" * " |
000007D0: 44 24 28 5A 29 00 DF 0F 68 29 5A B2 5A AA 31 00 |D$(Z)...h)Z.Z.1.|
000007E0: E7 0F CC 29 82 20 49 00 0F 10 30 2A 99 20 22 11 |...). I...0*. ".|
000007F0: 20 57 45 49 54 45 52 20 4D 49 54 20 5F 20 20 20 | WEITER MIT _ |
00000800: 20 20 20 4D 45 4E 55 45 20 4D 49 54 20 5E 22 00 | MENUE MIT ^".|
00000810: 28 10 94 2A A1 20 41 24 3A 8B 20 41 24 B2 22 22 |(..*. A$:. A$.""|
00000820: 20 A7 20 31 30 39 30 30 00 3D 10 F8 2A 8B 20 41 | . 10900.=..*. A|
00000830: 24 B2 22 5F 22 20 A7 20 31 30 30 30 30 00 51 10 |$."_" . 10000.Q.|
00000840: 5C 2B 8B 20 41 24 B2 22 5E 22 20 A7 20 32 31 30 |\+. A$."^" . 210|
00000850: 30 00 5D 10 C0 2B 89 20 31 30 39 30 30 00 6B 10 |0.]..+. 10900.k.|
00000860: 24 2C 8F 20 44 52 55 43 4B 45 4E 00 96 10 88 2C |$,. DRUCKEN....,|
00000870: 99 22 93 20 20 20 20 20 20 20 20 44 52 55 43 4B |.". DRUCK|
00000880: 45 52 20 45 49 4E 47 45 53 43 48 41 4C 54 45 54 |ER EINGESCHALTET|
00000890: 3F 20 4A 2F 4E 22 00 B1 10 EC 2C A1 20 56 24 3A |? J/N"....,. V$:|
000008A0: 8B 20 56 24 B3 B1 22 4A 22 A7 20 89 31 31 35 30 |. V$.."J". .1150|
000008B0: 30 00 DD 10 50 2D 99 22 11 11 11 11 57 49 45 56 |0...P-."....WIEV|
000008C0: 49 45 4C 45 20 45 49 4E 54 52 41 47 55 4E 47 45 |IELE EINTRAGUNGE|
000008D0: 4E 20 50 52 4F 20 53 45 49 54 45 3F 22 00 E5 10 |N PRO SEITE?"...|
000008E0: B4 2D 85 20 47 00 F1 10 18 2E 9F 34 2C 36 3A 9D |.-. G......4,6:.|
000008F0: 34 00 06 11 7C 2E 9F 32 2C 36 2C 32 3A 98 32 2C |4...|..2,6,2:.2,|
00000900: 32 3A 5A 31 B2 39 00 0F 11 E0 2E 4C B2 AB 31 00 |2:Z1.9.....L..1.|
00000910: 4A 11 EA 2E 43 24 B2 C8 28 44 24 28 30 29 2C 31 |J...C$..(D$(0),1|
00000920: 29 3A 99 22 1E 22 A3 35 29 43 24 22 20 2A 2A 2A |):.".".5)C$" ***|
00000930: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000940: 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 8A 11 44 2F 43 |*********"...D/C|
00000950: 24 B2 C8 28 44 24 28 30 29 2C 31 29 3A 98 34 2C |$..(D$(0),1):.4,|
00000960: A3 35 29 43 24 22 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |.5)C$" *********|
00000970: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000980: 2A 2A 2A 22 3A 4F B2 4F AA 31 00 93 11 A8 2F 98 |***":O.O.1..../.|
00000990: 32 2C 31 00 99 11 0C 30 8F 00 A3 11 70 30 4C B2 |2,1....0....p0L.|
000009A0: 4C AA 31 00 BD 11 D4 30 8B 20 44 24 28 4C 29 B2 |L.1....0. D$(L).|
000009B0: 22 22 A7 20 A0 34 3A 20 89 32 31 30 30 00 CF 11 |"". .4: .2100...|
000009C0: 38 31 46 24 B2 C8 28 44 24 28 4C 29 2C 31 29 00 |81F$..(D$(L),1).|
000009D0: ED 11 6A 31 8B 46 24 B3 B1 43 24 A7 8B 4F B2 47 |..j1.F$..C$..O.G|
000009E0: AB 31 A7 4F B2 47 3A 89 31 33 33 31 30 00 23 12 |.1.O.G:.13310.#.|
000009F0: 7E 31 8B 46 24 B3 B1 43 24 A7 99 22 1E 22 20 A3 |~1.F$..C$.."." .|
00000A00: 35 29 46 24 22 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |5)F$" **********|
00000A10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A20: 2A 2A 22 00 3C 12 9C 31 8B 20 46 24 B3 B1 43 24 |**".<..1. F$..C$|
00000A30: 20 A7 98 32 2C 32 3A 4F B2 4F AA 31 00 7B 12 00 | ..2,2:O.O.1.{..|
00000A40: 32 8B 46 24 B3 B1 43 24 A7 98 34 2C A3 35 29 46 |2.F$..C$..4,.5)F|
00000A50: 24 22 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |$" *************|
00000A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 |***************"|
00000A70: 3A 43 24 B2 46 24 3A 98 32 2C 31 00 85 12 64 32 |:C$.F$:.2,1...d2|
00000A80: 5A B2 4C AA 31 00 97 12 C8 32 8B 20 5A B1 39 20 |Z.L.1....2. Z.9 |
00000A90: 20 A7 20 5A 31 B2 38 00 AA 12 2C 33 8B 20 5A B1 | . Z1.8...,3. Z.|
00000AA0: 39 39 20 20 A7 20 5A 31 B2 37 00 BE 12 90 33 8B |99 . Z1.7....3.|
00000AB0: 20 5A B1 39 39 39 20 20 A7 20 5A 31 B2 36 00 D2 | Z.999 . Z1.6..|
00000AC0: 12 C2 33 99 22 9A 22 A3 5A 31 29 5A 3B 44 24 28 |..3.".".Z1)Z;D$(|
00000AD0: 4C 29 00 EB 12 F4 33 98 34 2C A3 5A 31 29 5A 3B |L)....3.4,.Z1)Z;|
00000AE0: 44 24 28 4C 29 3A 4F B2 4F AA 31 00 00 13 FE 33 |D$(L):O.O.1....3|
00000AF0: 8B 20 47 20 B3 B1 4F 20 A7 20 89 31 33 34 30 30 |. G ..O . .13400|
00000B00: 00 16 13 08 34 81 20 49 B2 31 A4 31 32 3A 98 34 |....4. I.1.12:.4|
00000B10: 3A 82 3A 4F B2 30 00 21 13 58 34 89 31 32 33 30 |:.:O.0.!.X4.1230|
00000B20: 30 00 30 13 BC 34 8F 20 4C 4F 45 53 43 48 45 4E |0.0..4. LOESCHEN|
00000B30: 00 57 13 20 35 99 20 22 93 11 11 11 11 11 20 20 |.W. 5. "...... |
00000B40: 20 20 20 20 20 20 20 20 57 45 4C 43 48 45 20 4E | WELCHE N|
00000B50: 55 4D 4D 45 52 22 3B 00 5F 13 84 35 85 20 4E 00 |UMMER";._..5. N.|
00000B60: 69 13 E8 35 4E B2 4E AB 31 00 76 13 4C 36 44 24 |i..5N.N.1.v.L6D$|
00000B70: 28 4E 29 B2 22 22 00 86 13 B0 36 81 20 49 B2 4E |(N).""....6. I.N|
00000B80: AB 31 20 A4 20 42 00 B9 13 14 37 8B 20 44 24 28 |.1 . B....7. D$(|
00000B90: 49 29 B2 22 22 20 A7 20 43 24 B2 44 24 28 49 29 |I)."" . C$.D$(I)|
00000BA0: 3A 44 24 28 49 29 B2 44 24 28 49 AA 31 29 3A 44 |:D$(I).D$(I.1):D|
00000BB0: 24 28 49 AA 31 29 B2 43 24 00 C1 13 78 37 82 20 |$(I.1).C$...x7. |
00000BC0: 49 00 CB 13 DC 37 42 B2 42 AB 31 00 D6 13 40 38 |I....7B.B.1...@8|
00000BD0: 89 20 32 31 30 30 00 F7 13 A4 38 8F 20 47 45 4E |. 2100....8. GEN|
00000BE0: 45 52 41 4C 44 49 52 45 43 54 4F 52 59 20 53 50 |ERALDIRECTORY SP|
00000BF0: 45 49 43 48 45 52 4E 00 03 14 08 39 99 20 22 93 |EICHERN....9. ".|
00000C00: 11 11 22 00 1F 14 6C 39 85 20 22 50 52 4F 47 52 |.."...l9. "PROGR|
00000C10: 41 4D 4D 20 2D 20 4E 41 4D 45 20 22 3B 50 24 00 |AMM - NAME ";P$.|
00000C20: 39 14 D0 39 9F 32 2C 38 2C 32 2C 22 40 3A 22 AA |9..9.2,8,2,"@:".|
00000C30: 50 24 AA 22 2C 53 2C 57 22 00 42 14 34 3A 98 32 |P$.",S,W".B.4:.2|
00000C40: 2C 42 00 50 14 98 3A 81 20 49 B2 30 20 A4 20 42 |,B.P..:. I.0 . B|
00000C50: 00 5D 14 FC 3A 98 32 2C 44 24 28 49 29 00 65 14 |.]..:.2,D$(I).e.|
00000C60: 60 3B 82 20 49 00 6D 14 C4 3B A0 20 32 00 78 14 |`;. I.m..;. 2.x.|
00000C70: 28 3C 89 20 32 31 30 30 00 7E 14 8C 3C 8F 00 9B |(<. 2100.~..<...|
00000C80: 14 F0 3C 99 22 93 11 11 11 11 11 11 11 11 11 11 |..<."...........|
00000C90: 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 00 BB 14 54 3D |.........";...T=|
00000CA0: 99 20 22 4E 4F 43 48 20 22 3B B8 28 59 29 3B 22 |. "NOCH ";.(Y);"|
00000CB0: 20 42 59 54 45 20 46 52 45 49 22 00 CE 14 B8 3D | BYTE FREI"....=|
00000CC0: 81 20 50 B2 31 20 A4 20 32 30 30 30 3A 82 00 D9 |. P.1 . 2000:...|
00000CD0: 14 1C 3E 89 20 32 31 30 30 00 E7 14 80 3E 8F 20 |..>. 2100....>. |
00000CE0: 41 45 4E 44 45 52 4E 00 F3 14 E4 3E 99 22 93 11 |AENDERN....>."..|
00000CF0: 11 11 22 00 12 15 48 3F 85 20 22 57 45 4C 43 48 |.."...H?. "WELCH|
00000D00: 45 20 4E 55 4D 4D 45 52 20 20 20 20 20 20 3A 22 |E NUMMER :"|
00000D10: 3B 4E 00 1C 15 AC 3F 4E B2 4E AB 31 00 31 15 10 |;N....?N.N.1.1..|
00000D20: 40 99 20 22 11 11 11 11 11 11 22 3B 44 24 28 4E |@. "......";D$(N|
00000D30: 29 00 44 15 74 40 99 20 22 11 11 20 4D 55 53 54 |).D.t@. ".. MUST|
00000D40: 45 52 20 3A 00 57 15 D8 40 99 20 22 2D 2D 2D 2D |ER :.W..@. "----|
00000D50: 2D 2D 2D 2D 2D 2D 2D 00 77 15 3C 41 99 20 22 11 |-------.w.<A. ".|
00000D60: 20 20 50 52 4F 47 52 41 4D 4D 20 4E 41 4D 45 20 | PROGRAMM NAME |
00000D70: 20 20 20 41 2F 31 22 00 7D 15 A0 41 99 00 89 15 | A/1".}..A....|
00000D80: 04 42 85 20 44 24 28 4E 29 00 94 15 68 42 89 20 |.B. D$(N)...hB. |
00000D90: 32 31 30 30 00 00 00 |2100... |
......C.C.1.$.L..C.1. ."TOPSORT",8,1./..
..52286.5.....D.X.. D$(1400).L...B.0.C.@
.. 53280,0:.53281,0.Q.... 650,128...L..
"...... EEEEEEEEEEEE".
..4.. * MENUE......G(4).....Q.0.K.`.. ".
....D.. " ** M E N U E **.
..(.. " -----------------.?...
. ". GENERALDIRECTORY EINLESEN --> 1".
K.... ". GENERALDIRECTORY SORTIEREN -->
2"...T.. ". GENERALDIRECTORY ZEIGEN
--> 3".C.... ". GENERALDIRECTORY DRUCK
EN --> 4"...... ". NEUE DISKETTE UEBE
RNEHMEN --> 5"...... ". EINTRAG LOESCH
EN --> 6".G.... ". GENERALDIR
ECTORY SPEICHERN --> 7".S.H.. ". FREIER
SPEICHERPLATZ --> 8"...... ". AE
NDERUNG EINES EINTRAGS --> 9".L.... ".
PROGRAMM BEENDEN --> 10"...T
.. ".. DEINE WAHL --> "
;Q.;.X.. Q . 8400,9400,9800,11300,4100,1
3500,14500,15500,16000,4000.F.<.. 2100.Q
. ..64738.J.... DIRECTORY EINLESEN...H..
".. DISKETTEN - KENNZEICHEN :";ID$...
L.. "."...0..15,8,15...... 2,8,2,"#".I..
.T.18:S.1...\..15,"B-R";2;0;T;S......15,
"B-P";2;0...$..#2,X$:. X$."" . X$.G(0)..
...T.F(X$).7....#2,X$:. X$."" . X$.G(0).
C.P.S.F(X$).Q.... X.0 . 7.H....15,"B-P";
2;X.32.2...|..#2,X$:. X$."" . X$.G(0)...
... F(X$).0 . 6600...D..15,"B-P";2;X.32.
5.....FF$."".K.... Y.0 . 15...P..#2,X$:.
X$."" . X$.G(0)...T.. F(X$).160 . 6400.
..8.FF$.FF$.X$...... Y.!.... 7100.+.D.B.
B.1.3.H.. X.E.,.. T..0 . 4700.M... 2.V.
.. 15.A.X.. 8000.W.... * UEBERNEHMEN ?.
.. .A$."J"...... FF$;.20)" ";:."(J/N)";
A$...... A$."N" . 6600.D.L.D$(B).FF$....
.. C(D$(B)).17 . D$(B).D$(B)." ":. 7600.
....D$(B).D$(B).ID$...X.. 6500.....N$.""
.?.@..".. NOCH EINE DISKETTE (J/N)";N$.
U.... N$."J" . . 4100.K.. . N$."N" . . 2
100.V.L . 8000...P . GENERALDIRECTORY EI
NLESEN...4!."..."....!. "PROGRAMM - NAME
";P$.W..!.2,8,2,"0:".P$.",S,R"...`".2,B
...D". I.0 . B.1...(#.2,D$(I)....#. I...
.# 2...T$. 2100.(..$. SORTIEREN.4..%. 5
2286.B..%!,B,D$(0).M..%. 2100.F.H&. DIRE
CTORY ANZEIGEN.N..&Z.0.X..'. "."...T'. "
*** DIRECTORY ***"...X'. "."...<(
. I.0 . 17... (ZA .Z.1.U..). ZA ;" * "
D$(Z)...H)Z.Z.1...L). I...0*. ". WEITER
MIT _ MENUE MIT ^".(..*. A$:. A$.""
. 10900.=..*. A$."_" . 10000.Q.\+. A$."
^" . 2100.]..+. 10900.K.$,. DRUCKEN....,
.". DRUCKER EINGESCHALTET? J/N"..
..,. V$:. V$.."J". .11500...P-."....WIEV
IELE EINTRAGUNGEN PRO SEITE?"....-. G...
...4,6:.4...|..2,6,2:.2,2:Z1.9.....L..1.
J...C$.H(D$(0),1):.".".5)C$" ***********
*****************"...D/C$.H(D$(0),1):.4,
.5)C$" ****************************":O.O
.1..../.2,1....0....P0L.L.1...T0. D$(L).
"". 4: .2100.O.81F$.H(D$(L),1)...J1.F$.
.C$..O.G.1.O.G:.13310.#.~1.F$..C$.."." .
5)F$" ****************************".<..1
. F$..C$ ..2,2:O.O.1.{..2.F$..C$..4,.5)F
$" ****************************":C$.F$:.
2,1...D2Z.L.1...H2. Z.9 . Z1.8...,3. Z.
99 . Z1.7....3. Z.999 . Z1.6.R.B3.".".
Z1)Z;D$(L)....3.4,.Z1)Z;D$(L):O.O.1....3
. G ..O . .13400....4. I.1.12:.4:.:O.0.!
.X4.12300.0..4. LOESCHEN.W. 5. "......
WELCHE NUMMER";._..5. N.I..5N.N.
1.V.L6D$(N).""....6. I.N.1 . B....7. D$(
I)."" . C$.D$(I):D$(I).D$(I.1):D$(I.1).C
$.A.X7. I.K..7B.B.1.V.@8. 2100....8. GEN
ERALDIRECTORY SPEICHERN....9. "..."...L9
. "PROGRAMM - NAME ";P$.9.P9.2,8,2,"@:".
P$.",S,W".B.4:.2,B.P..:. I.0 . B.]..:.2,
D$(I).E.`;. I.M.D; 2.X.(<. 2100.~..<...
..<."....................";...T=. "NOCH
";.(Y);" BYTE FREI".N..=. P.1 . 2000:..Y
..>. 2100....>. AENDERN....>."...."...H?
. "WELCHE NUMMER :";N....?N.N.1.1..
@. "......";D$(N).D.T@. ".. MUSTER :.W.X
@. "-----------.W.<A. ". PROGRAMM NAME
A/1".}. A.....B. D$(N)...HB. 2100...
> CLICK IMAGE PREVIEW FOR FULL MODAL