DATADRESS
FILE INFORMATION
FILENAME(S): DATADRESS
FILE TYPE(S): PRG
FILE SIZE: 3.3K
FIRST SEEN: 2025-10-20 14:31:31
APPEARS ON: 2 disk(s)
FILE HASH
402d463ac02792769e454745bfbe2e69199da23b3c0ca0cf2fbbf24600030f2f
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MULTISOFT | DATADRESS | PRG | Treasure Chest - Klaus Der Suhler | 21 | 8 | DOWNLOAD FILE |
| MULTISOFT | DATADRESS | PRG | Treasure Chest - Plattfuss | 21 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 64 00 8F 20 2A 2A 2A 2A 2A 44 41 54 |....d.. *****DAT|
00000010: 41 44 52 45 53 53 2A 2A 2A 2A 00 33 08 6E 00 8F |ADRESS****.3.n..|
00000020: 20 2A 42 59 20 4D 41 52 49 4F 20 57 41 4C 54 48 | *BY MARIO WALTH|
00000030: 45 52 2A 00 4C 08 78 00 8F 20 2A 20 20 20 20 28 |ER*.L.x.. * (|
00000040: 43 29 20 31 39 38 34 20 20 20 20 2A 00 65 08 82 |C) 1984 *.e..|
00000050: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000060: 2A 2A 2A 2A 2A 00 7B 08 8C 00 97 35 33 32 38 30 |*****.{....53280|
00000070: 2C 30 3A 97 35 33 32 38 31 2C 30 00 86 08 C8 00 |,0:.53281,0.....|
00000080: 8D 35 30 30 30 30 00 98 08 CD 00 8F 20 2A 2A 2A |.50000...... ***|
00000090: 4D 45 4E 55 45 2A 2A 2A 00 CC 08 D2 00 99 22 93 |MENUE***......".|
000000A0: 11 11 11 9A 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E |....<><><><><><>|
000000B0: 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E |<><><><><><><><>|
000000C0: 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 00 F1 08 DC |<><><><><><>....|
000000D0: 00 99 A3 35 29 22 11 11 11 05 12 31 92 20 44 41 |...5)".....1. DA|
000000E0: 54 41 5A 45 49 4C 45 4E 20 46 55 45 4C 4C 45 4E |TAZEILEN FUELLEN|
000000F0: 22 00 07 09 E6 00 99 A3 35 29 22 11 12 32 92 20 |".......5)"..2. |
00000100: 53 55 43 48 45 4E 22 00 25 09 F0 00 99 A3 35 29 |SUCHEN".%.....5)|
00000110: 22 11 12 33 92 20 44 55 52 43 48 42 4C 41 45 54 |"..3. DURCHBLAET|
00000120: 54 45 52 4E 22 00 44 09 FA 00 99 A3 35 29 22 11 |TERN".D.....5)".|
00000130: 12 34 92 20 46 41 52 42 45 49 4E 53 54 45 4C 4C |.4. FARBEINSTELL|
00000140: 55 4E 47 22 00 5B 09 04 01 99 A3 35 29 22 11 12 |UNG".[.....5)"..|
00000150: 35 92 20 42 45 45 4E 44 45 4E 22 00 90 09 0E 01 |5. BEENDEN".....|
00000160: 99 22 11 11 11 9A 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E |."....<><><><><>|
00000170: 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E |<><><><><><><><>|
00000180: 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 3C 3E 05 22 |<><><><><><><>."|
00000190: 00 9B 09 13 01 97 31 39 38 2C 30 00 AE 09 18 01 |......198,0.....|
000001A0: A1 41 24 3A 8B 41 24 B2 22 22 A7 32 38 30 00 C7 |.A$:.A$."".280..|
000001B0: 09 2C 01 41 B2 C5 28 41 24 29 3A 8B 41 B3 31 B0 |.,.A..(A$):.A.1.|
000001C0: 41 B1 35 A7 32 37 35 00 E5 09 36 01 91 41 89 36 |A.5.275...6..A.6|
000001D0: 30 30 2C 34 30 30 2C 38 30 30 2C 36 31 30 30 30 |00,400,800,61000|
000001E0: 2C 31 35 30 30 00 F9 09 8F 01 8F 2A 2A 2A 2A 53 |,1500......****S|
000001F0: 55 43 48 45 4E 2A 2A 2A 2A 00 18 0A 90 01 99 22 |UCHEN****......"|
00000200: 93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 |. .|
00000210: 53 55 43 48 45 4E 92 22 00 45 0A 95 01 99 22 11 |SUCHEN.".E....".|
00000220: 53 49 45 20 42 52 41 55 43 48 45 4E 20 4E 55 52 |SIE BRAUCHEN NUR|
00000230: 20 44 45 4E 20 4E 41 4D 45 4E 20 41 4E 5A 55 47 | DEN NAMEN ANZUG|
00000240: 45 42 45 4E 22 00 7F 0A 9A 01 99 22 11 11 11 11 |EBEN"......"....|
00000250: 11 11 11 11 22 3A 4E 41 24 B2 22 22 3A 44 41 24 |....":NA$."":DA$|
00000260: B2 22 22 3A 53 54 24 B2 22 22 3A 52 4F 24 B2 22 |."":ST$."":RO$."|
00000270: 22 3A 54 45 24 B2 22 22 3A 42 45 24 B2 22 22 00 |":TE$."":BE$."".|
00000280: B9 0A A4 01 85 22 11 42 49 54 54 45 20 4E 41 4D |.....".BITTE NAM|
00000290: 45 4E 20 45 49 4E 47 45 42 45 4E 22 3B 4E 41 24 |EN EINGEBEN";NA$|
000002A0: 3A 8C 3A 4C 4C B2 C3 28 4E 41 24 29 3A 8B 4E 41 |:.:LL..(NA$):.NA|
000002B0: 24 B2 22 5F 22 A7 32 30 35 00 CA 0A A9 01 8B 4E |$."_".205......N|
000002C0: 41 24 B2 22 22 A7 89 34 30 30 00 FB 0A AE 01 87 |A$.""..400......|
000002D0: 44 41 24 3A 8B 4E 41 24 B2 C8 28 44 41 24 2C 4C |DA$:.NA$..(DA$,L|
000002E0: 4C 29 A7 87 53 54 24 3A 87 52 4F 24 3A 87 54 45 |L)..ST$:.RO$:.TE|
000002F0: 24 3A 87 42 45 24 3A 89 34 35 30 00 2C 0B B1 01 |$:.BE$:.450.,...|
00000300: 8B 44 41 24 B2 22 5E 22 A7 99 22 11 4E 49 43 48 |.DA$."^"..".NICH|
00000310: 54 20 47 45 46 55 4E 44 45 4E 22 3A 81 49 B2 30 |T GEFUNDEN":.I.0|
00000320: A4 32 30 30 30 3A 82 3A 89 34 30 30 00 35 0B B3 |.2000:.:.400.5..|
00000330: 01 89 34 33 30 00 51 0B C2 01 99 22 93 11 11 11 |..430.Q...."....|
00000340: 20 4E 41 4D 45 20 20 20 20 20 3A 20 22 3B 44 41 | NAME : ";DA|
00000350: 24 00 6A 0B CC 01 99 22 11 20 53 54 52 41 53 53 |$.j....". STRASS|
00000360: 45 20 20 3A 20 22 3B 53 54 24 00 83 0B D6 01 99 |E : ";ST$......|
00000370: 22 11 20 4F 52 54 20 20 20 20 20 20 3A 20 22 3B |". ORT : ";|
00000380: 52 4F 24 00 9C 0B E0 01 99 22 11 20 54 45 4C 45 |RO$......". TELE|
00000390: 46 4F 4E 20 20 3A 20 22 3B 54 45 24 00 B5 0B EA |FON : ";TE$....|
000003A0: 01 99 22 11 20 42 45 4D 45 52 4B 55 4E 47 3A 20 |..". BEMERKUNG: |
000003B0: 22 3B 42 45 24 00 DE 0B EF 01 99 22 11 11 11 20 |";BE$......"... |
000003C0: 12 27 2A 27 3D 4E 4F 43 48 20 45 49 4E 45 20 41 |.'*'=NOCH EINE A|
000003D0: 44 52 45 53 53 45 20 53 55 43 48 45 4E 22 00 04 |DRESSE SUCHEN"..|
000003E0: 0C F4 01 99 22 20 12 27 44 27 3D 41 44 52 45 53 |...." .'D'=ADRES|
000003F0: 53 45 20 41 55 53 44 52 55 43 4B 45 4E 20 20 20 |SE AUSDRUCKEN |
00000400: 20 20 20 22 00 31 0C FE 01 99 22 20 12 27 5F 27 | ".1...." .'_'|
00000410: 3D 4D 45 4E 55 45 20 20 20 20 20 20 20 20 20 20 |=MENUE |
00000420: 20 20 20 20 20 20 20 20 20 22 3A 97 31 39 38 2C | ":.198,|
00000430: 30 00 46 0C 08 02 A1 41 4E 24 3A 8B 41 4E 24 B2 |0.F....AN$:.AN$.|
00000440: 22 22 A7 35 32 30 00 57 0C 0D 02 8B 41 4E 24 B2 |"".520.W....AN$.|
00000450: 22 2A 22 A7 34 30 30 00 69 0C 0E 02 8B 41 4E 24 |"*".400.i....AN$|
00000460: B2 22 44 22 A7 31 30 30 30 00 72 0C 12 02 89 32 |."D".1000.r....2|
00000470: 30 35 00 78 0C 57 02 8F 00 A0 0C 58 02 99 22 93 |05.x.W.....X..".|
00000480: 20 20 20 20 20 20 20 20 20 20 12 44 41 54 41 20 | .DATA |
00000490: 5A 45 49 4C 45 4E 20 46 55 45 4C 4C 45 4E 92 22 |ZEILEN FUELLEN."|
000004A0: 00 C8 0C 5D 02 99 22 11 20 49 43 48 20 57 45 52 |...]..". ICH WER|
000004B0: 44 45 20 4A 45 54 5A 54 20 44 49 45 20 44 41 54 |DE JETZT DIE DAT|
000004C0: 41 20 5A 45 49 4C 45 4E 00 F7 0C 62 02 99 22 11 |A ZEILEN...b..".|
000004D0: 20 4C 49 53 54 45 4E 2C 55 4E 44 20 53 49 45 20 | LISTEN,UND SIE |
000004E0: 4B 4F 45 4E 4E 45 4E 20 44 41 4E 4E 20 49 4D 20 |KOENNEN DANN IM |
000004F0: 4E 4F 52 4D 41 4C 2D 00 23 0D 6C 02 99 22 11 20 |NORMAL-.#.l..". |
00000500: 4D 4F 44 55 53 20 44 49 45 20 44 41 54 41 53 20 |MODUS DIE DATAS |
00000510: 46 55 45 4C 4C 45 4E 2E 42 49 54 54 45 20 47 45 |FUELLEN.BITTE GE|
00000520: 42 45 4E 00 51 0D 71 02 99 22 11 20 53 49 45 20 |BEN.Q.q..". SIE |
00000530: 4E 49 45 20 4D 45 48 52 20 41 4C 53 20 32 30 20 |NIE MEHR ALS 20 |
00000540: 5A 45 49 43 48 45 4E 20 50 52 4F 20 5A 45 49 4C |ZEICHEN PRO ZEIL|
00000550: 45 00 62 0D 72 02 99 22 11 20 45 49 4E 20 21 21 |E.b.r..". EIN !!|
00000560: 21 22 00 91 0D 76 02 99 22 11 20 57 45 4E 4E 20 |!"...v..". WENN |
00000570: 53 49 45 20 46 45 52 54 49 45 47 20 53 49 4E 44 |SIE FERTIEG SIND|
00000580: 2C 44 41 4E 4E 20 53 54 41 52 54 45 4E 20 53 49 |,DANN STARTEN SI|
00000590: 45 00 C0 0D 80 02 99 22 11 20 44 41 53 20 50 52 |E......". DAS PR|
000005A0: 4F 47 52 41 4D 4D 20 4D 49 54 20 27 52 55 4E 27 |OGRAMM MIT 'RUN'|
000005B0: 20 4F 44 45 52 20 27 47 4F 54 4F 20 32 30 30 27 | ODER 'GOTO 200'|
000005C0: 00 E5 0D 8A 02 99 22 11 11 11 11 20 12 52 45 54 |......".... .RET|
000005D0: 55 52 4E 20 44 52 55 45 43 4B 45 4E 92 22 3A 97 |URN DRUECKEN.":.|
000005E0: 31 39 38 2C 30 00 F8 0D 8F 02 A1 41 24 3A 8B 41 |198,0......A$:.A|
000005F0: 24 B2 22 22 A7 36 35 35 00 0E 0E 94 02 99 22 93 |$."".655......".|
00000600: 22 3A 9B 31 30 30 30 30 AB 32 30 30 30 30 00 17 |":.10000.20000..|
00000610: 0E 9E 02 89 36 36 30 00 33 0E 1F 03 8F 2A 2A 2A |....660.3....***|
00000620: 2A 44 55 52 43 48 42 4C 41 45 54 54 45 52 4E 2A |*DURCHBLAETTERN*|
00000630: 2A 2A 2A 00 5B 0E 20 03 99 22 93 20 20 20 20 20 |***.[. ..". |
00000640: 20 20 20 20 12 44 41 54 45 49 20 44 55 52 43 48 | .DATEI DURCH|
00000650: 42 4C 41 45 54 54 45 52 4E 92 22 00 93 0E 21 03 |BLAETTERN."...!.|
00000660: 99 22 11 20 20 20 20 49 43 48 20 42 4C 41 45 54 |.". ICH BLAET|
00000670: 54 45 52 45 20 44 49 45 20 44 41 54 45 49 20 44 |TERE DIE DATEI D|
00000680: 55 52 43 48 22 3A 81 49 B2 30 A4 32 30 30 30 3A |URCH":.I.0.2000:|
00000690: 82 3A 8C 00 A8 0E 25 03 87 44 41 24 3A 8B 44 41 |.:....%..DA$:.DA|
000006A0: 24 B2 22 22 A7 39 37 30 00 C0 0E 2A 03 87 53 54 |$."".970...*..ST|
000006B0: 24 3A 87 52 4F 24 3A 87 54 45 24 3A 87 42 45 24 |$:.RO$:.TE$:.BE$|
000006C0: 00 D9 0E 34 03 99 22 93 11 20 20 4E 41 4D 45 20 |...4..".. NAME |
000006D0: 20 20 20 3A 20 22 44 41 24 00 F1 0E 3E 03 99 22 | : "DA$...>.."|
000006E0: 11 20 20 53 54 41 52 53 53 45 20 3A 20 22 53 54 |. STARSSE : "ST|
000006F0: 24 00 09 0F 48 03 99 22 11 20 20 4F 52 54 20 20 |$...H..". ORT |
00000700: 20 20 20 3A 20 22 52 4F 24 00 21 0F 52 03 99 22 | : "RO$.!.R.."|
00000710: 11 20 20 54 45 4C 45 46 4F 4E 20 3A 20 22 54 45 |. TELEFON : "TE|
00000720: 24 00 39 0F 5C 03 99 22 11 20 20 42 45 4D 45 52 |$.9.\..". BEMER|
00000730: 4B 2E 20 3A 20 22 42 45 24 00 5D 0F 61 03 99 22 |K. : "BE$.].a.."|
00000740: 11 11 11 20 20 57 45 49 54 45 52 20 4D 49 54 20 |... WEITER MIT |
00000750: 53 50 41 43 45 22 3A 97 31 39 38 2C 30 00 72 0F |SPACE":.198,0.r.|
00000760: 66 03 A1 41 43 24 3A 8B 41 43 24 B2 22 22 A7 38 |f..AC$:.AC$."".8|
00000770: 37 30 00 83 0F 6B 03 8B 41 43 24 B2 22 20 22 A7 |70...k..AC$." ".|
00000780: 38 30 35 00 94 0F 70 03 8B 41 43 24 B2 22 5F 22 |805...p..AC$."_"|
00000790: A7 32 30 35 00 9D 0F 7A 03 89 38 37 30 00 DD 0F |.205...z..870...|
000007A0: B6 03 99 22 20 57 45 49 54 45 52 20 4D 49 54 20 |..." WEITER MIT |
000007B0: 27 2A 27 20 20 5A 55 52 55 45 43 4B 20 49 4E 53 |'*' ZURUECK INS|
000007C0: 20 4D 45 4E 55 45 20 27 5F 27 22 3A A1 41 42 24 | MENUE '_'":.AB$|
000007D0: 3A 8B 41 42 24 B2 22 2A 22 A7 38 30 30 00 E6 0F |:.AB$."*".800...|
000007E0: C0 03 89 32 30 35 00 1F 10 CA 03 99 22 11 20 20 |...205......". |
000007F0: 4B 45 49 4E 45 20 41 44 52 45 53 53 45 4E 20 4D |KEINE ADRESSEN M|
00000800: 45 48 52 20 56 4F 52 48 41 4E 44 45 4E 22 3A 81 |EHR VORHANDEN":.|
00000810: 49 B2 30 A4 32 30 30 30 3A 82 3A 89 32 30 35 00 |I.0.2000:.:.205.|
00000820: 28 10 D4 03 89 32 30 35 00 32 10 E8 03 99 22 93 |(....205.2....".|
00000830: 11 22 00 5B 10 FC 03 85 22 11 11 20 44 52 55 43 |.".[....".. DRUC|
00000840: 4B 45 52 20 4F 4B 2C 50 41 50 49 45 52 20 4A 55 |KER OK,PAPIER JU|
00000850: 53 54 49 45 52 54 22 3B 41 4C 24 00 6C 10 06 04 |STIERT";AL$.l...|
00000860: 8B 41 4C 24 B2 22 4E 22 A7 32 30 35 00 75 10 10 |.AL$."N".205.u..|
00000870: 04 9F 34 2C 34 00 80 10 1A 04 98 34 2C 44 41 24 |..4,4......4,DA$|
00000880: 00 8B 10 24 04 98 34 2C 53 54 24 00 96 10 2E 04 |...$..4,ST$.....|
00000890: 98 34 2C 52 4F 24 00 A1 10 38 04 98 34 2C 54 45 |.4,RO$...8..4,TE|
000008A0: 24 00 AC 10 42 04 98 34 2C 42 45 24 00 B3 10 4C |$...B..4,BE$...L|
000008B0: 04 A0 34 00 BC 10 56 04 89 32 30 35 00 C2 10 DC |..4...V..205....|
000008C0: 05 8F 00 E3 10 E6 05 99 22 93 20 20 20 20 20 20 |........". |
000008D0: 20 20 20 20 20 20 20 20 20 12 42 45 45 4E 44 45 | .BEENDE|
000008E0: 4E 92 22 00 0F 11 E7 05 99 22 11 11 11 48 41 42 |N."......"...HAB|
000008F0: 45 4E 20 53 49 45 20 4E 45 55 45 20 44 41 54 45 |EN SIE NEUE DATE|
00000900: 4E 20 45 49 4E 47 45 47 45 42 45 4E 20 3F 22 00 |N EINGEGEBEN ?".|
00000910: 23 11 EB 05 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 |#....A$:.A$."".1|
00000920: 35 31 35 00 34 11 F0 05 8B 41 24 B2 22 4A 22 A7 |515.4....A$."J".|
00000930: 31 35 35 30 00 46 11 FA 05 8B 41 24 B3 B1 22 4E |1550.F....A$.."N|
00000940: 22 A7 31 35 31 30 00 6C 11 04 06 99 22 93 11 1D |".1510.l...."...|
00000950: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 41 55 46 20 57 49 |..........AUF WI|
00000960: 45 44 45 52 53 45 48 45 4E 22 3A 80 00 97 11 0E |EDERSEHEN":.....|
00000970: 06 99 22 11 57 4F 4C 4C 45 4E 20 53 49 45 20 44 |..".WOLLEN SIE D|
00000980: 49 45 20 44 41 54 45 4E 20 41 42 53 50 45 49 43 |IE DATEN ABSPEIC|
00000990: 48 45 52 4E 20 3F 22 00 AB 11 18 06 A1 41 24 3A |HERN ?"......A$:|
000009A0: 8B 41 24 B2 22 22 A7 31 35 36 30 00 BC 11 22 06 |.A$."".1560...".|
000009B0: 8B 41 24 B2 22 4A 22 A7 31 36 30 30 00 CE 11 2C |.A$."J".1600...,|
000009C0: 06 8B 41 24 B3 B1 22 4E 22 A7 31 35 36 30 00 D8 |..A$.."N".1560..|
000009D0: 11 36 06 89 31 35 34 30 00 0C 12 40 06 99 22 11 |.6..1540...@..".|
000009E0: 11 11 11 44 49 53 4B 45 54 54 45 20 45 49 4E 47 |...DISKETTE EING|
000009F0: 45 4C 45 47 54 20 46 4C 4F 50 50 59 20 45 49 4E |ELEGT FLOPPY EIN|
00000A00: 47 45 53 43 48 41 4C 54 45 54 3F 22 00 20 12 4A |GESCHALTET?". .J|
00000A10: 06 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 36 31 30 |..A$:.A$."".1610|
00000A20: 00 32 12 54 06 8B 41 24 B3 B1 22 4A 22 A7 31 36 |.2.T..A$.."J".16|
00000A30: 31 30 00 5C 12 5E 06 99 22 11 11 11 53 41 56 45 |10.\.^.."...SAVE|
00000A40: 22 C7 28 33 34 29 22 40 3A 44 41 54 41 44 52 45 |".(34)"@:DATADRE|
00000A50: 53 53 22 C7 28 33 34 29 22 2C 38 22 00 8F 12 68 |SS".(34)",8"...h|
00000A60: 06 99 22 11 11 11 56 45 52 49 46 59 22 C7 28 33 |.."...VERIFY".(3|
00000A70: 34 29 22 44 41 54 41 44 52 45 53 53 22 C7 28 33 |4)"DATADRESS".(3|
00000A80: 34 29 22 2C 38 91 91 91 91 91 91 91 22 3A 80 00 |4)",8.......":..|
00000A90: 95 12 10 27 83 00 9B 12 1A 27 83 00 A1 12 24 27 |...'.....'....$'|
00000AA0: 83 00 A7 12 2E 27 83 00 AD 12 38 27 83 00 B3 12 |.....'....8'....|
00000AB0: 42 27 83 00 B9 12 4C 27 83 00 BF 12 56 27 83 00 |B'....L'....V'..|
00000AC0: C5 12 60 27 83 00 CB 12 6A 27 83 00 D1 12 74 27 |..`'....j'....t'|
00000AD0: 83 00 D7 12 7E 27 83 00 DD 12 88 27 83 00 E3 12 |....~'.....'....|
00000AE0: 92 27 83 00 E9 12 9C 27 83 00 EF 12 A6 27 83 00 |.'.....'.....'..|
00000AF0: F5 12 B0 27 83 00 FB 12 BA 27 83 00 01 13 C4 27 |...'.....'.....'|
00000B00: 83 00 07 13 CE 27 83 00 0D 13 D8 27 83 00 14 13 |.....'.....'....|
00000B10: 20 4E 83 5E 00 1E 13 50 C3 99 22 93 11 22 00 44 | N.^...P.."..".D|
00000B20: 13 5A C3 56 24 B2 22 20 44 41 54 41 44 52 45 53 |.Z.V$." DATADRES|
00000B30: 53 20 42 59 20 20 4D 41 52 49 4F 20 57 41 4C 54 |S BY MARIO WALT|
00000B40: 48 45 52 22 00 59 13 64 C3 99 A3 34 29 3B 3A 81 |HER".Y.d...4);:.|
00000B50: 49 B2 31 A4 C3 28 56 24 29 00 81 13 6E C3 99 CA |I.1..(V$)...n...|
00000B60: 28 56 24 2C 49 2C 31 29 3B 3A 81 4A B2 31 A4 31 |(V$,I,1);:.J.1.1|
00000B70: 30 30 3A 82 3A 82 3A 81 49 B2 30 A4 35 30 30 3A |00:.:.:.I.0.500:|
00000B80: 82 00 C4 13 78 C3 99 22 11 11 11 11 11 11 11 1D |....x.."........|
00000B90: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 4F 50 59 |............COPY|
00000BA0: 52 49 47 48 54 20 4A 55 4E 49 20 31 39 38 34 20 |RIGHT JUNI 1984 |
00000BB0: 42 59 20 4D 2E 57 2E 22 3A 81 49 B2 30 A4 32 30 |BY M.W.":.I.0.20|
00000BC0: 30 30 3A 82 00 CA 13 82 C3 8E 00 EC 13 48 EE 99 |00:..........H..|
00000BD0: C7 28 31 34 29 3A 8F 20 43 4F 4C 4F 52 20 43 48 |.(14):. COLOR CH|
00000BE0: 41 4E 47 45 20 52 4F 55 54 49 4E 45 00 10 14 49 |ANGE ROUTINE...I|
00000BF0: EE 96 A5 43 28 58 29 B2 C2 28 58 29 AA 31 AA 31 |...C(X)..(X).1.1|
00000C00: 36 AC 28 28 C2 28 58 29 AF 31 35 29 B2 31 35 29 |6.((.(X).15).15)|
00000C10: 00 57 14 4A EE 99 22 93 1D 1D 1D 1D 1D 1D 1D 1D |.W.J..".........|
00000C20: 1D 1D 1D 12 C6 41 52 42 45 49 4E 53 54 45 4C 4C |.....ARBEINSTELL|
00000C30: 55 4E 47 22 3A 99 22 13 20 20 20 20 11 11 11 11 |UNG":.". ....|
00000C40: 12 C6 31 92 3D 20 C6 41 52 42 45 20 44 45 53 20 |..1.= .ARBE DES |
00000C50: D2 41 4E 44 45 53 22 00 7B 14 4B EE 99 22 20 20 |.ANDES".{.K.." |
00000C60: 20 20 11 12 C6 33 92 3D 20 C8 49 4E 54 45 52 47 | ...3.= .INTERG|
00000C70: 52 55 4E 44 2D C6 41 52 42 45 22 00 9F 14 4C EE |RUND-.ARBE"...L.|
00000C80: 99 22 20 20 20 20 11 12 C6 35 92 3D 20 C6 41 52 |." ...5.= .AR|
00000C90: 42 45 20 44 45 52 20 DA 45 49 43 48 45 4E 22 00 |BE DER .EICHEN".|
00000CA0: BC 14 4D EE 99 22 20 20 20 20 11 12 D2 C5 D4 D5 |..M.." ......|
00000CB0: D2 CE 92 20 3D 20 CD C5 CE D5 C5 22 00 CE 14 52 |... = ....."...R|
00000CC0: EE A1 43 24 3A 8B 43 24 89 36 31 30 31 30 00 E3 |..C$:.C$.61010..|
00000CD0: 14 5C EE A1 43 24 3A 8B 43 24 B2 22 22 89 36 31 |.\..C$:.C$."".61|
00000CE0: 30 32 30 00 0A 15 66 EE 43 B2 C6 28 43 24 29 3A |020...f.C..(C$):|
00000CF0: 8B 43 B2 31 33 35 A7 97 36 34 36 2C A5 43 28 36 |.C.135..646,.C(6|
00000D00: 34 36 29 3A 89 36 31 30 30 32 00 36 15 7A EE 43 |46):.61002.6.z.C|
00000D10: B2 C6 28 43 24 29 3A 8B 43 B2 31 33 33 B0 43 B2 |..(C$):.C.133.C.|
00000D20: 31 33 34 A7 58 B2 35 33 31 34 37 AA 43 3A 97 58 |134.X.53147.C:.X|
00000D30: 2C A5 43 28 58 29 00 47 15 84 EE 8B 43 B3 B1 31 |,.C(X).G....C..1|
00000D40: 33 89 36 31 30 31 30 00 58 15 8E EE 99 C7 28 31 |3.61010.X.....(1|
00000D50: 34 32 29 3A 89 32 30 35 00 00 00 |42):.205... |
....D.. *****DATADRESS****.3.N.. *BY MAR
IO WALTHER*.L.X.. * (C) 1984 *.E..
.. ******************.{....53280,0:.5328
1,0...H..50000...M.. ***MENUE***.L.R..".
....<><><><><><><><><><><><><><><><><><>
<><>.......5)".....1. DATAZEILEN FUELLEN
".......5)"..2. SUCHEN".%.....5)"..3. DU
RCHBLAETTERN".D.....5)"..4. FARBEINSTELL
UNG".[.....5)"..5. BEENDEN"......"....<>
<><><><><><><><><><><><><><><><><><><>."
......198,0......A$:.A$."".280.G.,.A.E(A
$):.A.1.A.5.275...6..A.600,400,800,61000
,1500......****SUCHEN****......".
.SUCHEN.".E....".SIE BRAUCHEN NUR
DEN NAMEN ANZUGEBEN"....."........":NA
$."":DA$."":ST$."":RO$."":TE$."":BE$."".
.....".BITTE NAMEN EINGEBEN";NA$:.:LL.C(
NA$):.NA$."_".205.J....NA$.""..400......
DA$:.NA$.H(DA$,LL)..ST$:.RO$:.TE$:.BE$:.
450.,....DA$."^"..".NICHT GEFUNDEN":.I.0
.2000:.:.400.5....430.Q.B..".... NAME
: ";DA$.J.L..". STRASSE : ";ST$...V..
". ORT : ";RO$......". TELEFON : "
;TE$......". BEMERKUNG: ";BE$......"...
.'*'=NOCH EINE ADRESSE SUCHEN"......" .'
D'=ADRESSE AUSDRUCKEN ".1...." .'_'
=MENUE ":.198,0.F....A
N$:.AN$."".520.W....AN$."*".400.I....AN$
."D".1000.R....205.X.W... .X..".
.DATA ZEILEN FUELLEN.".H.]..". ICH WER
DE JETZT DIE DATA ZEILEN...B..". LISTEN,
UND SIE KOENNEN DANN IM NORMAL-.#.L..".
MODUS DIE DATAS FUELLEN.BITTE GEBEN.Q.Q.
.". SIE NIE MEHR ALS 20 ZEICHEN PRO ZEIL
E.B.R..". EIN !!!"...V..". WENN SIE FERT
IEG SIND,DANN STARTEN SIE......". DAS PR
OGRAMM MIT 'RUN' ODER 'GOTO 200'......".
... .RETURN DRUECKEN.":.198,0......A$:.A
$."".655......".":.10000.20000......660.
3....****DURCHBLAETTERN****.[. ..".
.DATEI DURCHBLAETTERN."...!..". I
CH BLAETTERE DIE DATEI DURCH":.I.0.2000:
.:....%..DA$:.DA$."".970...*..ST$:.RO$:.
TE$:.BE$.Y.4..".. NAME : "DA$...>.."
. STARSSE : "ST$...H..". ORT : "RO
$.!.R..". TELEFON : "TE$.9.\..". BEMER
K. : "BE$.].A.."... WEITER MIT SPACE":.
198,0.R.F..AC$:.AC$."".870...K..AC$." ".
805...P..AC$."_".205...Z..870......" WEI
TER MIT '*' ZURUECK INS MENUE '_'":.AB$
:.AB$."*".800......205...J..". KEINE AD
RESSEN MEHR VORHANDEN":.I.0.2000:.:.205.
(.T..205.2...."..".[....".. DRUCKER OK,P
APIER JUSTIERT";AL$.L....AL$."N".205.U..
..4,4......4,DA$...$..4,ST$......4,RO$..
.8..4,TE$...B..4,BE$...L. 4...V..205.B..
........". .BEENDEN.".....
."...HABEN SIE NEUE DATEN EINGEGEBEN ?".
#....A$:.A$."".1515.4....A$."J".1550.F..
..A$.."N".1510.L....".............AUF WI
EDERSEHEN":.......".WOLLEN SIE DIE DATEN
ABSPEICHERN ?"......A$:.A$."".1560...".
.A$."J".1600.N.,..A$.."N".1560.X.6..1540
...@.."....DISKETTE EINGELEGT FLOPPY EIN
GESCHALTET?". .J..A$:.A$."".1610.2.T..A$
.."J".1610.\.^.."...SAVE"G(34)"@:DATADRE
SS"G(34)",8"...H.."...VERIFY"G(34)"DATAD
RESS"G(34)",8.......":.....'.....'....$'
.....'....8'....B'....L'....V'..E.`'..K.
J'..Q.T'..W.~'.....'.....'.....'.....'..
...'.....'....D'....N'....X'.... N.^...P
C."..".D.ZCV$." DATADRESS BY MARIO WALT
HER".Y.DC..4);:.I.1.C(V$)...NC.J(V$,I,1)
;:.J.1.100:.:.:.I.0.500:..D.XC."........
............COPYRIGHT JUNI 1984 BY M.W."
:.I.0.2000:..J..C....H..G(14):. COLOR CH
ANGE ROUTINE...I...C(X).B(X).1.16.((B(X)
.15).15).W.J..".............FARBEINSTELL
UNG":.". .....F1.= FARBE DES RANDES".
{.K.." ..F3.= HINTERGRUND-FARBE"...L.
." ..F5.= FARBE DER ZEICHEN"...M.."
..RETURN. = MENUE".N.R..C$:.C$.61010..
.\..C$:.C$."".61020...F.C.F(C$):.C.135..
646,.C(646):.61002.6.Z.C.F(C$):.C.133.C.
134.X.53147.C:.X,.C(X).G....C..13.61010.
X....G(142):.205...
> CLICK IMAGE PREVIEW FOR FULL MODAL