> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 05 00 8F 20 44 49 45 4E 53 54 00 14 |....... DIENST..|
00000010: 08 0A 00 9C 00 47 08 64 00 99 22 93 12 20 20 20 |.....G.d..".. |
00000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 22 3B 00 79 08 65 00 99 22 12 20 | ";.y.e..". |
00000050: 20 20 44 49 45 4E 53 54 50 52 4F 47 52 41 4D 4D | DIENSTPROGRAMM|
00000060: 45 20 20 2D 20 20 4D 53 44 2D 46 49 42 55 20 31 |E - MSD-FIBU 1|
00000070: 35 30 2F 36 34 20 20 22 3B 00 AA 08 66 00 99 22 |50/64 ";...f.."|
00000080: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 20 20 20 20 20 20 20 20 20 22 00 DB 08 6E 00 99 | "...n..|
000000B0: 3A 99 22 12 20 41 20 92 20 20 49 4E 48 41 4C 54 |:.". A . INHALT|
000000C0: 53 56 45 52 5A 45 49 43 48 4E 49 53 20 44 49 53 |SVERZEICHNIS DIS|
000000D0: 4B 45 54 54 45 20 20 20 20 20 22 00 0C 09 70 00 |KETTE "...p.|
000000E0: 99 3A 99 22 12 20 42 20 92 20 20 44 49 53 4B 45 |.:.". B . DISKE|
000000F0: 54 54 45 20 50 52 55 45 46 45 4E 20 20 20 20 20 |TTE PRUEFEN |
00000100: 20 20 20 20 20 20 20 20 20 20 20 22 00 3D 09 72 | ".=.r|
00000110: 00 99 3A 99 22 12 20 43 20 92 20 20 44 41 54 45 |..:.". C . DATE|
00000120: 4E 53 49 43 48 45 52 55 4E 47 20 4C 41 44 45 4E |NSICHERUNG LADEN|
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 6E 09 | ".n.|
00000140: 74 00 99 3A 99 22 12 20 44 20 92 20 20 4E 45 55 |t..:.". D . NEU|
00000150: 45 53 20 57 49 52 54 53 43 48 41 46 54 53 4A 41 |ES WIRTSCHAFTSJA|
00000160: 48 52 20 45 52 53 54 45 4C 4C 45 4E 20 22 00 9F |HR ERSTELLEN "..|
00000170: 09 76 00 99 3A 99 22 12 20 45 20 92 20 20 44 49 |.v..:.". E . DI|
00000180: 45 4E 53 54 50 52 4F 47 52 41 4D 4D 20 42 45 45 |ENSTPROGRAMM BEE|
00000190: 4E 44 45 4E 20 20 20 20 20 20 20 20 20 20 22 00 |NDEN ".|
000001A0: D0 09 78 00 99 3A 99 22 12 20 46 20 92 20 20 4E |..x..:.". F . N|
000001B0: 49 43 48 54 20 42 45 4C 45 47 54 20 20 20 20 20 |ICHT BELEGT |
000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
000001D0: 00 01 0A 7A 00 99 3A 99 22 12 20 47 20 92 20 20 |...z..:.". G . |
000001E0: 4E 49 43 48 54 20 42 45 4C 45 47 54 20 20 20 20 |NICHT BELEGT |
000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000200: 22 00 33 0A 7C 00 99 3A 99 22 A2 A2 A2 A2 A2 A2 |".3.|..:."......|
00000210: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00000220: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00000230: A2 A2 22 00 62 0A 7E 00 99 22 2A 20 42 49 54 54 |..".b.~.."* BITT|
00000240: 45 20 47 45 57 55 45 4E 53 43 48 54 45 20 52 4F |E GEWUENSCHTE RO|
00000250: 55 54 49 4E 45 20 41 4E 57 41 45 48 4C 45 4E 20 |UTINE ANWAEHLEN |
00000260: 2A 22 00 92 0A 80 00 99 22 A2 A2 A2 A2 A2 A2 A2 |*"......".......|
00000270: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00000280: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00000290: A2 22 00 AB 0A 82 00 58 24 B2 22 22 3A A1 58 24 |.".....X$."":.X$|
000002A0: 3A 8B 58 24 B2 22 22 A7 31 33 30 00 BB 0A 83 00 |:.X$."".130.....|
000002B0: 8B 58 24 B2 22 41 22 A7 32 30 30 00 CB 0A 84 00 |.X$."A".200.....|
000002C0: 8B 58 24 B2 22 42 22 A7 33 30 30 00 DB 0A 85 00 |.X$."B".300.....|
000002D0: 8B 58 24 B2 22 43 22 A7 34 30 30 00 EB 0A 86 00 |.X$."C".400.....|
000002E0: 8B 58 24 B2 22 44 22 A7 35 30 30 00 FB 0A 87 00 |.X$."D".500.....|
000002F0: 8B 58 24 B2 22 45 22 A7 36 30 30 00 04 0B 88 00 |.X$."E".600.....|
00000300: 89 31 33 30 00 1A 0B C8 00 8F 20 49 4E 48 41 4C |.130...... INHAL|
00000310: 54 20 41 4E 5A 45 49 47 45 4E 00 44 0B D2 00 99 |T ANZEIGEN.D....|
00000320: 22 93 12 20 49 4E 48 41 4C 54 53 56 45 52 5A 45 |".. INHALTSVERZE|
00000330: 49 43 48 4E 49 53 20 44 49 53 4B 45 54 54 45 20 |ICHNIS DISKETTE |
00000340: 92 22 3A 99 00 6E 0B DC 00 99 22 20 20 20 20 2A |.":..n...." *|
00000350: 2A 2A 20 5A 2E 5A 54 2E 20 4E 49 43 48 54 20 56 |** Z.ZT. NICHT V|
00000360: 45 52 46 55 45 47 42 41 52 20 2A 2A 2A 22 00 92 |ERFUEGBAR ***"..|
00000370: 0B E1 00 99 3A 99 22 20 20 20 20 20 20 20 20 42 |....:." B|
00000380: 49 54 54 45 20 44 49 52 45 4B 54 20 4D 49 54 20 |ITTE DIREKT MIT |
00000390: 3A 22 00 BA 0B E2 00 99 22 20 20 20 20 20 20 D1 |:"......" .|
000003A0: 20 4C 4F 41 44 27 27 24 27 27 2C 38 3A 4C 49 53 | LOAD''$'',8:LIS|
000003B0: 54 20 D1 20 4C 41 44 45 4E 22 00 CB 0B E6 00 81 |T . LADEN"......|
000003C0: 49 B2 31 A4 32 30 30 30 3A 82 49 00 D1 0B F0 00 |I.1.2000:.I.....|
000003D0: 8A 00 D7 0B 04 01 8A 00 EA 0B 2C 01 8F 20 55 45 |..........,.. UE|
000003E0: 42 45 52 50 52 55 45 46 45 4E 00 14 0C 36 01 99 |BERPRUEFEN...6..|
000003F0: 22 93 12 20 44 49 53 4B 45 54 54 45 20 50 52 55 |".. DISKETTE PRU|
00000400: 45 46 45 4E 20 20 20 20 20 20 20 20 20 20 20 20 |EFEN |
00000410: 92 22 3A 99 00 2A 0C 40 01 A0 31 3A 9F 31 2C 38 |.":..*.@..1:.1,8|
00000420: 2C 31 35 3A 98 31 2C 22 56 22 00 31 0C 4A 01 A0 |,15:.1,"V".1.J..|
00000430: 31 00 5A 0C 4E 01 99 3A 99 3A 99 22 20 20 20 20 |1.Z.N..:.:." |
00000440: 2A 2A 2A 20 44 49 53 4B 45 54 54 45 20 47 45 50 |*** DISKETTE GEP|
00000450: 52 55 45 46 54 20 2A 2A 2A 22 00 6B 0C 4F 01 81 |RUEFT ***".k.O..|
00000460: 49 B2 31 A4 32 30 30 30 3A 82 49 00 71 0C 54 01 |I.1.2000:.I.q.T.|
00000470: 8A 00 86 0C 90 01 8F 20 44 41 54 45 4E 53 49 43 |....... DATENSIC|
00000480: 48 45 52 55 4E 47 00 8C 0C 9A 01 9C 00 AA 0C A4 |HERUNG..........|
00000490: 01 93 22 30 3A 45 4E 44 45 22 2C 38 3A 99 22 93 |.."0:ENDE",8:.".|
000004A0: 11 11 11 52 55 4E 13 22 3A 80 00 B0 0C AE 01 8A |...RUN.":.......|
000004B0: 00 C9 0C F4 01 8F 20 4E 45 55 45 53 20 57 4A 20 |...... NEUES WJ |
000004C0: 45 52 53 54 45 4C 4C 45 4E 00 FC 0C F9 01 99 22 |ERSTELLEN......"|
000004D0: 93 12 20 4E 45 55 45 53 20 57 49 52 54 53 43 48 |.. NEUES WIRTSCH|
000004E0: 41 46 54 53 4A 41 48 52 20 45 52 53 54 45 4C 4C |AFTSJAHR ERSTELL|
000004F0: 45 4E 20 20 20 20 20 20 92 22 3A 99 00 2C 0D FE |EN .":..,..|
00000500: 01 99 22 D1 20 41 43 48 54 55 4E 47 3A 20 53 49 |..". ACHTUNG: SI|
00000510: 4E 44 20 44 49 45 20 46 49 42 55 2D 44 41 54 45 |ND DIE FIBU-DATE|
00000520: 4E 20 4D 49 54 20 41 4B 54 55 2D 22 00 5E 0D FF |N MIT AKTU-".^..|
00000530: 01 99 22 20 20 20 20 20 20 20 20 20 20 20 45 4C |.." EL|
00000540: 4C 45 4D 20 53 54 41 4E 44 20 47 45 53 49 43 48 |LEM STAND GESICH|
00000550: 45 52 54 20 3F 20 20 20 20 20 20 22 3A 99 00 8E |ERT ? ":...|
00000560: 0D 02 02 99 22 D1 20 41 43 48 54 55 4E 47 3A 20 |....". ACHTUNG: |
00000570: 44 49 45 20 44 41 54 45 4E 20 57 45 52 44 45 4E |DIE DATEN WERDEN|
00000580: 20 42 45 49 20 50 52 4F 2D 20 20 20 20 22 00 C0 | BEI PRO- "..|
00000590: 0D 03 02 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
000005A0: 47 52 41 4D 4D 53 54 41 52 54 20 47 45 4C 4F 45 |GRAMMSTART GELOE|
000005B0: 53 43 48 54 20 2D 20 47 47 46 2E 20 20 22 3A 99 |SCHT - GGF. ":.|
000005C0: 00 F0 0D 04 02 99 22 20 20 20 20 20 20 20 20 20 |......" |
000005D0: 20 20 56 4F 52 48 45 52 20 4E 4F 43 48 20 53 49 | VORHER NOCH SI|
000005E0: 43 48 45 52 4E 20 21 21 21 20 20 20 20 20 20 22 |CHERN !!! "|
000005F0: 00 20 0E 06 02 99 22 A2 A2 A2 A2 A2 A2 A2 A2 A2 |. ....".........|
00000600: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00000610: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 22 |..............."|
00000620: 00 4F 0E 08 02 99 22 12 53 92 49 43 48 45 52 4E |.O....".S.ICHERN|
00000630: 20 20 12 45 92 4E 44 45 20 20 12 4E 92 45 55 45 | .E.NDE .N.EUE|
00000640: 53 20 57 4A 20 45 52 53 54 45 4C 4C 45 4E 22 00 |S WJ ERSTELLEN".|
00000650: 68 0E 09 02 58 24 B2 22 22 3A A1 58 24 3A 8B 58 |h...X$."":.X$:.X|
00000660: 24 B2 22 22 A7 35 32 31 00 78 0E 0A 02 8B 58 24 |$."".521.x....X$|
00000670: B2 22 53 22 A7 34 30 30 00 86 0E 0B 02 8B 58 24 |."S".400......X$|
00000680: B2 22 45 22 A7 8A 00 97 0E 0C 02 8B 58 24 B3 B1 |."E"........X$..|
00000690: 22 4E 22 A7 35 32 30 00 CA 0E 12 02 99 22 93 12 |"N".520......"..|
000006A0: 20 4E 45 55 45 53 20 57 49 52 54 53 43 48 41 46 | NEUES WIRTSCHAF|
000006B0: 54 53 4A 41 48 52 20 45 52 53 54 45 4C 4C 45 4E |TSJAHR ERSTELLEN|
000006C0: 20 20 20 20 20 20 92 22 3A 99 00 FC 0E 13 02 99 | .":.......|
000006D0: 3A 99 22 12 4D 92 20 3D 20 4D 49 54 20 20 12 4F |:.".M. = MIT .O|
000006E0: 92 20 3D 20 4F 48 4E 45 20 45 52 4F 45 46 46 4E |. = OHNE EROEFFN|
000006F0: 55 4E 47 53 42 55 43 48 55 4E 47 22 00 15 0F 14 |UNGSBUCHUNG"....|
00000700: 02 58 24 B2 22 22 3A A1 58 24 3A 8B 58 24 B2 22 |.X$."":.X$:.X$."|
00000710: 22 A7 35 33 32 00 25 0F 15 02 8B 58 24 B2 22 4D |".532.%....X$."M|
00000720: 22 A7 35 33 35 00 36 0F 16 02 8B 58 24 B3 B1 22 |".535.6....X$.."|
00000730: 4F 22 A7 35 33 32 00 65 0F 17 02 99 22 91 20 2A |O".532.e....". *|
00000740: 2A 2A 20 52 4F 55 54 49 4E 45 20 4C 41 45 55 46 |** ROUTINE LAEUF|
00000750: 54 20 2D 20 42 49 54 54 45 20 57 41 52 54 45 4E |T - BITTE WARTEN|
00000760: 20 2A 2A 2A 22 00 A9 0F 18 02 86 41 28 31 35 30 | ***"......A(150|
00000770: 29 2C 41 24 28 31 35 30 29 2C 4F 44 28 31 35 30 |),A$(150),OD(150|
00000780: 29 2C 4B 24 28 31 35 30 29 2C 42 4C 28 31 35 30 |),K$(150),BL(150|
00000790: 29 2C 45 42 28 31 35 30 29 2C 4A 53 28 31 35 30 |),EB(150),JS(150|
000007A0: 29 2C 4A 48 28 31 35 30 29 00 E8 0F 19 02 86 50 |),JH(150)......P|
000007B0: 53 28 31 35 30 29 2C 50 48 28 31 35 30 29 2C 50 |S(150),PH(150),P|
000007C0: 44 24 28 31 35 30 29 2C 4B 31 28 31 35 30 29 2C |D$(150),K1(150),|
000007D0: 4B 32 28 31 35 30 29 2C 4B 33 28 31 35 30 29 3A |K2(150),K3(150):|
000007E0: 43 24 B2 C7 28 31 33 29 00 04 10 1C 02 A0 36 3A |C$..(13)......6:|
000007F0: 9F 36 2C 38 2C 36 2C 22 30 3A 4B 4F 4E 54 45 4E |.6,8,6,"0:KONTEN|
00000800: 2C 53 2C 52 00 0E 10 1E 02 84 36 2C 4E 24 00 1B |,S,R......6,N$..|
00000810: 10 1F 02 81 49 B2 31 A4 31 35 30 00 46 10 20 02 |....I.1.150.F. .|
00000820: 84 36 2C 42 4C 28 49 29 2C 45 42 28 49 29 2C 4A |.6,BL(I),EB(I),J|
00000830: 53 28 49 29 2C 4A 48 28 49 29 2C 50 53 28 49 29 |S(I),JH(I),PS(I)|
00000840: 2C 50 48 28 49 29 00 4D 10 21 02 82 49 00 54 10 |,PH(I).M.!..I.T.|
00000850: 22 02 A0 36 00 61 10 26 02 81 49 B2 31 A4 31 35 |"..6.a.&..I.1.15|
00000860: 30 00 8D 10 29 02 45 42 28 49 29 B2 30 3A 4A 53 |0...).EB(I).0:JS|
00000870: 28 49 29 B2 30 3A 4A 48 28 49 29 B2 30 3A 50 53 |(I).0:JH(I).0:PS|
00000880: 28 49 29 B2 30 3A 50 48 28 49 29 B2 30 00 94 10 |(I).0:PH(I).0...|
00000890: 2A 02 82 49 00 B1 10 2B 02 A0 36 3A 9F 36 2C 38 |*..I...+..6:.6,8|
000008A0: 2C 36 2C 22 40 30 3A 4B 4F 4E 54 45 4E 2C 53 2C |,6,"@0:KONTEN,S,|
000008B0: 57 00 BF 10 2C 02 98 36 2C 4E 24 3B 43 24 3B 00 |W...,..6,N$;C$;.|
000008C0: CC 10 2D 02 81 49 B2 31 A4 31 35 30 00 01 11 2E |..-..I.1.150....|
000008D0: 02 98 36 2C 45 42 28 49 29 3B 43 24 3B 4A 53 28 |..6,EB(I);C$;JS(|
000008E0: 49 29 3B 43 24 3B 4A 48 28 49 29 3B 43 24 3B 50 |I);C$;JH(I);C$;P|
000008F0: 53 28 49 29 3B 43 24 3B 50 48 28 49 29 3B 43 24 |S(I);C$;PH(I);C$|
00000900: 3B 00 08 11 2F 02 82 49 00 0F 11 30 02 A0 36 00 |;.../..I...0..6.|
00000910: 2C 11 31 02 A0 36 3A 9F 36 2C 38 2C 36 2C 22 30 |,.1..6:.6,8,6,"0|
00000920: 3A 56 45 52 57 45 49 53 2C 53 2C 52 00 36 11 32 |:VERWEIS,S,R.6.2|
00000930: 02 84 36 2C 4E 24 00 43 11 33 02 81 49 B2 31 A4 |..6,N$.C.3..I.1.|
00000940: 31 35 30 00 5B 11 34 02 84 36 2C 41 28 49 29 2C |150.[.4..6,A(I),|
00000950: 41 24 28 49 29 2C 4F 44 28 49 29 00 62 11 35 02 |A$(I),OD(I).b.5.|
00000960: 82 49 00 69 11 36 02 A0 36 00 81 11 3A 02 81 49 |.I.i.6..6...:..I|
00000970: B2 31 A4 31 35 30 3A 4F 44 28 49 29 B2 30 3A 82 |.1.150:OD(I).0:.|
00000980: 49 00 9F 11 3E 02 A0 36 3A 9F 36 2C 38 2C 36 2C |I...>..6:.6,8,6,|
00000990: 22 40 30 3A 56 45 52 57 45 49 53 2C 53 2C 57 00 |"@0:VERWEIS,S,W.|
000009A0: AD 11 3F 02 98 36 2C 4E 24 3B 43 24 3B 00 BA 11 |..?..6,N$;C$;...|
000009B0: 40 02 81 49 B2 31 A4 31 35 30 00 DC 11 41 02 98 |@..I.1.150...A..|
000009C0: 36 2C 41 28 49 29 3B 43 24 3B 41 24 28 49 29 3B |6,A(I);C$;A$(I);|
000009D0: 43 24 3B 4F 44 28 49 29 3B 43 24 3B 00 E3 11 42 |C$;OD(I);C$;...B|
000009E0: 02 82 49 00 EA 11 43 02 A0 36 00 0B 12 44 02 A0 |..I...C..6...D..|
000009F0: 36 3A 9F 36 2C 38 2C 36 2C 22 30 3A 22 AA 4E 24 |6:.6,8,6,"0:".N$|
00000A00: AA 22 43 48 45 43 4B 2C 53 2C 52 00 2D 12 46 02 |."CHECK,S,R.-.F.|
00000A10: 84 36 2C 4D 44 24 2C 4D 53 24 2C 4D 4F 24 2C 4C |.6,MD$,MS$,MO$,L|
00000A20: 50 24 2C 50 4E 2C 42 43 24 2C 57 4A 24 00 34 12 |P$,PN,BC$,WJ$.4.|
00000A30: 47 02 A0 36 00 4A 12 48 02 42 B2 C5 28 42 43 24 |G..6.J.H.B..(BC$|
00000A40: 29 3A 8B 42 B2 30 A7 35 38 39 00 7A 12 49 02 81 |):.B.0.589.z.I..|
00000A50: 49 B2 31 A4 28 42 29 3A 49 24 B2 22 42 22 AA C4 |I.1.(B):I$."B"..|
00000A60: 28 49 29 3A A0 31 3A 9F 31 2C 38 2C 31 35 2C 22 |(I):.1:.1,8,15,"|
00000A70: 53 30 3A 22 AA 49 24 3A 82 49 00 99 12 4D 02 99 |S0:".I$:.I...M..|
00000A80: 3A 99 3A 99 3A 4C 50 24 B2 22 4C 22 3A 50 4E B2 |:.:.:LP$."L":PN.|
00000A90: 30 3A 42 43 24 B2 22 4C 22 00 BE 12 4E 02 99 22 |0:BC$."L"...N.."|
00000AA0: 91 12 20 4E 45 55 45 53 20 4A 41 48 52 20 28 32 |.. NEUES JAHR (2|
00000AB0: 2D 53 54 45 4C 4C 49 47 29 20 92 20 22 3B 00 D6 |-STELLIG) . ";..|
00000AC0: 12 4F 02 A0 31 3A 9F 31 2C 30 3A 84 31 2C 57 4A |.O..1:.1,0:.1,WJ|
00000AD0: 24 3A A0 31 3A 99 00 E9 12 50 02 8B C3 28 57 4A |$:.1:....P...(WJ|
00000AE0: 24 29 B3 B1 32 A7 35 39 30 00 0B 13 51 02 A0 36 |$)..2.590...Q..6|
00000AF0: 3A 9F 36 2C 38 2C 36 2C 22 40 30 3A 22 AA 4E 24 |:.6,8,6,"@0:".N$|
00000B00: AA 22 43 48 45 43 4B 2C 53 2C 57 00 43 13 52 02 |."CHECK,S,W.C.R.|
00000B10: 98 36 2C 4D 44 24 3B 43 24 3B 4D 53 24 3B 43 24 |.6,MD$;C$;MS$;C$|
00000B20: 2C 4D 4F 24 3B 43 24 3B 4C 50 24 3B 43 24 3B 50 |,MO$;C$;LP$;C$;P|
00000B30: 4E 3B 43 24 3B 42 43 24 3B 43 24 3B 57 4A 24 3B |N;C$;BC$;C$;WJ$;|
00000B40: 43 24 3B 00 4A 13 53 02 A0 36 00 50 13 56 02 8A |C$;.J.S..6.P.V..|
00000B50: 00 62 13 58 02 8F 20 45 4E 44 45 20 44 49 45 4E |.b.X.. ENDE DIEN|
00000B60: 53 54 00 68 13 62 02 9C 00 87 13 6C 02 93 22 30 |ST.h.b.....l.."0|
00000B70: 3A 4D 45 4E 55 45 22 2C 38 3A 99 22 93 11 11 11 |:MENUE",8:."....|
00000B80: 52 55 4E 13 22 3A 80 00 00 00 |RUN.":.... |
....... DIENST.......G.D.."..
";.Y.E..".
DIENSTPROGRAMME - MSD-FIBU 150/64 "
;...F..".
"...N..:.". A . INHALTSVERZEIC
HNIS DISKETTE "...P..:.". B . DISKE
TTE PRUEFEN ".=.R..:.". C
. DATENSICHERUNG LADEN ".N.
T..:.". D . NEUES WIRTSCHAFTSJAHR ERSTE
LLEN "...V..:.". E . DIENSTPROGRAMM BEE
NDEN ".P.X..:.". F . NICHT BEL
EGT "...Z..:.". G .
NICHT BELEGT ".3.|..:
."......................................
..".B.~.."* BITTE GEWUENSCHTE ROUTINE AN
WAEHLEN *"......".......................
.................".....X$."":.X$:.X$."".
130......X$."A".200.K....X$."B".300.....
.X$."C".400......X$."D".500......X$."E".
600......130...H.. INHALT ANZEIGEN.D.R..
".. INHALTSVERZEICHNIS DISKETTE .":..N..
.." *** Z.ZT. NICHT VERFUEGBAR ***"..
....:." BITTE DIREKT MIT :"......
" Q LOAD''$'',8:LIST Q LADEN".K....
I.1.2000:.I.Q.....W.......,.. UEBERPRUEF
EN...6..".. DISKETTE PRUEFEN
.":..*.@. 1:.1,8,15:.1,"V".1.J. 1.Z.N..:
.:." *** DISKETTE GEPRUEFT ***".K.O..
I.1.2000:.I.Q.T........ DATENSICHERUNG..
.........."0:ENDE",8:."....RUN.":.......
.I.... NEUES WJ ERSTELLEN......".. NEUES
WIRTSCHAFTSJAHR ERSTELLEN .":..,..
.."Q ACHTUNG: SIND DIE FIBU-DATEN MIT AK
TU-".^...." ELLEM STAND GESICH
ERT ? ":......."Q ACHTUNG: DIE DATE
N WERDEN BEI PRO- "......"
GRAMMSTART GELOESCHT - GGF. ":......."
VORHER NOCH SICHERN !!! "
. ....".................................
.......".O....".S.ICHERN .E.NDE .N.EUE
S WJ ERSTELLEN".H...X$."":.X$:.X$."".521
.X....X$."S".400......X$."E"........X$..
"N".520.J....".. NEUES WIRTSCHAFTSJAHR E
RSTELLEN .":.......:.".M. = MIT .O
. = OHNE EROEFFNUNGSBUCHUNG".....X$."":.
X$:.X$."".532.%....X$."M".535.6....X$.."
O".532.E....". *** ROUTINE LAEUFT - BITT
E WARTEN ***"......A(150),A$(150),OD(150
),K$(150),BL(150),EB(150),JS(150),JH(150
)......PS(150),PH(150),PD$(150),K1(150),
K2(150),K3(150):C$.G(13)..... 6:.6,8,6,"
0:KONTEN,S,R......6,N$......I.1.150.F. .
.6,BL(I),EB(I),JS(I),JH(I),PS(I),PH(I).M
.!..I.T.". 6.A.&..I.1.150...).EB(I).0:JS
(I).0:JH(I).0:PS(I).0:PH(I).0...*..I...+
. 6:.6,8,6,"@0:KONTEN,S,W...,..6,N$;C$;.
L.-..I.1.150......6,EB(I);C$;JS(I);C$;JH
(I);C$;PS(I);C$;PH(I);C$;.../..I...0. 6.
,.1. 6:.6,8,6,"0:VERWEIS,S,R.6.2..6,N$.C
.3..I.1.150.[.4..6,A(I),A$(I),OD(I).B.5.
.I.I.6. 6...:..I.1.150:OD(I).0:.I...>. 6
:.6,8,6,"@0:VERWEIS,S,W...?..6,N$;C$;...
@..I.1.150...A..6,A(I);C$;A$(I);C$;OD(I)
;C$;...B..I...C. 6...D. 6:.6,8,6,"0:".N$
."CHECK,S,R.-.F..6,MD$,MS$,MO$,LP$,PN,BC
$,WJ$.4.G. 6.J.H.B.E(BC$):.B.0.589.Z.I..
I.1.(B):I$."B".D(I): 1:.1,8,15,"S0:".I$:
.I...M..:.:.:LP$."L":PN.0:BC$."L"...N.."
.. NEUES JAHR (2-STELLIG) . ";.V.O. 1:.1
,0:.1,WJ$: 1:....P..C(WJ$)..2.590...Q. 6
:.6,8,6,"@0:".N$."CHECK,S,W.C.R..6,MD$;C
$;MS$;C$,MO$;C$;LP$;C$;PN;C$;BC$;C$;WJ$;
C$;.J.S. 6.P.V...B.X.. ENDE DIENST.H.B..
...L.."0:MENUE",8:."....RUN.":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL