16.REGISTER
FILE INFORMATION
FILENAME(S): 16.REGISTER
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-11-30 01:07:52
APPEARS ON: 2 disk(s)
FILE HASH
b33a1fe14ffc8a2dd53b03107b82cc1860c9a6d84f5fcaebaba064d97fe1b6f7
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| A NWENDER | 16.REGISTER | PRG | Treasure Chest - Wolfgang Rauprich | 35 | 10 | DOWNLOAD FILE |
| FREEWARE DISK NR | 16.REGISTER | PRG | Treasure Chest - Wolfgang Rauprich | 35 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 01 00 8F 20 20 52 45 47 49 53 54 45 |..&.... REGISTE|
00000010: 52 20 28 45 49 4E 20 44 41 54 45 49 2D 50 52 4F |R (EIN DATEI-PRO|
00000020: 47 52 41 4D 4D 29 00 3C 08 0A 00 97 35 33 32 38 |GRAMM).<....5328|
00000030: 31 2C 30 3A 97 35 33 32 38 30 2C 30 00 47 08 14 |1,0:.53280,0.G..|
00000040: 00 97 36 34 36 2C 37 00 52 08 3C 00 5A B2 32 30 |..646,7.R.<.Z.20|
00000050: 30 30 00 5B 08 64 00 89 34 31 30 00 6E 08 82 00 |00.[.d..410.n...|
00000060: 8F 20 44 41 54 45 4E 45 49 4E 47 41 42 45 00 7A |. DATENEINGABE.z|
00000070: 08 8C 00 5A B2 20 32 30 35 30 00 94 08 90 00 99 |...Z. 2050......|
00000080: C7 28 31 34 37 29 20 22 20 20 41 43 48 54 55 4E |.(147) " ACHTUN|
00000090: 47 20 3A 22 00 C6 08 91 00 99 22 11 11 2D 2D 2D |G :"......"..---|
000000A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000C0: 2D 2D 2D 2D 2D 22 00 EF 08 96 00 99 22 20 47 45 |-----"......" GE|
000000D0: 42 45 4E 20 53 49 45 20 44 49 45 20 44 41 54 45 |BEN SIE DIE DATE|
000000E0: 4E 20 44 55 52 43 48 20 45 49 4E 45 4E 20 22 00 |N DURCH EINEN ".|
000000F0: 18 09 A0 00 99 22 20 53 43 48 52 41 45 47 53 54 |....." SCHRAEGST|
00000100: 52 49 43 48 20 20 3E 2F 3C 20 20 56 4F 4E 45 49 |RICH >/< VONEI|
00000110: 4E 41 4E 44 45 52 20 22 00 35 09 AA 00 99 22 20 |NANDER ".5...." |
00000120: 47 45 54 52 45 4E 4E 54 20 45 49 4E 20 21 20 20 |GETRENNT EIN ! |
00000130: 20 20 20 20 22 00 3D 09 B4 00 99 22 22 00 6D 09 | ".=...."".m.|
00000140: BE 00 99 22 20 4D 41 58 49 4D 41 4C 20 20 53 49 |..." MAXIMAL SI|
00000150: 4E 44 20 20 37 20 20 45 49 4E 47 41 42 45 4E 20 |ND 7 EINGABEN |
00000160: 20 4D 4F 45 47 4C 49 43 48 20 20 21 22 00 9D 09 | MOEGLICH !"...|
00000170: C8 00 99 22 20 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 |..." ...........|
00000180: D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 |................|
00000190: D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 22 00 BA 09 |............"...|
000001A0: D2 00 99 22 20 3E 52 45 54 55 52 4E 3C 20 3D 20 |..." >RETURN< = |
000001B0: 4D 45 4E 55 45 20 20 20 20 22 00 CD 09 E1 00 8B |MENUE "......|
000001C0: 20 B8 28 30 29 B1 39 30 30 A7 37 30 30 00 DC 09 | .(0).900.700...|
000001D0: E6 00 85 22 BF 9D 9D 9D 22 3B 46 24 00 ED 09 F0 |..."....";F$....|
000001E0: 00 8B 20 46 24 B2 22 BF 22 A7 34 31 30 00 06 0A |.. F$.".".410...|
000001F0: FA 00 99 22 93 11 11 11 22 3B 5A 3B 22 44 41 54 |..."....";Z;"DAT|
00000200: 41 20 22 3B 46 24 00 24 0A 04 01 99 22 31 34 30 |A ";F$.$...."140|
00000210: 20 5A 3D 22 3B 5A AA 31 30 3A 99 22 47 4F 54 4F | Z=";Z.10:."GOTO|
00000220: 31 33 30 22 00 4E 0A 0E 01 97 36 33 31 2C 31 33 |130".N....631,13|
00000230: 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 33 |:.632,13:.633,13|
00000240: 3A 97 31 39 38 2C 33 3A 99 22 13 22 3A 80 00 5A |:.198,3:.".":..Z|
00000250: 0A 9A 01 8F 20 4D 45 4E 55 45 00 8D 0A 9F 01 99 |.... MENUE......|
00000260: 22 93 12 20 20 2A 20 52 45 47 49 53 54 45 52 20 |".. * REGISTER |
00000270: 2A 20 52 45 47 49 53 54 45 52 20 2A 20 52 45 47 |* REGISTER * REG|
00000280: 49 53 54 45 52 20 2A 20 20 20 20 92 22 00 93 0A |ISTER * ."...|
00000290: A4 01 99 00 C5 0A B8 01 99 22 12 20 20 2A 20 52 |.........". * R|
000002A0: 45 47 49 53 54 45 52 20 2A 20 52 45 47 49 53 54 |EGISTER * REGIST|
000002B0: 45 52 20 2A 20 52 45 47 49 53 54 45 52 20 2A 20 |ER * REGISTER * |
000002C0: 20 20 20 92 22 00 D8 0A CC 01 99 22 11 1D 1D 4D | ."......"...M|
000002D0: 45 4E 55 45 20 3A 20 22 00 E9 0A CD 01 99 22 1D |ENUE : "......".|
000002E0: 1D B8 B8 B8 B8 B8 B8 B8 22 00 04 0B E9 01 99 22 |........"......"|
000002F0: 11 1D 1D 12 31 92 20 44 41 54 45 4E 45 49 4E 47 |....1. DATENEING|
00000300: 41 42 45 22 00 1E 0B EC 01 99 22 1D 1D 12 32 92 |ABE"......"...2.|
00000310: 20 44 41 54 45 4E 41 55 53 47 41 42 45 22 00 3E | DATENAUSGABE".>|
00000320: 0B EE 01 99 22 1D 1D 12 33 92 20 53 4F 52 54 49 |...."...3. SORTI|
00000330: 45 52 55 4E 47 20 28 41 4C 50 48 2E 29 22 00 5B |ERUNG (ALPH.)".[|
00000340: 0B F0 01 99 22 1D 1D 12 34 92 20 41 44 52 45 53 |...."...4. ADRES|
00000350: 53 45 4E 20 53 55 43 48 45 4E 22 00 78 0B F2 01 |SEN SUCHEN".x...|
00000360: 99 22 1D 1D 12 35 92 20 41 44 52 45 53 53 41 45 |."...5. ADRESSAE|
00000370: 4E 44 45 52 55 4E 47 22 00 92 0B F4 01 99 22 1D |NDERUNG"......".|
00000380: 1D 12 36 92 20 50 52 4F 47 52 41 4D 4D 45 4E 44 |..6. PROGRAMMEND|
00000390: 45 22 00 A6 0B FE 01 A1 20 41 24 3A 8B 41 24 B2 |E"...... A$:.A$.|
000003A0: 22 22 A7 35 31 30 00 CE 0B 08 02 91 20 C5 28 41 |"".510...... .(A|
000003B0: 24 29 89 31 34 30 2C 31 35 35 30 2C 38 35 30 2C |$).140,1550,850,|
000003C0: 31 32 30 30 2C 31 37 35 30 2C 31 39 30 30 00 D7 |1200,1750,1900..|
000003D0: 0B 12 02 89 35 31 30 00 F2 0B 26 02 8F 20 53 46 |....510...&.. SF|
000003E0: 45 4C 44 20 56 4F 4E 20 42 24 20 54 52 45 4E 4E |ELD VON B$ TRENN|
000003F0: 45 4E 00 04 0C 30 02 86 4E 24 28 4E 29 3A 81 49 |EN...0..N$(N):.I|
00000400: B2 30 A4 4E 00 0D 0C 3A 02 4C 4C B2 30 00 19 0C |.0.N...:.LL.0...|
00000410: 3C 02 4C 4C B2 4C 4C AA 31 00 30 0C 44 02 8B 4C |<.LL.LL.1.0.D..L|
00000420: 4C B2 C3 28 42 24 28 49 29 29 AA 31 A7 35 39 35 |L..(B$(I)).1.595|
00000430: 00 4B 0C 49 02 8B CA 28 42 24 28 49 29 2C 4C 4C |.K.I...(B$(I),LL|
00000440: 2C 31 29 B2 22 2F 22 A7 35 39 35 00 6E 0C 4E 02 |,1)."/".595.n.N.|
00000450: 4E 24 28 49 29 B2 4E 24 28 49 29 AA CA 28 42 24 |N$(I).N$(I)..(B$|
00000460: 28 49 29 2C 4C 4C 2C 31 29 3A 89 35 37 32 00 74 |(I),LL,1):.572.t|
00000470: 0C 53 02 82 00 7A 0C 57 02 8E 00 AC 0C BC 02 99 |.S...z.W........|
00000480: 22 11 20 20 4B 45 49 4E 20 53 50 45 49 43 48 45 |". KEIN SPEICHE|
00000490: 52 50 4C 41 54 5A 20 20 20 20 20 4D 45 48 52 20 |RPLATZ MEHR |
000004A0: 56 45 52 46 55 45 47 42 41 52 21 22 00 C1 0C C0 |VERFUEGBAR!"....|
000004B0: 02 81 49 B2 31 A4 35 30 30 30 3A 82 3A 89 34 31 |..I.1.5000:.:.41|
000004C0: 30 00 EC 0C EE 02 99 22 12 91 91 20 44 52 55 43 |0......"... DRUC|
000004D0: 4B 45 52 20 45 49 4E 53 43 48 41 4C 54 45 4E 21 |KER EINSCHALTEN!|
000004E0: 21 20 3E 52 45 54 55 52 4E 3C 20 22 00 12 0D F3 |! >RETURN< "....|
000004F0: 02 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A 99 |..198,0:.198,1:.|
00000500: 22 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 4F 4B 21 22 |"...........OK!"|
00000510: 3A 8E 00 4D 0D 52 03 99 C7 28 31 34 37 29 22 11 |:..M.R...(147)".|
00000520: 11 20 53 4F 52 54 49 45 52 55 4E 47 20 21 20 42 |. SORTIERUNG ! B|
00000530: 49 54 54 45 20 57 41 52 54 45 4E 20 21 20 22 3A |ITTE WARTEN ! ":|
00000540: 4E B2 31 3A 8D 38 36 30 3A 89 38 37 30 00 6B 0D |N.1:.860:.870.k.|
00000550: 5C 03 87 41 24 3A 8B 20 41 24 B2 22 2A 2A 2A 2A |\..A$:. A$."****|
00000560: 22 A7 8C 3A 4E B2 4E AB 31 3A 8E 00 7A 0D 61 03 |"..:N.N.1:..z.a.|
00000570: 4E B2 4E AA 31 3A 89 38 36 30 00 A6 0D 66 03 4E |N.N.1:.860...f.N|
00000580: B2 4E AB 31 20 3A 86 20 42 24 28 4E 29 3A 81 58 |.N.1 :. B$(N):.X|
00000590: B2 30 A4 4E 20 20 3A 87 42 24 28 58 29 3A 82 3A |.0.N :.B$(X):.:|
000005A0: 8C 3A 8D 35 35 30 00 B9 0D 68 03 99 22 93 22 3A |.:.550...h..".":|
000005B0: 8D 38 37 35 3A 89 38 38 30 00 E6 0D 6B 03 99 22 |.875:.880...k.."|
000005C0: 13 12 20 20 20 20 41 4C 50 48 41 42 45 54 49 53 |.. ALPHABETIS|
000005D0: 43 48 45 20 53 4F 52 54 49 45 52 55 4E 47 20 20 |CHE SORTIERUNG |
000005E0: 20 20 92 22 3A 8E 00 F7 0D 70 03 81 49 B2 30 A4 | .":....p..I.0.|
000005F0: 4E AB 31 3A 4B B2 49 00 04 0E 7A 03 81 4A B2 49 |N.1:K.I...z..J.I|
00000600: AA 31 A4 4E 00 19 0E 84 03 8B 4E 24 28 4A 29 B3 |.1.N......N$(J).|
00000610: 4E 24 28 4B 29 A7 4B B2 4A 00 20 0E 8E 03 82 4A |N$(K).K.J. ....J|
00000620: 00 42 0E 98 03 58 24 B2 4E 24 28 4B 29 3A 4E 24 |.B...X$.N$(K):N$|
00000630: 28 4B 29 B2 4E 24 28 49 29 3A 4E 24 28 49 29 B2 |(K).N$(I):N$(I).|
00000640: 58 24 00 49 0E A2 03 82 49 00 58 0E A7 03 46 24 |X$.I....I.X...F$|
00000650: B2 22 11 22 3A 4C B2 31 00 86 0E AC 03 81 49 B2 |.".":L.1......I.|
00000660: 31 A4 4E 3A 8D 31 30 35 30 3A 99 46 46 24 3B 4E |1.N:.1050:.FF$;N|
00000670: 24 28 49 29 3A 4C B2 4C AA 31 3A 8B 4C B2 31 37 |$(I):L.L.1:.L.17|
00000680: A7 8D 31 35 30 30 00 9B 0E B1 03 8D 38 37 35 3A |..1500......875:|
00000690: 46 46 24 B2 46 46 24 AA 46 24 3A 00 AB 0E B6 03 |FF$.FF$.F$:.....|
000006A0: 81 4B B2 31 A4 33 30 30 3A 82 4B 00 B1 0E B7 03 |.K.1.300:.K.....|
000006B0: 82 00 DC 0E F1 03 3A 99 46 46 24 3B 22 1D 41 4C |......:.FF$;".AL|
000006C0: 4C 45 20 4E 41 4D 45 4E 20 53 4F 52 54 49 45 52 |LE NAMEN SORTIER|
000006D0: 54 21 20 3E 52 45 54 55 52 4E 3C 22 00 EE 0E F2 |T! >RETURN<"....|
000006E0: 03 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 00 03 |..198,0:.198,1..|
000006F0: 0F FC 03 8B C2 28 36 33 31 29 B3 B1 31 33 A7 31 |.....(631)..13.1|
00000700: 30 31 30 00 15 0F 06 04 97 31 39 38 2C 30 3A 9C |010......198,0:.|
00000710: 3A 89 34 31 30 00 28 0F 1A 04 41 53 B2 C6 28 4E |:.410.(...AS..(N|
00000720: 24 28 49 29 29 AB 36 34 00 4E 0F 4C 04 91 41 53 |$(I)).64.N.L..AS|
00000730: 89 31 31 31 31 2C 31 31 31 33 2C 31 31 31 34 2C |.1111,1113,1114,|
00000740: 31 31 31 35 2C 31 31 31 36 2C 31 31 31 37 00 60 |1115,1116,1117.`|
00000750: 0F 51 04 41 53 B2 41 53 AB 36 3A 89 31 31 30 30 |.Q.AS.AS.6:.1100|
00000760: 00 6C 0F 57 04 99 22 05 22 3B 3A 8E 00 78 0F 59 |.l.W..".";:..x.Y|
00000770: 04 99 22 05 22 3B 3A 8E 00 84 0F 5A 04 99 22 05 |..".";:....Z..".|
00000780: 22 3B 3A 8E 00 90 0F 5B 04 99 22 05 22 3B 3A 8E |";:....[..".";:.|
00000790: 00 9C 0F 5C 04 99 22 05 22 3B 3A 8E 00 A8 0F 5D |...\..".";:....]|
000007A0: 04 99 22 05 22 3B 3A 8E 00 D5 0F B0 04 99 C7 28 |..".";:........(|
000007B0: 31 34 37 29 22 53 55 43 48 45 4E 20 21 20 20 20 |147)"SUCHEN ! |
000007C0: 42 49 54 54 45 20 45 54 57 41 53 20 47 45 44 55 |BITTE ETWAS GEDU|
000007D0: 4C 44 1D 21 22 00 FA 0F B2 04 8D 38 36 30 3A 86 |LD.!"......860:.|
000007E0: 42 24 28 4E 29 3A 81 4B B2 30 A4 4E 3A 87 42 24 |B$(N):.K.0.N:.B$|
000007F0: 28 4B 29 3A 82 3A 8D 35 35 30 00 24 10 B5 04 99 |(K):.:.550.$....|
00000800: 22 93 1D 53 55 43 48 45 4E 20 45 49 4E 45 52 20 |"..SUCHEN EINER |
00000810: 41 44 52 45 53 53 45 20 20 3E 52 45 54 55 52 4E |ADRESSE >RETURN|
00000820: 3C 20 22 3A 00 38 10 BA 04 99 22 11 11 11 20 4E |< ":.8...."... N|
00000830: 41 4D 45 3A 20 20 22 3B 00 56 10 C4 04 85 22 A6 |AME: ";.V....".|
00000840: 9D 9D 9D 22 3B 4E 41 24 3A 8B 4E 41 24 B2 22 A6 |...";NA$:.NA$.".|
00000850: 22 A7 31 34 39 30 00 77 10 CE 04 81 4B B2 30 A4 |".1490.w....K.0.|
00000860: 4E 3A 8B 4E 41 24 B2 4E 24 28 4B 29 A7 4B 32 B2 |N:.NA$.N$(K).K2.|
00000870: 4B 3A 89 31 32 35 30 00 7D 10 D8 04 82 00 AB 10 |K:.1250.}.......|
00000880: DD 04 99 22 11 11 11 20 44 49 45 20 41 44 52 45 |..."... DIE ADRE|
00000890: 53 53 45 20 49 53 54 20 4E 49 43 48 54 20 47 45 |SSE IST NICHT GE|
000008A0: 53 50 45 49 43 48 45 52 54 20 22 00 C2 10 DE 04 |SPEICHERT ".....|
000008B0: 81 4C 54 B2 31 A4 32 30 30 30 3A 82 3A 89 31 32 |.LT.1.2000:.:.12|
000008C0: 30 35 00 E5 10 E2 04 4A B2 4B 32 3A 4B 32 B2 31 |05.....J.K2:K2.1|
000008D0: 3A 8D 31 36 30 33 3A 99 22 11 11 20 3E 54 41 53 |:.1603:.".. >TAS|
000008E0: 54 45 3C 20 22 00 FE 10 E4 04 97 31 39 38 2C 30 |TE< "......198,0|
000008F0: 3A 92 31 39 38 2C 31 3A 97 31 39 38 2C 30 00 08 |:.198,1:.198,0..|
00000900: 11 E7 04 89 31 32 30 35 00 13 11 D2 05 9C 3A 89 |....1205......:.|
00000910: 34 31 30 00 1D 11 DB 05 89 31 39 39 39 00 42 11 |410......1999.B.|
00000920: DC 05 4C B2 31 3A 99 22 11 20 3E 54 41 53 54 45 |..L.1:.". >TASTE|
00000930: 3C 20 20 22 3A 97 31 39 38 2C 30 3A 92 31 39 38 |< ":.198,0:.198|
00000940: 2C 31 00 59 11 E6 05 99 22 93 22 3A 8D 38 37 35 |,1.Y....".":.875|
00000950: 3A 46 46 24 B2 22 22 3A 8E 00 7A 11 0E 06 99 22 |:FF$."":..z...."|
00000960: 93 1D 41 55 53 47 41 42 45 20 41 4C 4C 45 52 20 |..AUSGABE ALLER |
00000970: 41 44 52 45 53 53 45 4E 20 22 00 94 11 18 06 99 |ADRESSEN "......|
00000980: 22 11 11 20 20 41 55 53 47 41 42 45 47 45 52 41 |".. AUSGABEGERA|
00000990: 45 54 3A 22 00 AB 11 22 06 99 22 11 20 20 20 12 |ET:"..."..". .|
000009A0: 31 92 20 44 52 55 43 4B 45 52 22 00 C4 11 2C 06 |1. DRUCKER"...,.|
000009B0: 99 22 20 20 20 12 32 92 20 42 49 4C 44 53 43 48 |." .2. BILDSCH|
000009C0: 49 52 4D 22 00 E0 11 36 06 99 22 11 11 11 20 20 |IRM"...6.."... |
000009D0: 3E 31 3C 20 20 4F 44 45 52 20 20 3E 32 3C 20 22 |>1< ODER >2< "|
000009E0: 00 F5 11 37 06 A1 20 44 24 3A 8B 44 24 B2 22 22 |...7.. D$:.D$.""|
000009F0: A7 31 35 39 31 00 0B 12 38 06 91 20 C5 28 44 24 |.1591...8.. .(D$|
00000A00: 29 89 31 35 39 35 2C 31 35 39 36 00 15 12 3A 06 |).1595,1596...:.|
00000A10: 89 31 35 39 31 00 3B 12 3B 06 41 47 B2 34 3A 8D |.1591.;.;.AG.4:.|
00000A20: 37 35 30 20 3A 9F 34 2C 34 3A 8D 31 36 30 30 3A |750 :.4,4:.1600:|
00000A30: A0 34 3A 8C 3A 9C 3A 89 34 31 30 00 41 12 3C 06 |.4:.:.:.410.A.<.|
00000A40: 8F 00 59 12 3D 06 41 47 B2 33 3A 8D 31 36 30 30 |..Y.=.AG.3:.1600|
00000A50: 3A 8C 3A 9C 3A 89 34 31 30 00 74 12 40 06 8D 38 |:.:.:.410.t.@..8|
00000A60: 36 30 3A 86 42 24 28 4E AA 31 29 3A 81 4A B2 31 |60:.B$(N.1):.J.1|
00000A70: A4 4E AA 31 00 80 12 42 06 3A 87 42 24 28 4A 29 |.N.1...B.:.B$(J)|
00000A80: 00 98 12 43 06 81 43 B2 30 A4 37 3A 43 24 28 43 |...C..C.0.7:C$(C|
00000A90: 29 B2 22 20 22 3A 82 43 00 A4 12 44 06 49 B2 30 |)." ":.C...D.I.0|
00000AA0: 3A 43 B2 31 00 AE 12 45 06 49 B2 49 AA 31 00 C5 |:C.1...E.I.I.1..|
00000AB0: 12 47 06 8B 49 B2 C3 28 42 24 28 4A 29 29 AA 31 |.G..I..(B$(J)).1|
00000AC0: A7 31 36 31 35 00 E7 12 4A 06 8B CA 28 42 24 28 |.1615...J...(B$(|
00000AD0: 4A 29 2C 49 2C 31 29 B2 22 2F 22 A7 43 B2 43 AA |J),I,1)."/".C.C.|
00000AE0: 31 3A 89 31 36 30 35 00 0A 13 4C 06 43 24 28 43 |1:.1605...L.C$(C|
00000AF0: 29 B2 43 24 28 43 29 AA CA 28 42 24 28 4A 29 2C |).C$(C)..(B$(J),|
00000B00: 49 2C 31 29 3A 89 31 36 30 35 00 1C 13 4F 06 8B |I,1):.1605...O..|
00000B10: 4B 32 B1 30 A7 8D 31 36 37 30 3A 8E 00 28 13 50 |K2.0..1670:..(.P|
00000B20: 06 8D 31 36 35 30 3A 82 00 39 13 52 06 99 22 20 |..1650:..9.R.." |
00000B30: 3E 52 45 54 55 52 4E 3C 22 00 58 13 53 06 97 31 |>RETURN<".X.S..1|
00000B40: 39 38 2C 30 3A 92 31 39 38 2C 31 3A 8B C2 28 36 |98,0:.198,1:..(6|
00000B50: 33 31 29 B2 31 33 A7 8E 00 62 13 54 06 89 31 36 |31).13...b.T..16|
00000B60: 31 39 00 72 13 72 06 8B 41 47 B2 34 A7 89 31 37 |19.r.r..AG.4..17|
00000B70: 30 30 00 AD 13 7C 06 42 49 B2 42 49 AA 31 3A 8B |00...|.BI.BI.1:.|
00000B80: 42 49 B2 32 A7 42 49 B2 30 3A 99 22 20 3E 54 41 |BI.2.BI.0:." >TA|
00000B90: 53 54 45 3C 20 22 3B 3A 97 31 39 38 2C 30 3A 92 |STE< ";:.198,0:.|
00000BA0: 31 39 38 2C 31 3A 99 C7 28 31 34 37 29 00 C8 13 |198,1:..(147)...|
00000BB0: 86 06 81 43 B2 30 A4 37 3A 99 22 9D 22 3B 43 24 |...C.0.7:.".";C$|
00000BC0: 28 43 29 3A 82 43 3A 8E 00 DD 13 A4 06 8F 20 44 |(C):.C:....... D|
00000BD0: 52 55 43 4B 45 52 20 4F 55 54 50 55 54 00 08 14 |RUCKER OUTPUT...|
00000BE0: AE 06 81 43 B2 30 A4 37 3A 98 34 2C 22 20 20 20 |...C.0.7:.4," |
00000BF0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 43 24 | ";C$|
00000C00: 28 43 29 20 3A 82 3A 8E 00 1C 14 D6 06 99 22 93 |(C) :.:.......".|
00000C10: 20 20 41 43 48 54 55 4E 47 20 3A 22 00 4C 14 E0 | ACHTUNG :".L..|
00000C20: 06 99 22 11 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..".------------|
00000C30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000C40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 7C 14 EA |-----------".|..|
00000C50: 06 99 22 20 41 4E 47 41 42 45 4E 20 48 49 4E 54 |.." ANGABEN HINT|
00000C60: 45 52 20 3E 44 41 54 41 3C 20 41 45 4E 44 45 52 |ER >DATA< AENDER|
00000C70: 4E 20 21 20 20 20 20 20 20 20 20 22 00 AC 14 F4 |N ! "....|
00000C80: 06 99 22 20 4C 49 53 54 45 4E 20 56 45 52 4C 41 |.." LISTEN VERLA|
00000C90: 4E 47 53 41 4D 45 4E 20 44 55 52 43 48 20 3E 43 |NGSAMEN DURCH >C|
00000CA0: 54 52 4C 3C 20 20 20 20 20 20 20 22 00 DC 14 FE |TRL< "....|
00000CB0: 06 99 22 20 4C 49 53 54 45 4E 20 53 54 4F 50 50 |.." LISTEN STOPP|
00000CC0: 45 4E 20 44 55 52 43 48 20 3E 52 55 4E 2F 53 54 |EN DURCH >RUN/ST|
00000CD0: 4F 50 3C 20 20 20 20 20 20 20 20 22 00 E4 14 08 |OP< "....|
00000CE0: 07 99 22 22 00 01 15 12 07 99 22 20 4E 45 55 53 |..""......" NEUS|
00000CF0: 54 41 52 54 20 44 55 52 43 48 20 3E 52 55 4E 3C |TART DURCH >RUN<|
00000D00: 22 00 31 15 1C 07 99 22 D1 D1 D1 D1 D1 D1 D1 D1 |".1...."........|
00000D10: D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 |................|
00000D20: D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 D1 |................|
00000D30: 22 00 6C 15 26 07 99 22 11 11 11 4C 49 53 54 32 |".l.&.."...LIST2|
00000D40: 30 30 30 2D 20 3A 20 5B 52 45 54 55 52 4E 5D 20 |000- : [RETURN] |
00000D50: 22 3A 81 4B B2 31 A4 34 30 30 30 3A 82 3A 97 36 |":.K.1.4000:.:.6|
00000D60: 33 31 2C 31 33 3A 97 31 39 38 2C 31 00 72 15 2B |31,13:.198,1.r.+|
00000D70: 07 80 00 7B 15 6B 07 89 34 31 30 00 84 15 6C 07 |...{.k..410...l.|
00000D80: 56 B2 20 32 00 CD 15 6E 07 99 22 93 11 11 11 31 |V. 2...n.."....1|
00000D90: 39 30 30 20 56 3D 22 3B 56 AA 31 3A 99 22 56 3D |900 V=";V.1:."V=|
00000DA0: 22 3B 56 3B 22 3A 47 4F 54 4F 31 39 30 34 22 3A |";V;":GOTO1904":|
00000DB0: 97 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A |.631,13:.632,13:|
00000DC0: 97 31 39 38 2C 32 3A 99 22 13 22 3A 80 00 1B 16 |.198,2:.".":....|
00000DD0: 70 07 99 22 93 1C 12 20 4B 41 53 53 45 54 54 45 |p.."... KASSETTE|
00000DE0: 20 45 49 4E 4C 45 47 45 4E 20 55 4E 44 20 44 49 | EINLEGEN UND DI|
00000DF0: 45 20 54 41 53 54 45 4E 20 52 45 43 20 2B 20 50 |E TASTEN REC + P|
00000E00: 4C 41 59 20 20 20 20 20 20 20 44 52 55 45 43 4B |LAY DRUECK|
00000E10: 45 4E 20 20 20 20 20 20 20 92 22 00 48 16 71 07 |EN .".H.q.|
00000E20: 99 22 13 11 11 11 11 11 11 53 41 56 45 22 3B C7 |.".......SAVE";.|
00000E30: 28 33 34 29 3B 22 93 41 44 52 45 53 53 45 4E 22 |(34);".ADRESSEN"|
00000E40: 3B 56 3B C7 28 33 34 29 00 66 16 76 07 97 36 33 |;V;.(34).f.v..63|
00000E50: 31 2C 31 33 3A 97 31 39 38 2C 31 3A 99 22 13 11 |1,13:.198,1:."..|
00000E60: 11 11 90 22 3A 80 00 6F 16 CF 07 89 34 31 30 00 |...":..o....410.|
00000E70: 75 16 D0 07 83 00 92 16 DA 07 83 20 43 4F 4D 4D |u.......... COMM|
00000E80: 4F 44 4F 52 45 2F 36 34 2F 55 4E 4C 49 4D 49 54 |ODORE/64/UNLIMIT|
00000E90: 45 44 00 9E 16 60 EA 83 22 2A 2A 2A 2A 22 00 C1 |ED...`.."****"..|
00000EA0: 16 61 EA 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.a.. ***********|
00000EB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EC0: 2A 00 E4 16 62 EA 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*...b.. ********|
00000ED0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EE0: 2A 2A 2A 2A 00 07 17 63 EA 8F 20 2A 2A 2A 2A 2A |****...c.. *****|
00000EF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000F00: 2A 2A 2A 2A 2A 2A 2A 00 2A 17 6C EA 8F 20 45 4E |*******.*.l.. EN|
00000F10: 44 45 20 44 45 53 20 50 52 4F 47 52 41 4D 4D 4C |DE DES PROGRAMML|
00000F20: 49 53 54 49 4E 47 53 2A 2A 2A 00 4D 17 6E EA 8F |ISTINGS***.M.n..|
00000F30: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00000F40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 00 00 |*************...|
..&.... REGISTER (EIN DATEI-PROGRAMM).<
....53281,0:.53280,0.G....646,7.R.<.Z.20
00.[.D..410.N.... DATENEINGABE.Z...Z. 20
50......G(147) " ACHTUNG :".F...."..---
-------------------------------------"..
...." GEBEN SIE DIE DATEN DURCH EINEN ".
.. .." SCHRAEGSTRICH >/< VONEINANDER "
.5...." GETRENNT EIN ! ".=...."".M.
..." MAXIMAL SIND 7 EINGABEN MOEGLIC
H !"...H.." QQQQQQQQQQQQQQQQQQQQQQQQQQQ
QQQQQQQQQQQQ"...R.." >RETURN< = MENUE
".M.... .(0).900.700......"....";F$....
.. F$.".".410......"....";Z;"DATA ";F$.$
...."140 Z=";Z.10:."GOTO130".N....631,13
:.632,13:.633,13:.198,3:.".":..Z.... MEN
UE......".. * REGISTER * REGISTER * REG
ISTER * .".......E....". * REGISTER
* REGISTER * REGISTER * .".X.L.."...M
ENUE : "...M.."........."......"....1. D
ATENEINGABE"......"...2. DATENAUSGABE".>
...."...3. SORTIERUNG (ALPH.)".[...."...
4. ADRESSEN SUCHEN".X...."...5. ADRESSAE
NDERUNG"......"...6. PROGRAMMENDE"......
A$:.A$."".510.N.... E(A$).140,1550,850,
1200,1750,1900.W....510...&.. SFELD VON
B$ TRENNEN...0..N$(N):.I.0.N...:.LL.0...
<.LL.LL.1.0.D..LL.C(B$(I)).1.595.K.I..J(
B$(I),LL,1)."/".595.N.N.N$(I).N$(I).J(B$
(I),LL,1):.572.T.S...Z.W........". KEIN
SPEICHERPLATZ MEHR VERFUEGBAR!".A..
..I.1.5000:.:.410......"... DRUCKER EINS
CHALTEN!! >RETURN< "......198,0:.198,1:.
"...........OK!":..M.R..G(147)".. SORTIE
RUNG ! BITTE WARTEN ! ":N.1:.860:.870.K.
\..A$:. A$."****"..:N.N.1:..Z.A.N.N.1:.8
60...F.N.N.1 :. B$(N):.X.0.N :.B$(X):.:
.:.550...H..".":.875:.880...K..".. AL
PHABETISCHE SORTIERUNG .":....P..I.0.
N.1:K.I...Z..J.I.1.N......N$(J).N$(K).K.
J. ....J.B...X$.N$(K):N$(K).N$(I):N$(I).
X$.I....I.X...F$.".":L.1......I.1.N:.105
0:.FF$;N$(I):L.L.1:.L.17..1500......875:
FF$.FF$.F$:......K.1.300:.K...........:.
FF$;".ALLE NAMEN SORTIERT! >RETURN<"....
..198,0:.198,1......B(631)..13.1010.....
.198,0:.:.410.(...AS.F(N$(I)).64.N.L..AS
.1111,1113,1114,1115,1116,1117.`.Q.AS.AS
.6:.1100.L.W..".";:..X.Y..".";:....Z..".
";:....[..".";:....\..".";:....]..".";:.
.U....G(147)"SUCHEN ! BITTE ETWAS GEDU
LD.!"......860:.B$(N):.K.0.N:.B$(K):.:.5
50.$...."..SUCHEN EINER ADRESSE >RETURN
< ":.8...."... NAME: ";.V.D.."....";NA$
:.NA$.".".1490.W.N..K.0.N:.NA$.N$(K).K2.
K:.1250.}.X........"... DIE ADRESSE IST
NICHT GESPEICHERT ".B....LT.1.2000:.:.12
05.....J.K2:K2.1:.1603:.".. >TASTE< "...
...198,0:.198,1:.198,0......1205...R..:.
410......1999.B...L.1:.". >TASTE< ":.19
8,0:.198,1.Y....".":.875:FF$."":..Z...."
..AUSGABE ALLER ADRESSEN "......".. AUS
GABEGERAET:"..."..". .1. DRUCKER".D.,.
." .2. BILDSCHIRM"...6.."... >1< ODE
R >2< "...7.. D$:.D$."".1591...8.. E(D$
).1595,1596...:..1591.;.;.AG.4:.750 :.4,
4:.1600: 4:.:.:.410.A.<...Y.=.AG.3:.1600
:.:.:.410.T.@..860:.B$(N.1):.J.1.N.1...B
.:.B$(J)...C..C.0.7:C$(C)." ":.C...D.I.0
:C.1...E.I.I.1.E.G..I.C(B$(J)).1.1615...
J..J(B$(J),I,1)."/".C.C.1:.1605...L.C$(C
).C$(C).J(B$(J),I,1):.1605...O..K2.0..16
70:..(.P..1650:..9.R.." >RETURN<".X.S..1
98,0:.198,1:.B(631).13...B.T..1619.R.R..
AG.4..1700...|.BI.BI.1:.BI.2.BI.0:." >TA
STE< ";:.198,0:.198,1:.G(147).H....C.0.7
:.".";C$(C):.C:....... DRUCKER OUTPUT...
...C.0.7:.4," ";C$(C) :.:.
...V..". ACHTUNG :".L....".------------
---------------------------".|...." ANGA
BEN HINTER >DATA< AENDERN ! "....
.." LISTEN VERLANGSAMEN DURCH >CTRL<
"......" LISTEN STOPPEN DURCH >RUN/ST
OP< "......""......" NEUSTART DUR
CH >RUN<".1...."QQQQQQQQQQQQQQQQQQQQQQQQ
QQQQQQQQQQQQQQQQ".L.&.."...LIST2000- : [
RETURN] ":.K.1.4000:.:.631,13:.198,1.R.+
...{.K..410...L.V. 2.M.N.."....1900 V=";
V.1:."V=";V;":GOTO1904":.631,13:.632,13:
.198,2:.".":....P.."... KASSETTE EINLEGE
N UND DIE TASTEN REC + PLAY DRUECK
EN .".H.Q..".......SAVE";G(34);".A
DRESSEN";V;G(34).F.V..631,13:.198,1:."..
...":..O.O..410.U.P.....Z.. COMMODORE/64
/UNLIMITED...`.."****".A.A.. ***********
*****************...B.. ****************
************...C.. *********************
*******.*.L.. ENDE DES PROGRAMMLISTINGS*
**.M.N.. ****************************...
> CLICK IMAGE PREVIEW FOR FULL MODAL