DIREKTZUGRIFF
FILE INFORMATION
FILENAME(S): DIREKTZUGRIFF
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-11-30 01:12:56
APPEARS ON: 3 disk(s)
FILE HASH
d4d6615919b3e27326f92eb5601743b22efe2ec478028e3e9ae55ef206955f5f
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SONDERHEFT 41 | DIREKTZUGRIFF | PRG | C64er | 11 | 5 | DOWNLOAD FILE |
| 15828 SEITE B | DIREKTZUGRIFF | PRG | C64er | 20 | 4 | DOWNLOAD FILE |
| 15828 SEITE B | DIREKTZUGRIFF | PRG | DuncanTwain | 20 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 5A 00 86 20 4E 41 4D 45 24 28 31 30 |....Z.. NAME$(10| 00000010: 30 29 2C 20 52 45 43 25 28 31 30 30 29 00 3A 08 |0), REC%(100).:.| 00000020: 5F 00 8D 20 31 33 31 30 20 3A 20 8F 20 42 4C 4F |_.. 1310 : . BLO| 00000030: 43 4B 42 45 4C 45 47 55 4E 47 00 5F 08 64 00 9F |CKBELEGUNG._.d..| 00000040: 20 31 2C 38 2C 31 35 3A 20 8F 20 42 45 46 45 48 | 1,8,15: . BEFEH| 00000050: 4C 53 4B 41 4E 41 4C 20 4F 45 46 46 4E 45 4E 00 |LSKANAL OEFFNEN.| 00000060: 90 08 6E 00 9F 20 32 2C 38 2C 32 2C 22 49 4E 46 |..n.. 2,8,2,"INF| 00000070: 4F 44 41 54 45 49 2C 53 2C 52 22 3A 20 8F 20 53 |ODATEI,S,R": . S| 00000080: 45 51 2E 44 41 54 45 49 20 4F 45 46 46 4E 45 4E |EQ.DATEI OEFFNEN| 00000090: 00 B0 08 78 00 84 31 2C 41 3A 20 8F 20 46 45 48 |...x..1,A: . FEH| 000000A0: 4C 45 52 20 41 55 46 47 45 54 52 45 54 45 4E 3F |LER AUFGETRETEN?| 000000B0: 00 D6 08 82 00 8B 20 41 B3 B1 30 20 A7 20 89 20 |...... A..0 . . | 000000C0: 31 34 30 3A 20 8F 20 4A 41 2C 20 44 41 4E 4E 20 |140: . JA, DANN | 000000D0: 57 45 49 54 45 52 00 F6 08 84 00 84 32 2C 41 44 |WEITER......2,AD| 000000E0: 3A 20 8F 20 41 44 52 45 53 53 41 4E 5A 41 48 4C |: . ADRESSANZAHL| 000000F0: 20 4C 45 53 45 4E 00 05 09 86 00 81 20 49 B2 31 | LESEN...... I.1| 00000100: 20 A4 20 41 44 00 23 09 88 00 3A 20 84 32 2C 4E | . AD.#...: .2,N| 00000110: 41 4D 45 24 28 49 29 3A 20 84 32 2C 52 45 43 25 |AME$(I): .2,REC%| 00000120: 28 49 29 00 46 09 89 00 3A 20 8B 20 4E 41 4D 45 |(I).F...: . NAME| 00000130: 24 28 49 29 B2 22 2A 22 20 A7 20 4E 41 4D 45 24 |$(I)."*" . NAME$| 00000140: 28 49 29 B2 22 22 00 4E 09 8A 00 82 20 49 00 77 |(I)."".N.... I.w| 00000150: 09 8C 00 A0 20 32 3A 20 8F 20 53 45 51 55 45 4E |.... 2: . SEQUEN| 00000160: 54 49 45 4C 4C 45 20 44 41 54 45 49 20 53 43 48 |TIELLE DATEI SCH| 00000170: 4C 49 45 53 53 45 4E 00 7D 09 96 00 3A 00 AD 09 |LIESSEN.}...:...| 00000180: A0 00 9F 20 32 2C 38 2C 32 2C 22 23 22 3A 20 8F |... 2,8,2,"#": .| 00000190: 20 44 49 52 45 4B 54 5A 55 47 52 49 46 46 53 2D | DIREKTZUGRIFFS-| 000001A0: 44 41 54 45 49 20 4F 45 46 46 4E 45 4E 00 B3 09 |DATEI OEFFNEN...| 000001B0: AA 00 3A 00 B9 09 B4 00 3A 00 CD 09 BE 00 8F 20 |..:.....:...... | 000001C0: 2A 2A 2A 20 4D 45 4E 55 45 20 2A 2A 2A 00 0B 0A |*** MENUE ***...| 000001D0: C8 00 99 3A 99 20 22 31 3D 45 49 4E 54 52 41 47 |...:. "1=EINTRAG| 000001E0: 45 4E 2F 32 3D 53 55 43 48 45 4E 2F 33 3D 42 4C |EN/2=SUCHEN/3=BL| 000001F0: 41 45 54 54 45 52 4E 2F 34 3D 41 45 4E 44 45 52 |AETTERN/4=AENDER| 00000200: 4E 2F 35 3D 45 4E 44 45 22 3A 99 00 25 0A D2 00 |N/5=ENDE":..%...| 00000210: A1 20 41 24 3A 20 8B 20 41 24 B2 22 22 20 A7 20 |. A$: . A$."" . | 00000220: 89 20 32 31 30 00 2B 0A DC 00 3A 00 5D 0A E6 00 |. 210.+...:.]...| 00000230: 8B 20 41 24 B3 B1 22 35 22 20 A7 20 91 20 C5 28 |. A$.."5" . . .(| 00000240: 41 24 29 20 8D 20 33 34 30 2C 31 30 36 30 2C 34 |A$) . 340,1060,4| 00000250: 33 30 2C 35 35 30 3A 20 89 20 32 30 30 00 63 0A |30,550: . 200.c.| 00000260: F0 00 3A 00 88 0A FA 00 A0 20 32 3A 20 8F 20 52 |..:...... 2: . R| 00000270: 45 4C 41 54 49 56 45 20 44 41 54 45 49 20 53 43 |ELATIVE DATEI SC| 00000280: 48 4C 49 45 53 53 45 4E 00 B3 0A 04 01 98 31 2C |HLIESSEN......1,| 00000290: 22 53 3A 49 4E 46 4F 44 41 54 45 49 22 3A 20 8F |"S:INFODATEI": .| 000002A0: 20 53 45 51 2E 44 41 54 45 49 20 4C 4F 45 53 43 | SEQ.DATEI LOESC| 000002B0: 48 45 4E 00 E4 0A 0E 01 9F 20 32 2C 38 2C 32 2C |HEN...... 2,8,2,| 000002C0: 22 49 4E 46 4F 44 41 54 45 49 2C 53 2C 57 22 3A |"INFODATEI,S,W":| 000002D0: 20 8F 20 53 45 51 2E 44 41 54 45 49 20 4F 45 46 | . SEQ.DATEI OEF| 000002E0: 46 4E 45 4E 00 08 0B 18 01 98 32 2C 41 44 3A 20 |FNEN......2,AD: | 000002F0: 8F 20 41 44 52 45 53 53 41 4E 5A 41 48 4C 20 53 |. ADRESSANZAHL S| 00000300: 50 45 49 43 48 45 52 4E 00 17 0B 1A 01 81 20 49 |PEICHERN...... I| 00000310: B2 31 20 A4 20 41 44 00 3A 0B 1C 01 3A 20 8B 20 |.1 . AD.:...: . | 00000320: 4E 41 4D 45 24 28 49 29 B2 22 22 20 A7 20 4E 41 |NAME$(I)."" . NA| 00000330: 4D 45 24 28 49 29 B2 22 2A 22 00 58 0B 1E 01 3A |ME$(I)."*".X...:| 00000340: 20 98 32 2C 4E 41 4D 45 24 28 49 29 3A 20 98 32 | .2,NAME$(I): .2| 00000350: 2C 52 45 43 25 28 49 29 00 60 0B 20 01 82 20 49 |,REC%(I).`. .. I| 00000360: 00 87 0B 22 01 A0 20 32 3A 20 A0 20 31 3A 20 8F |...".. 2: . 1: .| 00000370: 20 41 4C 4C 45 20 44 41 54 45 49 45 4E 20 53 43 | ALLE DATEIEN SC| 00000380: 48 4C 49 45 53 45 4E 00 8D 0B 2C 01 80 00 93 0B |HLIESEN...,.....| 00000390: 36 01 3A 00 99 0B 40 01 3A 00 BE 0B 4A 01 8F 20 |6.:...@.:...J.. | 000003A0: 2A 2A 2A 20 4E 45 55 45 20 41 44 52 45 53 53 45 |*** NEUE ADRESSE| 000003B0: 20 45 49 4E 54 52 41 47 45 4E 20 2A 2A 2A 00 D2 | EINTRAGEN ***..| 000003C0: 0B 54 01 99 20 22 2A 45 49 4E 54 52 41 47 45 4E |.T.. "*EINTRAGEN| 000003D0: 2A 22 00 F0 0B 5E 01 8D 20 36 35 30 3A 20 8F 20 |*"...^.. 650: . | 000003E0: 41 44 52 45 53 53 45 20 41 42 46 52 41 47 45 4E |ADRESSE ABFRAGEN| 000003F0: 00 FC 0B 68 01 41 44 B2 41 44 AA 31 00 1E 0C 72 |...h.AD.AD.1...r| 00000400: 01 52 45 43 B2 41 44 3A 20 8D 20 31 32 31 30 20 |.REC.AD: . 1210 | 00000410: 3A 20 8F 20 55 4D 52 45 43 48 4E 55 4E 47 00 57 |: . UMRECHNUNG.W| 00000420: 0C 77 01 4E 41 4D 45 24 28 41 44 29 B2 4E 24 3A |.w.NAME$(AD).N$:| 00000430: 20 52 45 43 25 28 41 44 29 B2 52 45 43 3A 20 8D | REC%(AD).REC: .| 00000440: 20 39 35 30 3A 20 8F 20 49 4E 44 45 58 20 53 4F | 950: . INDEX SO| 00000450: 52 54 49 45 52 45 4E 00 73 0C 7C 01 8D 20 37 34 |RTIEREN.s.|.. 74| 00000460: 30 3A 20 8F 20 53 41 54 5A 20 53 43 48 52 45 49 |0: . SATZ SCHREI| 00000470: 42 45 4E 00 79 0C 86 01 8E 00 7F 0C 90 01 3A 00 |BEN.y.........:.| 00000480: 85 0C 9A 01 3A 00 9D 0C A4 01 8F 20 2A 2A 2A 20 |....:...... *** | 00000490: 42 4C 41 45 54 54 45 52 4E 20 2A 2A 2A 00 B1 0C |BLAETTERN ***...| 000004A0: AE 01 99 20 22 2A 42 4C 41 45 54 54 45 52 4E 2A |... "*BLAETTERN*| 000004B0: 22 00 C2 0C B3 01 53 4E 52 B2 31 3A 20 89 20 34 |".....SNR.1: . 4| 000004C0: 37 35 00 DC 0C B8 01 A1 20 41 24 3A 20 8B 20 41 |75...... A$: . A| 000004D0: 24 B2 22 22 20 A7 20 89 20 34 34 30 00 FD 0C C2 |$."" . . 440....| 000004E0: 01 8B 20 41 24 B3 B1 C7 28 32 39 29 20 AF 20 41 |.. A$...(29) . A| 000004F0: 24 B3 B1 C7 28 31 35 37 29 20 A7 20 8E 00 21 0D |$...(157) . ..!.| 00000500: CC 01 8B 20 41 24 B2 C7 28 32 39 29 20 AF 20 53 |... A$..(29) . S| 00000510: 4E 52 B3 41 44 20 A7 20 53 4E 52 B2 53 4E 52 AA |NR.AD . SNR.SNR.| 00000520: 31 00 45 0D D6 01 8B 20 41 24 B2 C7 28 31 35 37 |1.E.... A$..(157| 00000530: 29 20 AF 20 53 4E 52 B1 31 20 A7 20 53 4E 52 B2 |) . SNR.1 . SNR.| 00000540: 53 4E 52 AB 31 00 57 0D DB 01 52 45 43 B2 52 45 |SNR.1.W...REC.RE| 00000550: 43 25 28 53 4E 52 29 00 70 0D E0 01 8D 20 31 32 |C%(SNR).p.... 12| 00000560: 31 30 3A 20 8F 20 55 4D 52 45 43 48 4E 55 4E 47 |10: . UMRECHNUNG| 00000570: 00 8C 0D EA 01 8D 20 38 31 30 20 3A 20 8F 20 41 |...... 810 : . A| 00000580: 44 52 45 53 53 45 20 4C 45 53 45 4E 00 A7 0D F4 |DRESSE LESEN....| 00000590: 01 99 3A 20 99 20 4E 24 3A 20 99 20 57 24 3A 20 |..: . N$: . W$: | 000005A0: 99 20 54 24 3A 20 99 00 B1 0D FE 01 89 20 34 34 |. T$: ....... 44| 000005B0: 30 00 B7 0D 08 02 3A 00 BD 0D 12 02 3A 00 D3 0D |0.....:.....:...| 000005C0: 1C 02 8F 20 2A 2A 2A 20 41 45 4E 44 45 52 4E 20 |... *** AENDERN | 000005D0: 2A 2A 2A 00 E5 0D 26 02 99 20 22 2A 41 45 4E 44 |***...&.. "*AEND| 000005E0: 45 52 4E 2A 22 00 04 0E 30 02 8D 20 36 35 30 20 |ERN*"...0.. 650 | 000005F0: 3A 20 8F 20 41 44 52 45 53 53 45 20 41 42 46 52 |: . ADRESSE ABFR| 00000600: 41 47 45 4E 00 1D 0E 3A 02 8D 20 31 32 31 30 3A |AGEN...:.. 1210:| 00000610: 20 8F 20 55 4D 52 45 43 48 4E 55 4E 47 00 58 0E | . UMRECHNUNG.X.| 00000620: 3F 02 4E 41 4D 45 24 28 53 4E 52 29 B2 4E 24 3A |?.NAME$(SNR).N$:| 00000630: 20 52 45 43 25 28 53 4E 52 29 B2 52 45 43 3A 20 | REC%(SNR).REC: | 00000640: 8D 20 39 35 30 3A 20 8F 20 49 4E 44 45 58 20 53 |. 950: . INDEX S| 00000650: 4F 52 54 49 45 52 45 4E 00 74 0E 44 02 8D 20 37 |ORTIEREN.t.D.. 7| 00000660: 33 30 3A 20 8F 20 53 41 54 5A 20 53 43 48 52 45 |30: . SATZ SCHRE| 00000670: 49 42 45 4E 00 7A 0E 4E 02 8E 00 80 0E 58 02 3A |IBEN.z.N.....X.:| 00000680: 00 86 0E 62 02 3A 00 A5 0E 80 02 8F 20 2A 2A 2A |...b.:...... ***| 00000690: 20 41 44 52 45 53 53 45 20 41 42 46 52 41 47 45 | ADRESSE ABFRAGE| 000006A0: 4E 20 2A 2A 2A 00 BD 0E 8A 02 4E 24 B2 22 22 3A |N ***.....N$."":| 000006B0: 20 57 24 B2 22 22 3A 20 54 24 B2 22 22 00 CD 0E | W$."": T$.""...| 000006C0: 94 02 85 20 22 4E 41 4D 45 22 3B 4E 24 00 E0 0E |... "NAME";N$...| 000006D0: 9E 02 85 20 22 57 4F 48 4E 4F 52 54 22 3B 57 24 |... "WOHNORT";W$| 000006E0: 00 F3 0E A8 02 85 20 22 54 45 4C 45 46 4F 4E 22 |...... "TELEFON"| 000006F0: 3B 54 24 00 F9 0E B2 02 8E 00 FF 0E BC 02 3A 00 |;T$...........:.| 00000700: 05 0F C6 02 3A 00 27 0F D0 02 8F 20 2A 2A 2A 20 |....:.'.... *** | 00000710: 44 41 54 45 4E 53 41 54 5A 20 53 43 48 52 45 49 |DATENSATZ SCHREI| 00000720: 42 45 4E 20 2A 2A 2A 00 5A 0F DA 02 8B 20 4E 24 |BEN ***.Z.... N$| 00000730: B2 22 22 20 A7 20 4E 24 B2 22 2A 22 3A 20 8F 20 |."" . N$."*": . | 00000740: 41 43 48 54 55 4E 47 3A 20 44 41 53 20 53 43 48 |ACHTUNG: DAS SCH| 00000750: 52 45 49 42 45 4E 20 56 4F 4E 00 8A 0F E4 02 8B |REIBEN VON......| 00000760: 20 57 24 B2 22 22 20 A7 20 57 24 B2 22 2A 22 3A | W$."" . W$."*":| 00000770: 20 8F 20 27 4C 45 45 52 53 54 52 49 4E 47 53 27 | . 'LEERSTRINGS'| 00000780: 20 4D 55 53 53 20 56 45 52 2D 00 B4 0F EE 02 8B | MUSS VER-......| 00000790: 20 54 24 B2 22 22 20 A7 20 54 24 B2 22 2A 22 3A | T$."" . T$."*":| 000007A0: 20 8F 20 4D 49 45 44 45 4E 20 57 45 52 44 45 4E | . MIEDEN WERDEN| 000007B0: 20 21 21 21 00 E1 0F F3 02 98 31 2C 22 42 2D 50 | !!!......1,"B-P| 000007C0: 3A 22 3B 32 3B 31 20 20 3A 20 8F 20 42 55 46 46 |:";2;1 : . BUFF| 000007D0: 45 52 2D 50 4F 49 4E 54 45 52 20 53 45 54 5A 45 |ER-POINTER SETZE| 000007E0: 4E 00 14 10 F8 02 98 32 2C 4E 24 20 C7 28 31 33 |N......2,N$ .(13| 000007F0: 29 20 57 24 20 C7 28 31 33 29 20 54 24 3A 20 8F |) W$ .(13) T$: .| 00000800: 20 31 20 50 52 49 4E 54 23 2D 42 45 46 45 48 4C | 1 PRINT#-BEFEHL| 00000810: 20 21 21 21 00 4D 10 FD 02 98 31 2C 22 55 32 3A | !!!.M....1,"U2:| 00000820: 22 3B 32 3B 30 3B 53 50 55 52 3B 53 45 4B 54 20 |";2;0;SPUR;SEKT | 00000830: 3A 20 8F 20 50 55 46 46 45 52 20 41 55 46 20 44 |: . PUFFER AUF D| 00000840: 49 53 4B 20 53 43 48 52 45 49 42 45 4E 00 53 10 |ISK SCHREIBEN.S.| 00000850: 02 03 8E 00 59 10 0C 03 3A 00 5F 10 16 03 3A 00 |....Y...:._...:.| 00000860: 7D 10 20 03 8F 20 2A 2A 2A 20 44 41 54 45 4E 53 |}. .. *** DATENS| 00000870: 41 54 5A 20 4C 45 53 45 4E 20 2A 2A 2A 00 98 10 |ATZ LESEN ***...| 00000880: 2A 03 98 31 2C 22 55 31 3A 22 3B 32 3B 30 3B 53 |*..1,"U1:";2;0;S| 00000890: 50 55 52 3B 53 45 4B 54 00 AA 10 2C 03 98 31 2C |PUR;SEKT...,..1,| 000008A0: 22 42 2D 50 3A 22 3B 32 3B 31 00 C6 10 32 03 84 |"B-P:";2;1...2..| 000008B0: 32 2C 4E 24 3A 20 8B 20 4E 24 B2 22 2A 22 20 A7 |2,N$: . N$."*" .| 000008C0: 20 4E 24 B2 22 22 00 E2 10 34 03 84 32 2C 57 24 | N$.""...4..2,W$| 000008D0: 3A 20 8B 20 57 24 B2 22 2A 22 20 A7 20 57 24 B2 |: . W$."*" . W$.| 000008E0: 22 22 00 FE 10 3E 03 84 32 2C 54 24 3A 20 8B 20 |""...>..2,T$: . | 000008F0: 54 24 B2 22 2A 22 20 A7 20 54 24 B2 22 22 00 04 |T$."*" . T$.""..| 00000900: 11 48 03 8E 00 0A 11 52 03 3A 00 10 11 5C 03 3A |.H.....R.:...\.:| 00000910: 00 28 11 AC 03 8F 20 2A 2A 2A 20 53 4F 52 54 49 |.(.... *** SORTI| 00000920: 45 52 45 4E 20 2A 2A 2A 00 39 11 B6 03 81 20 49 |EREN ***.9.... I| 00000930: B2 31 20 A4 20 41 44 AB 31 00 4A 11 C0 03 3A 20 |.1 . AD.1.J...: | 00000940: 81 20 4A B2 49 20 A4 20 41 44 00 6E 11 CA 03 3A |. J.I . AD.n...:| 00000950: 20 20 20 8B 20 4E 41 4D 45 24 28 49 29 B3 B2 4E | . NAME$(I)..N| 00000960: 41 4D 45 24 28 4A 29 20 A7 20 31 30 30 30 00 A2 |AME$(J) . 1000..| 00000970: 11 D4 03 3A 20 20 20 53 24 B2 4E 41 4D 45 24 28 |...: S$.NAME$(| 00000980: 49 29 3A 20 4E 41 4D 45 24 28 49 29 B2 4E 41 4D |I): NAME$(I).NAM| 00000990: 45 24 28 4A 29 3A 20 4E 41 4D 45 24 28 4A 29 B2 |E$(J): NAME$(J).| 000009A0: 53 24 00 D0 11 DE 03 3A 20 20 20 53 B2 52 45 43 |S$.....: S.REC| 000009B0: 25 28 49 29 3A 20 52 45 43 25 28 49 29 B2 52 45 |%(I): REC%(I).RE| 000009C0: 43 25 28 4A 29 3A 20 52 45 43 25 28 4A 29 B2 53 |C%(J): REC%(J).S| 000009D0: 00 DA 11 E8 03 3A 20 82 20 4A 00 E2 11 F2 03 82 |.....: . J......| 000009E0: 20 49 00 E8 11 FC 03 8E 00 EE 11 06 04 3A 00 F4 | I...........:..| 000009F0: 11 10 04 3A 00 11 12 1A 04 8F 20 2A 2A 2A 20 41 |...:...... *** A| 00000A00: 44 52 45 53 53 45 20 53 55 43 48 45 4E 20 2A 2A |DRESSE SUCHEN **| 00000A10: 2A 00 2C 12 24 04 85 20 22 47 45 53 55 43 48 54 |*.,.$.. "GESUCHT| 00000A20: 45 52 20 4E 41 4D 45 22 3B 53 4E 24 00 3D 12 2E |ER NAME";SN$.=..| 00000A30: 04 81 20 53 4E 52 B2 31 20 A4 20 41 44 00 5E 12 |.. SNR.1 . AD.^.| 00000A40: 38 04 3A 20 8B 20 4E 41 4D 45 24 28 53 4E 52 29 |8.: . NAME$(SNR)| 00000A50: B3 B1 53 4E 24 20 A7 20 89 20 31 31 35 30 00 72 |..SN$ . . 1150.r| 00000A60: 12 42 04 3A 20 52 45 43 B2 52 45 43 25 28 53 4E |.B.: REC.REC%(SN| 00000A70: 52 29 00 8D 12 4C 04 3A 20 8D 20 31 32 31 30 3A |R)...L.: . 1210:| 00000A80: 20 8F 20 55 4D 52 45 43 48 4E 55 4E 47 00 A8 12 | . UMRECHNUNG...| 00000A90: 56 04 3A 20 8D 20 38 31 30 20 3A 20 8F 20 53 41 |V.: . 810 : . SA| 00000AA0: 54 5A 20 4C 45 53 45 4E 00 C5 12 60 04 3A 20 99 |TZ LESEN...`.: .| 00000AB0: 3A 20 99 20 4E 24 3A 20 99 20 57 24 3A 20 99 20 |: . N$: . W$: . | 00000AC0: 54 24 3A 20 99 00 E4 12 6A 04 3A 20 85 20 22 57 |T$: ....j.: . "W| 00000AD0: 45 49 54 45 52 53 55 43 48 45 4E 28 4A 2F 4E 29 |EITERSUCHEN(J/N)| 00000AE0: 22 3B 41 24 00 F8 12 74 04 3A 20 8B 20 41 24 B3 |";A$...t.: . A$.| 00000AF0: B1 22 4A 22 20 A7 20 8E 00 02 13 7E 04 82 20 53 |."J" . ....~.. S| 00000B00: 4E 52 00 08 13 88 04 8E 00 0E 13 92 04 3A 00 14 |NR...........:..| 00000B10: 13 9C 04 3A 00 39 13 B0 04 8F 20 2A 2A 2A 20 52 |...:.9.... *** R| 00000B20: 45 43 4F 52 44 4E 52 2E 3D 3E 53 50 55 52 2F 53 |ECORDNR.=>SPUR/S| 00000B30: 45 4B 54 4F 52 20 2A 2A 2A 00 60 13 BA 04 8B 20 |EKTOR ***.`.... | 00000B40: 52 45 43 B3 33 35 38 20 A7 20 41 41 B2 30 3A 42 |REC.358 . AA.0:B| 00000B50: 42 B2 32 32 3A 44 44 B2 31 3A 89 20 31 32 35 30 |B.22:DD.1:. 1250| 00000B60: 00 8A 13 C4 04 8B 20 52 45 43 B1 34 37 31 20 A7 |...... REC.471 .| 00000B70: 20 41 41 B2 33 35 37 3A 42 42 B2 32 30 3A 44 44 | AA.357:BB.20:DD| 00000B80: B2 31 39 3A 89 20 31 32 35 30 00 B4 13 CE 04 8B |.19:. 1250......| 00000B90: 20 52 45 43 B3 35 38 30 20 A7 20 41 41 B2 34 37 | REC.580 . AA.47| 00000BA0: 31 3A 42 42 B2 31 39 3A 44 44 B2 32 35 3A 89 20 |1:BB.19:DD.25:. | 00000BB0: 31 32 35 30 00 CB 13 D8 04 41 41 B2 35 37 39 3A |1250.....AA.579:| 00000BC0: 42 42 B2 31 38 3A 44 44 B2 33 31 00 EE 13 E2 04 |BB.18:DD.31.....| 00000BD0: 53 50 55 52 B2 B5 28 28 28 52 45 43 AB 41 41 29 |SPUR..(((REC.AA)| 00000BE0: AB 31 29 AD 28 42 42 AB 31 29 29 AA 44 44 00 17 |.1).(BB.1)).DD..| 00000BF0: 14 EC 04 53 45 4B 54 B2 52 45 43 AB 41 41 AB 28 |...SEKT.REC.AA.(| 00000C00: 53 50 55 52 AB 44 44 29 AC 42 42 AA 28 53 50 55 |SPUR.DD).BB.(SPU| 00000C10: 52 AB 44 44 AB 31 29 00 1D 14 F6 04 8E 00 23 14 |R.DD.1).......#.| 00000C20: 00 05 3A 00 29 14 0A 05 3A 00 45 14 14 05 8F 20 |..:.)...:.E.... | 00000C30: 2A 2A 2A 20 42 4C 4F 43 4B 42 45 4C 45 47 55 4E |*** BLOCKBELEGUN| 00000C40: 47 20 2A 2A 2A 00 52 14 1E 05 9F 20 31 2C 38 2C |G ***.R.... 1,8,| 00000C50: 31 35 00 62 14 28 05 9F 20 32 2C 38 2C 32 2C 22 |15.b.(.. 2,8,2,"| 00000C60: 23 22 00 97 14 32 05 98 31 2C 22 55 31 3A 22 3B |#"...2..1,"U1:";| 00000C70: 32 3B 30 3B 31 38 3B 30 20 3A 20 8F 20 53 45 4B |2;0;18;0 : . SEK| 00000C80: 54 4F 52 20 30 20 56 4F 4E 20 53 50 55 52 20 31 |TOR 0 VON SPUR 1| 00000C90: 38 20 4C 45 53 45 4E 00 9D 14 3C 05 3A 00 D5 14 |8 LESEN...<.:...| 00000CA0: 46 05 98 31 2C 22 42 2D 50 3A 22 3B 32 3B 34 20 |F..1,"B-P:";2;4 | 00000CB0: 20 20 20 20 3A 20 8F 20 41 42 20 42 59 54 45 53 | : . AB BYTES| 00000CC0: 20 46 55 45 52 20 53 50 55 52 20 31 20 4D 41 4E | FUER SPUR 1 MAN| 00000CD0: 49 50 55 4C 2E 00 06 15 50 05 81 20 49 B2 31 20 |IPUL....P.. I.1 | 00000CE0: A4 20 34 AC 31 37 20 20 20 20 20 20 20 20 3A 20 |. 4.17 : | 00000CF0: 8F 20 53 50 55 52 20 31 2D 31 37 20 41 4C 53 20 |. SPUR 1-17 ALS | 00000D00: 42 45 4C 45 47 54 00 2A 15 5A 05 3A 20 98 32 2C |BELEGT.*.Z.: .2,| 00000D10: C7 28 30 29 3B 20 20 20 20 20 3A 20 8F 20 4B 45 |.(0); : . KE| 00000D20: 4E 4E 5A 45 49 43 48 4E 45 4E 00 30 15 64 05 82 |NNZEICHNEN.0.d..| 00000D30: 00 36 15 6E 05 3A 00 6F 15 78 05 98 31 2C 22 42 |.6.n.:.o.x..1,"B| 00000D40: 2D 50 3A 22 3B 32 3B 34 AA 34 AC 31 38 3A 20 8F |-P:";2;4.4.18: .| 00000D50: 20 41 42 20 42 59 54 45 53 20 46 55 45 52 20 53 | AB BYTES FUER S| 00000D60: 50 55 52 20 31 39 20 4D 41 4E 49 50 55 4C 2E 00 |PUR 19 MANIPUL..| 00000D70: A1 15 82 05 81 20 49 B2 31 20 A4 20 34 AC 31 32 |..... I.1 . 4.12| 00000D80: 20 20 20 20 20 20 20 20 3A 20 8F 20 53 50 55 52 | : . SPUR| 00000D90: 20 31 39 2D 33 30 20 41 4C 53 20 42 45 4C 45 47 | 19-30 ALS BELEG| 00000DA0: 54 00 C5 15 8C 05 3A 20 98 32 2C C7 28 30 29 3B |T.....: .2,.(0);| 00000DB0: 20 20 20 20 20 3A 20 8F 20 4B 45 4E 4E 5A 45 49 | : . KENNZEI| 00000DC0: 43 48 4E 45 4E 00 CB 15 96 05 82 00 D1 15 A0 05 |CHNEN...........| 00000DD0: 3A 00 00 16 AA 05 98 31 2C 22 55 32 3A 22 3B 32 |:......1,"U2:";2| 00000DE0: 3B 30 3B 31 38 3B 30 20 3A 20 8F 20 42 41 4D 20 |;0;18;0 : . BAM | 00000DF0: 5A 55 52 55 45 43 4B 53 43 48 52 45 49 42 45 4E |ZURUECKSCHREIBEN| 00000E00: 00 32 16 B4 05 98 31 2C 22 49 22 20 20 20 20 20 |.2....1,"I" | 00000E10: 20 20 20 20 20 20 20 3A 20 8F 20 4D 41 4E 49 50 | : . MANIP| 00000E20: 55 4C 2E 44 49 52 45 43 54 4F 52 59 20 48 4F 4C |UL.DIRECTORY HOL| 00000E30: 45 4E 00 3F 16 BE 05 A0 20 31 3A 20 A0 20 32 00 |EN.?.... 1: . 2.| 00000E40: 45 16 C8 05 8E 00 00 00 |E....... |
....Z.. NAME$(100), REC%(100).:._.. 1310
: . BLOCKBELEGUNG._.D.. 1,8,15: . BEFEH
LSKANAL OEFFNEN...N.. 2,8,2,"INFODATEI,S
,R": . SEQ.DATEI OEFFNEN...X..1,A: . FEH
LER AUFGETRETEN?.V.... A..0 . . 140: . J
A, DANN WEITER......2,AD: . ADRESSANZAHL
LESEN...... I.1 . AD.#...: .2,NAME$(I):
.2,REC%(I).F...: . NAME$(I)."*" . NAME$
(I)."".N.... I.W... 2: . SEQUENTIELLE D
ATEI SCHLIESSEN.}...:... .. 2,8,2,"#": .
DIREKTZUGRIFFS-DATEI OEFFNEN.....:.....
:.M.... *** MENUE ***...H..:. "1=EINTRAG
EN/2=SUCHEN/3=BLAETTERN/4=AENDERN/5=ENDE
":..%.R.. A$: . A$."" . . 210.+...:.]...
. A$.."5" . . E(A$) . 340,1060,430,550:
. 200.C...:..... 2: . RELATIVE DATEI SC
HLIESSEN......1,"S:INFODATEI": . SEQ.DAT
EI LOESCHEN...... 2,8,2,"INFODATEI,S,W":
. SEQ.DATEI OEFFNEN......2,AD: . ADRESS
ANZAHL SPEICHERN...... I.1 . AD.:...: .
NAME$(I)."" . NAME$(I)."*".X...: .2,NAME
$(I): .2,REC%(I).`. .. I...". 2: 1: .
ALLE DATEIEN SCHLIESEN...,.....6.:...@.
:...J.. *** NEUE ADRESSE EINTRAGEN ***.R
.T.. "*EINTRAGEN*"...^.. 650: . ADRESSE
ABFRAGEN...H.AD.AD.1...R.REC.AD: . 1210
: . UMRECHNUNG.W.W.NAME$(AD).N$: REC%(AD
).REC: . 950: . INDEX SORTIEREN.S.|.. 74
0: . SATZ SCHREIBEN.Y........:.....:...
... *** BLAETTERN ***...... "*BLAETTERN*
".B...SNR.1: . 475...... A$: . A$."" . .
440...B.. A$..G(29) . A$..G(157) . ..!.
L.. A$.G(29) . SNR.AD . SNR.SNR.1.E.V..
A$.G(157) . SNR.1 . SNR.SNR.1.W...REC.RE
C%(SNR).P.... 1210: . UMRECHNUNG...... 8
10 : . ADRESSE LESEN......: . N$: . W$:
. T$: ....... 440.....:.....:.S.... ***
AENDERN ***...&.. "*AENDERN*"...0.. 650
: . ADRESSE ABFRAGEN...:.. 1210: . UMREC
HNUNG.X.?.NAME$(SNR).N$: REC%(SNR).REC:
. 950: . INDEX SORTIEREN.T.D.. 730: . SA
TZ SCHREIBEN.Z.N.....X.:...B.:...... ***
ADRESSE ABFRAGEN ***.....N$."": W$."":
T$."".M.... "NAME";N$...... "WOHNORT";W$
...... "TELEFON";T$...........:...F.:.'.
P.. *** DATENSATZ SCHREIBEN ***.Z.Z.. N$
."" . N$."*": . ACHTUNG: DAS SCHREIBEN V
ON...... W$."" . W$."*": . 'LEERSTRINGS'
MUSS VER-...... T$."" . T$."*": . MIEDE
N WERDEN !!!......1,"B-P:";2;1 : . BUFF
ER-POINTER SETZEN......2,N$ G(13) W$ G(1
3) T$: . 1 PRINT#-BEFEHL !!!.M....1,"U2:
";2;0;SPUR;SEKT : . PUFFER AUF DISK SCHR
EIBEN.S.....Y...:._...:.}. .. *** DATENS
ATZ LESEN ***...*..1,"U1:";2;0;SPUR;SEKT
...,..1,"B-P:";2;1.F.2..2,N$: . N$."*" .
N$.""...4..2,W$: . W$."*" . W$.""...>..
2,T$: . T$."*" . T$.""...H.....R.:...\.:
.(.... *** SORTIEREN ***.9.... I.1 . AD.
1.J...: . J.I . AD.N.J.: . NAME$(I)..N
AME$(J) . 1000...T.: S$.NAME$(I): NAME
$(I).NAME$(J): NAME$(J).S$.P...: S.REC
%(I): REC%(I).REC%(J): REC%(J).S.Z...: .
J...... I...........:.....:...... *** A
DRESSE SUCHEN ***.,.$.. "GESUCHTER NAME"
;SN$.=.... SNR.1 . AD.^.8.: . NAME$(SNR)
..SN$ . . 1150.R.B.: REC.REC%(SNR)...L.:
. 1210: . UMRECHNUNG...V.: . 810 : . SA
TZ LESEN.E.`.: .: . N$: . W$: . T$: ....
J.: . "WEITERSUCHEN(J/N)";A$...T.: . A$.
."J" . ....~.. SNR...........:.....:.9..
.. *** RECORDNR.=>SPUR/SEKTOR ***.`....
REC.358 . AA.0:BB.22:DD.1:. 1250...D.. R
EC.471 . AA.357:BB.20:DD.19:. 1250...N..
REC.580 . AA.471:BB.19:DD.25:. 1250.K.X
.AA.579:BB.18:DD.31.....SPUR..(((REC.AA)
.1).(BB.1)).DD.....SEKT.REC.AA.(SPUR.DD)
.BB.(SPUR.DD.1).......#...:.)...:.E....
*** BLOCKBELEGUNG ***.R.... 1,8,15.B.(..
2,8,2,"#"...2..1,"U1:";2;0;18;0 : . SEK
TOR 0 VON SPUR 18 LESEN...<.:.U.F..1,"B-
P:";2;4 : . AB BYTES FUER SPUR 1 MAN
IPUL....P.. I.1 . 4.17 : . SPUR 1
-17 ALS BELEGT.*.Z.: .2,G(0); : . KE
NNZEICHNEN.0.D...6.N.:.O.X..1,"B-P:";2;4
.4.18: . AB BYTES FUER SPUR 19 MANIPUL..
..... I.1 . 4.12 : . SPUR 19-30 A
LS BELEGT.E...: .2,G(0); : . KENNZEI
CHNEN.K.....Q. .:......1,"U2:";2;0;18;0
: . BAM ZURUECKSCHREIBEN.2....1,"I"
: . MANIPUL.DIRECTORY HOLEN.?...
1: 2.E.H.....
> CLICK IMAGE PREVIEW FOR FULL MODAL