Multiple names: ADRESSEN RICHTIG, ADRESSEN 64
FILE INFORMATION
FILENAME(S):
• ADRESSEN RICHTIG<br>• ADRESSEN      64
FILE TYPE(S): PRG
FILE SIZE: 6.3K
FIRST SEEN: 2025-11-02 16:39:20
APPEARS ON: 4 disk(s)
FILE HASH
23bb59ec98bcca9d9d741af187c5ec08ae350136bb1224cabf43496173943719
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COM DISK 2 | ADRESSEN RICHTIG | PRG | Treasure Chest - Plattfuss | 20 | 4 | DOWNLOAD FILE |
| COMMODORE DISC 2 | ADRESSEN RICHTIG | PRG | hedning, German ebay | 20 | 4 | DOWNLOAD FILE |
| DISK 6 B | ADRESSEN 64 | PRG | swasti, david | 17 | 0 | DOWNLOAD FILE |
| NORBERT | ADRESSEN RICHTIG | PRG | swasti, dinkel | 8 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 0A 00 8F 20 41 44 52 45 53 53 45 4E |..$.... ADRESSEN|
00000010: 2D 52 45 47 49 53 54 45 52 20 3D 3D 3D 3D 3D 3D |-REGISTER ======|
00000020: 3D 3D 36 34 00 47 08 14 00 8F 20 28 50 29 20 43 |==64.G.... (P) C|
00000030: 4F 4D 4D 4F 44 4F 52 45 20 57 45 4C 54 20 54 45 |OMMODORE WELT TE|
00000040: 41 4D 20 20 20 20 3D 00 6A 08 1E 00 8F 20 3D 3D |AM =.j.... ==|
00000050: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000060: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 8D 08 28 00 8F |==========...(..|
00000070: 20 28 43 29 20 42 59 20 41 58 45 4C 20 4B 4F 48 | (C) BY AXEL KOH|
00000080: 4C 4D 41 4E 4E 20 20 20 20 20 20 20 3D 00 B0 08 |LMANN =...|
00000090: 32 00 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 |2.. |
000000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3D | =|
000000B0: 00 D3 08 3C 00 8F 20 56 45 52 53 49 4F 4E 20 32 |...<.. VERSION 2|
000000C0: 2E 31 20 20 34 30 5A 2F 41 53 43 49 49 20 20 20 |.1 40Z/ASCII |
000000D0: 20 20 3D 00 F6 08 46 00 8F 20 56 43 2D 32 30 20 | =...F.. VC-20 |
000000E0: 2B 20 33 4B 20 2B 20 31 35 33 30 2F 31 35 34 31 |+ 3K + 1530/1541|
000000F0: 20 20 20 20 20 3D 00 19 09 50 00 8F 20 43 2D 36 | =...P.. C-6|
00000100: 34 20 2B 20 31 35 33 30 2F 31 35 34 31 2F 31 35 |4 + 1530/1541/15|
00000110: 37 31 20 20 20 20 20 20 3D 00 3C 09 5A 00 8F 20 |71 =.<.Z.. |
00000120: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000130: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 45 09 64 |============.E.d|
00000140: 00 89 33 37 30 00 5F 09 6E 00 47 46 24 B2 C7 28 |..370._.n.GF$..(|
00000150: 30 33 34 29 3A 59 33 24 B2 C7 28 31 36 32 29 00 |034):Y3$..(162).|
00000160: 79 09 78 00 59 35 24 B2 C7 28 31 36 36 29 3A 4B |y.x.Y5$..(166):K|
00000170: 4C 24 B2 C7 28 30 39 31 29 00 93 09 82 00 55 34 |L$..(091).....U4|
00000180: 24 B2 C7 28 31 39 31 29 3A 53 53 24 B2 C7 28 30 |$..(191):SS$..(0|
00000190: 34 37 29 00 A2 09 8C 00 4B 52 24 B2 C7 28 30 39 |47).....KR$..(09|
000001A0: 33 29 00 BC 09 96 00 53 4C 24 B2 C7 28 30 31 34 |3).....SL$..(014|
000001B0: 29 3A 43 34 24 B2 C7 28 30 31 37 29 00 D6 09 A0 |):C4$..(017)....|
000001C0: 00 52 4E 24 B2 C7 28 30 31 38 29 3A 48 45 24 B2 |.RN$..(018):HE$.|
000001D0: C7 28 30 31 39 29 00 F0 09 AA 00 52 45 24 B2 C7 |.(019).....RE$..|
000001E0: 28 30 32 38 29 3A 43 33 24 B2 C7 28 30 32 39 29 |(028):C3$..(029)|
000001F0: 00 0A 0A B4 00 47 52 24 B2 C7 28 30 33 30 29 3A |.....GR$..(030):|
00000200: 42 4C 24 B2 C7 28 30 33 31 29 00 19 0A BE 00 53 |BL$..(031).....S|
00000210: 31 24 B2 C7 28 30 33 32 29 00 33 0A C8 00 46 41 |1$..(032).3...FA|
00000220: 24 B2 C7 28 31 33 30 29 3A 46 42 24 B2 C7 28 31 |$..(130):FB$..(1|
00000230: 33 31 29 00 4D 0A D2 00 42 4B 24 B2 C7 28 31 34 |31).M...BK$..(14|
00000240: 34 29 3A 43 32 24 B2 C7 28 31 34 35 29 00 67 0A |4):C2$..(145).g.|
00000250: DC 00 52 46 24 B2 C7 28 31 34 36 29 3A 43 4C 24 |..RF$..(146):CL$|
00000260: B2 C7 28 31 34 37 29 00 81 0A E6 00 50 55 24 B2 |..(147).....PU$.|
00000270: C7 28 31 35 36 29 3A 43 31 24 B2 C7 28 31 35 37 |.(156):C1$..(157|
00000280: 29 00 90 0A F0 00 43 59 24 B2 C7 28 31 35 39 29 |).....CY$..(159)|
00000290: 00 AA 0A FA 00 53 32 24 B2 C7 28 31 36 30 29 3A |.....S2$..(160):|
000002A0: 53 33 24 B2 C7 28 32 32 34 29 00 C4 0A 04 01 5A |S3$..(224).....Z|
000002B0: 31 24 B2 C7 28 30 39 36 29 3A 5A 32 24 B2 C7 28 |1$..(096):Z2$..(|
000002C0: 30 39 38 29 00 DE 0A 0E 01 5A 33 24 B2 C7 28 31 |098).....Z3$..(1|
000002D0: 32 33 29 3A 5A 34 24 B2 C7 28 31 37 31 29 00 F8 |23):Z4$..(171)..|
000002E0: 0A 18 01 5A 35 24 B2 C7 28 31 37 33 29 3A 5A 36 |...Z5$..(173):Z6|
000002F0: 24 B2 C7 28 31 37 34 29 00 12 0B 22 01 5A 37 24 |$..(174)...".Z7$|
00000300: B2 C7 28 31 37 36 29 3A 5A 38 24 B2 C7 28 31 37 |..(176):Z8$..(17|
00000310: 37 29 00 2C 0B 2C 01 5A 39 24 B2 C7 28 31 37 38 |7).,.,.Z9$..(178|
00000320: 29 3A 5A 41 24 B2 C7 28 31 37 39 29 00 46 0B 36 |):ZA$..(179).F.6|
00000330: 01 5A 42 24 B2 C7 28 31 38 39 29 3A 4D 31 24 B2 |.ZB$..(189):M1$.|
00000340: C7 28 31 32 35 29 00 62 0B 40 01 44 32 24 B2 43 |.(125).b.@.D2$.C|
00000350: 34 24 AA 43 34 24 3A 44 33 24 B2 44 32 24 AA 43 |4$.C4$:D3$.D2$.C|
00000360: 34 24 00 7E 0B 4A 01 44 34 24 B2 44 33 24 AA 44 |4$.~.J.D4$.D3$.D|
00000370: 32 24 3A 44 35 24 B2 44 34 24 AA 43 34 24 00 9A |2$:D5$.D4$.C4$..|
00000380: 0B 54 01 44 36 24 B2 44 35 24 AA 43 34 24 3A 44 |.T.D6$.D5$.C4$:D|
00000390: 37 24 B2 44 36 24 AA 43 34 24 00 B6 0B 5E 01 44 |7$.D6$.C4$...^.D|
000003A0: 38 24 B2 44 37 24 AA 43 34 24 3A 44 39 24 B2 44 |8$.D7$.C4$:D9$.D|
000003B0: 38 24 AA 43 34 24 00 BC 0B 68 01 8E 00 DE 0B 72 |8$.C4$...h.....r|
000003C0: 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000003D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 00 |**************..|
000003E0: 0C 7C 01 8F 20 43 2D 36 34 20 46 41 52 42 45 20 |.|.. C-64 FARBE |
000003F0: 42 4C 41 55 2F 57 45 49 53 53 20 2A 2A 2A 2A 2A |BLAU/WEISS *****|
00000400: 00 16 0C 86 01 97 35 33 32 38 30 2C 36 3A 97 35 |......53280,6:.5|
00000410: 33 32 38 31 2C 31 00 38 0C 90 01 8F 20 56 43 2D |3281,1.8.... VC-|
00000420: 32 30 20 46 41 52 42 45 20 42 4C 41 55 2F 57 45 |20 FARBE BLAU/WE|
00000430: 49 53 53 20 2A 2A 2A 2A 00 4B 0C 9A 01 8F 20 50 |ISS ****.K.... P|
00000440: 4F 4B 45 33 36 38 37 39 2C 33 30 00 6D 0C A4 01 |OKE36879,30.m...|
00000450: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00000460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 7B 0C |*************.{.|
00000470: AE 01 8D 31 31 30 3A 89 37 31 30 00 9D 0C B8 01 |...110:.710.....|
00000480: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00000490: 2A 2A 2A 2A 2A 20 4D 45 4E 55 45 20 2A 00 BF 0C |***** MENUE *...|
000004A0: C2 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
000004B0: 20 44 41 54 45 4E 45 49 4E 47 41 42 45 20 2A 00 | DATENEINGABE *.|
000004C0: CB 0C CC 01 5A B2 20 32 30 33 30 00 F3 0C D6 01 |....Z. 2030.....|
000004D0: 99 43 4C 24 44 37 24 52 45 24 5A 37 24 3B 3A 81 |.CL$D7$RE$Z7$;:.|
000004E0: 49 B2 31 A4 31 39 3A 99 5A 31 24 3B 3A 82 3A 99 |I.1.19:.Z1$;:.:.|
000004F0: 5A 36 24 00 14 0D E0 01 99 4D 31 24 22 20 20 20 |Z6$......M1$" |
00000500: 47 45 42 45 4E 20 53 49 45 20 44 49 45 20 20 20 |GEBEN SIE DIE |
00000510: 22 4D 31 24 00 35 0D EA 01 99 4D 31 24 22 20 45 |"M1$.5....M1$" E|
00000520: 49 4E 5A 45 4C 4E 45 4E 20 41 44 52 45 53 53 2D |INZELNEN ADRESS-|
00000530: 20 22 4D 31 24 00 56 0D F4 01 99 4D 31 24 22 20 | "M1$.V....M1$" |
00000540: 41 4E 47 41 42 45 4E 20 57 49 45 20 4E 41 4D 45 |ANGABEN WIE NAME|
00000550: 2C 20 22 4D 31 24 00 77 0D FE 01 99 4D 31 24 22 |, "M1$.w....M1$"|
00000560: 53 54 52 41 53 53 45 2C 20 57 4F 48 4E 4F 52 54 |STRASSE, WOHNORT|
00000570: 2E 2E 2E 22 4D 31 24 00 98 0D 08 02 99 4D 31 24 |..."M1$......M1$|
00000580: 22 4A 45 57 45 49 4C 53 20 44 55 52 43 48 20 45 |"JEWEILS DURCH E|
00000590: 49 4E 45 4E 22 4D 31 24 00 BF 0D 12 02 99 4D 31 |INEN"M1$......M1|
000005A0: 24 22 20 20 53 43 48 52 41 45 47 53 54 52 49 43 |$" SCHRAEGSTRIC|
000005B0: 48 20 22 47 46 24 53 53 24 47 46 24 4D 31 24 00 |H "GF$SS$GF$M1$.|
000005C0: E0 0D 1C 02 99 4D 31 24 22 20 20 20 20 56 4F 4E |.....M1$" VON|
000005D0: 45 49 4E 41 4E 44 45 52 20 20 20 20 22 4D 31 24 |EINANDER "M1$|
000005E0: 00 01 0E 26 02 99 4D 31 24 22 20 20 20 47 45 54 |...&..M1$" GET|
000005F0: 52 45 4E 4E 54 20 45 49 4E 2E 20 20 20 22 4D 31 |RENNT EIN. "M1|
00000600: 24 00 22 0E 30 02 99 4D 31 24 22 20 44 49 45 20 |$.".0..M1$" DIE |
00000610: 45 52 53 54 45 20 41 4E 47 41 42 45 20 20 22 4D |ERSTE ANGABE "M|
00000620: 31 24 00 43 0E 3A 02 99 4D 31 24 22 20 49 53 54 |1$.C.:..M1$" IST|
00000630: 20 45 4E 54 53 43 48 45 49 44 45 4E 44 20 20 22 | ENTSCHEIDEND "|
00000640: 4D 31 24 00 64 0E 44 02 99 4D 31 24 22 20 46 55 |M1$.d.D..M1$" FU|
00000650: 45 52 20 53 55 43 48 45 4E 26 53 4F 52 54 2E 20 |ER SUCHEN&SORT. |
00000660: 22 4D 31 24 00 85 0E 4E 02 99 4D 31 24 22 20 20 |"M1$...N..M1$" |
00000670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000680: 20 22 4D 31 24 00 A6 0E 58 02 99 4D 31 24 22 20 | "M1$...X..M1$" |
00000690: 5A 55 52 20 46 55 4E 4B 54 49 4F 4E 53 57 41 48 |ZUR FUNKTIONSWAH|
000006A0: 4C 20 22 4D 31 24 00 D1 0E 62 02 99 4D 31 24 22 |L "M1$...b..M1$"|
000006B0: 20 20 20 22 52 4E 24 22 52 45 54 55 52 4E 22 52 | "RN$"RETURN"R|
000006C0: 46 24 22 2D 54 41 53 54 45 20 20 20 20 22 4D 31 |F$"-TASTE "M1|
000006D0: 24 00 F0 0E 6C 02 99 5A 35 24 3B 3A 81 49 B2 31 |$...l..Z5$;:.I.1|
000006E0: A4 31 39 3A 99 5A 31 24 3B 3A 82 3A 99 5A 42 24 |.19:.Z1$;:.:.ZB$|
000006F0: 00 2A 0F 76 02 99 48 45 24 42 4C 24 52 4E 24 22 |.*.v..HE$BL$RN$"|
00000700: 20 47 45 42 45 4E 20 53 49 45 20 44 41 54 45 4E | GEBEN SIE DATEN|
00000710: 20 45 49 4E 20 20 22 52 46 24 3A 4C 33 24 B2 43 | EIN "RF$:L3$.C|
00000720: 31 24 AA 43 31 24 AA 43 31 24 00 3C 0F 80 02 8B |1$.C1$.C1$.<....|
00000730: B8 28 30 29 B3 39 30 30 A7 39 37 30 00 4D 0F 8A |.(0).900.970.M..|
00000740: 02 99 55 34 24 4C 33 24 3B 3A 85 46 24 00 5D 0F |..U4$L3$;:.F$.].|
00000750: 94 02 8B 46 24 B2 55 34 24 A7 37 31 30 00 76 0F |...F$.U4$.710.v.|
00000760: 9E 02 99 43 4C 24 44 33 24 3B 5A 3B 22 44 41 54 |...CL$D3$;Z;"DAT|
00000770: 41 20 22 3B 46 24 00 94 0F A8 02 99 22 34 36 30 |A ";F$......"460|
00000780: 20 5A 3D 22 3B 5A AA 31 30 3A 99 22 47 4F 54 4F | Z=";Z.10:."GOTO|
00000790: 31 30 30 22 00 BE 0F B2 02 97 36 33 31 2C 31 33 |100"......631,13|
000007A0: 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 33 |:.632,13:.633,13|
000007B0: 3A 97 31 39 38 2C 33 3A 99 48 45 24 3A 80 00 E0 |:.198,3:.HE$:...|
000007C0: 0F BC 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
000007D0: 2A 2A 2A 2A 2A 2A 2A 2A 20 4D 45 4E 55 45 20 2A |******** MENUE *|
000007E0: 00 0A 10 C6 02 99 43 4C 24 22 20 20 22 52 45 24 |......CL$" "RE$|
000007F0: 52 4E 24 22 20 20 20 20 20 20 20 20 20 20 20 20 |RN$" |
00000800: 20 20 20 20 20 20 22 52 46 24 00 2E 10 D0 02 99 | "RF$......|
00000810: 22 20 20 22 52 4E 24 22 41 44 52 45 53 53 45 4E |" "RN$"ADRESSEN|
00000820: 2D 52 45 47 49 53 54 45 52 20 22 52 46 24 00 52 |-REGISTER "RF$.R|
00000830: 10 DA 02 99 22 20 20 22 52 4E 24 22 20 20 20 20 |...." "RN$" |
00000840: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 52 | "R|
00000850: 46 24 00 76 10 E4 02 99 22 20 20 22 52 4E 24 22 |F$.v...." "RN$"|
00000860: 28 43 29 20 41 58 45 4C 20 4B 4F 48 4C 4D 41 4E |(C) AXEL KOHLMAN|
00000870: 4E 20 22 52 46 24 00 9A 10 EE 02 99 22 20 20 22 |N "RF$......" "|
00000880: 52 4E 24 22 20 20 20 20 20 20 20 20 20 20 20 20 |RN$" |
00000890: 20 20 20 20 20 20 22 52 46 24 00 BE 10 F8 02 99 | "RF$......|
000008A0: 48 45 24 44 36 24 42 4B 24 22 20 20 20 20 46 55 |HE$D6$BK$" FU|
000008B0: 4E 4B 54 49 4F 4E 53 57 41 48 4C 22 3A 99 00 E2 |NKTIONSWAHL":...|
000008C0: 10 02 03 99 52 45 24 52 4E 24 3B 3A 81 49 B2 31 |....RE$RN$;:.I.1|
000008D0: A4 32 30 3A 99 59 33 24 3B 3A 82 3A 99 52 46 24 |.20:.Y3$;:.:.RF$|
000008E0: 3A 99 00 F9 10 0C 03 99 42 4B 24 22 20 20 44 52 |:.......BK$" DR|
000008F0: 55 45 43 4B 45 3A 22 3A 99 00 1B 11 16 03 99 22 |UECKE:":......."|
00000900: 20 20 22 52 4E 24 22 31 22 52 46 24 22 20 44 41 | "RN$"1"RF$" DA|
00000910: 54 45 4E 45 49 4E 47 41 42 45 22 00 3D 11 20 03 |TENEINGABE".=. .|
00000920: 99 22 20 20 22 52 4E 24 22 32 22 52 46 24 22 20 |." "RN$"2"RF$" |
00000930: 44 41 54 45 4E 41 55 53 47 41 42 45 22 00 5F 11 |DATENAUSGABE"._.|
00000940: 2A 03 99 22 20 20 22 52 4E 24 22 33 22 52 46 24 |*.." "RN$"3"RF$|
00000950: 22 20 53 4F 52 54 49 45 52 55 4E 47 20 20 22 00 |" SORTIERUNG ".|
00000960: 84 11 34 03 99 22 20 20 22 52 4E 24 22 34 22 52 |..4.." "RN$"4"R|
00000970: 46 24 22 20 41 44 52 45 53 53 45 4E 20 53 55 43 |F$" ADRESSEN SUC|
00000980: 48 45 4E 22 00 A9 11 3E 03 99 22 20 20 22 52 4E |HEN"...>.." "RN|
00000990: 24 22 35 22 52 46 24 22 20 41 44 52 45 53 53 41 |$"5"RF$" ADRESSA|
000009A0: 45 4E 44 45 52 55 4E 47 22 00 CB 11 48 03 99 22 |ENDERUNG"...H.."|
000009B0: 20 20 22 52 4E 24 22 36 22 52 46 24 22 20 50 52 | "RN$"6"RF$" PR|
000009C0: 4F 47 52 41 4D 4D 45 4E 44 45 22 00 F1 11 4D 03 |OGRAMMENDE"...M.|
000009D0: 99 22 20 20 22 52 4E 24 22 37 22 52 46 24 22 20 |." "RN$"7"RF$" |
000009E0: 41 42 53 50 45 49 43 48 45 52 4E 20 54 41 50 45 |ABSPEICHERN TAPE|
000009F0: 22 00 17 12 4E 03 99 22 20 20 22 52 4E 24 22 38 |"...N.." "RN$"8|
00000A00: 22 52 46 24 22 20 41 42 53 50 45 49 43 48 45 52 |"RF$" ABSPEICHER|
00000A10: 4E 20 44 49 53 4B 22 00 2A 12 52 03 A1 41 24 3A |N DISK".*.R..A$:|
00000A20: 8B 41 24 B2 22 22 A7 38 35 30 00 5C 12 5C 03 91 |.A$."".850.\.\..|
00000A30: C5 28 41 24 29 89 34 36 30 2C 31 35 33 30 2C 31 |.(A$).460,1530,1|
00000A40: 30 33 30 2C 31 33 36 30 2C 31 38 34 30 2C 31 39 |030,1360,1840,19|
00000A50: 32 30 2C 31 39 35 30 2C 31 39 39 36 00 65 12 66 |20,1950,1996.e.f|
00000A60: 03 89 38 35 30 00 87 12 70 03 8F 20 2A 2A 2A 20 |..850...p.. *** |
00000A70: 53 20 46 45 4C 44 20 56 4F 4E 20 42 24 20 54 52 |S FELD VON B$ TR|
00000A80: 45 4E 4E 45 4E 20 2A 00 99 12 7A 03 86 4E 24 28 |ENNEN *...z..N$(|
00000A90: 4E 29 3A 81 49 B2 30 A4 4E 00 A2 12 84 03 4C 4C |N):.I.0.N.....LL|
00000AA0: B2 30 00 AE 12 8E 03 4C 4C B2 4C 4C AA 31 00 C5 |.0.....LL.LL.1..|
00000AB0: 12 98 03 8B 4C 4C B2 C3 28 42 24 28 49 29 29 AA |....LL..(B$(I)).|
00000AC0: 31 A7 39 35 30 00 E0 12 A2 03 8B CA 28 42 24 28 |1.950.......(B$(|
00000AD0: 49 29 2C 4C 4C 2C 31 29 B2 22 2F 22 A7 39 35 30 |I),LL,1)."/".950|
00000AE0: 00 03 13 AC 03 4E 24 28 49 29 B2 4E 24 28 49 29 |.....N$(I).N$(I)|
00000AF0: AA CA 28 42 24 28 49 29 2C 4C 4C 2C 31 29 3A 89 |..(B$(I),LL,1):.|
00000B00: 39 31 30 00 09 13 B6 03 82 00 0F 13 C0 03 8E 00 |910.............|
00000B10: 46 13 CA 03 99 43 34 24 42 4C 24 22 20 20 4B 45 |F....C4$BL$" KE|
00000B20: 49 4E 20 53 50 45 49 43 48 45 52 50 4C 41 54 5A |IN SPEICHERPLATZ|
00000B30: 20 20 20 20 20 4D 45 48 52 20 56 45 52 46 55 45 | MEHR VERFUE|
00000B40: 47 42 41 52 21 22 00 5B 13 D4 03 81 49 B2 31 A4 |GBAR!".[....I.1.|
00000B50: 32 30 30 30 3A 82 3A 89 37 31 30 00 9B 13 DE 03 |2000:.:.710.....|
00000B60: 99 50 55 24 52 4E 24 43 32 24 43 32 24 22 20 44 |.PU$RN$C2$C2$" D|
00000B70: 52 55 43 4B 45 52 20 45 49 4E 53 43 48 41 4C 54 |RUCKER EINSCHALT|
00000B80: 45 4E 21 21 20 55 4E 44 20 5A 55 52 20 20 20 20 |EN!! UND ZUR |
00000B90: 20 20 20 20 20 20 22 52 46 24 3B 00 D1 13 E8 03 | "RF$;.....|
00000BA0: 99 52 4E 24 22 20 42 45 53 54 41 45 54 49 47 55 |.RN$" BESTAETIGU|
00000BB0: 4E 47 20 52 45 54 55 52 4E 2D 54 41 53 54 45 20 |NG RETURN-TASTE |
00000BC0: 44 52 55 45 43 4B 45 4E 20 20 20 20 20 22 52 46 |DRUECKEN "RF|
00000BD0: 24 00 F3 13 F2 03 99 48 45 24 44 34 24 22 20 20 |$......HE$D4$" |
00000BE0: 20 20 20 22 52 4E 24 22 44 52 55 43 4B 45 52 22 | "RN$"DRUCKER"|
00000BF0: 52 46 24 00 1A 14 FC 03 97 31 39 38 2C 30 3A 92 |RF$......198,0:.|
00000C00: 31 39 38 2C 31 3A 99 44 33 24 22 20 20 20 20 20 |198,1:.D3$" |
00000C10: 20 20 20 20 4F 4B 21 22 3A 8E 00 3E 14 06 04 48 | OK!":..>...H|
00000C20: 34 24 B2 48 34 24 AA 43 32 24 AA 43 32 24 AA 43 |4$.H4$.C2$.C2$.C|
00000C30: 32 24 AA 43 32 24 AA 43 32 24 AA 43 32 24 00 86 |2$.C2$.C2$.C2$..|
00000C40: 14 10 04 99 48 34 24 22 20 20 20 20 22 50 55 24 |....H4$" "PU$|
00000C50: 52 4E 24 22 53 4F 52 54 49 45 52 55 4E 47 20 20 |RN$"SORTIERUNG |
00000C60: 22 52 46 24 3A 99 44 36 24 22 20 20 22 52 4E 24 |"RF$:.D6$" "RN$|
00000C70: 22 42 49 54 54 45 20 45 54 57 41 53 20 47 45 44 |"BITTE ETWAS GED|
00000C80: 55 4C 44 20 20 22 00 9A 14 1A 04 4E B2 31 3A 8D |ULD ".....N.1:.|
00000C90: 31 30 36 30 3A 89 31 30 38 30 00 B8 14 24 04 87 |1060:.1080...$..|
00000CA0: 41 24 3A 8B 20 41 24 B2 22 2A 2A 2A 2A 22 A7 8C |A$:. A$."****"..|
00000CB0: 3A 4E B2 4E AB 31 3A 8E 00 C8 14 2E 04 4E B2 4E |:N.N.1:......N.N|
00000CC0: AA 31 3A 89 31 30 36 30 00 F0 14 38 04 4E B2 4E |.1:.1060...8.N.N|
00000CD0: AB 31 3A 86 42 24 28 4E 29 3A 81 58 B2 30 A4 4E |.1:.B$(N):.X.0.N|
00000CE0: 3A 87 42 24 28 58 29 3A 82 3A 8C 3A 8D 38 39 30 |:.B$(X):.:.:.890|
00000CF0: 00 05 15 42 04 99 43 4C 24 3A 8D 31 31 30 30 3A |...B..CL$:.1100:|
00000D00: 89 31 31 31 30 00 43 15 4C 04 99 48 45 24 52 45 |.1110.C.L..HE$RE|
00000D10: 24 52 4E 24 22 41 4C 50 48 41 42 45 54 49 53 43 |$RN$"ALPHABETISC|
00000D20: 48 45 20 20 20 20 20 20 53 4F 52 54 49 45 52 55 |HE SORTIERU|
00000D30: 4E 47 20 44 45 52 20 4E 41 4D 45 4E 20 22 52 46 |NG DER NAMEN "RF|
00000D40: 24 3A 8E 00 54 15 56 04 81 49 B2 30 A4 4E AB 31 |$:..T.V..I.0.N.1|
00000D50: 3A 4B B2 49 00 61 15 60 04 81 4A B2 49 AA 31 A4 |:K.I.a.`..J.I.1.|
00000D60: 4E 00 76 15 6A 04 8B 4E 24 28 4A 29 B3 4E 24 28 |N.v.j..N$(J).N$(|
00000D70: 4B 29 A7 4B B2 4A 00 7D 15 74 04 82 4A 00 9F 15 |K).K.J.}.t..J...|
00000D80: 7E 04 58 24 B2 4E 24 28 4B 29 3A 4E 24 28 4B 29 |~.X$.N$(K):N$(K)|
00000D90: B2 4E 24 28 49 29 3A 4E 24 28 49 29 B2 58 24 00 |.N$(I):N$(I).X$.|
00000DA0: A6 15 88 04 82 49 00 B5 15 92 04 46 24 B2 43 34 |.....I.....F$.C4|
00000DB0: 24 3A 4C B2 31 00 E3 15 9C 04 81 49 B2 31 A4 4E |$:L.1......I.1.N|
00000DC0: 3A 8D 31 32 37 30 3A 99 46 46 24 3B 4E 24 28 49 |:.1270:.FF$;N$(I|
00000DD0: 29 3A 4C B2 4C AA 31 3A 8B 4C B2 31 37 A7 8D 31 |):L.L.1:.L.17..1|
00000DE0: 35 31 30 00 F9 15 A6 04 8D 31 31 30 30 3A 46 46 |510......1100:FF|
00000DF0: 24 B2 46 46 24 AA 46 24 3A 00 09 16 B0 04 81 4B |$.FF$.F$:......K|
00000E00: B2 31 A4 33 30 30 3A 82 4B 00 0F 16 BA 04 82 00 |.1.300:.K.......|
00000E10: 3A 16 C4 04 3A 99 46 46 24 52 45 24 52 4E 24 22 |:...:.FF$RE$RN$"|
00000E20: 41 4C 4C 45 20 4E 41 4D 45 4E 20 53 4F 52 54 49 |ALLE NAMEN SORTI|
00000E30: 45 52 54 21 20 22 52 46 24 3B 00 5F 16 CE 04 99 |ERT! "RF$;._....|
00000E40: 50 55 24 52 4E 24 22 4F 4B 3F 20 52 45 54 55 52 |PU$RN$"OK? RETUR|
00000E50: 4E 20 2D 2D 3E 20 45 4E 44 45 22 52 46 24 3B 00 |N --> ENDE"RF$;.|
00000E60: 71 16 D8 04 97 31 39 38 2C 30 3A 92 31 39 38 2C |q....198,0:.198,|
00000E70: 31 00 86 16 E2 04 8B C2 28 36 33 31 29 B3 B1 31 |1.......(631)..1|
00000E80: 33 A7 31 32 34 30 00 9D 16 EC 04 97 31 39 38 2C |3.1240......198,|
00000E90: 30 3A 9C 3A 8D 31 31 30 3A 89 37 31 30 00 B0 16 |0:.:.110:.710...|
00000EA0: F6 04 41 53 B2 C6 28 4E 24 28 49 29 29 AB 36 34 |..AS..(N$(I)).64|
00000EB0: 00 D6 16 00 05 91 41 53 89 31 33 30 30 2C 31 33 |......AS.1300,13|
00000EC0: 31 30 2C 31 33 32 30 2C 31 33 33 30 2C 31 33 34 |10,1320,1330,134|
00000ED0: 30 2C 31 33 35 30 00 E8 16 0A 05 41 53 B2 41 53 |0,1350.....AS.AS|
00000EE0: AB 36 3A 89 31 32 38 30 00 F4 16 14 05 99 43 59 |.6:.1280......CY|
00000EF0: 24 3B 3A 8E 00 00 17 1E 05 99 52 45 24 3B 3A 8E |$;:.......RE$;:.|
00000F00: 00 0C 17 28 05 99 42 4B 24 3B 3A 8E 00 18 17 32 |...(..BK$;:....2|
00000F10: 05 99 50 55 24 3B 3A 8E 00 24 17 3C 05 99 47 52 |..PU$;:..$.<..GR|
00000F20: 24 3B 3A 8E 00 30 17 46 05 99 42 4C 24 3B 3A 8E |$;:..0.F..BL$;:.|
00000F30: 00 65 17 50 05 99 43 32 24 43 32 24 43 32 24 43 |.e.P..C2$C2$C2$C|
00000F40: 32 24 43 32 24 22 20 20 20 20 22 50 55 24 52 4E |2$C2$" "PU$RN|
00000F50: 24 22 41 44 52 45 53 53 45 4E 20 53 55 43 48 45 |$"ADRESSEN SUCHE|
00000F60: 4E 22 52 46 24 00 8C 17 5A 05 99 44 35 24 22 20 |N"RF$...Z..D5$" |
00000F70: 20 22 52 4E 24 22 42 49 54 54 45 20 45 54 57 41 | "RN$"BITTE ETWA|
00000F80: 53 20 47 45 44 55 4C 44 22 52 46 24 00 B2 17 64 |S GEDULD"RF$...d|
00000F90: 05 8D 31 30 36 30 3A 86 42 24 28 4E 29 3A 81 4B |..1060:.B$(N):.K|
00000FA0: B2 30 A4 4E 3A 87 42 24 28 4B 29 3A 82 3A 8D 38 |.0.N:.B$(K):.:.8|
00000FB0: 39 30 00 EE 17 6E 05 99 43 4C 24 52 45 24 52 4E |90...n..CL$RE$RN|
00000FC0: 24 22 20 53 55 43 48 45 4E 20 45 49 4E 45 52 20 |$" SUCHEN EINER |
00000FD0: 41 44 52 45 53 53 45 20 28 52 45 54 55 52 4E 2D |ADRESSE (RETURN-|
00000FE0: 2D 3E 45 4E 44 45 29 20 20 20 22 52 46 24 00 04 |->ENDE) "RF$..|
00000FF0: 18 78 05 99 44 33 24 52 45 24 22 4E 41 4D 45 3A |.x..D3$RE$"NAME:|
00001000: 20 20 22 3B 00 2A 18 82 05 99 59 35 24 43 31 24 | ";.*....Y5$C1$|
00001010: 43 31 24 43 31 24 3B 3A 85 4E 41 24 3A 8B 4E 41 |C1$C1$;:.NA$:.NA|
00001020: 24 B2 59 35 24 A7 31 34 39 30 00 4B 18 8C 05 81 |$.Y5$.1490.K....|
00001030: 4B B2 30 A4 4E 3A 8B 4E 41 24 B2 4E 24 28 4B 29 |K.0.N:.NA$.N$(K)|
00001040: A7 4B 32 B2 4B 3A 89 31 34 36 30 00 51 18 96 05 |.K2.K:.1460.Q...|
00001050: 82 00 8B 18 A0 05 99 44 33 24 52 45 24 22 20 44 |.......D3$RE$" D|
00001060: 49 45 20 41 44 52 45 53 53 45 20 49 53 54 20 4E |IE ADRESSE IST N|
00001070: 49 43 48 54 20 20 20 20 20 20 47 45 53 50 45 49 |ICHT GESPEI|
00001080: 43 48 45 52 54 20 20 20 20 20 22 00 A2 18 AA 05 |CHERT ".....|
00001090: 81 4C 54 B2 31 A4 32 30 30 30 3A 82 3A 89 31 33 |.LT.1.2000:.:.13|
000010A0: 39 30 00 D9 18 B4 05 4A B2 4B 32 3A 4B 32 B2 31 |90.....J.K2:K2.1|
000010B0: 3A 8D 31 36 37 30 3A 99 52 45 24 52 4E 24 22 4F |:.1670:.RE$RN$"O|
000010C0: 4B 3F 20 2D 2D 3E 20 54 41 53 54 45 20 44 52 55 |K? --> TASTE DRU|
000010D0: 45 43 4B 45 4E 22 52 46 24 00 F2 18 BE 05 97 31 |ECKEN"RF$......1|
000010E0: 39 38 2C 30 3A 92 31 39 38 2C 31 3A 97 31 39 38 |98,0:.198,1:.198|
000010F0: 2C 30 00 FC 18 C8 05 89 31 33 39 30 00 0C 19 D2 |,0......1390....|
00001100: 05 9C 3A 8D 31 31 30 3A 89 37 31 30 00 16 19 DC |..:.110:.710....|
00001110: 05 89 32 30 30 30 00 53 19 E6 05 4C B2 31 3A 99 |..2000.S...L.1:.|
00001120: 43 34 24 52 45 24 52 4E 24 22 57 45 49 54 45 52 |C4$RE$RN$"WEITER|
00001130: 3F 20 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E |? TASTE DRUECKEN|
00001140: 22 52 46 24 3B 3A 97 31 39 38 2C 30 3A 92 31 39 |"RF$;:.198,0:.19|
00001150: 38 2C 31 00 6B 19 F0 05 99 43 4C 24 3A 8D 31 31 |8,1.k....CL$:.11|
00001160: 30 30 3A 46 46 24 B2 22 22 3A 8E 00 95 19 FA 05 |00:FF$."":......|
00001170: 99 43 4C 24 52 45 24 52 4E 24 22 41 55 53 47 41 |.CL$RE$RN$"AUSGA|
00001180: 42 45 20 41 4C 4C 45 52 20 41 44 52 45 53 53 45 |BE ALLER ADRESSE|
00001190: 4E 22 52 46 24 00 B3 19 04 06 99 44 32 24 42 4B |N"RF$......D2$BK|
000011A0: 24 22 20 20 41 55 53 47 41 42 45 47 45 52 41 45 |$" AUSGABEGERAE|
000011B0: 54 3A 22 00 D4 19 0E 06 99 43 34 24 22 20 20 20 |T:"......C4$" |
000011C0: 22 52 4E 24 22 31 22 52 46 24 22 20 44 52 55 43 |"RN$"1"RF$" DRUC|
000011D0: 4B 45 52 22 00 F5 19 18 06 99 22 20 20 20 22 52 |KER"......" "R|
000011E0: 4E 24 22 32 22 52 46 24 22 20 42 49 4C 44 53 43 |N$"2"RF$" BILDSC|
000011F0: 48 49 52 4D 22 00 1F 1A 22 06 99 44 35 24 52 45 |HIRM"..."..D5$RE|
00001200: 24 52 4E 24 22 20 20 20 20 42 49 54 54 45 20 57 |$RN$" BITTE W|
00001210: 41 45 48 4C 45 4E 21 20 20 20 20 22 52 46 24 00 |AEHLEN! "RF$.|
00001220: 33 1A 2C 06 A1 44 24 3A 8B 44 24 B2 22 22 A7 31 |3.,..D$:.D$."".1|
00001230: 35 38 30 00 48 1A 36 06 91 C5 28 44 24 29 89 31 |580.H.6...(D$).1|
00001240: 36 31 30 2C 31 36 32 30 00 52 1A 40 06 89 31 35 |610,1620.R.@..15|
00001250: 38 30 00 7C 1A 4A 06 41 47 B2 34 3A 8D 39 39 30 |80.|.J.AG.4:.990|
00001260: 3A 9F 34 2C 34 3A 8D 31 36 35 30 3A A0 34 3A 8C |:.4,4:.1650:.4:.|
00001270: 3A 9C 3A 8D 31 31 30 3A 89 37 31 30 00 A7 1A 54 |:.:.110:.710...T|
00001280: 06 99 48 45 24 50 55 24 44 35 24 22 20 20 20 20 |..HE$PU$D5$" |
00001290: 20 22 52 4E 24 22 42 49 4C 44 53 43 48 49 52 4D | "RN$"BILDSCHIRM|
000012A0: 22 52 46 24 44 35 24 00 D1 1A 5E 06 99 22 20 20 |"RF$D5$...^.." |
000012B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000012C0: 20 20 20 20 22 43 32 24 43 32 24 43 32 24 43 32 | "C2$C2$C2$C2|
000012D0: 24 00 EE 1A 68 06 41 47 B2 33 3A 8D 31 36 35 30 |$...h.AG.3:.1650|
000012E0: 3A 8C 3A 9C 3A 8D 31 31 30 3A 89 37 31 30 00 0A |:.:.:.110:.710..|
000012F0: 1B 72 06 8D 31 30 36 30 3A 86 42 24 28 4E AA 31 |.r..1060:.B$(N.1|
00001300: 29 3A 81 4A B2 31 A4 4E AA 31 00 15 1B 7C 06 87 |):.J.1.N.1...|..|
00001310: 42 24 28 4A 29 00 2D 1B 86 06 81 43 B2 30 A4 37 |B$(J).-....C.0.7|
00001320: 3A 43 24 28 43 29 B2 22 20 22 3A 82 43 00 39 1B |:C$(C)." ":.C.9.|
00001330: 90 06 49 B2 30 3A 43 B2 31 00 43 1B 9A 06 49 B2 |..I.0:C.1.C...I.|
00001340: 49 AA 31 00 5A 1B A4 06 8B 49 B2 C3 28 42 24 28 |I.1.Z....I..(B$(|
00001350: 4A 29 29 AA 31 A7 31 37 33 30 00 7C 1B AE 06 8B |J)).1.1730.|....|
00001360: CA 28 42 24 28 4A 29 2C 49 2C 31 29 B2 22 2F 22 |.(B$(J),I,1)."/"|
00001370: A7 43 B2 43 AA 31 3A 89 31 36 39 30 00 9F 1B B8 |.C.C.1:.1690....|
00001380: 06 43 24 28 43 29 B2 43 24 28 43 29 AA CA 28 42 |.C$(C).C$(C)..(B|
00001390: 24 28 4A 29 2C 49 2C 31 29 3A 89 31 36 39 30 00 |$(J),I,1):.1690.|
000013A0: B1 1B C2 06 8B 4B 32 B1 30 A7 8D 31 38 31 30 3A |.....K2.0..1810:|
000013B0: 8E 00 BD 1B CC 06 8D 31 37 38 30 3A 82 00 E4 1B |.......1780:....|
000013C0: D6 06 99 52 45 24 52 4E 24 22 20 20 4F 4B 3F 20 |...RE$RN$" OK? |
000013D0: 45 4E 44 45 20 2D 2D 3E 20 52 45 54 55 52 4E 20 |ENDE --> RETURN |
000013E0: 22 52 46 24 00 03 1C E0 06 97 31 39 38 2C 30 3A |"RF$......198,0:|
000013F0: 92 31 39 38 2C 31 3A 8B C2 28 36 33 31 29 B2 31 |.198,1:..(631).1|
00001400: 33 A7 8E 00 0D 1C EA 06 89 31 37 36 30 00 1D 1C |3........1760...|
00001410: F4 06 8B 41 47 B2 34 A7 89 31 38 33 30 00 59 1C |...AG.4..1830.Y.|
00001420: FE 06 42 49 B2 42 49 AA 31 3A 8B 42 49 B2 32 A7 |..BI.BI.1:.BI.2.|
00001430: 42 49 B2 30 3A 99 52 45 24 52 4E 24 22 57 45 49 |BI.0:.RE$RN$"WEI|
00001440: 54 45 52 3F 20 54 41 53 54 45 20 44 52 55 45 43 |TER? TASTE DRUEC|
00001450: 4B 45 4E 21 22 52 46 24 3B 00 70 1C 08 07 97 31 |KEN!"RF$;.p....1|
00001460: 39 38 2C 30 3A 92 31 39 38 2C 31 3A 99 43 4C 24 |98,0:.198,1:.CL$|
00001470: 00 8D 1C 12 07 81 43 B2 30 A4 37 3A 99 42 4B 24 |......C.0.7:.BK$|
00001480: 43 31 24 43 24 28 43 29 3A 82 43 3A 8E 00 AE 1C |C1$C$(C):.C:....|
00001490: 1C 07 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 44 52 |... ********* DR|
000014A0: 55 43 4B 45 52 20 4F 55 54 50 55 54 20 2A 00 D8 |UCKER OUTPUT *..|
000014B0: 1C 26 07 81 43 B2 30 A4 37 3A 98 34 2C 22 20 20 |.&..C.0.7:.4," |
000014C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 43 | ";C|
000014D0: 24 28 43 29 3A 82 3A 8E 00 01 1D 30 07 99 43 4C |$(C):.:....0..CL|
000014E0: 24 52 45 24 52 4E 24 22 20 41 44 52 45 53 53 45 |$RE$RN$" ADRESSE|
000014F0: 4E 41 45 4E 44 45 52 55 4E 47 20 20 22 52 46 24 |NAENDERUNG "RF$|
00001500: 3B 00 3B 1D 3A 07 99 52 4E 24 22 28 41 4E 47 41 |;.;.:..RN$"(ANGA|
00001510: 42 45 4E 20 48 49 4E 54 45 52 20 44 45 4E 20 20 |BEN HINTER DEN |
00001520: 44 41 54 41 53 20 41 45 4E 44 45 52 4E 20 55 4E |DATAS AENDERN UN|
00001530: 44 20 44 41 4E 4E 22 52 46 24 3B 00 7E 1D 44 07 |D DANN"RF$;.~.D.|
00001540: 99 52 4E 24 22 20 50 52 4F 47 52 41 4D 4D 20 45 |.RN$" PROGRAMM E|
00001550: 52 4E 45 55 54 20 20 4D 49 54 20 20 20 20 20 22 |RNEUT MIT "|
00001560: 52 46 24 22 52 55 4E 22 52 4E 24 22 20 20 53 54 |RF$"RUN"RN$" ST|
00001570: 41 52 54 45 4E 29 20 20 20 22 52 46 24 3B 00 C3 |ARTEN) "RF$;..|
00001580: 1D 4E 07 99 52 4E 24 22 43 54 52 4C 2D 54 41 53 |.N..RN$"CTRL-TAS|
00001590: 54 45 20 5A 55 4D 20 20 56 45 52 4C 41 4E 47 53 |TE ZUM VERLANGS|
000015A0: 41 4D 45 4E 20 56 4F 4E 20 4C 49 53 54 20 20 20 |AMEN VON LIST |
000015B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
000015C0: 52 46 24 00 E9 1D 58 07 99 44 33 24 22 4C 49 53 |RF$...X..D3$"LIS|
000015D0: 54 32 30 30 30 2D 20 3A 20 22 4B 4C 24 22 52 45 |T2000- : "KL$"RE|
000015E0: 54 55 52 4E 22 4B 52 24 22 00 08 1E 62 07 81 4B |TURN"KR$"...b..K|
000015F0: B2 31 A4 32 30 30 30 3A 82 3A 97 36 33 31 2C 31 |.1.2000:.:.631,1|
00001600: 33 3A 97 31 39 38 2C 31 00 16 1E 6C 07 99 48 45 |3:.198,1...l..HE|
00001610: 24 44 36 24 3A 80 00 1F 1E 76 07 89 37 31 30 00 |$D6$:....v..710.|
00001620: 28 1E 80 07 56 B2 20 31 00 55 1E 8A 07 99 43 4C |(...V. 1.U....CL|
00001630: 24 44 33 24 22 31 39 32 30 20 56 3D 22 3B 56 AA |$D3$"1920 V=";V.|
00001640: 31 3A 99 22 56 3D 22 3B 56 3B 22 3A 47 4F 54 4F |1:."V=";V;":GOTO|
00001650: 31 38 39 30 22 00 77 1E 94 07 97 36 33 31 2C 31 |1890".w....631,1|
00001660: 33 3A 97 36 33 32 2C 31 33 3A 97 31 39 38 2C 32 |3:.632,13:.198,2|
00001670: 3A 99 48 45 24 3A 80 00 A5 1E 9E 07 8D 31 31 30 |:.HE$:.......110|
00001680: 3A 99 43 4C 24 52 45 24 52 4E 24 22 4B 41 53 53 |:.CL$RE$RN$"KASS|
00001690: 45 54 54 45 20 45 49 4E 4C 45 47 45 4E 20 55 4E |ETTE EINLEGEN UN|
000016A0: 44 22 52 46 24 00 C8 1E A8 07 99 52 4E 24 22 44 |D"RF$......RN$"D|
000016B0: 49 45 20 54 41 53 54 45 20 52 45 43 20 2B 20 50 |IE TASTE REC + P|
000016C0: 4C 41 59 20 22 52 46 24 00 EB 1E B2 07 99 52 4E |LAY "RF$......RN|
000016D0: 24 22 44 52 55 45 43 4B 45 4E 20 21 20 20 20 20 |$"DRUECKEN ! |
000016E0: 20 20 20 20 20 20 20 22 52 46 24 00 10 1F BC 07 | "RF$.....|
000016F0: 99 48 45 24 44 36 24 22 53 41 56 45 22 47 46 24 |.HE$D6$"SAVE"GF$|
00001700: 22 41 44 52 45 53 53 45 4E 22 3B 56 3B 47 46 24 |"ADRESSEN";V;GF$|
00001710: 00 38 1F C6 07 97 36 33 31 2C 31 33 3A 97 36 33 |.8....631,13:.63|
00001720: 32 2C 31 33 3A 97 31 39 38 2C 32 3A 99 48 45 24 |2,13:.198,2:.HE$|
00001730: 44 33 24 42 4B 24 3A 80 00 46 1F CB 07 8D 31 31 |D3$BK$:..F....11|
00001740: 30 3A 89 37 31 30 00 72 1F CC 07 99 43 4C 24 44 |0:.710.r....CL$D|
00001750: 36 24 22 53 41 56 45 22 47 46 24 22 40 3A 41 44 |6$"SAVE"GF$"@:AD|
00001760: 52 45 53 53 45 4E 22 3B 56 3B 47 46 24 3B 22 2C |RESSEN";V;GF$;",|
00001770: 38 22 00 85 1F CD 07 99 48 45 24 3A 99 44 33 24 |8"......HE$:.D3$|
00001780: 42 4B 24 3A 80 00 BF 1F D0 07 83 20 43 4F 4D 4D |BK$:....... COMM|
00001790: 4F 44 4F 52 45 20 57 45 4C 54 2F 52 45 44 41 4B |ODORE WELT/REDAK|
000017A0: 54 49 4F 4E 2F 50 4F 53 54 46 41 43 48 31 31 30 |TION/POSTFACH110|
000017B0: 37 2F 44 2D 38 30 34 34 20 4C 4F 48 48 4F 46 00 |7/D-8044 LOHHOF.|
000017C0: 09 20 D5 07 83 20 43 4F 4D 4D 4F 44 4F 52 45 2F |. ... COMMODORE/|
000017D0: 42 55 45 52 4F 4D 41 53 43 48 49 4E 45 4E 20 47 |BUEROMASCHINEN G|
000017E0: 4D 42 48 2F 4C 59 4F 4E 45 52 20 53 54 52 41 53 |MBH/LYONER STRAS|
000017F0: 53 45 20 33 38 2F 44 2D 36 30 30 30 20 46 52 41 |SE 38/D-6000 FRA|
00001800: 4E 4B 46 55 52 54 20 37 31 00 4E 20 DA 07 83 20 |NKFURT 71.N ... |
00001810: 43 4F 4D 4D 4F 44 4F 52 45 2F 42 55 45 52 4F 4D |COMMODORE/BUEROM|
00001820: 41 53 43 48 49 4E 45 4E 20 47 4D 42 48 2F 4B 49 |ASCHINEN GMBH/KI|
00001830: 4E 53 4B 59 20 53 54 52 41 53 53 45 20 34 30 2D |NSKY STRASSE 40-|
00001840: 34 34 2F 41 2D 31 32 33 32 20 57 49 45 4E 00 5A |44/A-1232 WIEN.Z|
00001850: 20 AC 26 83 22 2A 2A 2A 2A 22 00 7B 20 B6 26 8F | .&."****".{ .&.|
00001860: 20 41 44 52 45 53 53 45 4E 2D 52 45 47 49 53 54 | ADRESSEN-REGIST|
00001870: 45 52 20 3D 3D 3D 3D 3D 3D 36 34 00 9C 20 C0 26 |ER ======64.. .&|
00001880: 8F 20 30 33 38 39 31 31 20 42 59 54 45 53 20 4D |. 038911 BYTES M|
00001890: 45 4D 4F 52 59 20 20 20 20 3D 3D 3D 00 BD 20 CA |EMORY ===.. .|
000018A0: 26 8F 20 30 30 36 34 39 39 20 42 59 54 45 53 20 |&. 006499 BYTES |
000018B0: 50 52 4F 47 52 41 4D 20 20 20 3D 3D 3D 00 DE 20 |PROGRAM ===.. |
000018C0: D4 26 8F 20 30 30 30 33 34 33 20 42 59 54 45 53 |.&. 000343 BYTES|
000018D0: 20 56 41 52 49 41 42 4C 45 53 20 3D 3D 3D 00 FF | VARIABLES ===..|
000018E0: 20 DE 26 8F 20 30 30 30 30 30 30 20 42 59 54 45 | .&. 000000 BYTE|
000018F0: 53 20 41 52 52 41 59 53 20 20 20 20 3D 3D 3D 00 |S ARRAYS ===.|
00001900: 20 21 E8 26 8F 20 30 30 30 30 39 30 20 42 59 54 | !.&. 000090 BYT|
00001910: 45 53 20 53 54 52 49 4E 47 53 20 20 20 3D 3D 3D |ES STRINGS ===|
00001920: 00 41 21 F2 26 8F 20 30 33 31 39 37 39 20 42 59 |.A!.&. 031979 BY|
00001930: 54 45 53 20 46 52 45 45 20 28 30 29 20 20 3D 3D |TES FREE (0) ==|
00001940: 3D 00 62 21 FC 26 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |=.b!.&. ========|
00001950: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001960: 3D 3D 00 00 00 |==... |
..$.... ADRESSEN-REGISTER ========64.G..
.. (P) COMMODORE WELT TEAM =.J.... ==
==========================...(.. (C) BY
AXEL KOHLMANN =...2..
=.S.<.. VERSION 2.1 40Z/
ASCII =...F.. VC-20 + 3K + 1530/1541
=...P.. C-64 + 1530/1541/1571
=.<.Z.. ============================.E.D
..370._.N.GF$.G(034):Y3$.G(162).Y.X.Y5$.
G(166):KL$.G(091).....U4$.G(191):SS$.G(0
47).....KR$.G(093).....SL$.G(014):C4$.G(
017).V. .RN$.G(018):HE$.G(019).....RE$.G
(028):C3$.G(029).....GR$.G(030):BL$.G(03
1).....S1$.G(032).3.H.FA$.G(130):FB$.G(1
31).M.R.BK$.G(144):C2$.G(145).G...RF$.G(
146):CL$.G(147).....PU$.G(156):C1$.G(157
).....CY$.G(159).....S2$.G(160):S3$.G(22
4).D...Z1$.G(096):Z2$.G(098).....Z3$.G(1
23):Z4$.G(171).....Z5$.G(173):Z6$.G(174)
...".Z7$.G(176):Z8$.G(177).,.,.Z9$.G(178
):ZA$.G(179).F.6.ZB$.G(189):M1$.G(125).B
.@.D2$.C4$.C4$:D3$.D2$.C4$.~.J.D4$.D3$.D
2$:D5$.D4$.C4$...T.D6$.D5$.C4$:D7$.D6$.C
4$...^.D8$.D7$.C4$:D9$.D8$.C4$...H.....R
.. ***************************...|.. C-6
4 FARBE BLAU/WEISS *****......53280,6:.5
3281,1.8.... VC-20 FARBE BLAU/WEISS ****
.K.... POKE36879,30.M.... **************
*************.{....110:.710...... ******
************* MENUE *...B.. ************
DATENEINGABE *.K.L.Z. 2030...V..CL$D7$R
E$Z7$;:.I.1.19:.Z1$;:.:.Z6$......M1$"
GEBEN SIE DIE "M1$.5....M1$" EINZELNEN
ADRESS- "M1$.V....M1$" ANGABEN WIE NAME
, "M1$.W....M1$"STRASSE, WOHNORT..."M1$.
.....M1$"JEWEILS DURCH EINEN"M1$......M1
$" SCHRAEGSTRICH "GF$SS$GF$M1$......M1$
" VONEINANDER "M1$...&..M1$" GET
RENNT EIN. "M1$.".0..M1$" DIE ERSTE AN
GABE "M1$.C.:..M1$" IST ENTSCHEIDEND "
M1$.D.D..M1$" FUER SUCHEN&SORT. "M1$...N
..M1$" "M1$...X..M1$"
ZUR FUNKTIONSWAHL "M1$.Q.B..M1$" "RN$"
RETURN"RF$"-TASTE "M1$...L..Z5$;:.I.1
.19:.Z1$;:.:.ZB$.*.V..HE$BL$RN$" GEBEN S
IE DATEN EIN "RF$:L3$.C1$.C1$.C1$.<....
.(0).900.970.M....U4$L3$;:.F$.]....F$.U4
$.710.V....CL$D3$;Z;"DATA ";F$......"460
Z=";Z.10:."GOTO100"......631,13:.632,13
:.633,13:.198,3:.HE$:....... ***********
******** MENUE *...F..CL$" "RE$RN$"
"RF$...P.." "RN$"ADRESSEN
-REGISTER "RF$.R.Z.." "RN$"
"RF$.V...." "RN$"(C) AXEL KOHLMAN
N "RF$......" "RN$" "R
F$......HE$D6$BK$" FUNKTIONSWAHL":...
....RE$RN$;:.I.1.20:.Y3$;:.:.RF$:.......
BK$" DRUECKE:":......." "RN$"1"RF$" DA
TENEINGABE".=. .." "RN$"2"RF$" DATENAUS
GABE"._.*.." "RN$"3"RF$" SORTIERUNG ".
..4.." "RN$"4"RF$" ADRESSEN SUCHEN"...>
.." "RN$"5"RF$" ADRESSAENDERUNG".K.H.."
"RN$"6"RF$" PROGRAMMENDE"...M.." "RN$
"7"RF$" ABSPEICHERN TAPE"...N.." "RN$"8
"RF$" ABSPEICHERN DISK".*.R..A$:.A$."".8
50.\.\..E(A$).460,1530,1030,1360,1840,19
20,1950,1996.E.F..850...P.. *** S FELD V
ON B$ TRENNEN *...Z..N$(N):.I.0.N.....LL
.0.....LL.LL.1.E....LL.C(B$(I)).1.950...
...J(B$(I),LL,1)."/".950.....N$(I).N$(I)
.J(B$(I),LL,1):.910.............F.J..C4$
BL$" KEIN SPEICHERPLATZ MEHR VERFUE
GBAR!".[.T..I.1.2000:.:.710......PU$RN$C
2$C2$" DRUCKER EINSCHALTEN!! UND ZUR
"RF$;.Q....RN$" BESTAETIGUNG RETUR
N-TASTE DRUECKEN "RF$......HE$D4$"
"RN$"DRUCKER"RF$......198,0:.198,1:.D
3$" OK!":..>...H4$.H4$.C2$.C2$.C
2$.C2$.C2$.C2$......H4$" "PU$RN$"SORT
IERUNG "RF$:.D6$" "RN$"BITTE ETWAS GED
ULD ".....N.1:.1060:.1080...$..A$:. A$.
"****"..:N.N.1:..H...N.N.1:.1060...8.N.N
.1:.B$(N):.X.0.N:.B$(X):.:.:.890...B..CL
$:.1100:.1110.C.L..HE$RE$RN$"ALPHABETISC
HE SORTIERUNG DER NAMEN "RF$:..T.V.
.I.0.N.1:K.I.A.`..J.I.1.N.V.J..N$(J).N$(
K).K.J.}.T..J...~.X$.N$(K):N$(K).N$(I):N
$(I).X$......I.....F$.C4$:L.1......I.1.N
:.1270:.FF$;N$(I):L.L.1:.L.17..1510.....
.1100:FF$.FF$.F$:......K.1.300:.K.......
:.D.:.FF$RE$RN$"ALLE NAMEN SORTIERT! "RF
$;._.N..PU$RN$"OK? RETURN --> ENDE"RF$;.
Q.X..198,0:.198,1......B(631)..13.1240..
....198,0:.:.110:.710.....AS.F(N$(I)).64
.V....AS.1300,1310,1320,1330,1340,1350..
...AS.AS.6:.1280......CY$;:.......RE$;:.
...(..BK$;:....2..PU$;:..$.<..GR$;:..0.F
..BL$;:..E.P..C2$C2$C2$C2$C2$" "PU$RN
$"ADRESSEN SUCHEN"RF$...Z..D5$" "RN$"BI
TTE ETWAS GEDULD"RF$...D..1060:.B$(N):.K
.0.N:.B$(K):.:.890...N..CL$RE$RN$" SUCHE
N EINER ADRESSE (RETURN-->ENDE) "RF$..
.X..D3$RE$"NAME: ";.*....Y5$C1$C1$C1$;:
.NA$:.NA$.Y5$.1490.K....K.0.N:.NA$.N$(K)
.K2.K:.1460.Q....... ..D3$RE$" DIE ADRES
SE IST NICHT GESPEICHERT ".....
.LT.1.2000:.:.1390.Y...J.K2:K2.1:.1670:.
RE$RN$"OK? --> TASTE DRUECKEN"RF$......1
98,0:.198,1:.198,0...H..1390...R..:.110:
.710......2000.S...L.1:.C4$RE$RN$"WEITER
? TASTE DRUECKEN"RF$;:.198,0:.198,1.K...
.CL$:.1100:FF$."":.......CL$RE$RN$"AUSGA
BE ALLER ADRESSEN"RF$......D2$BK$" AUSG
ABEGERAET:".T....C4$" "RN$"1"RF$" DRUC
KER"......" "RN$"2"RF$" BILDSCHIRM"...
"..D5$RE$RN$" BITTE WAEHLEN! "RF$.
3.,..D$:.D$."".1580.H.6..E(D$).1610,1620
.R.@..1580.|.J.AG.4:.990:.4,4:.1650: 4:.
:.:.110:.710...T..HE$PU$D5$" "RN$"BI
LDSCHIRM"RF$D5$.Q.^.."
"C2$C2$C2$C2$...H.AG.3:.1650:.:.:.11
0:.710...R..1060:.B$(N.1):.J.1.N.1...|..
B$(J).-....C.0.7:C$(C)." ":.C.9...I.0:C.
1.C...I.I.1.Z....I.C(B$(J)).1.1730.|....
J(B$(J),I,1)."/".C.C.1:.1690.....C$(C).C
$(C).J(B$(J),I,1):.1690...B..K2.0..1810:
....L..1780:....V..RE$RN$" OK? ENDE -->
RETURN "RF$......198,0:.198,1:.B(631).1
3........1760......AG.4..1830.Y...BI.BI.
1:.BI.2.BI.0:.RE$RN$"WEITER? TASTE DRUEC
KEN!"RF$;.P....198,0:.198,1:.CL$......C.
0.7:.BK$C1$C$(C):.C:....... ********* DR
UCKER OUTPUT *.X.&..C.0.7:.4,"
";C$(C):.:....0..CL$RE$RN$" ADRESSE
NAENDERUNG "RF$;.;.:..RN$"(ANGABEN HINT
ER DEN DATAS AENDERN UND DANN"RF$;.~.D.
.RN$" PROGRAMM ERNEUT MIT "RF$"RUN"
RN$" STARTEN) "RF$;.C.N..RN$"CTRL-TAS
TE ZUM VERLANGSAMEN VON LIST
"RF$...X..D3$"LIST2000- : "KL$"RE
TURN"KR$"...B..K.1.2000:.:.631,13:.198,1
...L..HE$D6$:....V..710.(...V. 1.U....CL
$D3$"1920 V=";V.1:."V=";V;":GOTO1890".W.
...631,13:.632,13:.198,2:.HE$:.......110
:.CL$RE$RN$"KASSETTE EINLEGEN UND"RF$.H.
...RN$"DIE TASTE REC + PLAY "RF$......RN
$"DRUECKEN ! "RF$......HE$D6$"
SAVE"GF$"ADRESSEN";V;GF$.8.F..631,13:.63
2,13:.198,2:.HE$D3$BK$:..F.K..110:.710.R
.L..CL$D6$"SAVE"GF$"@:ADRESSEN";V;GF$;",
8"...M..HE$:.D3$BK$:....P.. COMMODORE WE
LT/REDAKTION/POSTFACH1107/D-8044 LOHHOF.
. U.. COMMODORE/BUEROMASCHINEN GMBH/LYON
ER STRASSE 38/D-6000 FRANKFURT 71.N Z..
COMMODORE/BUEROMASCHINEN GMBH/KINSKY STR
ASSE 40-44/A-1232 WIEN.Z .&."****".{ .&.
ADRESSEN-REGISTER ======64.. .&. 038911
BYTES MEMORY ===.. J&. 006499 BYTES
PROGRAM ===.. T&. 000343 BYTES VARIABL
ES ===.. .&. 000000 BYTES ARRAYS ===.
!.&. 000090 BYTES STRINGS ===.A!.&. 0
31979 BYTES FREE (0) ===.B!.&. ========
==================...
> CLICK IMAGE PREVIEW FOR FULL MODAL