RSTELLEN EINES 
FILE INFORMATION
FILENAME(S): RSTELLEN EINES 
FILE TYPE(S): PRG
FILE SIZE: 6.5K
FIRST SEEN: 2025-12-01 01:02:02
APPEARS ON: 1 disk(s)
FILE HASH
042098d7e02a54b6ee10f96a88692dfcfe0fc14d254be59786a414ea392f7123
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 | RSTELLEN EINES  | PRG | hedning, German ebay | 11 | 12 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 07 00 97 34 35 2C C2 28 31 37 34 29 |.......45,.(174)|
00000010: 3A 97 34 36 2C C2 28 31 37 35 29 3A 9C 00 38 08 |:.46,.(175):..8.|
00000020: 08 00 8F 20 28 43 29 20 42 59 20 4B 4C 41 55 53 |... (C) BY KLAUS|
00000030: 20 4B 4C 4F 45 4B 45 52 00 5D 08 09 00 9C 3A 86 | KLOEKER.]....:.|
00000040: 41 24 28 31 35 29 2C 45 28 35 30 2C 36 29 2C 45 |A$(15),E(50,6),E|
00000050: 24 28 35 30 2C 36 29 3A 89 31 30 30 30 00 85 08 |$(50,6):.1000...|
00000060: 0A 00 5A 31 B2 33 3A 5A 32 B2 39 3A 53 B2 31 33 |..Z1.3:Z2.9:S.13|
00000070: 3A 8F 20 2A 20 4D 41 53 4B 45 20 4C 4F 45 53 43 |:. * MASKE LOESC|
00000080: 48 45 4E 20 2A 00 BD 08 0F 00 81 5A B2 5A 31 A4 |HEN *......Z.Z1.|
00000090: 5A 32 3A 8D 39 30 3A 99 22 20 20 20 20 20 20 20 |Z2:.90:." |
000000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000B0: 20 20 20 22 3A 82 3A 8B 43 B2 30 A7 8E 00 D5 08 | ":.:.C.0.....|
000000C0: 14 00 5A 31 B2 31 33 3A 5A 32 B2 32 31 3A 43 B2 |..Z1.13:Z2.21:C.|
000000D0: 30 3A 89 31 35 00 0E 09 1E 00 81 4A B2 32 A4 36 |0:.15......J.2.6|
000000E0: 3A 45 24 28 49 2C 4A 29 B2 C4 28 B5 28 45 28 49 |:E$(I,J)..(.(E(I|
000000F0: 2C 4A 29 AC 31 30 AA 2E 35 29 29 3A 8F 20 2A 20 |,J).10..5)):. * |
00000100: 46 4F 52 4D 41 54 20 54 41 42 45 4C 4C 45 00 43 |FORMAT TABELLE.C|
00000110: 09 23 00 45 24 28 49 2C 4A 29 B2 C8 28 45 24 28 |.#.E$(I,J)..(E$(|
00000120: 49 2C 4A 29 2C C3 28 45 24 28 49 2C 4A 29 29 AB |I,J),.(E$(I,J)).|
00000130: 31 29 AA 22 2E 22 AA C9 28 45 24 28 49 2C 4A 29 |1)."."..(E$(I,J)|
00000140: 2C 31 29 00 6C 09 28 00 4C 24 B2 22 22 3A 81 41 |,1).l.(.L$."":.A|
00000150: B2 31 A4 31 30 AB C3 28 45 24 28 49 2C 4A 29 29 |.1.10..(E$(I,J))|
00000160: 3A 4C 24 B2 4C 24 AA 22 2E 22 3A 82 00 83 09 2D |:L$.L$.".":....-|
00000170: 00 45 24 28 49 2C 4A 29 B2 4C 24 AA 45 24 28 49 |.E$(I,J).L$.E$(I|
00000180: 2C 4A 29 00 AC 09 32 00 8B C3 28 45 24 28 49 2C |,J)...2...(E$(I,|
00000190: 4A 29 29 B1 31 30 A7 45 24 28 49 2C 4A 29 B2 C9 |J)).10.E$(I,J)..|
000001A0: 28 45 24 28 49 2C 4A 29 2C 31 30 29 00 B4 09 37 |(E$(I,J),10)...7|
000001B0: 00 82 3A 8E 00 D1 09 46 00 93 22 4D 45 4E 55 45 |..:....F.."MENUE|
000001C0: 22 2C 38 3A 8F 20 2A 4C 4F 41 44 20 4D 45 4E 55 |",8:. *LOAD MENU|
000001D0: 45 00 00 0A 50 00 41 B2 35 35 39 30 39 3A 81 49 |E...P.A.55909:.I|
000001E0: B2 31 36 33 37 A4 31 36 36 32 3A 97 49 2C 31 30 |.1637.1662:.I,10|
000001F0: 30 3A 97 41 2C 31 3A 41 B2 41 AA 31 3A 82 3A 8E |0:.A,1:A.A.1:.:.|
00000200: 00 30 0A 5A 00 97 32 31 34 2C 5A 3A 97 32 31 31 |.0.Z..214,Z:.211|
00000210: 2C 53 3A 9E 35 38 37 33 32 3A 8E 3A 8F 20 2A 20 |,S:.58732:.:. * |
00000220: 43 55 52 53 4F 52 50 4F 53 49 54 49 4F 4E 20 2A |CURSORPOSITION *|
00000230: 00 4C 0A 5F 00 81 49 B2 35 36 32 31 36 A4 35 36 |.L._..I.56216.56|
00000240: 32 35 35 3A 97 49 2C 4F 3A 82 3A 8E 00 65 0A 64 |255:.I,O:.:..e.d|
00000250: 00 8F 20 2A 20 41 55 53 57 41 48 4C 52 4F 55 54 |.. * AUSWAHLROUT|
00000260: 49 4E 45 20 2A 00 89 0A 6E 00 8D 39 30 3A 99 22 |INE *...n..90:."|
00000270: 12 20 20 20 20 20 20 20 20 20 20 20 92 22 3A 81 |. .":.|
00000280: 49 B2 31 A4 37 35 3A 82 49 00 A9 0A 78 00 8D 39 |I.1.75:.I...x..9|
00000290: 30 3A 99 22 12 22 41 24 28 59 29 22 92 22 3A 81 |0:."."A$(Y)".":.|
000002A0: 49 B2 31 A4 31 32 35 3A 82 00 E1 0A 82 00 A1 47 |I.1.125:.......G|
000002B0: 24 3A 8B 47 24 B3 B1 C7 28 31 33 33 29 AF 47 24 |$:.G$...(133).G$|
000002C0: B3 B1 C7 28 31 33 34 29 AF 47 24 B3 B1 C7 28 31 |...(134).G$...(1|
000002D0: 33 35 29 AF 47 24 B3 B1 C7 28 31 33 29 A7 31 31 |35).G$...(13).11|
000002E0: 30 00 F8 0A 8C 00 8B 47 24 B2 C7 28 31 33 33 29 |0......G$..(133)|
000002F0: AF 43 A7 43 B2 30 3A 8E 00 31 0B 96 00 8B 47 24 |.C.C.0:..1....G$|
00000300: B2 C7 28 31 33 29 A7 8D 39 30 3A 41 24 28 59 29 |..(13)..90:A$(Y)|
00000310: B2 22 3E 22 AA CA 28 41 24 28 59 29 2C 32 2C 31 |.">"..(A$(Y),2,1|
00000320: 30 29 3A 99 22 12 22 41 24 28 59 29 22 92 22 3A |0):."."A$(Y)".":|
00000330: 8E 00 44 0B 9B 00 8B 47 24 B2 C7 28 31 33 34 29 |..D....G$..(134)|
00000340: A7 31 37 30 00 57 0B A0 00 8B 47 24 B2 C7 28 31 |.170.W....G$..(1|
00000350: 33 35 29 A7 31 39 30 00 60 0B A5 00 89 31 31 30 |35).190.`....110|
00000360: 00 81 0B AA 00 5A B2 5A AA 53 57 3A 59 B2 59 AA |.....Z.Z.SW:Y.Y.|
00000370: 31 3A 8B 5A B1 5A 32 A7 5A B2 5A 31 3A 59 B2 59 |1:.Z.Z2.Z.Z1:Y.Y|
00000380: 31 00 8A 0B B4 00 89 31 31 30 00 AB 0B BE 00 5A |1......110.....Z|
00000390: B2 5A AB 53 57 3A 59 B2 59 AB 31 3A 8B 5A B3 5A |.Z.SW:Y.Y.1:.Z.Z|
000003A0: 31 A7 5A B2 5A 32 3A 59 B2 59 32 00 B4 0B C3 00 |1.Z.Z2:Y.Y2.....|
000003B0: 89 31 31 30 00 D1 0B C8 00 8F 20 2A 20 57 41 48 |.110...... * WAH|
000003C0: 4C 2D 46 55 53 53 5A 45 49 4C 45 20 2A 3A 53 3D |L-FUSSZEILE *:S=|
000003D0: 30 00 F7 0B D2 00 5A B2 32 33 3A 8D 39 30 3A 99 |0.....Z.23:.90:.|
000003E0: 22 12 20 20 20 20 20 20 20 20 92 22 3B 3A 81 49 |". .";:.I|
000003F0: B2 31 A4 37 35 3A 82 00 19 0C DC 00 8D 39 30 3A |.1.75:.......90:|
00000400: 99 22 12 22 42 41 24 28 59 29 22 92 22 3B 3A 81 |."."BA$(Y)".";:.|
00000410: 49 B2 31 A4 31 37 35 3A 82 00 46 0C E6 00 A1 47 |I.1.175:..F....G|
00000420: 24 3A 8B 47 24 B3 B1 C7 28 31 33 34 29 AF 47 24 |$:.G$...(134).G$|
00000430: B3 B1 C7 28 31 33 35 29 AF 47 24 B3 B1 C7 28 31 |...(135).G$...(1|
00000440: 33 29 A7 32 31 30 00 62 0C F0 00 8B 47 24 B2 C7 |3).210.b....G$..|
00000450: 28 31 33 29 A7 8D 39 30 3A 99 22 12 3E 92 22 3B |(13)..90:.".>.";|
00000460: 3A 8E 00 75 0C FA 00 8B 47 24 B2 C7 28 31 33 35 |:..u....G$..(135|
00000470: 29 A7 32 38 30 00 93 0C 04 01 53 B2 53 AA 38 3A |).280.....S.S.8:|
00000480: 59 B2 59 AA 31 3A 8B 53 B1 33 32 A7 53 B2 30 3A |Y.Y.1:.S.32.S.0:|
00000490: 59 B2 31 00 9C 0C 0E 01 89 32 31 30 00 BA 0C 18 |Y.1......210....|
000004A0: 01 53 B2 53 AB 38 3A 59 B2 59 AB 31 3A 8B 53 B3 |.S.S.8:Y.Y.1:.S.|
000004B0: 30 A7 53 B2 33 32 3A 59 B2 35 00 C3 0C 22 01 89 |0.S.32:Y.5..."..|
000004C0: 32 31 30 00 DC 0C 2C 01 8F 20 2A 20 45 49 4E 47 |210...,.. * EING|
000004D0: 41 42 45 52 4F 55 54 49 4E 45 20 2A 00 E4 0C 36 |ABEROUTINE *...6|
000004E0: 01 8D 39 30 00 EF 0C 40 01 49 4E 24 B2 22 22 00 |..90...@.IN$."".|
000004F0: FA 0C 4A 01 99 22 A2 9D 22 3B 00 0D 0D 54 01 A1 |..J.."..";...T..|
00000500: 47 24 3A 8B 47 24 B2 22 22 A7 33 34 30 00 24 0D |G$:.G$."".340.$.|
00000510: 5E 01 47 B2 C6 28 47 24 29 3A 8B 47 B2 31 33 A7 |^.G..(G$):.G.13.|
00000520: 89 34 36 30 00 30 0D 68 01 8B 47 B2 31 33 A7 8E |.460.0.h..G.13..|
00000530: 00 47 0D 72 01 8B 47 24 B3 22 30 22 B0 47 24 B1 |.G.r..G$."0".G$.|
00000540: 22 39 22 A7 34 32 30 00 56 0D 7C 01 49 4E 24 B2 |"9".420.V.|.IN$.|
00000550: 49 4E 24 AA 47 24 00 5F 0D 86 01 99 47 24 3B 00 |IN$.G$._....G$;.|
00000560: 88 0D 90 01 8B C3 28 49 4E 24 29 B1 4E A7 81 49 |......(IN$).N..I|
00000570: B2 31 A4 C3 28 49 4E 24 29 3A 99 C7 28 32 30 29 |.1..(IN$):..(20)|
00000580: 3B 3A 82 3A 89 33 32 30 00 91 0D 9A 01 89 33 33 |;:.:.320......33|
00000590: 30 00 9F 0D A4 01 8B 47 B2 34 36 A7 33 38 30 00 |0......G.46.380.|
000005A0: B0 0D A9 01 8B 47 24 B2 C7 28 31 33 33 29 A7 39 |.....G$..(133).9|
000005B0: 00 BF 0D AE 01 8B 47 B3 B1 32 30 A7 33 33 30 00 |......G..20.330.|
000005C0: D1 0D B8 01 8B C3 28 49 4E 24 29 B3 31 A7 33 33 |......(IN$).1.33|
000005D0: 30 00 EE 0D C2 01 49 4E 24 B2 C8 28 49 4E 24 2C |0.....IN$..(IN$,|
000005E0: C3 28 49 4E 24 29 AB 31 29 3A 89 33 39 30 00 1C |.(IN$).1):.390..|
000005F0: 0E CC 01 50 4E 24 B2 22 22 3A 81 49 B2 31 A4 28 |...PN$."":.I.1.(|
00000600: 39 AB C3 28 49 4E 24 29 29 3A 50 4E 24 B2 50 4E |9..(IN$)):PN$.PN|
00000610: 24 AA 22 2E 22 3A 82 3A 99 50 4E 24 00 2E 0E D6 |$.".":.:.PN$....|
00000620: 01 8B C3 28 49 4E 24 29 B3 31 A7 33 31 30 00 34 |...(IN$).1.310.4|
00000630: 0E E0 01 8E 00 44 0E 84 03 8F 20 2A 20 4D 41 53 |.....D.... * MAS|
00000640: 4B 45 20 2A 00 7A 0E 8E 03 99 4D 41 24 3A 41 B2 |KE *.z....MA$:A.|
00000650: 35 35 33 38 38 3A 81 49 B2 31 30 37 36 A4 31 39 |55388:.I.1076.19|
00000660: 30 36 A9 34 30 3A 97 49 2C 31 30 31 3A 97 41 2C |06.40:.I,101:.A,|
00000670: 31 3A 41 B2 41 AA 34 30 3A 82 00 A7 0E 98 03 41 |1:A.A.40:......A|
00000680: B2 35 35 37 37 36 3A 81 49 B2 31 35 30 34 A4 31 |.55776:.I.1504.1|
00000690: 35 31 34 3A 97 49 2C 31 30 30 3A 97 41 2C 31 3A |514:.I,100:.A,1:|
000006A0: 41 B2 41 AA 31 3A 82 00 D4 0E A2 03 41 B2 35 35 |A.A.1:......A.55|
000006B0: 37 38 35 3A 81 49 B2 31 35 31 37 A4 31 35 34 36 |785:.I.1517.1546|
000006C0: 3A 97 49 2C 31 30 30 3A 97 41 2C 31 3A 41 B2 41 |:.I,100:.A,1:A.A|
000006D0: AA 31 3A 82 00 0F 0F B6 03 5A B2 33 3A 53 B2 30 |.1:......Z.3:S.0|
000006E0: 3A 8D 39 30 3A 99 22 C1 55 53 57 41 48 4C 20 3A |:.90:.".USWAHL :|
000006F0: 22 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3A 99 |":.".........":.|
00000700: 22 12 20 2D 20 2D 20 2D 20 2D 20 2D 20 92 22 00 |". - - - - - .".|
00000710: 48 0F C0 03 5A B2 36 3A 81 49 B2 31 A4 33 3A 8D |H...Z.6:.I.1.3:.|
00000720: 39 30 3A 99 22 12 22 41 24 28 49 29 22 92 22 3A |90:."."A$(I)".":|
00000730: 99 22 12 20 2D 20 2D 20 2D 20 2D 20 2D 20 92 22 |.". - - - - - ."|
00000740: 3A 5A B2 5A AA 32 3A 82 00 4E 0F CA 03 8E 00 54 |:Z.Z.2:..N.....T|
00000750: 0F E7 03 3A 00 70 0F E8 03 8F 20 2A 2A 20 54 49 |...:.p.... ** TI|
00000760: 4C 47 55 4E 47 53 52 45 43 48 4E 55 4E 47 20 2A |LGUNGSRECHNUNG *|
00000770: 00 7F 0F F2 03 8D 36 30 30 30 3A 8D 39 30 30 00 |......6000:.900.|
00000780: 95 0F FC 03 5A B2 32 33 3A 53 B2 30 3A 8D 39 30 |....Z.23:S.0:.90|
00000790: 3A 99 4D 42 24 00 D4 0F 38 04 5A B2 36 3A 5A 31 |:.MB$...8.Z.6:Z1|
000007A0: B2 5A 3A 5A 32 B2 31 30 3A 53 B2 30 3A 59 B2 31 |.Z:Z2.10:S.0:Y.1|
000007B0: 3A 59 31 B2 59 3A 59 32 B2 33 3A 53 57 B2 32 3A |:Y1.Y:Y2.3:SW.2:|
000007C0: 43 B2 30 3A 8D 31 30 30 3A 46 B2 59 3A 8B 46 B2 |C.0:.100:F.Y:.F.|
000007D0: 33 A7 37 30 00 EB 0F D0 07 8F 20 2A 20 45 49 4E |3.70...... * EIN|
000007E0: 47 41 42 45 4D 41 53 4B 45 20 2A 00 1E 10 DA 07 |GABEMASKE *.....|
000007F0: 5A B2 33 3A 53 B2 31 33 3A 8D 39 30 3A 99 22 C5 |Z.3:S.13:.90:.".|
00000800: 49 4E 47 41 42 45 20 3A 22 3A 5A B2 34 3A 8D 39 |INGABE :":Z.4:.9|
00000810: 30 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 4A |0:.".........".J|
00000820: 10 E4 07 5A B2 35 3A 81 49 B2 34 A4 36 3A 53 B2 |...Z.5:.I.4.6:S.|
00000830: 31 33 3A 8D 39 30 3A 99 22 12 22 41 24 28 49 29 |13:.90:."."A$(I)|
00000840: 22 92 20 3A 20 22 3B 50 4D 24 00 68 10 EE 07 5A |". : ";PM$.h...Z|
00000850: B2 5A AA 32 3A 82 3A 5A B2 32 33 3A 53 B2 30 3A |.Z.2:.:Z.23:S.0:|
00000860: 8D 39 30 3A 99 4D 43 24 00 99 10 F8 07 5A B2 35 |.90:.MC$.....Z.5|
00000870: 3A 53 B2 32 37 3A 4E B2 39 3A 81 4A B2 34 A4 36 |:S.27:N.9:.J.4.6|
00000880: 3A 8D 33 30 30 3A 41 28 4A 29 B2 C5 28 49 4E 24 |:.300:A(J)..(IN$|
00000890: 29 3A 5A B2 5A AA 32 3A 82 00 CB 10 16 08 5A B2 |):Z.Z.2:......Z.|
000008A0: 31 34 3A 53 B2 31 33 3A 8D 39 30 3A 99 22 C5 49 |14:S.13:.90:.".I|
000008B0: 4E 47 41 42 45 20 4B 4F 52 52 45 4B 54 20 3F 20 |NGABE KORREKT ? |
000008C0: 28 4A 2F 4E 29 3A 22 3A 8D 38 30 00 E4 10 20 08 |(J/N):":.80... .|
000008D0: 5A B2 31 34 3A 53 B2 33 38 3A 8D 39 30 3A 99 22 |Z.14:S.38:.90:."|
000008E0: A2 9D 22 3B 00 02 11 2A 08 A1 47 24 3A 8B 47 24 |..";...*..G$:.G$|
000008F0: B3 B1 22 4A 22 AF 47 24 B3 B1 22 4E 22 A7 32 30 |.."J".G$.."N".20|
00000900: 39 30 00 16 11 34 08 99 47 24 3A 8B 47 24 B2 22 |90...4..G$:.G$."|
00000910: 4A 22 A7 59 B2 31 00 26 11 3E 08 8B 47 24 B2 22 |J".Y.1.&.>..G$."|
00000920: 4E 22 A7 59 B2 30 00 48 11 48 08 A1 49 24 3A 8B |N".Y.0.H.H..I$:.|
00000930: 49 24 B3 B1 C7 28 31 33 29 AF 49 24 B3 B1 C7 28 |I$...(13).I$...(|
00000940: 32 30 29 A7 32 31 32 30 00 5B 11 52 08 8B 49 24 |20).2120.[.R..I$|
00000950: B2 C7 28 32 30 29 A7 32 30 38 30 00 71 11 5C 08 |..(20).2080.q.\.|
00000960: 43 B2 31 3A 8D 31 30 3A 8B 59 B2 30 A7 32 30 31 |C.1:.10:.Y.0.201|
00000970: 30 00 84 11 B8 0B 8F 20 2A 20 52 45 43 48 4E 55 |0...... * RECHNU|
00000980: 4E 47 20 2A 00 B0 11 BD 0B 99 22 93 22 3A 5A B2 |NG *......".":Z.|
00000990: 32 33 3A 53 B2 32 33 3A 8D 39 30 3A 99 4D 47 24 |23:S.23:.90:.MG$|
000009A0: 3A 45 45 28 33 29 B2 30 3A 45 45 28 35 29 B2 30 |:EE(3).0:EE(5).0|
000009B0: 00 BE 11 C2 0B 8B 46 B2 32 A7 33 35 30 30 00 D5 |......F.2.3500..|
000009C0: 11 1C 0C 8F 20 2A 20 52 41 54 45 4E 54 49 4C 47 |.... * RATENTILG|
000009D0: 55 4E 47 20 2A 00 F0 11 26 0C 54 31 B2 41 28 34 |UNG *...&.T1.A(4|
000009E0: 29 AD 41 28 36 29 3A 4A 32 B2 30 3A 54 32 B2 30 |).A(6):J2.0:T2.0|
000009F0: 00 26 12 30 0C 81 49 B2 31 A4 41 28 36 29 3A 52 |.&.0..I.1.A(6):R|
00000A00: 31 B2 41 28 34 29 AB 4A 32 AC 54 32 3A 5A 31 B2 |1.A(4).J2.T2:Z1.|
00000A10: 52 31 AC 28 41 28 35 29 AD 31 30 30 29 3A 41 31 |R1.(A(5).100):A1|
00000A20: B2 5A 31 AA 54 31 00 63 12 3A 0C 45 28 49 2C 32 |.Z1.T1.c.:.E(I,2|
00000A30: 29 B2 52 31 3A 45 28 49 2C 33 29 B2 5A 31 3A 45 |).R1:E(I,3).Z1:E|
00000A40: 28 49 2C 34 29 B2 54 31 3A 45 28 49 2C 35 29 B2 |(I,4).T1:E(I,5).|
00000A50: 41 31 3A 45 28 49 2C 36 29 B2 41 31 AD 31 32 3A |A1:E(I,6).A1.12:|
00000A60: 8D 33 30 00 85 12 44 0C 81 4A B2 33 A4 35 A9 32 |.30...D..J.3.5.2|
00000A70: 3A 45 45 28 4A 29 B2 45 45 28 4A 29 AA 45 28 49 |:EE(J).EE(J).E(I|
00000A80: 2C 4A 29 3A 82 00 A8 12 4E 0C 4A 32 B2 4A 32 AA |,J):....N.J2.J2.|
00000A90: 31 3A 54 32 B2 28 41 28 34 29 AD 41 28 36 29 29 |1:T2.(A(4).A(6))|
00000AA0: 3A 82 3A 89 33 37 30 30 00 C6 12 AC 0D 8F 20 2A |:.:.3700...... *|
00000AB0: 20 41 55 4E 4E 55 49 54 41 45 54 45 4E 54 49 4C | AUNNUITAETENTIL|
00000AC0: 47 55 4E 47 20 2A 00 F5 12 B6 0D 51 31 B2 41 28 |GUNG *.....Q1.A(|
00000AD0: 35 29 AD 31 30 30 AA 31 3A 54 31 B2 41 28 34 29 |5).100.1:T1.A(4)|
00000AE0: AC 28 28 51 31 AB 31 29 AD 28 51 31 AE 41 28 36 |.((Q1.1).(Q1.A(6|
00000AF0: 29 AB 31 29 29 00 1D 13 C0 0D 5A 31 B2 41 28 34 |).1)).....Z1.A(4|
00000B00: 29 AC 28 41 28 35 29 AD 31 30 30 29 3A 41 31 B2 |).(A(5).100):A1.|
00000B10: 54 31 AA 5A 31 3A 52 31 B2 41 28 34 29 00 5E 13 |T1.Z1:R1.A(4).^.|
00000B20: CA 0D 45 28 31 2C 32 29 B2 52 31 3A 45 28 31 2C |..E(1,2).R1:E(1,|
00000B30: 33 29 B2 5A 31 3A 45 28 31 2C 34 29 B2 54 31 3A |3).Z1:E(1,4).T1:|
00000B40: 45 28 31 2C 35 29 B2 41 31 3A 45 28 31 2C 36 29 |E(1,5).A1:E(1,6)|
00000B50: B2 41 31 AD 31 32 3A 49 B2 31 3A 8D 33 30 00 95 |.A1.12:I.1:.30..|
00000B60: 13 D4 0D 54 32 B2 54 31 3A 81 49 B2 32 A4 41 28 |...T2.T1:.I.2.A(|
00000B70: 36 29 3A 52 31 B2 52 31 AB 54 32 3A 5A 32 B2 52 |6):R1.R1.T2:Z2.R|
00000B80: 31 AC 28 41 28 35 29 AD 31 30 30 29 3A 54 32 B2 |1.(A(5).100):T2.|
00000B90: 54 32 AC 51 31 00 D2 13 DE 0D 45 28 49 2C 32 29 |T2.Q1.....E(I,2)|
00000BA0: B2 52 31 3A 45 28 49 2C 33 29 B2 5A 32 3A 45 28 |.R1:E(I,3).Z2:E(|
00000BB0: 49 2C 34 29 B2 54 32 3A 45 28 49 2C 35 29 B2 41 |I,4).T2:E(I,5).A|
00000BC0: 31 3A 45 28 49 2C 36 29 B2 41 31 AD 31 32 3A 8D |1:E(I,6).A1.12:.|
00000BD0: 33 30 00 F8 13 E8 0D 81 4A B2 33 A4 35 A9 32 3A |30......J.3.5.2:|
00000BE0: 45 45 28 4A 29 B2 45 45 28 4A 29 AA 45 28 49 2C |EE(J).EE(J).E(I,|
00000BF0: 4A 29 3A 82 4A 3A 82 49 00 22 14 F2 0D 45 45 28 |J):.J:.I."...EE(|
00000C00: 33 29 B2 45 45 28 33 29 AA 45 28 31 2C 33 29 3A |3).EE(3).E(1,3):|
00000C10: 45 45 28 35 29 B2 45 45 28 35 29 AA 45 28 31 2C |EE(5).EE(5).E(1,|
00000C20: 35 29 00 42 14 74 0E 45 45 28 33 29 B2 45 45 28 |5).B.t.EE(3).EE(|
00000C30: 33 29 AD 32 3A 45 45 28 35 29 B2 45 45 28 35 29 |3).2:EE(5).EE(5)|
00000C40: AD 32 00 68 14 7E 0E 81 49 B2 33 A4 35 A9 32 3A |.2.h.~..I.3.5.2:|
00000C50: 45 45 24 28 49 29 B2 C4 28 B5 28 45 45 28 49 29 |EE$(I)..(.(EE(I)|
00000C60: AC 31 30 AD 2E 35 29 29 00 9B 14 88 0E 45 45 24 |.10..5)).....EE$|
00000C70: 28 49 29 B2 C8 28 45 45 24 28 49 29 2C C3 28 45 |(I)..(EE$(I),.(E|
00000C80: 45 24 28 49 29 29 AB 31 29 AA 22 2E 22 AA C9 28 |E$(I)).1)."."..(|
00000C90: 45 45 24 28 49 29 2C 31 29 3A 82 00 AC 14 D8 0E |EE$(I),1):......|
00000CA0: 8F 20 2A 20 53 43 52 45 45 4E 20 2A 00 B5 14 DD |. * SCREEN *....|
00000CB0: 0E 8D 39 30 30 00 E8 14 E2 0E 5A B2 33 3A 53 B2 |..900.....Z.3:S.|
00000CC0: 31 33 3A 8D 39 30 3A 99 22 C5 49 4E 47 41 42 45 |13:.90:.".INGABE|
00000CD0: 20 3A 22 3A 5A B2 34 3A 8D 39 30 3A 99 22 A3 A3 | :":Z.4:.90:."..|
00000CE0: A3 A3 A3 A3 A3 A3 A3 22 00 17 15 EC 0E 5A B2 35 |.......".....Z.5|
00000CF0: 3A 53 B2 31 33 3A 81 49 B2 34 A4 36 3A 8D 39 30 |:S.13:.I.4.6:.90|
00000D00: 3A 99 41 24 28 49 29 22 20 3A 22 41 28 49 29 3A |:.A$(I)" :"A(I):|
00000D10: 5A B2 5A AA 32 3A 82 00 4E 15 F6 0E 5A B2 31 34 |Z.Z.2:..N...Z.14|
00000D20: 3A 53 B2 31 33 3A 8D 39 30 3A 99 22 D2 45 53 55 |:S.13:.90:.".ESU|
00000D30: 4C 54 41 54 20 3A 22 3A 5A B2 31 35 3A 8D 39 30 |LTAT :":Z.15:.90|
00000D40: 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 81 |:.".........."..|
00000D50: 15 00 0F 5A B2 31 37 3A 81 4A B2 33 A4 35 A9 32 |...Z.17:.J.3.5.2|
00000D60: 3A 8D 39 30 3A 99 22 12 22 45 43 24 28 4A 29 22 |:.90:."."EC$(J)"|
00000D70: 92 3A 22 45 45 24 28 4A 29 3A 5A B2 5A AA 32 3A |.:"EE$(J):Z.Z.2:|
00000D80: 82 00 A4 15 0A 0F 5A B2 32 31 3A 8D 39 30 3A 99 |......Z.21:.90:.|
00000D90: 22 C1 55 53 44 52 55 43 4B 20 49 4E 20 27 C4 CD |".USDRUCK IN '..|
00000DA0: 27 20 21 22 00 C5 15 14 0F 5A 41 B2 C5 28 45 45 |' !".....ZA..(EE|
00000DB0: 24 28 33 29 29 AD 28 C5 28 45 45 24 28 35 29 29 |$(3)).(.(EE$(5))|
00000DC0: AD 31 30 30 29 00 01 16 1E 0F 5A B2 31 34 3A 53 |.100).....Z.14:S|
00000DD0: B2 30 3A 8D 39 30 3A 99 22 12 20 20 20 DA 49 4E |.0:.90:.". .IN|
00000DE0: 53 2D 20 20 20 92 22 3A 5A B2 31 35 3A 8D 39 30 |S- .":Z.15:.90|
00000DF0: 3A 99 22 12 20 20 20 41 4E 54 45 49 4C 20 20 92 |:.". ANTEIL .|
00000E00: 22 00 22 16 28 0F 5A 41 24 B2 C4 28 5A 41 29 3A |".".(.ZA$..(ZA):|
00000E10: 8B 5A 41 B3 31 30 A7 5A 41 24 B2 22 20 22 AA 5A |.ZA.10.ZA$." ".Z|
00000E20: 41 24 00 4A 16 32 0F 5A 41 24 B2 C8 28 5A 41 24 |A$.J.2.ZA$..(ZA$|
00000E30: 2C 35 29 3A 5A B2 31 37 3A 53 B2 32 3A 8D 39 30 |,5):Z.17:S.2:.90|
00000E40: 3A 99 5A 41 24 3B 22 20 25 22 00 65 16 3C 0F 5A |:.ZA$;" %".e.<.Z|
00000E50: B2 31 38 3A 53 B2 33 3A 8D 39 30 3A 99 22 3D 3D |.18:S.3:.90:."==|
00000E60: 3D 3D 3D 3D 22 00 8E 16 46 0F 5A B2 32 33 3A 53 |===="...F.Z.23:S|
00000E70: B2 30 3A 8D 39 30 3A 81 49 B2 31 A4 35 3A 99 22 |.0:.90:.I.1.5:."|
00000E80: 12 22 42 41 24 28 49 29 22 92 22 3B 3A 82 00 A3 |."BA$(I)".";:...|
00000E90: 16 50 0F 59 B2 31 3A 8D 32 30 30 3A 8B 59 B2 35 |.P.Y.1:.200:.Y.5|
00000EA0: A7 37 30 00 AE 16 5A 0F 8B 59 B2 34 A7 39 00 BC |.70...Z..Y.4.9..|
00000EB0: 16 64 0F 8B 59 B2 33 A7 35 35 30 30 00 CA 16 6E |.d..Y.3.5500...n|
00000EC0: 0F 8B 59 B2 32 A7 35 30 30 30 00 DC 16 A0 0F 8F |..Y.2.5000......|
00000ED0: 20 2A 20 54 41 42 45 4C 4C 45 20 2A 00 FB 16 AA | * TABELLE *....|
00000EE0: 0F 8D 39 35 3A 58 31 B2 32 3A 58 32 B2 34 3A 59 |..95:X1.2:X2.4:Y|
00000EF0: 31 B2 31 3A 59 32 B2 41 28 36 29 00 28 17 B4 0F |1.1:Y2.A(6).(...|
00000F00: 5A B2 31 3A 53 B2 30 3A 8D 39 30 3A 81 49 B2 31 |Z.1:S.0:.90:.I.1|
00000F10: A4 32 32 3A 99 4D 44 24 3A 82 3A 5A B2 32 32 3A |.22:.MD$:.:Z.22:|
00000F20: 8D 39 30 3A 99 4D 48 24 00 3F 17 BE 0F 5A B2 33 |.90:.MH$.?...Z.3|
00000F30: 3A 53 B2 30 3A 8D 39 30 3A 99 4D 24 28 31 29 00 |:S.0:.90:.M$(1).|
00000F40: 68 17 C8 0F 5A B2 33 3A 53 B2 36 3A 81 49 B2 58 |h...Z.3:S.6:.I.X|
00000F50: 31 A4 58 32 3A 8D 39 30 3A 99 4D 24 28 49 29 3A |1.X2:.90:.M$(I):|
00000F60: 53 B2 53 AA 31 31 3A 82 00 88 17 D2 0F 5A B2 34 |S.S.11:......Z.4|
00000F70: 3A 53 B2 31 3A 8D 39 30 3A 81 49 B2 31 A4 33 37 |:S.1:.90:.I.1.37|
00000F80: 3A 99 22 3D 22 3B 3A 82 00 9D 17 04 10 5A B2 36 |:."=";:......Z.6|
00000F90: 3A 53 B2 31 3A 81 49 B2 59 31 A4 59 32 00 B9 17 |:S.1:.I.Y1.Y2...|
00000FA0: 09 10 49 24 B2 C4 28 49 29 3A 8B 49 B3 31 30 A7 |..I$..(I):.I.10.|
00000FB0: 49 24 B2 22 2E 22 AA 49 24 00 CD 17 0B 10 8D 39 |I$.".".I$......9|
00000FC0: 30 3A 99 22 2E 22 AA 49 24 3A 53 B2 36 00 DA 17 |0:.".".I$:S.6...|
00000FD0: 0E 10 81 4A B2 58 31 A4 58 32 00 EB 17 18 10 8D |...J.X1.X2......|
00000FE0: 39 30 3A 99 45 24 28 49 2C 4A 29 00 F9 17 22 10 |90:.E$(I,J)...".|
00000FF0: 53 B2 53 AA 31 31 3A 82 4A 00 1B 18 2C 10 8B C2 |S.S.11:.J...,...|
00001000: 28 32 31 34 29 B1 31 35 A7 59 32 B2 49 3A 59 31 |(214).15.Y2.I:Y1|
00001010: B2 59 32 AB 39 3A 89 34 32 30 30 00 2C 18 36 10 |.Y2.9:.4200.,.6.|
00001020: 5A B2 5A AA 31 3A 53 B2 31 3A 82 49 00 4D 18 68 |Z.Z.1:S.1:.I.M.h|
00001030: 10 5A B2 31 37 3A 53 B2 31 3A 8D 39 30 3A 81 4A |.Z.17:S.1:.90:.J|
00001040: B2 31 A4 33 38 3A 99 22 2D 22 3B 3A 82 00 5D 18 |.1.38:."-";:..].|
00001050: 94 11 92 32 30 33 2C 36 33 3A A1 47 24 00 70 18 |...203,63:.G$.p.|
00001060: 9E 11 8B 47 24 B2 C7 28 32 39 29 A7 34 35 35 30 |...G$..(29).4550|
00001070: 00 84 18 A8 11 8B 47 24 B2 C7 28 31 35 37 29 A7 |......G$..(157).|
00001080: 34 35 38 30 00 97 18 B2 11 8B 47 24 B2 C7 28 31 |4580......G$..(1|
00001090: 37 29 A7 34 36 31 30 00 AB 18 BC 11 8B 47 24 B2 |7).4610......G$.|
000010A0: C7 28 31 34 35 29 A7 34 36 34 30 00 BF 18 BF 11 |.(145).4640.....|
000010B0: 8B 47 24 B2 C7 28 31 33 33 29 A7 33 38 30 30 00 |.G$..(133).3800.|
000010C0: C9 18 C1 11 89 34 35 30 30 00 E4 18 C6 11 58 31 |.....4500.....X1|
000010D0: B2 58 31 AA 31 3A 58 32 B2 58 32 AA 31 3A 8F 20 |.X1.1:X2.X2.1:. |
000010E0: 2A 20 2D 3E 00 FE 18 D0 11 8B 58 32 B1 36 A7 58 |* ->......X2.6.X|
000010F0: 32 B2 36 3A 58 31 B2 34 3A 89 34 35 30 30 00 08 |2.6:X1.4:.4500..|
00001100: 19 DA 11 89 34 30 33 30 00 23 19 E4 11 58 31 B2 |....4030.#...X1.|
00001110: 58 31 AB 31 3A 58 32 B2 58 32 AB 31 3A 8F 20 2A |X1.1:X2.X2.1:. *|
00001120: 20 3C 2D 00 3D 19 EE 11 8B 58 31 B3 32 A7 58 31 | <-.=....X1.2.X1|
00001130: B2 32 3A 58 32 B2 34 3A 89 34 35 30 30 00 47 19 |.2:X2.4:.4500.G.|
00001140: F8 11 89 34 30 33 30 00 5A 19 02 12 8B 41 28 36 |...4030.Z....A(6|
00001150: 29 B3 31 30 A7 89 34 35 30 30 00 79 19 07 12 59 |).10..4500.y...Y|
00001160: 31 B2 59 31 AA 31 30 3A 59 32 B2 59 32 AA 31 30 |1.Y1.10:Y2.Y2.10|
00001170: 3A 8F 20 2A 20 44 4F 57 4E 00 A3 19 0C 12 8B 59 |:. * DOWN......Y|
00001180: 32 B1 41 28 36 29 A7 59 32 B2 41 28 36 29 3A 59 |2.A(6).Y2.A(6):Y|
00001190: 31 B2 59 32 AB 39 3A 8B 49 B2 41 28 36 29 A7 34 |1.Y2.9:.I.A(6).4|
000011A0: 35 30 30 00 AD 19 16 12 89 34 30 33 30 00 C0 19 |500......4030...|
000011B0: 20 12 8B 41 28 36 29 B3 31 30 A7 89 34 35 30 30 | ..A(6).10..4500|
000011C0: 00 DD 19 25 12 59 31 B2 59 31 AB 31 30 3A 59 32 |...%.Y1.Y1.10:Y2|
000011D0: B2 59 32 AB 31 30 3A 8F 20 2A 20 55 50 00 FF 19 |.Y2.10:. * UP...|
000011E0: 2A 12 8B 59 31 B3 31 A7 59 31 B2 31 3A 59 32 B2 |*..Y1.1.Y1.1:Y2.|
000011F0: 59 31 AA 39 3A 8B 49 B3 31 31 A7 34 35 30 30 00 |Y1.9:.I.11.4500.|
00001200: 09 1A 34 12 89 34 30 33 30 00 1D 1A 88 13 8F 20 |..4..4030...... |
00001210: 2A 20 41 45 4E 44 45 52 55 4E 47 20 2A 00 4B 1A |* AENDERUNG *.K.|
00001220: 92 13 43 B2 31 3A 8D 31 30 3A 53 B2 30 3A 81 5A |..C.1:.10:S.0:.Z|
00001230: B2 31 33 A4 32 30 3A 8D 39 30 3A 99 22 20 20 20 |.13.20:.90:." |
00001240: 20 20 20 20 20 20 20 20 22 3A 82 00 82 1A 9C 13 | ":......|
00001250: 5A B2 33 3A 53 B2 31 33 3A 8D 39 30 3A 99 22 C1 |Z.3:S.13:.90:.".|
00001260: 45 4E 44 45 52 55 4E 47 20 3A 22 3A 5A B2 34 3A |ENDERUNG :":Z.4:|
00001270: 8D 39 30 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |.90:."..........|
00001280: A3 22 00 B6 1A A6 13 5A B2 35 3A 53 B2 31 33 3A |.".....Z.5:S.13:|
00001290: 81 49 B2 34 A4 36 3A 8D 39 30 3A 99 22 12 22 41 |.I.4.6:.90:."."A|
000012A0: 24 28 49 29 22 92 20 3A 22 3B 41 28 49 29 3A 5A |$(I)". :";A(I):Z|
000012B0: B2 5A AA 32 3A 82 00 CD 1A B0 13 5A B2 32 33 3A |.Z.2:......Z.23:|
000012C0: 53 B2 30 3A 8D 39 30 3A 99 4D 46 24 3B 00 00 1B |S.0:.90:.MF$;...|
000012D0: BA 13 5A B2 35 3A 5A 31 B2 5A 3A 5A 32 B2 39 3A |..Z.5:Z1.Z:Z2.9:|
000012E0: 53 B2 31 33 3A 59 B2 34 3A 59 31 B2 59 3A 59 32 |S.13:Y.4:Y1.Y:Y2|
000012F0: B2 36 3A 53 57 B2 32 3A 43 B2 31 3A 8D 31 30 30 |.6:SW.2:C.1:.100|
00001300: 00 0E 1B C4 13 8B 43 B2 30 89 33 30 30 30 00 38 |......C.0.3000.8|
00001310: 1B CE 13 5A B2 31 34 3A 53 B2 31 33 3A 8D 39 30 |...Z.14:S.13:.90|
00001320: 3A 99 22 12 22 41 24 28 59 29 22 92 20 3A 20 22 |:."."A$(Y)". : "|
00001330: 3B 50 4D 24 3A 8D 38 30 00 6A 1B D8 13 5A B2 32 |;PM$:.80.j...Z.2|
00001340: 33 3A 53 B2 30 3A 8D 39 30 3A 99 4D 43 24 3B 3A |3:S.0:.90:.MC$;:|
00001350: 5A B2 31 34 3A 53 B2 32 37 3A 8D 33 30 30 3A 41 |Z.14:S.27:.300:A|
00001360: 28 59 29 B2 C5 28 49 4E 24 29 00 8C 1B E2 13 41 |(Y)..(IN$).....A|
00001370: 24 28 59 29 B2 22 20 22 AA CA 28 41 24 28 59 29 |$(Y)." "..(A$(Y)|
00001380: 2C 32 2C 31 30 29 3A 89 35 30 31 30 00 9C 1B 7C |,2,10):.5010...||
00001390: 15 8F 20 2A 20 50 52 49 4E 54 45 52 00 B4 1B 81 |.. * PRINTER....|
000013A0: 15 54 42 24 B2 C7 28 31 36 29 3A 54 41 24 B2 C7 |.TB$..(16):TA$..|
000013B0: 28 31 30 29 00 EC 1B 86 15 9F 34 2C 34 2C 37 3A |(10)......4,4,7:|
000013C0: 98 34 2C C7 28 31 34 29 54 42 24 22 31 30 C1 55 |.4,.(14)TB$"10.U|
000013D0: 53 44 52 55 43 4B 20 45 49 4E 45 53 20 D4 49 4C |SDRUCK EINES .IL|
000013E0: 47 55 4E 47 53 50 4C 41 4E 45 53 22 00 1C 1C 90 |GUNGSPLANES"....|
000013F0: 15 98 34 2C 54 42 24 3B 22 31 30 2D 2D 2D 2D 2D |..4,TB$;"10-----|
00001400: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001410: 2D 2D 2D 2D 2D 2D 2D 2D 22 54 41 24 00 4B 1C 9A |--------"TA$.K..|
00001420: 15 81 49 B2 34 A4 36 3A 98 34 2C C7 28 31 35 29 |..I.4.6:.4,.(15)|
00001430: 54 42 24 22 31 30 2A 2A 2A 20 22 41 24 28 49 29 |TB$"10*** "A$(I)|
00001440: 22 20 3A 20 22 41 28 49 29 3A 82 00 5E 1C A4 15 |" : "A(I):..^...|
00001450: 98 34 2C 54 41 24 3B 54 41 24 3B 54 41 24 00 81 |.4,TA$;TA$;TA$..|
00001460: 1C AE 15 81 49 B2 31 A4 36 3A 98 34 2C 22 20 20 |....I.1.6:.4," |
00001470: 20 22 4D 24 28 49 29 3B 3A 82 3A 98 34 2C 22 20 | "M$(I);:.:.4," |
00001480: 22 00 9B 1C B8 15 81 49 B2 31 A4 34 30 3A 98 34 |"......I.1.40:.4|
00001490: 2C 22 2D 2D 22 3B 3A 82 3A 98 34 00 C1 1C C2 15 |,"--";:.:.4.....|
000014A0: 81 49 B2 31 A4 41 28 36 29 3A 49 24 B2 C4 28 49 |.I.1.A(6):I$..(I|
000014B0: 29 3A 8B 49 B3 31 30 A7 49 24 B2 22 2E 22 AA 49 |):.I.10.I$.".".I|
000014C0: 24 00 D7 1C C7 15 98 34 2C 22 20 20 20 20 2E 22 |$......4," ."|
000014D0: AA 49 24 22 20 22 3B 00 00 1D CC 15 81 4A B2 32 |.I$" ";......J.2|
000014E0: A4 36 3A 98 34 2C 22 20 2E 2E 22 45 24 28 49 2C |.6:.4," .."E$(I,|
000014F0: 4A 29 3B 3A 82 4A 3A 98 34 2C 22 20 22 3A 82 49 |J);:.J:.4," ":.I|
00001500: 00 1A 1D D6 15 81 49 B2 31 A4 34 30 3A 98 34 2C |......I.1.40:.4,|
00001510: 22 2D 2D 22 3B 3A 82 3A 98 34 00 2D 1D DB 15 98 |"--";:.:.4.-....|
00001520: 34 2C 22 20 C7 45 53 41 4D 54 3A 22 3B 00 61 1D |4," .ESAMT:";.a.|
00001530: E0 15 50 4F B2 32 37 3A 81 4A B2 33 A4 35 A9 32 |..PO.27:.J.3.5.2|
00001540: 3A 98 34 2C A6 50 4F AB C3 28 45 45 24 28 4A 29 |:.4,.PO..(EE$(J)|
00001550: 29 29 45 45 24 28 4A 29 3B 3A 50 4F B2 32 36 3A |))EE$(J);:PO.26:|
00001560: 82 00 A2 1D EA 15 98 34 2C 54 41 24 3B 54 41 24 |.......4,TA$;TA$|
00001570: 3B 54 42 24 22 31 30 2A 2A 2A 20 C1 55 53 44 52 |;TB$"10*** .USDR|
00001580: 55 43 4B 20 44 45 52 20 D4 41 42 45 4C 4C 45 20 |UCK DER .ABELLE |
00001590: 45 52 46 4F 4C 47 54 20 49 4E 20 27 C4 CD 27 20 |ERFOLGT IN '..' |
000015A0: 21 22 00 E7 1D F4 15 98 34 2C 54 42 24 22 31 30 |!"......4,TB$"10|
000015B0: 2A 2A 2A 20 C2 45 52 45 43 48 4E 55 4E 47 20 44 |*** .ERECHNUNG D|
000015C0: 45 52 20 DA 49 4E 53 45 4E 20 45 52 46 4F 4C 47 |ER .INSEN ERFOLG|
000015D0: 54 20 41 4D 20 C5 4E 44 45 20 44 45 53 20 CA 41 |T AM .NDE DES .A|
000015E0: 48 52 45 53 20 21 22 00 22 1E FE 15 98 34 2C 54 |HRES !"."....4,T|
000015F0: 41 24 3B 54 42 24 22 31 30 2A 2A 2A 20 D4 49 4C |A$;TB$"10*** .IL|
00001600: 47 55 4E 47 20 4B 4F 4E 53 54 41 4E 54 20 20 20 |GUNG KONSTANT |
00001610: 3D 20 D2 41 54 45 4E 54 49 4C 47 55 4E 47 20 21 |= .ATENTILGUNG !|
00001620: 21 22 00 5F 1E 08 16 98 34 2C 54 42 24 22 31 30 |!"._....4,TB$"10|
00001630: 2A 2A 2A 20 C1 4E 4E 55 49 54 41 45 54 20 4B 4F |*** .NNUITAET KO|
00001640: 4E 53 54 41 4E 54 20 3D 20 C1 4E 4E 55 49 54 41 |NSTANT = .NNUITA|
00001650: 45 54 45 4E 54 49 4C 47 55 4E 47 20 21 21 22 00 |ETENTILGUNG !!".|
00001660: 8D 1E 12 16 98 34 3A 81 49 B2 31 A4 34 30 3A 98 |.....4:.I.1.40:.|
00001670: 34 2C 22 3D 3D 22 3B 3A 82 49 3A 98 34 2C 54 41 |4,"==";:.I:.4,TA|
00001680: 24 3B 54 41 24 3B 54 41 24 3B 54 41 24 00 9A 1E |$;TA$;TA$;TA$...|
00001690: 1C 16 A0 34 3A 89 33 38 36 30 00 AE 1E 70 17 8F |...4:.3860...p..|
000016A0: 20 2A 20 56 41 52 49 41 42 4C 45 4E 20 2A 00 E3 | * VARIABLEN *..|
000016B0: 1E 7A 17 4D 41 24 B2 22 93 12 20 20 20 20 D4 20 |.z.MA$.".. . |
000016C0: C9 A0 CC A0 C7 A0 D5 A0 CE A0 C7 A0 D3 A0 D2 A0 |................|
000016D0: C5 A0 C3 A0 C8 A0 CE A0 D5 A0 CE A0 C7 20 20 20 |............. |
000016E0: 20 92 22 00 16 1F 84 17 4D 42 24 B2 22 12 20 C6 | .".....MB$.". .|
000016F0: 33 20 55 2E 20 C6 35 20 2D 20 D7 41 48 4C 20 21 |3 U. .5 - .AHL !|
00001700: 20 27 D2 C5 D4 D5 D2 CE 27 20 2D 20 C5 49 4E 47 | '......' - .ING|
00001710: 41 42 45 20 21 22 00 4A 1F 8E 17 4D 43 24 B2 22 |ABE !".J...MC$."|
00001720: 12 20 C6 31 20 2D 20 C1 55 53 57 41 48 4C 20 21 |. .1 - .USWAHL !|
00001730: 20 20 20 C7 45 42 45 4E 20 D3 49 45 20 45 49 4E | .EBEN .IE EIN|
00001740: 20 21 20 20 20 20 20 20 92 22 00 7C 1F 98 17 4D | ! .".|...M|
00001750: 44 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |D$." |
00001760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001770: 20 20 20 20 20 20 20 20 20 20 20 22 00 B0 1F A2 | "....|
00001780: 17 4D 45 24 B2 22 12 20 20 20 20 20 20 20 20 20 |.ME$.". |
00001790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000017A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 22 | ."|
000017B0: 00 E4 1F AC 17 4D 46 24 B2 22 12 20 C6 31 20 2D |.....MF$.". .1 -|
000017C0: 20 D2 45 53 55 4C 54 41 54 20 21 20 20 20 20 20 | .ESULTAT ! |
000017D0: C6 33 20 55 2E 20 C6 35 20 2D 20 D7 41 48 4C 20 |.3 U. .5 - .AHL |
000017E0: 21 20 92 22 00 FF 1F B6 17 4D 47 24 B2 22 C2 49 |! .".....MG$.".I|
000017F0: 54 54 45 20 D7 41 52 54 45 4E 20 21 21 21 22 00 |TTE .ARTEN !!!".|
00001800: 33 20 C0 17 4D 48 24 B2 22 12 20 C6 31 20 2D 20 |3 ..MH$.". .1 - |
00001810: D2 45 53 55 4C 54 41 54 20 21 20 20 20 20 C3 55 |.ESULTAT ! .U|
00001820: 52 53 4F 52 20 2D 20 D3 54 45 55 45 52 4E 20 21 |RSOR - .TEUERN !|
00001830: 20 92 22 00 4B 20 D4 17 41 24 28 31 29 B2 22 20 | .".K ..A$(1)." |
00001840: D2 41 54 45 4E 54 49 4C 47 2E 22 00 63 20 DE 17 |.ATENTILG.".c ..|
00001850: 41 24 28 32 29 B2 22 20 C1 4E 4E 55 2E 54 49 4C |A$(2)." .NNU.TIL|
00001860: 47 2E 22 00 7B 20 E8 17 41 24 28 33 29 B2 22 20 |G.".{ ..A$(3)." |
00001870: 20 CD 45 4E 55 45 20 20 20 20 22 00 93 20 F2 17 | .ENUE ".. ..|
00001880: 41 24 28 34 29 B2 22 20 C4 41 52 4C 45 48 45 4E |A$(4)." .ARLEHEN|
00001890: 20 20 22 00 AB 20 FC 17 41 24 28 35 29 B2 22 20 | ".. ..A$(5)." |
000018A0: DA 49 4E 53 53 41 54 5A 20 20 22 00 C3 20 06 18 |.INSSATZ ".. ..|
000018B0: 41 24 28 36 29 B2 22 20 CA 41 48 52 45 20 20 20 |A$(6)." .AHRE |
000018C0: 20 20 22 00 D7 20 10 18 50 4D 24 B2 22 2E 2E 2E | ".. ..PM$."...|
000018D0: 2E 2E 2E 2E 2E 2E 22 00 EA 20 38 18 4D 24 28 31 |......".. 8.M$(1|
000018E0: 29 B2 22 20 CA 41 48 52 20 22 00 01 21 42 18 4D |)." .AHR "..!B.M|
000018F0: 24 28 32 29 B2 22 D2 45 53 54 53 43 48 55 4C 44 |$(2).".ESTSCHULD|
00001900: 22 00 18 21 4C 18 4D 24 28 33 29 B2 22 20 20 20 |"..!L.M$(3)." |
00001910: 20 DA 49 4E 53 45 4E 22 00 2F 21 56 18 4D 24 28 | .INSEN"./!V.M$(|
00001920: 34 29 B2 22 20 20 20 D4 49 4C 47 55 4E 47 22 00 |4)." .ILGUNG".|
00001930: 46 21 60 18 4D 24 28 35 29 B2 22 20 C1 4E 4E 55 |F!`.M$(5)." .NNU|
00001940: 49 54 41 45 54 22 00 5D 21 6A 18 4D 24 28 36 29 |ITAET".]!j.M$(6)|
00001950: B2 22 20 C1 4E 4E 55 2E 2F CD 4F 4E 22 00 78 21 |." .NNU./.ON".x!|
00001960: 9C 18 45 43 24 28 33 29 B2 22 20 DA 49 4E 53 45 |..EC$(3)." .INSE|
00001970: 4E 20 20 47 45 53 2E 22 00 93 21 A6 18 45 43 24 |N GES."..!..EC$|
00001980: 28 35 29 B2 22 20 C1 4E 4E 55 49 54 2E 20 47 45 |(5)." .NNUIT. GE|
00001990: 53 2E 22 00 A9 21 00 19 42 41 24 28 31 29 B2 22 |S."..!..BA$(1)."|
000019A0: 20 D4 41 42 45 4C 4C 45 22 00 BF 21 0A 19 42 41 | .ABELLE"..!..BA|
000019B0: 24 28 32 29 B2 22 20 C1 45 4E 44 45 52 4E 22 00 |$(2)." .ENDERN".|
000019C0: D5 21 14 19 42 41 24 28 33 29 B2 22 20 20 CB 4F |.!..BA$(3)." .O|
000019D0: 50 49 45 20 22 00 EB 21 1E 19 42 41 24 28 34 29 |PIE "..!..BA$(4)|
000019E0: B2 22 20 20 20 CE 45 55 20 20 22 00 01 22 28 19 |." .EU ".."(.|
000019F0: 42 41 24 28 35 29 B2 22 20 20 CD 45 4E 55 45 20 |BA$(5)." .ENUE |
00001A00: 22 00 07 22 64 19 8E 00 00 00 00 |".."d...... |
.......45,B(174):.46,B(175):..8.... (C)
BY KLAUS KLOEKER.]....:.A$(15),E(50,6),E
$(50,6):.1000.....Z1.3:Z2.9:S.13:. * MAS
KE LOESCHEN *......Z.Z1.Z2:.90:."
":.:.C.0...U...Z1.13:
Z2.21:C.0:.15......J.2.6:E$(I,J).D(.(E(I
,J).10..5)):. * FORMAT TABELLE.C.#.E$(I,
J).H(E$(I,J),C(E$(I,J)).1).".".I(E$(I,J)
,1).L.(.L$."":.A.1.10.C(E$(I,J)):L$.L$."
.":....-.E$(I,J).L$.E$(I,J)...2..C(E$(I,
J)).10.E$(I,J).I(E$(I,J),10)...7..:..Q.F
.."MENUE",8:. *LOAD MENUE...P.A.55909:.I
.1637.1662:.I,100:.A,1:A.A.1:.:..0.Z..21
4,Z:.211,S:.58732:.:. * CURSORPOSITION *
.L._..I.56216.56255:.I,O:.:..E.D.. * AUS
WAHLROUTINE *...N..90:.". .":.
I.1.75:.I...X..90:."."A$(Y)".":.I.1.125:
.......G$:.G$..G(133).G$..G(134).G$..G(1
35).G$..G(13).110......G$.G(133).C.C.0:.
.1....G$.G(13)..90:A$(Y).">".J(A$(Y),2,1
0):."."A$(Y)".":..D....G$.G(134).170.W.
..G$.G(135).190.`....110.....Z.Z.SW:Y.Y.
1:.Z.Z2.Z.Z1:Y.Y1......110.....Z.Z.SW:Y.
Y.1:.Z.Z1.Z.Z2:Y.Y2...C..110.Q.H.. * WAH
L-FUSSZEILE *:S=0...R.Z.23:.90:.".
.";:.I.1.75:.......90:."."BA$(Y)".";:.
I.1.175:..F....G$:.G$..G(134).G$..G(135)
.G$..G(13).210.B....G$.G(13)..90:.".>.";
:..U....G$.G(135).280.....S.S.8:Y.Y.1:.S
.32.S.0:Y.1......210.....S.S.8:Y.Y.1:.S.
0.S.32:Y.5.C."..210...,.. * EINGABEROUTI
NE *...6..90...@.IN$.""...J.."..";...T..
G$:.G$."".340.$.^.G.F(G$):.G.13..460.0.H
..G.13...G.R..G$."0".G$."9".420.V.|.IN$.
IN$.G$._....G$;......C(IN$).N..I.1.C(IN$
):.G(20);:.:.320......330......G.46.380.
.....G$.G(133).9......G..20.330.Q....C(I
N$).1.330...B.IN$.H(IN$,C(IN$).1):.390..
.L.PN$."":.I.1.(9.C(IN$)):PN$.PN$.".":.:
.PN$...V..C(IN$).1.310.4.....D.... * MAS
KE *.Z....MA$:A.55388:.I.1076.1906.40:.I
,101:.A,1:A.A.40:......A.55776:.I.1504.1
514:.I,100:.A,1:A.A.1:..T...A.55785:.I.1
517.1546:.I,100:.A,1:A.A.1:......Z.3:S.0
:.90:."AUSWAHL :":.".........":.". - - -
- - .".H...Z.6:.I.1.3:.90:."."A$(I)".":
.". - - - - - .":Z.Z.2:..N.J...T...:.P..
.. ** TILGUNGSRECHNUNG *.....6000:.900.
....Z.23:S.0:.90:.MB$.T.8.Z.6:Z1.Z:Z2.10
:S.0:Y.1:Y1.Y:Y2.3:SW.2:C.0:.100:F.Y:.F.
3.70...P.. * EINGABEMASKE *...Z.Z.3:S.13
:.90:."EINGABE :":Z.4:.90:.".........".J
...Z.5:.I.4.6:S.13:.90:."."A$(I)". : ";P
M$.H...Z.Z.2:.:Z.23:S.0:.90:.MC$.....Z.5
:S.27:N.9:.J.4.6:.300:A(J).E(IN$):Z.Z.2:
..K...Z.14:S.13:.90:."EINGABE KORREKT ?
(J/N):":.80... .Z.14:S.38:.90:."..";...*
..G$:.G$.."J".G$.."N".2090...4..G$:.G$."
J".Y.1.&.>..G$."N".Y.0.H.H..I$:.I$..G(13
).I$..G(20).2120.[.R..I$.G(20).2080.Q.\.
C.1:.10:.Y.0.2010...... * RECHNUNG *....
..".":Z.23:S.23:.90:.MG$:EE(3).0:EE(5).0
...B..F.2.3500.U.... * RATENTILGUNG *...
&.T1.A(4).A(6):J2.0:T2.0.&.0..I.1.A(6):R
1.A(4).J2.T2:Z1.R1.(A(5).100):A1.Z1.T1.C
.:.E(I,2).R1:E(I,3).Z1:E(I,4).T1:E(I,5).
A1:E(I,6).A1.12:.30...D..J.3.5.2:EE(J).E
E(J).E(I,J):....N.J2.J2.1:T2.(A(4).A(6))
:.:.3700.F.... * AUNNUITAETENTILGUNG *..
...Q1.A(5).100.1:T1.A(4).((Q1.1).(Q1.A(6
).1)).....Z1.A(4).(A(5).100):A1.T1.Z1:R1
.A(4).^.J.E(1,2).R1:E(1,3).Z1:E(1,4).T1:
E(1,5).A1:E(1,6).A1.12:I.1:.30...T.T2.T1
:.I.2.A(6):R1.R1.T2:Z2.R1.(A(5).100):T2.
T2.Q1.R...E(I,2).R1:E(I,3).Z2:E(I,4).T2:
E(I,5).A1:E(I,6).A1.12:.30......J.3.5.2:
EE(J).EE(J).E(I,J):.J:.I."...EE(3).EE(3)
.E(1,3):EE(5).EE(5).E(1,5).B.T.EE(3).EE(
3).2:EE(5).EE(5).2.H.~..I.3.5.2:EE$(I).D
(.(EE(I).10..5)).....EE$(I).H(EE$(I),C(E
E$(I)).1).".".I(EE$(I),1):....X.. * SCRE
EN *......900.....Z.3:S.13:.90:."EINGABE
:":Z.4:.90:.".........".....Z.5:S.13:.I
.4.6:.90:.A$(I)" :"A(I):Z.Z.2:..N...Z.14
:S.13:.90:."RESULTAT :":Z.15:.90:.".....
.....".....Z.17:.J.3.5.2:.90:."."EC$(J)"
.:"EE$(J):Z.Z.2:......Z.21:.90:."AUSDRUC
K IN 'DM' !".E...ZA.E(EE$(3)).(E(EE$(5))
.100).....Z.14:S.0:.90:.". ZINS- .":
Z.15:.90:.". ANTEIL .".".(.ZA$.D(ZA):
.ZA.10.ZA$." ".ZA$.J.2.ZA$.H(ZA$,5):Z.17
:S.2:.90:.ZA$;" %".E.<.Z.18:S.3:.90:."==
===="...F.Z.23:S.0:.90:.I.1.5:."."BA$(I)
".";:....P.Y.1:.200:.Y.5.70...Z..Y.4.9..
.D..Y.3.5500.J.N..Y.2.5000... .. * TABEL
LE *......95:X1.2:X2.4:Y1.1:Y2.A(6).(...
Z.1:S.0:.90:.I.1.22:.MD$:.:Z.22:.90:.MH$
.?...Z.3:S.0:.90:.M$(1).H.H.Z.3:S.6:.I.X
1.X2:.90:.M$(I):S.S.11:....R.Z.4:S.1:.90
:.I.1.37:."=";:......Z.6:S.1:.I.Y1.Y2...
..I$.D(I):.I.10.I$.".".I$.M....90:.".".I
$:S.6.Z....J.X1.X2......90:.E$(I,J)...".
S.S.11:.J...,..B(214).15.Y2.I:Y1.Y2.9:.4
200.,.6.Z.Z.1:S.1:.I.M.H.Z.17:S.1:.90:.J
.1.38:."-";:..]....203,63:.G$.P....G$.G(
29).4550......G$.G(157).4580......G$.G(1
7).4610......G$.G(145).4640......G$.G(13
3).3800.I.A..4500...F.X1.X1.1:X2.X2.1:.
* ->...P..X2.6.X2.6:X1.4:.4500...Z..4030
.#...X1.X1.1:X2.X2.1:. * <-.=....X1.2.X1
.2:X2.4:.4500.G....4030.Z....A(6).10..45
00.Y...Y1.Y1.10:Y2.Y2.10:. * DOWN......Y
2.A(6).Y2.A(6):Y1.Y2.9:.I.A(6).4500.....
.4030... ..A(6).10..4500...%.Y1.Y1.10:Y2
.Y2.10:. * UP...*..Y1.1.Y1.1:Y2.Y1.9:.I.
11.4500...4..4030...... * AENDERUNG *.K.
..C.1:.10:S.0:.Z.13.20:.90:."
":......Z.3:S.13:.90:."AENDERUNG :":Z.4:
.90:."...........".....Z.5:S.13:.I.4.6:.
90:."."A$(I)". :";A(I):Z.Z.2:..M...Z.23:
S.0:.90:.MF$;.....Z.5:Z1.Z:Z2.9:S.13:Y.4
:Y1.Y:Y2.6:SW.2:C.1:.100...D..C.0.3000.8
.N.Z.14:S.13:.90:."."A$(Y)". : ";PM$:.80
.J.X.Z.23:S.0:.90:.MC$;:Z.14:S.27:.300:A
(Y).E(IN$).....A$(Y)." ".J(A$(Y),2,10):.
5010...|.. * PRINTER.....TB$.G(16):TA$.G
(10)......4,4,7:.4,G(14)TB$"10AUSDRUCK E
INES TILGUNGSPLANES"......4,TB$;"10-----
------------------------"TA$.K....I.4.6:
.4,G(15)TB$"10*** "A$(I)" : "A(I):..^...
.4,TA$;TA$;TA$......I.1.6:.4," "M$(I);
:.:.4," "......I.1.40:.4,"--";:.:.4.A.B.
.I.1.A(6):I$.D(I):.I.10.I$.".".I$.W.G..4
," .".I$" ";...L..J.2.6:.4," .."E$(I,
J);:.J:.4," ":.I...V..I.1.40:.4,"--";:.:
.4.-....4," GESAMT:";.A...PO.27:.J.3.5.2
:.4,.PO.C(EE$(J)))EE$(J);:PO.26:.......4
,TA$;TA$;TB$"10*** AUSDRUCK DER TABELLE
ERFOLGT IN 'DM' !"......4,TB$"10*** BERE
CHNUNG DER ZINSEN ERFOLGT AM ENDE DES JA
HRES !"."....4,TA$;TB$"10*** TILGUNG KON
STANT = RATENTILGUNG !!"._....4,TB$"10
*** ANNUITAET KONSTANT = ANNUITAETENTILG
UNG !!"......4:.I.1.40:.4,"==";:.I:.4,TA
$;TA$;TA$;TA$..... 4:.3860...P.. * VARIA
BLEN *...Z.MA$.".. T I L G U N G S R
E C H N U N G .".....MB$.". F3 U. F5
- WAHL ! 'RETURN' - EINGABE !".J...MC$."
. F1 - AUSWAHL ! GEBEN SIE EIN !
.".|...MD$."
".....ME$.".
.".....MF$.". F1 -
RESULTAT ! F3 U. F5 - WAHL ! ."....
.MG$."BITTE WARTEN !!!".3 ..MH$.". F1 -
RESULTAT ! CURSOR - STEUERN ! .".K T.
A$(1)." RATENTILG.".C ..A$(2)." ANNU.TIL
G.".{ ..A$(3)." MENUE ".. ..A$(4)."
DARLEHEN ".. ..A$(5)." ZINSSATZ ".C ..
A$(6)." JAHRE ".W ..PM$.".........".
. 8.M$(1)." JAHR "..!B.M$(2)."RESTSCHULD
"..!L.M$(3)." ZINSEN"./!V.M$(4)." T
ILGUNG".F!`.M$(5)." ANNUITAET".]!J.M$(6)
." ANNU./MON".X!..EC$(3)." ZINSEN GES."
..!..EC$(5)." ANNUIT. GES."..!..BA$(1)."
TABELLE"..!..BA$(2)." AENDERN".U!..BA$(
3)." KOPIE "..!..BA$(4)." NEU ".."(.
BA$(5)." MENUE ".."D......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL