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

INDEXSEQUENTIELL

FILE INFORMATION

FILENAME(S): INDEXSEQUENTIELL

FILE TYPE(S): PRG

FILE SIZE: 2.7K

FIRST SEEN: 2025-11-30 01:12:56

APPEARS ON: 2 disk(s)

FILE HASH

ba08947057530ff8e8c5ae7332f7f13ab4df921c26f30c0216e6ceaff36fdbb6

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
SONDERHEFT 41 INDEXSEQUENTIELL PRG C64er 11 0 DOWNLOAD FILE
15828 SEITE B INDEXSEQUENTIELL PRG C64er 19 9 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 42 08  |0), REC%(100).B.|
00000020: 64 00 9F 20 31 2C 38 2C  31 35 3A 20 8F 20 42 45  |d.. 1,8,15: . BE|
00000030: 46 45 48 4C 53 4B 41 4E  41 4C 20 4F 45 46 46 4E  |FEHLSKANAL OEFFN|
00000040: 45 4E 00 73 08 6E 00 9F  20 32 2C 38 2C 32 2C 22  |EN.s.n.. 2,8,2,"|
00000050: 49 4E 46 4F 44 41 54 45  49 2C 53 2C 52 22 3A 20  |INFODATEI,S,R": |
00000060: 8F 20 53 45 51 2E 44 41  54 45 49 20 4F 45 46 46  |. SEQ.DATEI OEFF|
00000070: 4E 45 4E 00 93 08 78 00  84 31 2C 41 3A 20 8F 20  |NEN...x..1,A: . |
00000080: 46 45 48 4C 45 52 20 41  55 46 47 45 54 52 45 54  |FEHLER AUFGETRET|
00000090: 45 4E 3F 00 B9 08 82 00  8B 20 41 B3 B1 30 20 A7  |EN?...... A..0 .|
000000A0: 20 89 20 31 34 30 3A 20  8F 20 4A 41 2C 20 44 41  | . 140: . JA, DA|
000000B0: 4E 4E 20 57 45 49 54 45  52 00 D9 08 84 00 84 32  |NN WEITER......2|
000000C0: 2C 41 44 3A 20 8F 20 41  44 52 45 53 53 41 4E 5A  |,AD: . ADRESSANZ|
000000D0: 41 48 4C 20 4C 45 53 45  4E 00 E8 08 86 00 81 20  |AHL LESEN...... |
000000E0: 49 B2 31 20 A4 20 41 44  00 06 09 88 00 3A 20 84  |I.1 . AD.....: .|
000000F0: 32 2C 4E 41 4D 45 24 28  49 29 3A 20 84 32 2C 52  |2,NAME$(I): .2,R|
00000100: 45 43 25 28 49 29 00 29  09 89 00 3A 20 8B 20 4E  |EC%(I).)...: . N|
00000110: 41 4D 45 24 28 49 29 B2  22 2A 22 20 A7 20 4E 41  |AME$(I)."*" . NA|
00000120: 4D 45 24 28 49 29 B2 22  22 00 31 09 8A 00 82 20  |ME$(I)."".1.... |
00000130: 49 00 5A 09 8C 00 A0 20  32 3A 20 8F 20 53 45 51  |I.Z.... 2: . SEQ|
00000140: 55 45 4E 54 49 45 4C 4C  45 20 44 41 54 45 49 20  |UENTIELLE DATEI |
00000150: 53 43 48 4C 49 45 53 53  45 4E 00 60 09 96 00 3A  |SCHLIESSEN.`...:|
00000160: 00 96 09 A0 00 9F 20 32  2C 38 2C 32 2C 22 41 44  |...... 2,8,2,"AD|
00000170: 52 45 53 53 45 4E 2C 4C  2C 22 AA C7 28 31 30 30  |RESSEN,L,"..(100|
00000180: 29 3A 20 8F 20 52 45 4C  2D 44 41 54 45 49 20 4F  |): . REL-DATEI O|
00000190: 45 46 46 4E 45 4E 00 9C  09 AA 00 3A 00 A2 09 B4  |EFFNEN.....:....|
000001A0: 00 3A 00 B6 09 BE 00 8F  20 2A 2A 2A 20 4D 45 4E  |.:...... *** MEN|
000001B0: 55 45 20 2A 2A 2A 00 F4  09 C8 00 99 3A 99 20 22  |UE ***......:. "|
000001C0: 31 3D 45 49 4E 54 52 41  47 45 4E 2F 32 3D 53 55  |1=EINTRAGEN/2=SU|
000001D0: 43 48 45 4E 2F 33 3D 42  4C 41 45 54 54 45 52 4E  |CHEN/3=BLAETTERN|
000001E0: 2F 34 3D 41 45 4E 44 45  52 4E 2F 35 3D 45 4E 44  |/4=AENDERN/5=END|
000001F0: 45 22 3A 99 00 0E 0A D2  00 A1 20 41 24 3A 20 8B  |E":....... A$: .|
00000200: 20 41 24 B2 22 22 20 A7  20 89 20 32 31 30 00 14  | A$."" . . 210..|
00000210: 0A DC 00 3A 00 46 0A E6  00 8B 20 41 24 B3 B1 22  |...:.F.... A$.."|
00000220: 35 22 20 A7 20 91 20 C5  28 41 24 29 20 8D 20 33  |5" . . .(A$) . 3|
00000230: 34 30 2C 31 30 36 30 2C  34 33 30 2C 35 35 30 3A  |40,1060,430,550:|
00000240: 20 89 20 32 30 30 00 4C  0A F0 00 3A 00 71 0A FA  | . 200.L...:.q..|
00000250: 00 A0 20 32 3A 20 8F 20  52 45 4C 41 54 49 56 45  |.. 2: . RELATIVE|
00000260: 20 44 41 54 45 49 20 53  43 48 4C 49 45 53 53 45  | DATEI SCHLIESSE|
00000270: 4E 00 9C 0A 04 01 98 31  2C 22 53 3A 49 4E 46 4F  |N......1,"S:INFO|
00000280: 44 41 54 45 49 22 3A 20  8F 20 53 45 51 2E 44 41  |DATEI": . SEQ.DA|
00000290: 54 45 49 20 4C 4F 45 53  43 48 45 4E 00 CD 0A 0E  |TEI LOESCHEN....|
000002A0: 01 9F 20 32 2C 38 2C 32  2C 22 49 4E 46 4F 44 41  |.. 2,8,2,"INFODA|
000002B0: 54 45 49 2C 53 2C 57 22  3A 20 8F 20 53 45 51 2E  |TEI,S,W": . SEQ.|
000002C0: 44 41 54 45 49 20 4F 45  46 46 4E 45 4E 00 F1 0A  |DATEI OEFFNEN...|
000002D0: 18 01 98 32 2C 41 44 3A  20 8F 20 41 44 52 45 53  |...2,AD: . ADRES|
000002E0: 53 41 4E 5A 41 48 4C 20  53 50 45 49 43 48 45 52  |SANZAHL SPEICHER|
000002F0: 4E 00 00 0B 1A 01 81 20  49 B2 31 20 A4 20 41 44  |N...... I.1 . AD|
00000300: 00 23 0B 1C 01 3A 20 8B  20 4E 41 4D 45 24 28 49  |.#...: . NAME$(I|
00000310: 29 B2 22 22 20 A7 20 4E  41 4D 45 24 28 49 29 B2  |)."" . NAME$(I).|
00000320: 22 2A 22 00 41 0B 1E 01  3A 20 98 32 2C 4E 41 4D  |"*".A...: .2,NAM|
00000330: 45 24 28 49 29 3A 20 98  32 2C 52 45 43 25 28 49  |E$(I): .2,REC%(I|
00000340: 29 00 49 0B 20 01 82 20  49 00 70 0B 22 01 A0 20  |).I. .. I.p.".. |
00000350: 32 3A 20 A0 20 31 3A 20  8F 20 41 4C 4C 45 20 44  |2: . 1: . ALLE D|
00000360: 41 54 45 49 45 4E 20 53  43 48 4C 49 45 53 45 4E  |ATEIEN SCHLIESEN|
00000370: 00 76 0B 2C 01 80 00 7C  0B 36 01 3A 00 82 0B 40  |.v.,...|.6.:...@|
00000380: 01 3A 00 A7 0B 4A 01 8F  20 2A 2A 2A 20 4E 45 55  |.:...J.. *** NEU|
00000390: 45 20 41 44 52 45 53 53  45 20 45 49 4E 54 52 41  |E ADRESSE EINTRA|
000003A0: 47 45 4E 20 2A 2A 2A 00  BB 0B 54 01 99 20 22 2A  |GEN ***...T.. "*|
000003B0: 45 49 4E 54 52 41 47 45  4E 2A 22 00 D9 0B 5E 01  |EINTRAGEN*"...^.|
000003C0: 8D 20 36 35 30 3A 20 8F  20 41 44 52 45 53 53 45  |. 650: . ADRESSE|
000003D0: 20 41 42 46 52 41 47 45  4E 00 E5 0B 68 01 41 44  | ABFRAGEN...h.AD|
000003E0: B2 41 44 AA 31 00 08 0C  72 01 52 45 43 B2 41 44  |.AD.1...r.REC.AD|
000003F0: 3A 20 8D 20 38 38 30 3A  20 8F 20 50 4F 53 49 54  |: . 880: . POSIT|
00000400: 49 4F 4E 49 45 52 45 4E  00 41 0C 77 01 4E 41 4D  |IONIEREN.A.w.NAM|
00000410: 45 24 28 41 44 29 B2 4E  24 3A 20 52 45 43 25 28  |E$(AD).N$: REC%(|
00000420: 41 44 29 B2 52 45 43 3A  20 8D 20 39 35 30 3A 20  |AD).REC: . 950: |
00000430: 8F 20 49 4E 44 45 58 20  53 4F 52 54 49 45 52 45  |. INDEX SORTIERE|
00000440: 4E 00 5D 0C 7C 01 8D 20  37 34 30 3A 20 8F 20 53  |N.].|.. 740: . S|
00000450: 41 54 5A 20 53 43 48 52  45 49 42 45 4E 00 63 0C  |ATZ SCHREIBEN.c.|
00000460: 86 01 8E 00 69 0C 90 01  3A 00 6F 0C 9A 01 3A 00  |....i...:.o...:.|
00000470: 87 0C A4 01 8F 20 2A 2A  2A 20 42 4C 41 45 54 54  |..... *** BLAETT|
00000480: 45 52 4E 20 2A 2A 2A 00  9B 0C AE 01 99 20 22 2A  |ERN ***...... "*|
00000490: 42 4C 41 45 54 54 45 52  4E 2A 22 00 AC 0C B3 01  |BLAETTERN*".....|
000004A0: 53 4E 52 B2 31 3A 20 89  20 34 37 35 00 C6 0C B8  |SNR.1: . 475....|
000004B0: 01 A1 20 41 24 3A 20 8B  20 41 24 B2 22 22 20 A7  |.. A$: . A$."" .|
000004C0: 20 89 20 34 34 30 00 E7  0C C2 01 8B 20 41 24 B3  | . 440...... A$.|
000004D0: B1 C7 28 32 39 29 20 AF  20 41 24 B3 B1 C7 28 31  |..(29) . A$...(1|
000004E0: 35 37 29 20 A7 20 8E 00  0B 0D CC 01 8B 20 41 24  |57) . ....... A$|
000004F0: B2 C7 28 32 39 29 20 AF  20 53 4E 52 B3 41 44 20  |..(29) . SNR.AD |
00000500: A7 20 53 4E 52 B2 53 4E  52 AA 31 00 2F 0D D6 01  |. SNR.SNR.1./...|
00000510: 8B 20 41 24 B2 C7 28 31  35 37 29 20 AF 20 53 4E  |. A$..(157) . SN|
00000520: 52 B1 31 20 A7 20 53 4E  52 B2 53 4E 52 AB 31 00  |R.1 . SNR.SNR.1.|
00000530: 41 0D DB 01 52 45 43 B2  52 45 43 25 28 53 4E 52  |A...REC.REC%(SNR|
00000540: 29 00 5C 0D E0 01 8D 20  38 38 30 3A 20 8F 20 50  |).\.... 880: . P|
00000550: 4F 53 49 54 49 4F 4E 49  45 52 45 4E 00 77 0D EA  |OSITIONIEREN.w..|
00000560: 01 8D 20 38 31 30 3A 20  8F 20 41 44 52 45 53 53  |.. 810: . ADRESS|
00000570: 45 20 4C 45 53 45 4E 00  92 0D F4 01 99 3A 20 99  |E LESEN......: .|
00000580: 20 4E 24 3A 20 99 20 57  24 3A 20 99 20 54 24 3A  | N$: . W$: . T$:|
00000590: 20 99 00 9C 0D FE 01 89  20 34 34 30 00 A2 0D 08  | ....... 440....|
000005A0: 02 3A 00 A8 0D 12 02 3A  00 BE 0D 1C 02 8F 20 2A  |.:.....:...... *|
000005B0: 2A 2A 20 41 45 4E 44 45  52 4E 20 2A 2A 2A 00 D0  |** AENDERN ***..|
000005C0: 0D 26 02 99 20 22 2A 41  45 4E 44 45 52 4E 2A 22  |.&.. "*AENDERN*"|
000005D0: 00 EE 0D 30 02 8D 20 36  35 30 3A 20 8F 20 41 44  |...0.. 650: . AD|
000005E0: 52 45 53 53 45 20 41 42  46 52 41 47 45 4E 00 09  |RESSE ABFRAGEN..|
000005F0: 0E 3A 02 8D 20 38 38 30  3A 20 8F 20 50 4F 53 49  |.:.. 880: . POSI|
00000600: 54 49 4F 4E 49 45 52 45  4E 00 44 0E 3F 02 4E 41  |TIONIEREN.D.?.NA|
00000610: 4D 45 24 28 53 4E 52 29  B2 4E 24 3A 20 52 45 43  |ME$(SNR).N$: REC|
00000620: 25 28 53 4E 52 29 B2 52  45 43 3A 20 8D 20 39 35  |%(SNR).REC: . 95|
00000630: 30 3A 20 8F 20 49 4E 44  45 58 20 53 4F 52 54 49  |0: . INDEX SORTI|
00000640: 45 52 45 4E 00 60 0E 44  02 8D 20 37 33 30 3A 20  |EREN.`.D.. 730: |
00000650: 8F 20 53 41 54 5A 20 53  43 48 52 45 49 42 45 4E  |. SATZ SCHREIBEN|
00000660: 00 66 0E 4E 02 8E 00 6C  0E 58 02 3A 00 72 0E 62  |.f.N...l.X.:.r.b|
00000670: 02 3A 00 91 0E 80 02 8F  20 2A 2A 2A 20 41 44 52  |.:...... *** ADR|
00000680: 45 53 53 45 20 41 42 46  52 41 47 45 4E 20 2A 2A  |ESSE ABFRAGEN **|
00000690: 2A 00 A9 0E 8A 02 4E 24  B2 22 22 3A 20 57 24 B2  |*.....N$."": W$.|
000006A0: 22 22 3A 20 54 24 B2 22  22 00 B9 0E 94 02 85 20  |"": T$.""...... |
000006B0: 22 4E 41 4D 45 22 3B 4E  24 00 CC 0E 9E 02 85 20  |"NAME";N$...... |
000006C0: 22 57 4F 48 4E 4F 52 54  22 3B 57 24 00 DF 0E A8  |"WOHNORT";W$....|
000006D0: 02 85 20 22 54 45 4C 45  46 4F 4E 22 3B 54 24 00  |.. "TELEFON";T$.|
000006E0: E5 0E B2 02 8E 00 EB 0E  BC 02 3A 00 F1 0E C6 02  |..........:.....|
000006F0: 3A 00 13 0F D0 02 8F 20  2A 2A 2A 20 44 41 54 45  |:...... *** DATE|
00000700: 4E 53 41 54 5A 20 53 43  48 52 45 49 42 45 4E 20  |NSATZ SCHREIBEN |
00000710: 2A 2A 2A 00 46 0F DA 02  8B 20 4E 24 B2 22 22 20  |***.F.... N$."" |
00000720: A7 20 4E 24 B2 22 2A 22  3A 20 8F 20 41 43 48 54  |. N$."*": . ACHT|
00000730: 55 4E 47 3A 20 44 41 53  20 53 43 48 52 45 49 42  |UNG: DAS SCHREIB|
00000740: 45 4E 20 56 4F 4E 00 76  0F E4 02 8B 20 57 24 B2  |EN VON.v.... W$.|
00000750: 22 22 20 A7 20 57 24 B2  22 2A 22 3A 20 8F 20 27  |"" . W$."*": . '|
00000760: 4C 45 45 52 53 54 52 49  4E 47 53 27 20 4D 55 53  |LEERSTRINGS' MUS|
00000770: 53 20 56 45 52 2D 00 A0  0F EE 02 8B 20 54 24 B2  |S VER-...... T$.|
00000780: 22 22 20 A7 20 54 24 B2  22 2A 22 3A 20 8F 20 4D  |"" . T$."*": . M|
00000790: 49 45 44 45 4E 20 57 45  52 44 45 4E 20 21 21 21  |IEDEN WERDEN !!!|
000007A0: 00 D3 0F F8 02 98 32 2C  4E 24 20 C7 28 31 33 29  |......2,N$ .(13)|
000007B0: 20 57 24 20 C7 28 31 33  29 20 54 24 3A 20 8F 20  | W$ .(13) T$: . |
000007C0: 31 20 50 52 49 4E 54 23  2D 42 45 46 45 48 4C 20  |1 PRINT#-BEFEHL |
000007D0: 21 21 21 00 D9 0F 02 03  8E 00 DF 0F 0C 03 3A 00  |!!!...........:.|
000007E0: E5 0F 16 03 3A 00 03 10  20 03 8F 20 2A 2A 2A 20  |....:... .. *** |
000007F0: 44 41 54 45 4E 53 41 54  5A 20 4C 45 53 45 4E 20  |DATENSATZ LESEN |
00000800: 2A 2A 2A 00 1F 10 2A 03  84 32 2C 4E 24 3A 20 8B  |***...*..2,N$: .|
00000810: 20 4E 24 B2 22 2A 22 20  A7 20 4E 24 B2 22 22 00  | N$."*" . N$."".|
00000820: 3B 10 34 03 84 32 2C 57  24 3A 20 8B 20 57 24 B2  |;.4..2,W$: . W$.|
00000830: 22 2A 22 20 A7 20 57 24  B2 22 22 00 57 10 3E 03  |"*" . W$."".W.>.|
00000840: 84 32 2C 54 24 3A 20 8B  20 54 24 B2 22 2A 22 20  |.2,T$: . T$."*" |
00000850: A7 20 54 24 B2 22 22 00  5D 10 48 03 8E 00 63 10  |. T$."".].H...c.|
00000860: 52 03 3A 00 69 10 5C 03  3A 00 85 10 66 03 8F 20  |R.:.i.\.:...f.. |
00000870: 2A 2A 2A 20 50 4F 53 49  54 49 4F 4E 49 45 52 45  |*** POSITIONIERE|
00000880: 4E 20 2A 2A 2A 00 97 10  70 03 48 42 B2 B5 28 52  |N ***...p.HB..(R|
00000890: 45 43 AD 32 35 36 29 00  A9 10 7A 03 4C 42 B2 52  |EC.256)...z.LB.R|
000008A0: 45 43 AB 48 42 AC 32 35  36 00 CA 10 84 03 98 31  |EC.HB.256......1|
000008B0: 2C 22 50 22 AA C7 28 32  29 AA C7 28 4C 42 29 AA  |,"P"..(2)..(LB).|
000008C0: C7 28 48 42 29 AA C7 28  31 29 00 D0 10 8E 03 8E  |.(HB)..(1)......|
000008D0: 00 D6 10 98 03 3A 00 DC  10 A2 03 3A 00 F4 10 AC  |.....:.....:....|
000008E0: 03 8F 20 2A 2A 2A 20 53  4F 52 54 49 45 52 45 4E  |.. *** SORTIEREN|
000008F0: 20 2A 2A 2A 00 05 11 B6  03 81 20 49 B2 31 20 A4  | ***...... I.1 .|
00000900: 20 41 44 AB 31 00 16 11  C0 03 3A 20 81 20 4A B2  | AD.1.....: . J.|
00000910: 49 20 A4 20 41 44 00 3A  11 CA 03 3A 20 20 20 8B  |I . AD.:...:   .|
00000920: 20 4E 41 4D 45 24 28 49  29 B3 B2 4E 41 4D 45 24  | NAME$(I)..NAME$|
00000930: 28 4A 29 20 A7 20 31 30  30 30 00 6E 11 D4 03 3A  |(J) . 1000.n...:|
00000940: 20 20 20 53 24 B2 4E 41  4D 45 24 28 49 29 3A 20  |   S$.NAME$(I): |
00000950: 4E 41 4D 45 24 28 49 29  B2 4E 41 4D 45 24 28 4A  |NAME$(I).NAME$(J|
00000960: 29 3A 20 4E 41 4D 45 24  28 4A 29 B2 53 24 00 9C  |): NAME$(J).S$..|
00000970: 11 DE 03 3A 20 20 20 53  B2 52 45 43 25 28 49 29  |...:   S.REC%(I)|
00000980: 3A 20 52 45 43 25 28 49  29 B2 52 45 43 25 28 4A  |: REC%(I).REC%(J|
00000990: 29 3A 20 52 45 43 25 28  4A 29 B2 53 00 A6 11 E8  |): REC%(J).S....|
000009A0: 03 3A 20 82 20 4A 00 AE  11 F2 03 82 20 49 00 B4  |.: . J...... I..|
000009B0: 11 FC 03 8E 00 BA 11 06  04 3A 00 C0 11 10 04 3A  |.........:.....:|
000009C0: 00 DD 11 1A 04 8F 20 2A  2A 2A 20 41 44 52 45 53  |...... *** ADRES|
000009D0: 53 45 20 53 55 43 48 45  4E 20 2A 2A 2A 00 F8 11  |SE SUCHEN ***...|
000009E0: 24 04 85 20 22 47 45 53  55 43 48 54 45 52 20 4E  |$.. "GESUCHTER N|
000009F0: 41 4D 45 22 3B 53 4E 24  00 09 12 2E 04 81 20 53  |AME";SN$...... S|
00000A00: 4E 52 B2 31 20 A4 20 41  44 00 2A 12 38 04 3A 20  |NR.1 . AD.*.8.: |
00000A10: 8B 20 4E 41 4D 45 24 28  53 4E 52 29 B3 B1 53 4E  |. NAME$(SNR)..SN|
00000A20: 24 20 A7 20 89 20 31 31  35 30 00 3E 12 42 04 3A  |$ . . 1150.>.B.:|
00000A30: 20 52 45 43 B2 52 45 43  25 28 53 4E 52 29 00 5B  | REC.REC%(SNR).[|
00000A40: 12 4C 04 3A 20 8D 20 38  38 30 3A 20 8F 20 50 4F  |.L.: . 880: . PO|
00000A50: 53 49 54 49 4F 4E 49 45  52 45 4E 00 75 12 56 04  |SITIONIEREN.u.V.|
00000A60: 3A 20 8D 20 38 31 30 3A  20 8F 20 53 41 54 5A 20  |: . 810: . SATZ |
00000A70: 4C 45 53 45 4E 00 92 12  60 04 3A 20 99 3A 20 99  |LESEN...`.: .: .|
00000A80: 20 4E 24 3A 20 99 20 57  24 3A 20 99 20 54 24 3A  | N$: . W$: . T$:|
00000A90: 20 99 00 B1 12 6A 04 3A  20 85 20 22 57 45 49 54  | ....j.: . "WEIT|
00000AA0: 45 52 53 55 43 48 45 4E  28 4A 2F 4E 29 22 3B 41  |ERSUCHEN(J/N)";A|
00000AB0: 24 00 C5 12 74 04 3A 20  8B 20 41 24 B3 B1 22 4A  |$...t.: . A$.."J|
00000AC0: 22 20 A7 20 8E 00 CF 12  7E 04 82 20 53 4E 52 00  |" . ....~.. SNR.|
00000AD0: D5 12 88 04 8E 00 00 00                           |........        |
....Z.. NAME$(100), REC%(100).B.D.. 1,8,
15: . BEFEHLSKANAL OEFFNEN.S.N.. 2,8,2,"
INFODATEI,S,R": . SEQ.DATEI OEFFNEN...X.
.1,A: . FEHLER AUFGETRETEN?...... A..0 .
 . 140: . JA, DANN WEITER.Y....2,AD: . A
DRESSANZAHL LESEN...... I.1 . AD.....: .
2,NAME$(I): .2,REC%(I).)...: . NAME$(I).
"*" . NAME$(I)."".1.... I.Z...  2: . SEQ
UENTIELLE DATEI SCHLIESSEN.`...:... .. 2
,8,2,"ADRESSEN,L,".G(100): . REL-DATEI O
EFFNEN.....:.....:...... *** MENUE ***..
.H..:. "1=EINTRAGEN/2=SUCHEN/3=BLAETTERN
/4=AENDERN/5=ENDE":....R.. A$: . A$."" .
 . 210.....:.F.... A$.."5" . . E(A$) . 3
40,1060,430,550: . 200.L...:.Q...  2: . 
RELATIVE DATEI SCHLIESSEN......1,"S:INFO
DATEI": . SEQ.DATEI LOESCHEN.M.... 2,8,2
,"INFODATEI,S,W": . SEQ.DATEI OEFFNEN...
...2,AD: . ADRESSANZAHL SPEICHERN...... 
I.1 . AD.#...: . NAME$(I)."" . NAME$(I).
"*".A...: .2,NAME$(I): .2,REC%(I).I. .. 
I.P.".  2:   1: . ALLE DATEIEN SCHLIESEN
.V.,...|.6.:...@.:...J.. *** NEUE ADRESS
E EINTRAGEN ***...T.. "*EINTRAGEN*".Y.^.
. 650: . ADRESSE ABFRAGEN...H.AD.AD.1...
R.REC.AD: . 880: . POSITIONIEREN.A.W.NAM
E$(AD).N$: REC%(AD).REC: . 950: . INDEX 
SORTIEREN.].|.. 740: . SATZ SCHREIBEN.C.
....I...:.O...:...... *** BLAETTERN ***.
..... "*BLAETTERN*".....SNR.1: . 475.F..
.. A$: . A$."" . . 440...B.. A$..G(29) .
 A$..G(157) . ....L.. A$.G(29) . SNR.AD 
. SNR.SNR.1./.V.. A$.G(157) . SNR.1 . SN
R.SNR.1.A...REC.REC%(SNR).\.... 880: . P
OSITIONIEREN.W.... 810: . ADRESSE LESEN.
.....: . N$: . W$: . T$: ....... 440....
.:.....:...... *** AENDERN ***.P.&.. "*A
ENDERN*"...0.. 650: . ADRESSE ABFRAGEN..
.:.. 880: . POSITIONIEREN.D.?.NAME$(SNR)
.N$: REC%(SNR).REC: . 950: . INDEX SORTI
EREN.`.D.. 730: . SATZ SCHREIBEN.F.N...L
.X.:.R.B.:...... *** ADRESSE ABFRAGEN **
*.....N$."": W$."": T$.""...... "NAME";N
$.L.... "WOHNORT";W$...... "TELEFON";T$.
..........:...F.:...P.. *** DATENSATZ SC
HREIBEN ***.F.Z.. N$."" . N$."*": . ACHT
UNG: DAS SCHREIBEN VON.V.... W$."" . W$.
"*": . 'LEERSTRINGS' MUSS VER-. .... T$.
"" . T$."*": . MIEDEN WERDEN !!!.S....2,
N$ G(13) W$ G(13) T$: . 1 PRINT#-BEFEHL 
!!!.Y.........:.....:... .. *** DATENSAT
Z LESEN ***...*..2,N$: . N$."*" . N$."".
;.4..2,W$: . W$."*" . W$."".W.>..2,T$: .
 T$."*" . T$."".].H...C.R.:.I.\.:...F.. 
*** POSITIONIEREN ***...P.HB..(REC.256).
..Z.LB.REC.HB.256.J....1,"P".G(2).G(LB).
G(HB).G(1).P.....V...:.....:...... *** S
ORTIEREN ***...... I.1 . AD.1.....: . J.
I . AD.:.J.:   . NAME$(I)..NAME$(J) . 10
00.N.T.:   S$.NAME$(I): NAME$(I).NAME$(J
): NAME$(J).S$.....:   S.REC%(I): REC%(I
).REC%(J): REC%(J).S.....: . J...... I..
.........:.....:...... *** ADRESSE SUCHE
N ***...$.. "GESUCHTER NAME";SN$...... S
NR.1 . AD.*.8.: . NAME$(SNR)..SN$ . . 11
50.>.B.: REC.REC%(SNR).[.L.: . 880: . PO
SITIONIEREN.U.V.: . 810: . SATZ LESEN...
`.: .: . N$: . W$: . T$: ....J.: . "WEIT
ERSUCHEN(J/N)";A$.E.T.: . A$.."J" . ..O.
~.. SNR.U.......
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL