7FIBU
FILE INFORMATION
FILENAME(S): 7FIBU
FILE TYPE(S): PRG
FILE SIZE: 6.8K
FIRST SEEN: 2025-11-30 16:18:10
APPEARS ON: 2 disk(s)
FILE HASH
2172b7895ba82ea0ac41d83ab5a3a78701467fe3bfe076ff8435b66d0c03fb0d
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FIBU150 64 C KJ | 7FIBU | PRG | BrainSkull, Leopold Zyka | 22 | 4 | DOWNLOAD FILE |
| FIBU150 64 C KJ | 7FIBU | PRG | BrainSkull, Leopold Zyka | 22 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 01 00 8F 20 37 46 49 42 55 20 4B 4F |....... 7FIBU KO|
00000010: 4E 54 45 4E 44 52 55 43 4B 00 22 08 14 00 9F 34 |NTENDRUCK."....4|
00000020: 2C 34 00 2F 08 19 00 86 4C 45 24 28 32 30 29 00 |,4./....LE$(20).|
00000030: 3E 08 1A 00 4C 24 28 32 29 B2 22 30 30 22 00 4C |>...L$(2)."00".L|
00000040: 08 1B 00 4C 24 28 31 29 B2 22 30 22 00 5C 08 1C |...L$(1)."0".\..|
00000050: 00 4C 24 28 33 29 B2 22 30 30 30 22 00 69 08 1D |.L$(3)."000".i..|
00000060: 00 4C 24 28 30 29 B2 22 22 00 77 08 1E 00 4C 45 |.L$(0)."".w...LE|
00000070: 24 28 30 29 B2 22 22 00 86 08 1F 00 4C 45 24 28 |$(0)."".....LE$(|
00000080: 31 29 B2 22 20 22 00 96 08 20 00 4C 45 24 28 32 |1)." "... .LE$(2|
00000090: 29 B2 22 20 20 22 00 A7 08 21 00 4C 45 24 28 33 |)." "...!.LE$(3|
000000A0: 29 B2 22 20 20 20 22 00 B9 08 22 00 4C 45 24 28 |)." "...".LE$(|
000000B0: 34 29 B2 22 20 20 20 20 22 00 CC 08 23 00 4C 45 |4)." "...#.LE|
000000C0: 24 28 35 29 B2 22 20 20 20 20 20 22 00 E0 08 24 |$(5)." "...$|
000000D0: 00 4C 45 24 28 36 29 B2 22 20 20 20 20 20 20 22 |.LE$(6)." "|
000000E0: 00 F5 08 25 00 4C 45 24 28 37 29 B2 22 20 20 20 |...%.LE$(7)." |
000000F0: 20 20 20 20 22 00 0B 09 26 00 4C 45 24 28 38 29 | "...&.LE$(8)|
00000100: B2 22 20 20 20 20 20 20 20 20 22 00 22 09 27 00 |." ".".'.|
00000110: 4C 45 24 28 39 29 B2 22 20 20 20 20 20 20 20 20 |LE$(9)." |
00000120: 20 22 00 3B 09 28 00 4C 45 24 28 31 30 29 B2 22 | ".;.(.LE$(10)."|
00000130: 20 20 20 20 20 20 20 20 20 20 22 00 55 09 29 00 | ".U.).|
00000140: 4C 45 24 28 31 31 29 B2 22 20 20 20 20 20 20 20 |LE$(11)." |
00000150: 20 20 20 20 22 00 70 09 2A 00 4C 45 24 28 31 32 | ".p.*.LE$(12|
00000160: 29 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 22 |)." "|
00000170: 00 8C 09 2B 00 4C 45 24 28 31 33 29 B2 22 20 20 |...+.LE$(13)." |
00000180: 20 20 20 20 20 20 20 20 20 20 20 22 00 A9 09 2C | "...,|
00000190: 00 4C 45 24 28 31 34 29 B2 22 20 20 20 20 20 20 |.LE$(14)." |
000001A0: 20 20 20 20 20 20 20 20 22 00 C7 09 2D 00 4C 45 | "...-.LE|
000001B0: 24 28 31 35 29 B2 22 20 20 20 20 20 20 20 20 20 |$(15)." |
000001C0: 20 20 20 20 20 20 22 00 E6 09 2E 00 4C 45 24 28 | ".....LE$(|
000001D0: 31 36 29 B2 22 20 20 20 20 20 20 20 20 20 20 20 |16)." |
000001E0: 20 20 20 20 20 22 00 06 0A 2F 00 4C 45 24 28 31 | ".../.LE$(1|
000001F0: 37 29 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |7)." |
00000200: 20 20 20 20 20 22 00 27 0A 30 00 4C 45 24 28 31 | ".'.0.LE$(1|
00000210: 38 29 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |8)." |
00000220: 20 20 20 20 20 20 22 00 49 0A 31 00 4C 45 24 28 | ".I.1.LE$(|
00000230: 31 39 29 B2 22 20 20 20 20 20 20 20 20 20 20 20 |19)." |
00000240: 20 20 20 20 20 20 20 20 22 00 83 0A 32 00 86 41 | "...2..A|
00000250: 30 24 28 36 30 29 3A 86 41 31 24 28 36 30 29 3A |0$(60):.A1$(60):|
00000260: 86 41 32 24 28 36 30 29 3A 86 41 33 24 28 36 30 |.A2$(60):.A3$(60|
00000270: 29 3A 86 41 34 24 28 36 30 29 3A 86 41 35 24 28 |):.A4$(60):.A5$(|
00000280: 36 30 29 00 A2 0A 37 00 86 41 36 24 28 36 30 29 |60)...7..A6$(60)|
00000290: 3A 86 42 36 24 28 36 30 29 3A 86 41 37 24 28 36 |:.B6$(60):.A7$(6|
000002A0: 30 29 00 C0 0A 3C 00 86 41 28 31 35 30 29 3A 86 |0)...<..A(150):.|
000002B0: 41 24 28 31 35 30 29 3A 86 4F 44 28 31 35 30 29 |A$(150):.OD(150)|
000002C0: 00 F1 0A 41 00 86 4B 24 28 31 35 30 29 3A 86 42 |...A..K$(150):.B|
000002D0: 4C 28 31 35 30 29 3A 86 45 42 28 31 35 30 29 3A |L(150):.EB(150):|
000002E0: 86 4A 53 28 31 35 30 29 3A 86 4A 48 28 31 35 30 |.JS(150):.JH(150|
000002F0: 29 00 23 0B 46 00 86 50 53 28 31 35 30 29 3A 86 |).#.F..PS(150):.|
00000300: 50 48 28 31 35 30 29 3A 86 50 44 24 28 31 35 30 |PH(150):.PD$(150|
00000310: 29 3A 86 4B 31 28 31 35 30 29 3A 86 4B 32 28 31 |):.K1(150):.K2(1|
00000320: 35 30 29 00 30 0B 4B 00 86 53 24 28 31 35 30 29 |50).0.K..S$(150)|
00000330: 00 3C 0B 50 00 86 42 4B 28 31 35 29 00 6E 0B C8 |.<.P..BK(15).n..|
00000340: 00 99 22 93 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |..".............|
00000350: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000360: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3B 00 9F |............";..|
00000370: 0B D2 00 99 22 12 20 20 20 46 49 42 55 20 31 35 |....". FIBU 15|
00000380: 30 2F 36 34 20 20 2D 20 20 44 52 55 43 4B 52 4F |0/64 - DRUCKRO|
00000390: 55 54 49 4E 45 20 4B 4F 4E 54 45 4E 20 20 22 00 |UTINE KONTEN ".|
000003A0: CF 0B DC 00 99 22 2A 2A 2A 20 53 49 4E 44 20 4B |....."*** SIND K|
000003B0: 4F 4E 54 45 4E 56 4F 52 44 52 55 43 4B 45 20 45 |ONTENVORDRUCKE E|
000003C0: 49 4E 47 45 4C 45 47 54 20 3F 20 2A 2A 2A 22 00 |INGELEGT ? ***".|
000003D0: 03 0C E6 00 99 22 2A 2A 2A 20 C3 3E 20 20 44 41 |....."*** .> DA|
000003E0: 4E 4E 20 20 12 52 45 54 55 52 4E 92 2D 54 41 53 |NN .RETURN.-TAS|
000003F0: 54 45 20 20 44 52 55 45 43 4B 45 4E 20 2A 2A 2A |TE DRUECKEN ***|
00000400: 22 3A 99 00 1C 0C F0 00 58 24 B2 22 22 3A A1 58 |":......X$."":.X|
00000410: 24 3A 8B 58 24 B2 22 22 A7 32 34 30 00 33 0C FA |$:.X$."".240.3..|
00000420: 00 A0 31 3A 9F 31 2C 38 2C 31 35 2C 22 49 30 22 |..1:.1,8,15,"I0"|
00000430: 3A A0 31 00 4F 0C 04 01 A0 36 3A 9F 36 2C 38 2C |:.1.O....6:.6,8,|
00000440: 36 2C 22 30 3A 53 4F 52 54 45 52 2C 53 2C 52 00 |6,"0:SORTER,S,R.|
00000450: 5C 0C 0E 01 81 49 B2 31 A4 31 35 30 00 69 0C 18 |\....I.1.150.i..|
00000460: 01 84 36 2C 53 24 28 49 29 00 70 0C 22 01 82 49 |..6,S$(I).p."..I|
00000470: 00 77 0C 2C 01 A0 36 00 7D 0C 36 01 8F 00 AF 0C |.w.,..6.}.6.....|
00000480: F4 01 99 22 93 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |..."............|
00000490: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000004A0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3B 00 |.............";.|
000004B0: E0 0C FE 01 99 22 12 20 20 20 46 49 42 55 20 31 |.....". FIBU 1|
000004C0: 35 30 2F 36 34 20 20 2D 20 20 44 52 55 43 4B 52 |50/64 - DRUCKR|
000004D0: 4F 55 54 49 4E 45 20 4B 4F 4E 54 45 4E 20 20 22 |OUTINE KONTEN "|
000004E0: 00 FF 0C 08 02 99 3A 99 22 20 20 20 20 20 20 20 |......:." |
000004F0: 20 20 20 20 12 20 57 41 52 54 45 4E 20 92 22 00 | . WARTEN .".|
00000500: 15 0D 12 02 A0 31 3A 9F 31 2C 38 2C 31 35 2C 22 |.....1:.1,8,15,"|
00000510: 49 22 3A A0 31 00 32 0D 26 02 A0 36 3A 9F 36 2C |I":.1.2.&..6:.6,|
00000520: 38 2C 36 2C 22 30 3A 56 45 52 57 45 49 53 2C 53 |8,6,"0:VERWEIS,S|
00000530: 2C 52 00 5B 0D 30 02 A0 31 35 3A 9F 31 35 2C 38 |,R.[.0..15:.15,8|
00000540: 2C 31 35 3A 84 31 35 2C 51 2C 51 24 2C 51 31 2C |,15:.15,Q,Q$,Q1,|
00000550: 51 32 3A 8B 51 B2 30 A7 35 38 30 00 66 0D 3A 02 |Q2:.Q.0.580.f.:.|
00000560: 8D 31 30 30 30 30 00 6F 0D 3F 02 89 35 35 30 00 |.10000.o.?..550.|
00000570: 79 0D 44 02 84 36 2C 4E 24 00 86 0D 4E 02 81 49 |y.D..6,N$...N..I|
00000580: B2 31 A4 31 35 30 00 9E 0D 58 02 84 36 2C 41 28 |.1.150...X..6,A(|
00000590: 49 29 2C 41 24 28 49 29 2C 4F 44 28 49 29 00 A4 |I),A$(I),OD(I)..|
000005A0: 0D 62 02 82 00 AF 0D 6C 02 A0 36 3A A0 31 35 00 |.b.....l..6:.15.|
000005B0: B9 0D 76 02 58 24 B2 4E 24 00 DA 0D 8A 02 A0 36 |..v.X$.N$......6|
000005C0: 3A 9F 36 2C 38 2C 36 2C 22 30 3A 22 AA 4E 24 AA |:.6,8,6,"0:".N$.|
000005D0: 22 43 48 45 43 4B 2C 53 2C 52 00 03 0E 94 02 A0 |"CHECK,S,R......|
000005E0: 31 35 3A 9F 31 35 2C 38 2C 31 35 3A 84 31 35 2C |15:.15,8,15:.15,|
000005F0: 51 2C 51 24 2C 51 31 2C 51 32 3A 8B 51 B2 30 A7 |Q,Q$,Q1,Q2:.Q.0.|
00000600: 36 38 30 00 0E 0E 9E 02 8D 31 30 30 30 30 00 17 |680......10000..|
00000610: 0E A3 02 89 36 35 30 00 39 0E A8 02 84 36 2C 4D |....650.9....6,M|
00000620: 44 24 2C 4D 53 24 2C 4D 4F 24 2C 4C 50 24 2C 50 |D$,MS$,MO$,LP$,P|
00000630: 4E 2C 42 43 24 2C 57 4A 24 00 44 0E B2 02 A0 36 |N,BC$,WJ$.D....6|
00000640: 3A A0 31 35 00 60 0E EE 02 A0 36 3A 9F 36 2C 38 |:.15.`....6:.6,8|
00000650: 2C 36 2C 22 30 3A 4B 4F 4E 54 45 4E 2C 53 2C 52 |,6,"0:KONTEN,S,R|
00000660: 00 89 0E F8 02 A0 31 35 3A 9F 31 35 2C 38 2C 31 |......15:.15,8,1|
00000670: 35 3A 84 31 35 2C 51 2C 51 24 2C 51 31 2C 51 32 |5:.15,Q,Q$,Q1,Q2|
00000680: 3A 8B 51 B2 30 A7 37 38 30 00 94 0E 02 03 8D 31 |:.Q.0.780......1|
00000690: 30 30 30 30 00 9D 0E 07 03 89 37 35 30 00 A7 0E |0000......750...|
000006A0: 0C 03 84 36 2C 4E 24 00 B4 0E 16 03 81 49 B2 31 |...6,N$......I.1|
000006B0: A4 31 35 30 00 DF 0E 20 03 84 36 2C 42 4C 28 49 |.150... ..6,BL(I|
000006C0: 29 2C 45 42 28 49 29 2C 4A 53 28 49 29 2C 4A 48 |),EB(I),JS(I),JH|
000006D0: 28 49 29 2C 50 53 28 49 29 2C 50 48 28 49 29 00 |(I),PS(I),PH(I).|
000006E0: E6 0E 2A 03 82 49 00 F1 0E 34 03 A0 36 3A A0 31 |..*..I...4..6:.1|
000006F0: 35 00 0D 0F 52 03 A0 36 3A 9F 36 2C 38 2C 36 2C |5...R..6:.6,8,6,|
00000700: 22 30 3A 42 55 53 43 48 4C 2C 53 2C 52 00 36 0F |"0:BUSCHL,S,R.6.|
00000710: 5C 03 A0 31 35 3A 9F 31 35 2C 38 2C 31 35 3A 84 |\..15:.15,8,15:.|
00000720: 31 35 2C 51 2C 51 24 2C 51 31 2C 51 32 3A 8B 51 |15,Q,Q$,Q1,Q2:.Q|
00000730: B2 30 A7 38 38 30 00 41 0F 66 03 8D 31 30 30 30 |.0.880.A.f..1000|
00000740: 30 00 4A 0F 6B 03 89 38 35 30 00 55 0F 70 03 81 |0.J.k..850.U.p..|
00000750: 49 B2 31 A4 39 00 68 0F 7A 03 84 36 2C 42 53 28 |I.1.9.h.z..6,BS(|
00000760: 49 29 2C 42 4B 28 49 29 00 6F 0F 84 03 82 49 00 |I),BK(I).o....I.|
00000770: 7A 0F 8E 03 A0 36 3A A0 31 35 00 8A 0F 98 03 42 |z....6:.15.....B|
00000780: 4B 28 31 30 29 B2 31 34 30 30 00 9A 0F 9D 03 42 |K(10).1400.....B|
00000790: 4B 28 31 31 29 B2 31 36 30 30 00 CC 0F E8 03 99 |K(11).1600......|
000007A0: 22 93 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |"...............|
000007B0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000007C0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3B 00 FF 0F F2 |..........";....|
000007D0: 03 99 22 12 20 20 20 46 49 42 55 20 31 35 30 2F |..". FIBU 150/|
000007E0: 36 34 20 20 2D 20 20 44 52 55 43 4B 52 4F 55 54 |64 - DRUCKROUT|
000007F0: 49 4E 45 20 4B 4F 4E 54 45 4E 20 20 22 3A 99 00 |INE KONTEN ":..|
00000800: 1A 10 FC 03 99 22 12 4D 44 92 20 22 3B 4E 24 3B |.....".MD. ";N$;|
00000810: 22 20 20 22 3B 4D 44 24 3A 99 00 44 10 06 04 99 |" ";MD$:..D....|
00000820: 22 12 57 4A 92 22 3B 57 4A 24 3B 22 20 20 12 4C |".WJ.";WJ$;" .L|
00000830: 45 54 5A 54 45 53 20 44 41 54 55 4D 92 22 3B 4C |ETZTES DATUM.";L|
00000840: 50 24 3A 99 00 6C 10 10 04 99 22 12 4C 45 54 5A |P$:..l....".LETZ|
00000850: 54 45 52 20 47 45 42 55 43 48 54 45 52 20 42 4C |TER GEBUCHTER BL|
00000860: 4F 43 4B 92 20 22 3B 42 43 24 3A 99 00 95 10 1A |OCK. ";BC$:.....|
00000870: 04 99 22 12 4C 45 54 5A 54 45 20 47 45 42 55 43 |..".LETZTE GEBUC|
00000880: 48 54 45 20 50 52 49 4D 41 4E 4F 54 41 92 20 22 |HTE PRIMANOTA. "|
00000890: 3B 50 4E 3A 99 00 C9 10 24 04 99 22 A4 A4 A4 A4 |;PN:....$.."....|
000008A0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000008B0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000008C0: A4 A4 A4 A4 22 3A 99 3A 99 00 EF 10 2E 04 99 22 |....":.:......."|
000008D0: 12 4F 92 4B 2D 53 54 41 52 54 45 4E 20 20 12 46 |.O.K-STARTEN .F|
000008E0: 92 41 4C 53 43 48 20 20 12 45 92 4E 44 45 22 00 |.ALSCH .E.NDE".|
000008F0: 00 11 33 04 8B 58 24 B2 22 53 22 A7 32 30 30 30 |..3..X$."S".2000|
00000900: 00 1A 11 38 04 58 24 B2 22 22 3A A1 58 24 3A 8B |...8.X$."":.X$:.|
00000910: 58 24 B2 22 22 A7 31 30 38 30 00 4C 11 4C 04 99 |X$."".1080.L.L..|
00000920: 22 93 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |"...............|
00000930: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000940: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3B 00 7F 11 56 |..........";...V|
00000950: 04 99 22 12 20 20 20 46 49 42 55 20 31 35 30 2F |..". FIBU 150/|
00000960: 36 34 20 20 2D 20 20 44 52 55 43 4B 52 4F 55 54 |64 - DRUCKROUT|
00000970: 49 4E 45 20 4B 4F 4E 54 45 4E 20 20 22 3A 99 00 |INE KONTEN ":..|
00000980: 9D 11 60 04 99 22 D1 20 50 41 50 49 45 52 20 41 |..`..". PAPIER A|
00000990: 55 53 52 49 43 48 54 45 4E 20 22 3A 99 00 CA 11 |USRICHTEN ":....|
000009A0: 6A 04 99 22 D1 20 50 52 4F 42 45 44 52 55 43 4B |j..". PROBEDRUCK|
000009B0: 5A 45 49 4C 45 20 4D 55 53 53 20 44 49 52 45 4B |ZEILE MUSS DIREK|
000009C0: 54 20 41 55 46 20 44 45 52 22 00 F3 11 74 04 99 |T AUF DER"...t..|
000009D0: 22 20 20 4C 49 4E 49 45 20 55 45 42 45 52 20 44 |" LINIE UEBER D|
000009E0: 45 4D 20 41 55 46 44 52 55 43 4B 20 2A 4D 2D 4E |EM AUFDRUCK *M-N|
000009F0: 52 2A 22 00 05 12 7E 04 99 22 20 20 53 54 45 48 |R*"...~.." STEH|
00000A00: 45 4E 22 3A 99 00 31 12 88 04 99 22 D1 20 12 52 |EN":..1....". .R|
00000A10: 45 54 55 52 4E 92 20 3D 20 50 52 4F 42 45 44 52 |ETURN. = PROBEDR|
00000A20: 55 43 4B 20 20 12 53 92 20 3D 20 53 54 41 52 54 |UCK .S. = START|
00000A30: 22 00 4B 12 92 04 58 24 B2 22 22 3A A1 58 24 3A |".K...X$."":.X$:|
00000A40: 8B 58 24 B2 22 22 A7 31 31 37 30 00 5C 12 97 04 |.X$."".1170.\...|
00000A50: 8B 58 24 B2 22 53 22 A7 32 30 30 30 00 9D 12 9C |.X$."S".2000....|
00000A60: 04 98 34 2C 22 58 58 58 58 58 58 58 58 58 58 58 |..4,"XXXXXXXXXXX|
00000A70: 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 |XXXXXXXXXXXXXXXX|
00000A80: 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 58 |XXXXXXXXXXXXXXXX|
00000A90: 58 58 58 58 58 58 58 58 58 58 58 58 22 00 A7 12 |XXXXXXXXXXXX"...|
00000AA0: A6 04 89 31 31 37 30 00 BD 12 D0 07 81 49 B2 31 |...1170......I.1|
00000AB0: A4 33 37 3A 98 34 2C 22 20 22 3A 82 49 00 CA 12 |.37:.4," ":.I...|
00000AC0: D5 07 42 B2 C5 28 42 43 24 29 00 DE 12 DA 07 56 |..B..(BC$).....V|
00000AD0: 53 24 B2 22 5F 22 3A 56 31 24 B2 22 4E 22 00 E9 |S$."_":V1$."N"..|
00000AE0: 12 DF 07 81 58 B2 31 A4 42 00 F9 12 E4 07 56 53 |....X.1.B.....VS|
00000AF0: 24 B2 56 53 24 AA 56 31 24 00 00 13 E9 07 82 58 |$.VS$.V1$......X|
00000B00: 00 3C 13 EE 07 99 22 93 11 11 11 11 11 11 11 11 |.<....".........|
00000B10: 11 11 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000B20: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000B30: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3B 00 71 13 F8 |..........";.q..|
00000B40: 07 99 22 12 20 56 45 52 41 52 42 45 49 54 55 4E |..". VERARBEITUN|
00000B50: 47 53 52 4F 55 54 49 4E 45 20 4B 4F 4E 54 45 4E |GSROUTINE KONTEN|
00000B60: 44 52 55 43 4B 20 4C 41 45 55 46 54 22 3A 99 3A |DRUCK LAEUFT":.:|
00000B70: 99 00 96 13 02 08 99 22 20 20 20 20 20 20 20 4B |......." K|
00000B80: 45 49 4E 45 20 54 41 53 54 45 20 44 52 55 45 43 |EINE TASTE DRUEC|
00000B90: 4B 45 4E 20 21 22 00 A3 13 34 08 81 49 B2 31 A4 |KEN !"...4..I.1.|
00000BA0: 31 35 30 00 B4 13 3E 08 8B 41 28 49 29 B2 30 A7 |150...>..A(I).0.|
00000BB0: 35 30 30 30 00 C0 13 43 08 81 58 B2 31 A4 31 31 |5000...C..X.1.11|
00000BC0: 00 D5 13 48 08 8B 41 28 49 29 B2 42 4B 28 58 29 |...H..A(I).BK(X)|
00000BD0: A7 32 32 30 30 00 DC 13 52 08 82 58 00 F1 13 5C |.2200...R..X...\|
00000BE0: 08 8B 53 24 28 49 29 B3 B1 56 53 24 A7 32 32 30 |..S$(I)..VS$.220|
00000BF0: 30 00 FB 13 66 08 89 35 30 30 30 00 06 14 98 08 |0...f..5000.....|
00000C00: 50 31 24 B2 22 22 00 15 14 A2 08 50 31 24 B2 50 |P1$."".....P1$.P|
00000C10: 31 24 AA 4E 24 00 22 14 B6 08 4C B2 C3 28 50 31 |1$.N$."...L..(P1|
00000C20: 24 29 00 37 14 C0 08 50 31 24 B2 50 31 24 AA 4C |$).7...P1$.P1$.L|
00000C30: 45 24 28 34 AB 4C 29 00 4D 14 CA 08 50 31 24 B2 |E$(4.L).M...P1$.|
00000C40: 50 31 24 AA C8 28 4D 44 24 2C 32 31 29 00 5A 14 |P1$..(MD$,21).Z.|
00000C50: D4 08 4C B2 C3 28 50 31 24 29 00 79 14 DE 08 50 |..L..(P1$).y...P|
00000C60: 31 24 B2 50 31 24 AA 4C 45 24 28 32 37 AB 4C 29 |1$.P1$.LE$(27.L)|
00000C70: 3A 4C B2 C3 28 50 31 24 29 00 9A 14 E8 08 50 31 |:L..(P1$).....P1|
00000C80: 24 B2 50 31 24 AA C8 28 41 24 28 49 29 2C 31 37 |$.P1$..(A$(I),17|
00000C90: 29 3A 4C B2 C3 28 50 31 24 29 00 B9 14 F2 08 50 |):L..(P1$).....P|
00000CA0: 31 24 B2 50 31 24 AA 4C 45 24 28 34 35 AB 4C 29 |1$.P1$.LE$(45.L)|
00000CB0: 3A 4C B2 C3 28 50 31 24 29 00 E5 14 FC 08 50 24 |:L..(P1$).....P$|
00000CC0: B2 C4 28 41 28 49 29 29 3A 4C 31 B2 C3 28 50 24 |..(A(I)):L1..(P$|
00000CD0: 29 3A 50 24 B2 4C 45 24 28 34 AB 28 4C 31 AB 31 |):P$.LE$(4.(L1.1|
00000CE0: 29 29 AA 50 24 00 FD 14 06 09 50 31 24 B2 50 31 |)).P$.....P1$.P1|
00000CF0: 24 AA 50 24 3A 4C B2 C3 28 50 31 24 29 00 13 15 |$.P$:L..(P1$)...|
00000D00: 1A 09 50 31 24 B2 50 31 24 AA 4C 45 24 28 35 30 |..P1$.P1$.LE$(50|
00000D10: AB 4C 29 00 25 15 24 09 42 4C 28 49 29 B2 42 4C |.L).%.$.BL(I).BL|
00000D20: 28 49 29 AA 31 00 36 15 2E 09 98 34 2C 50 31 24 |(I).1.6....4,P1$|
00000D30: 3B 42 4C 28 49 29 00 48 15 38 09 98 34 2C 22 20 |;BL(I).H.8..4," |
00000D40: 22 3A 98 34 2C 22 20 22 00 58 15 60 09 50 32 24 |":.4," ".X.`.P2$|
00000D50: B2 4C 45 24 28 31 30 29 00 7C 15 6A 09 50 24 B2 |.LE$(10).|.j.P$.|
00000D60: C4 28 45 42 28 49 29 29 3A 4C 31 B2 C3 28 50 24 |.(EB(I)):L1..(P$|
00000D70: 29 3A 8B 4C 31 B1 32 A7 32 34 33 30 00 98 15 74 |):.L1.2.2430...t|
00000D80: 09 50 24 B2 4C 24 28 33 AB 4C 31 29 AA 50 24 3A |.P$.L$(3.L1).P$:|
00000D90: 4C 31 B2 C3 28 50 24 29 00 C1 15 7E 09 50 24 B2 |L1..(P$)...~.P$.|
00000DA0: C8 28 50 24 2C 28 4C 31 AB 32 29 29 AA 22 2C 22 |.(P$,(L1.2)).","|
00000DB0: AA C9 28 50 24 2C 32 29 3A 4C 31 B2 C3 28 50 24 |..(P$,2):L1..(P$|
00000DC0: 29 00 D6 15 88 09 50 24 B2 4C 45 24 28 31 32 AB |).....P$.LE$(12.|
00000DD0: 4C 31 29 AA 50 24 00 EE 15 92 09 50 32 24 B2 50 |L1).P$.....P2$.P|
00000DE0: 32 24 AA 50 24 3A 4C B2 C3 28 50 32 24 29 00 20 |2$.P$:L..(P2$). |
00000DF0: 16 9C 09 50 24 B2 C4 28 28 4A 53 28 49 29 AB 4A |...P$..((JS(I).J|
00000E00: 48 28 49 29 AA 45 42 28 49 29 29 29 3A 4C 31 B2 |H(I).EB(I))):L1.|
00000E10: C3 28 50 24 29 3A 8B 4C 31 B1 32 A7 32 34 38 30 |.(P$):.L1.2.2480|
00000E20: 00 3C 16 A6 09 50 24 B2 4C 24 28 33 AB 4C 31 29 |.<...P$.L$(3.L1)|
00000E30: AA 50 24 3A 4C 31 B2 C3 28 50 24 29 00 65 16 B0 |.P$:L1..(P$).e..|
00000E40: 09 50 24 B2 C8 28 50 24 2C 28 4C 31 AB 32 29 29 |.P$..(P$,(L1.2))|
00000E50: AA 22 2C 22 AA C9 28 50 24 2C 32 29 3A 4C 31 B2 |.","..(P$,2):L1.|
00000E60: C3 28 50 24 29 00 7A 16 BA 09 50 24 B2 4C 45 24 |.(P$).z...P$.LE$|
00000E70: 28 31 33 AB 4C 31 29 AA 50 24 00 92 16 C4 09 50 |(13.L1).P$.....P|
00000E80: 32 24 B2 50 32 24 AA 50 24 3A 4C B2 C3 28 50 32 |2$.P2$.P$:L..(P2|
00000E90: 24 29 00 B6 16 CE 09 50 24 B2 C4 28 4A 53 28 49 |$).....P$..(JS(I|
00000EA0: 29 29 3A 4C 31 B2 C3 28 50 24 29 3A 8B 4C 31 B1 |)):L1..(P$):.L1.|
00000EB0: 32 A7 32 35 33 30 00 D2 16 D8 09 50 24 B2 4C 24 |2.2530.....P$.L$|
00000EC0: 28 33 AB 4C 31 29 AA 50 24 3A 4C 31 B2 C3 28 50 |(3.L1).P$:L1..(P|
00000ED0: 24 29 00 F2 16 E2 09 50 24 B2 4C 45 24 28 31 30 |$).....P$.LE$(10|
00000EE0: AB 4C 31 29 AA 50 24 3A 50 32 24 B2 50 32 24 AA |.L1).P$:P2$.P2$.|
00000EF0: 50 24 00 16 17 EC 09 50 24 B2 C4 28 4A 48 28 49 |P$.....P$..(JH(I|
00000F00: 29 29 3A 4C 31 B2 C3 28 50 24 29 3A 8B 4C 31 B1 |)):L1..(P$):.L1.|
00000F10: 32 A7 32 35 36 30 00 32 17 F6 09 50 24 B2 4C 24 |2.2560.2...P$.L$|
00000F20: 28 33 AB 4C 31 29 AA 50 24 3A 4C 31 B2 C3 28 50 |(3.L1).P$:L1..(P|
00000F30: 24 29 00 52 17 00 0A 50 24 B2 4C 45 24 28 31 30 |$).R...P$.LE$(10|
00000F40: AB 4C 31 29 AA 50 24 3A 50 32 24 B2 50 32 24 AA |.L1).P$:P2$.P2$.|
00000F50: 50 24 00 5D 17 0A 0A 98 34 2C 50 32 24 00 73 17 |P$.]....4,P2$.s.|
00000F60: 14 0A 98 34 2C 22 20 22 3A 98 34 2C 22 20 22 3A |...4," ":.4," ":|
00000F70: 54 B2 30 00 7B 17 28 0A 44 B2 30 00 85 17 80 0C |T.0.{.(.D.0.....|
00000F80: 44 B2 44 AA 31 00 8E 17 82 0C 41 58 B2 44 00 B2 |D.D.1.....AX.D..|
00000F90: 17 85 0C 8B C9 28 C8 28 53 24 28 49 29 2C 28 41 |.....(.(S$(I),(A|
00000FA0: 58 AA 31 29 29 2C 31 29 B3 B1 22 4A 22 A7 34 35 |X.1)),1).."J".45|
00000FB0: 31 30 00 BE 17 8A 0C 42 24 B2 C4 28 44 29 00 DB |10.....B$..(D)..|
00000FC0: 17 94 0C A0 36 3A 9F 36 2C 38 2C 36 2C 22 30 3A |....6:.6,8,6,"0:|
00000FD0: 42 22 AA 42 24 AA 22 2C 53 2C 52 00 05 18 9E 0C |B".B$.",S,R.....|
00000FE0: A0 31 35 3A 9F 31 35 2C 38 2C 31 35 3A 84 31 35 |.15:.15,8,15:.15|
00000FF0: 2C 51 2C 51 24 2C 51 31 2C 51 32 3A 8B 51 B2 30 |,Q,Q$,Q1,Q2:.Q.0|
00001000: A7 33 32 35 30 00 10 18 A8 0C 8D 31 30 30 30 30 |.3250......10000|
00001010: 00 1A 18 AD 0C 89 33 32 32 30 00 29 18 B2 0C 84 |......3220.)....|
00001020: 36 2C 4C 50 24 2C 50 4E 24 00 35 18 BC 0C 81 5A |6,LP$,PN$.5....Z|
00001030: B2 31 A4 36 30 00 7B 18 C6 0C 84 36 2C 41 30 24 |.1.60.{....6,A0$|
00001040: 28 5A 29 2C 41 31 24 28 5A 29 2C 41 32 24 28 5A |(Z),A1$(Z),A2$(Z|
00001050: 29 2C 41 33 24 28 5A 29 2C 41 34 24 28 5A 29 2C |),A3$(Z),A4$(Z),|
00001060: 41 35 24 28 5A 29 2C 41 36 24 28 5A 29 2C 42 36 |A5$(Z),A6$(Z),B6|
00001070: 24 28 5A 29 2C 41 37 24 28 5A 29 00 82 18 D0 0C |$(Z),A7$(Z).....|
00001080: 82 5A 00 8D 18 DA 0C A0 36 3A A0 31 35 00 99 18 |.Z......6:.15...|
00001090: E4 0C 81 5A B2 31 A4 36 30 00 B3 18 EE 0C 8B C5 |...Z.1.60.......|
000010A0: 28 41 32 24 28 5A 29 29 B3 B1 41 28 49 29 A7 33 |(A2$(Z))..A(I).3|
000010B0: 35 30 30 00 C7 18 F8 0C 50 33 24 B2 C8 28 41 31 |500.....P3$..(A1|
000010C0: 24 28 5A 29 2C 35 29 00 E0 18 02 0D 50 33 24 B2 |$(Z),5).....P3$.|
000010D0: 50 33 24 AA 50 4E 24 3A 4C B2 C3 28 50 33 24 29 |P3$.PN$:L..(P3$)|
000010E0: 00 F5 18 0C 0D 50 33 24 B2 50 33 24 AA 4C 45 24 |.....P3$.P3$.LE$|
000010F0: 28 39 AB 4C 29 00 11 19 16 0D 50 33 24 B2 50 33 |(9.L).....P3$.P3|
00001100: 24 AA 41 34 24 28 5A 29 3A 4C B2 C3 28 50 33 24 |$.A4$(Z):L..(P3$|
00001110: 29 00 27 19 20 0D 50 33 24 B2 50 33 24 AA 4C 45 |).'. .P3$.P3$.LE|
00001120: 24 28 31 34 AB 4C 29 00 49 19 2A 0D 50 33 24 B2 |$(14.L).I.*.P3$.|
00001130: 50 33 24 AA C8 28 41 37 24 28 5A 29 2C 31 32 29 |P3$..(A7$(Z),12)|
00001140: 3A 4C B2 C3 28 50 33 24 29 00 5F 19 34 0D 50 33 |:L..(P3$)._.4.P3|
00001150: 24 B2 50 33 24 AA 4C 45 24 28 32 37 AB 4C 29 00 |$.P3$.LE$(27.L).|
00001160: 80 19 3E 0D 50 33 24 B2 50 33 24 AA C8 28 41 30 |..>.P3$.P3$..(A0|
00001170: 24 28 5A 29 2C 36 29 3A 4C B2 C3 28 50 33 24 29 |$(Z),6):L..(P3$)|
00001180: 00 96 19 48 0D 50 33 24 B2 50 33 24 AA 4C 45 24 |...H.P3$.P3$.LE$|
00001190: 28 33 33 AB 4C 29 00 AF 19 52 0D 50 24 B2 C4 28 |(33.L)...R.P$..(|
000011A0: C5 28 C9 28 41 33 24 28 5A 29 2C 31 29 29 29 00 |.(.(A3$(Z),1))).|
000011B0: BE 19 5C 0D 50 33 24 B2 50 33 24 AA 50 24 00 E1 |..\.P3$.P3$.P$..|
000011C0: 19 66 0D 50 24 B2 41 36 24 28 5A 29 3A 4C 31 B2 |.f.P$.A6$(Z):L1.|
000011D0: C3 28 50 24 29 3A 8B 4C 31 B3 31 31 A7 33 34 35 |.(P$):.L1.11.345|
000011E0: 30 00 FA 19 70 0D 50 24 B2 C9 28 50 24 2C 31 30 |0...p.P$..(P$,10|
000011F0: 29 3A 4C 31 B2 C3 28 50 24 29 00 14 1A 7A 0D 50 |):L1..(P$)...z.P|
00001200: 33 24 B2 50 33 24 AA 4C 45 24 28 31 30 AB 4C 31 |3$.P3$.LE$(10.L1|
00001210: 29 AA 50 24 00 25 1A 84 0D 98 34 2C 50 33 24 3A |).P$.%....4,P3$:|
00001220: 54 B2 54 AA 31 00 2B 1A AC 0D 8F 00 45 1A B6 0D |T.T.1.+.....E...|
00001230: 8B C5 28 41 34 24 28 5A 29 29 B3 B1 41 28 49 29 |..(A4$(Z))..A(I)|
00001240: A7 33 37 30 30 00 59 1A C0 0D 50 33 24 B2 C8 28 |.3700.Y...P3$..(|
00001250: 41 31 24 28 5A 29 2C 35 29 00 72 1A CA 0D 50 33 |A1$(Z),5).r...P3|
00001260: 24 B2 50 33 24 AA 50 4E 24 3A 4C B2 C3 28 50 33 |$.P3$.PN$:L..(P3|
00001270: 24 29 00 87 1A D4 0D 50 33 24 B2 50 33 24 AA 4C |$).....P3$.P3$.L|
00001280: 45 24 28 38 AB 4C 29 00 A3 1A DE 0D 50 33 24 B2 |E$(8.L).....P3$.|
00001290: 50 33 24 AA 41 32 24 28 5A 29 3A 4C B2 C3 28 50 |P3$.A2$(Z):L..(P|
000012A0: 33 24 29 00 B9 1A E8 0D 50 33 24 B2 50 33 24 AA |3$).....P3$.P3$.|
000012B0: 4C 45 24 28 31 34 AB 4C 29 00 DB 1A F2 0D 50 33 |LE$(14.L).....P3|
000012C0: 24 B2 50 33 24 AA C8 28 41 37 24 28 5A 29 2C 31 |$.P3$..(A7$(Z),1|
000012D0: 32 29 3A 4C B2 C3 28 50 33 24 29 00 F1 1A FC 0D |2):L..(P3$).....|
000012E0: 50 33 24 B2 50 33 24 AA 4C 45 24 28 32 37 AB 4C |P3$.P3$.LE$(27.L|
000012F0: 29 00 12 1B 06 0E 50 33 24 B2 50 33 24 AA C8 28 |).....P3$.P3$..(|
00001300: 41 30 24 28 5A 29 2C 36 29 3A 4C B2 C3 28 50 33 |A0$(Z),6):L..(P3|
00001310: 24 29 00 28 1B 10 0E 50 33 24 B2 50 33 24 AA 4C |$).(...P3$.P3$.L|
00001320: 45 24 28 33 33 AB 4C 29 00 41 1B 1A 0E 50 24 B2 |E$(33.L).A...P$.|
00001330: C4 28 C5 28 C9 28 41 35 24 28 5A 29 2C 31 29 29 |.(.(.(A5$(Z),1))|
00001340: 29 00 50 1B 24 0E 50 33 24 B2 50 33 24 AA 50 24 |).P.$.P3$.P3$.P$|
00001350: 00 73 1B 2E 0E 50 24 B2 42 36 24 28 5A 29 3A 4C |.s...P$.B6$(Z):L|
00001360: 31 B2 C3 28 50 24 29 3A 8B 4C 31 B3 31 31 A7 33 |1..(P$):.L1.11.3|
00001370: 36 36 30 00 8C 1B 38 0E 50 24 B2 C9 28 50 24 2C |660...8.P$..(P$,|
00001380: 31 30 29 3A 4C 31 B2 C3 28 50 24 29 00 A6 1B 4C |10):L1..(P$)...L|
00001390: 0E 50 33 24 B2 50 33 24 AA 4C 45 24 28 32 30 AB |.P3$.P3$.LE$(20.|
000013A0: 4C 31 29 AA 50 24 00 B7 1B 56 0E 98 34 2C 50 33 |L1).P$...V..4,P3|
000013B0: 24 3A 54 B2 54 AA 31 00 C6 1B 74 0E 8B 54 B2 32 |$:T.T.1...t..T.2|
000013C0: 31 A7 38 30 30 30 00 CC 1B 7E 0E 8F 00 D3 1B 94 |1.8000...~......|
000013D0: 11 82 5A 00 DE 1B 9E 11 81 58 B2 31 A4 39 00 F3 |..Z......X.1.9..|
000013E0: 1B A8 11 8B 41 28 49 29 B2 42 4B 28 58 29 A7 34 |....A(I).BK(X).4|
000013F0: 35 34 35 00 FA 1B B2 11 82 58 00 04 1C BC 11 89 |545......X......|
00001400: 34 35 39 30 00 15 1C C1 11 8B 41 28 49 29 B2 30 |4590......A(I).0|
00001410: A7 34 35 39 30 00 3F 1C C6 11 98 34 2C 22 41 55 |.4590.?....4,"AU|
00001420: 54 4F 4D 41 54 49 53 43 48 45 20 53 59 53 54 45 |TOMATISCHE SYSTE|
00001430: 4D 42 55 43 48 55 4E 47 20 22 3A 51 51 B2 31 00 |MBUCHUNG ":QQ.1.|
00001440: 49 1C D0 11 54 B2 54 AA 31 00 4F 1C EE 11 8F 00 |I...T.T.1.O.....|
00001450: 5D 1C F8 11 8B 44 B3 42 A7 33 32 30 30 00 77 1C |]....D.B.3200.w.|
00001460: 02 12 81 50 B2 31 A4 28 32 31 AB 54 29 3A 98 34 |...P.1.(21.T):.4|
00001470: 2C 22 20 22 3A 82 50 00 90 1C 0C 12 98 34 2C 22 |," ":.P......4,"|
00001480: 20 22 3A 98 34 2C 22 20 22 3A 98 34 2C 4C 50 24 | ":.4," ":.4,LP$|
00001490: 00 B8 1C 20 12 50 24 B2 C4 28 50 53 28 49 29 29 |... .P$..(PS(I))|
000014A0: 3A 4C B2 C3 28 50 24 29 3A 50 24 B2 4C 45 24 28 |:L..(P$):P$.LE$(|
000014B0: 31 30 AB 4C 29 AA 50 24 00 E9 1C 2A 12 50 32 24 |10.L).P$...*.P2$|
000014C0: B2 22 50 45 52 49 4F 44 45 20 20 20 20 20 20 20 |."PERIODE |
000014D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000014E0: 20 20 20 20 20 22 AA 50 24 00 11 1D 34 12 50 24 | ".P$...4.P$|
000014F0: B2 C4 28 50 48 28 49 29 29 3A 4C B2 C3 28 50 24 |..(PH(I)):L..(P$|
00001500: 29 3A 50 24 B2 4C 45 24 28 31 30 AB 4C 29 AA 50 |):P$.LE$(10.L).P|
00001510: 24 00 27 1D 3E 12 50 32 24 B2 50 32 24 AA 50 24 |$.'.>.P2$.P2$.P$|
00001520: 3A 98 34 2C 50 32 24 00 3D 1D 52 12 50 32 24 B2 |:.4,P2$.=.R.P2$.|
00001530: 22 20 20 20 4A 41 48 52 20 20 20 20 22 00 63 1D |" JAHR ".c.|
00001540: 5C 12 50 B2 28 4A 53 28 49 29 AA 50 53 28 49 29 |\.P.(JS(I).PS(I)|
00001550: AB 4A 48 28 49 29 AB 50 48 28 49 29 AA 45 42 28 |.JH(I).PH(I).EB(|
00001560: 49 29 29 00 81 1D 66 12 4A 53 28 49 29 B2 4A 53 |I))...f.JS(I).JS|
00001570: 28 49 29 AA 50 53 28 49 29 3A 50 53 28 49 29 B2 |(I).PS(I):PS(I).|
00001580: 30 00 9F 1D 70 12 4A 48 28 49 29 B2 4A 48 28 49 |0...p.JH(I).JH(I|
00001590: 29 AA 50 48 28 49 29 3A 50 48 28 49 29 B2 30 00 |).PH(I):PH(I).0.|
000015A0: BD 1D 7A 12 50 24 B2 C4 28 50 29 3A 4C B2 C3 28 |..z.P$..(P):L..(|
000015B0: 50 24 29 3A 8B 4C B1 32 A7 34 37 35 30 00 D7 1D |P$):.L.2.4750...|
000015C0: 84 12 50 24 B2 4C 24 28 33 AB 4C 29 AA 50 24 3A |..P$.L$(3.L).P$:|
000015D0: 4C B2 C3 28 50 24 29 00 FE 1D 8E 12 50 24 B2 C8 |L..(P$).....P$..|
000015E0: 28 50 24 2C 28 4C AB 32 29 29 AA 22 2C 22 AA C9 |(P$,(L.2)).","..|
000015F0: 28 50 24 2C 32 29 3A 4C B2 C3 28 50 24 29 00 12 |(P$,2):L..(P$)..|
00001600: 1E 98 12 50 24 B2 4C 45 24 28 31 31 AB 4C 29 AA |...P$.LE$(11.L).|
00001610: 50 24 00 20 1E A2 12 8B 50 B3 30 A7 34 38 30 30 |P$. ....P.0.4800|
00001620: 00 3F 1E AC 12 50 32 24 B2 50 32 24 AA 50 24 AA |.?...P2$.P2$.P$.|
00001630: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 |" ".|
00001640: 49 1E B6 12 89 34 38 31 30 00 68 1E C0 12 50 32 |I....4810.h...P2|
00001650: 24 B2 50 32 24 AA 22 20 20 20 20 20 20 20 20 20 |$.P2$." |
00001660: 20 20 20 20 22 AA 50 24 00 90 1E CA 12 50 24 B2 | ".P$.....P$.|
00001670: C4 28 4A 53 28 49 29 29 3A 4C B2 C3 28 50 24 29 |.(JS(I)):L..(P$)|
00001680: 3A 50 24 B2 4C 45 24 28 31 30 AB 4C 29 AA 50 24 |:P$.LE$(10.L).P$|
00001690: 00 9F 1E D4 12 50 32 24 B2 50 32 24 AA 50 24 00 |.....P2$.P2$.P$.|
000016A0: C7 1E DE 12 50 24 B2 C4 28 4A 48 28 49 29 29 3A |....P$..(JH(I)):|
000016B0: 4C B2 C3 28 50 24 29 3A 50 24 B2 4C 45 24 28 31 |L..(P$):P$.LE$(1|
000016C0: 30 AB 4C 29 AA 50 24 00 D6 1E E8 12 50 32 24 B2 |0.L).P$.....P2$.|
000016D0: 50 32 24 AA 50 24 00 EF 1E F2 12 98 34 2C 50 32 |P2$.P$......4,P2|
000016E0: 24 3A 98 34 2C 22 A0 22 3A 98 34 2C 22 20 22 00 |$:.4,".":.4," ".|
000016F0: 01 1F F7 12 98 34 2C 22 20 22 3A 98 34 2C 22 20 |.....4," ":.4," |
00001700: 22 00 07 1F 24 13 8F 00 0E 1F 88 13 82 49 00 3F |"...$........I.?|
00001710: 1F 92 13 99 3A 99 22 12 20 4B 4F 4E 54 45 4E 44 |....:.". KONTEND|
00001720: 52 55 43 4B 20 46 45 52 54 49 47 20 2D 20 42 49 |RUCK FERTIG - BI|
00001730: 54 54 45 20 57 41 45 48 4C 45 4E 20 22 3A 99 00 |TTE WAEHLEN ":..|
00001740: 71 1F 9C 13 99 22 12 20 53 20 3D 20 4F 4B 2C 20 |q....". S = OK, |
00001750: 44 41 54 45 49 45 4E 20 46 2E 4E 45 55 45 20 50 |DATEIEN F.NEUE P|
00001760: 45 52 49 4F 44 45 20 4C 45 45 52 45 4E 20 22 3A |ERIODE LEEREN ":|
00001770: 99 00 A1 1F A6 13 99 22 12 20 46 20 3D 20 41 55 |.......". F = AU|
00001780: 53 44 52 55 43 4B 20 57 41 52 20 4E 55 52 20 49 |SDRUCK WAR NUR I|
00001790: 4E 46 4F 52 4D 41 54 4F 52 49 53 43 48 20 20 20 |NFORMATORISCH |
000017A0: 22 00 BB 1F B0 13 58 24 B2 22 22 3A A1 58 24 3A |".....X$."":.X$:|
000017B0: 8B 58 24 B2 22 22 A7 35 30 34 30 00 CD 1F BA 13 |.X$."".5040.....|
000017C0: 8B 58 24 B2 22 53 22 A7 31 35 30 30 30 00 DF 1F |.X$."S".15000...|
000017D0: C4 13 8B 58 24 B2 22 46 22 A7 31 36 30 30 30 00 |...X$."F".16000.|
000017E0: E9 1F CE 13 89 35 30 34 30 00 FB 1F 40 1F 98 34 |.....5040...@..4|
000017F0: 2C 22 20 22 3A 98 34 2C 22 20 22 00 0D 20 45 1F |," ":.4," ".. E.|
00001800: 98 34 2C 22 20 22 3A 98 34 2C 22 20 22 00 1F 20 |.4," ":.4," ".. |
00001810: 4A 1F 42 4C 28 49 29 B2 42 4C 28 49 29 AA 31 00 |J.BL(I).BL(I).1.|
00001820: 41 20 54 1F 98 34 2C 22 46 4F 52 54 53 45 54 5A |A T..4,"FORTSETZ|
00001830: 55 4E 47 20 42 4C 41 54 54 20 22 3B 42 4C 28 49 |UNG BLATT ";BL(I|
00001840: 29 00 53 20 5E 1F 98 34 2C 22 20 22 3A 98 34 2C |).S ^..4," ":.4,|
00001850: 22 20 22 00 65 20 5F 1F 98 34 2C 22 20 22 3A 98 |" ".e _..4," ":.|
00001860: 34 2C 22 20 22 00 76 20 61 1F 98 34 2C 50 31 24 |4," ".v a..4,P1$|
00001870: 3B 42 4C 28 49 29 00 9D 20 68 1F 98 34 2C 22 20 |;BL(I).. h..4," |
00001880: 22 3A 98 34 2C 22 20 22 3A 98 34 2C A3 31 30 29 |":.4," ":.4,.10)|
00001890: 22 46 4F 52 54 53 45 54 5A 55 4E 47 22 00 B3 20 |"FORTSETZUNG".. |
000018A0: 72 1F 98 34 2C 22 20 22 3A 98 34 2C 22 20 22 3A |r..4," ":.4," ":|
000018B0: 54 B2 30 00 BD 20 7C 1F 89 33 37 31 30 00 DA 20 |T.0.. |..3710.. |
000018C0: 10 27 99 3A 99 22 12 46 45 48 4C 45 52 92 22 3B |.'.:.".FEHLER.";|
000018D0: 51 3B 51 24 3B 51 31 3B 51 32 00 E5 20 1A 27 A0 |Q;Q$;Q1;Q2.. .'.|
000018E0: 36 3A A0 31 35 00 00 21 24 27 58 24 B2 22 22 3A |6:.15..!$'X$."":|
000018F0: A1 58 24 3A 8B 58 24 B2 22 22 A7 31 30 30 32 30 |.X$:.X$."".10020|
00001900: 00 34 21 2E 27 99 22 91 20 20 20 20 20 20 20 20 |.4!.'.". |
00001910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001930: 20 20 22 3B 00 4E 21 38 27 99 22 20 20 20 20 20 | ";.N!8'." |
00001940: 20 20 20 20 20 20 20 20 20 20 91 91 91 22 00 54 | ...".T|
00001950: 21 74 27 8E 00 8A 21 98 3A 99 22 93 11 11 11 11 |!t'...!.:.".....|
00001960: 11 11 11 11 12 20 20 41 42 53 43 48 4C 55 53 53 |..... ABSCHLUSS|
00001970: 52 4F 55 54 49 4E 45 20 4C 41 45 55 46 54 20 2D |ROUTINE LAEUFT -|
00001980: 20 57 41 52 54 45 4E 20 20 22 00 95 21 B6 3A 81 | WARTEN "..!.:.|
00001990: 55 B2 31 A4 42 00 A1 21 C0 3A 42 24 B2 C4 28 55 |U.1.B..!.:B$..(U|
000019A0: 29 00 B2 21 CA 3A A0 31 35 3A 9F 31 35 2C 38 2C |)..!.:.15:.15,8,|
000019B0: 31 35 00 C6 21 D4 3A 98 31 35 2C 22 53 30 3A 42 |15..!.:.15,"S0:B|
000019C0: 22 AA 42 24 AA 22 00 CE 21 DE 3A A0 31 35 00 D5 |".B$."..!.:.15..|
000019D0: 21 F2 3A 82 55 00 E1 21 FC 3A 42 43 24 B2 22 30 |!.:.U..!.:BC$."0|
000019E0: 22 00 03 22 60 3B A0 36 3A 9F 36 2C 38 2C 36 2C |".."`;.6:.6,8,6,|
000019F0: 22 40 30 3A 22 AA 4E 24 AA 22 43 48 45 43 4B 2C |"@0:".N$."CHECK,|
00001A00: 53 2C 57 00 3C 22 74 3B 98 36 2C 4D 44 24 3B C7 |S,W.<"t;.6,MD$;.|
00001A10: 28 31 33 29 3B 4D 53 24 3B C7 28 31 33 29 3B 4D |(13);MS$;.(13);M|
00001A20: 4F 24 3B C7 28 31 33 29 3B 4C 50 24 3B C7 28 31 |O$;.(13);LP$;.(1|
00001A30: 33 29 3B 50 4E 3B C7 28 31 33 29 3B 00 58 22 7E |3);PN;.(13);.X"~|
00001A40: 3B 98 36 2C 42 43 24 3B C7 28 31 33 29 3B 57 4A |;.6,BC$;.(13);WJ|
00001A50: 24 3B C7 28 31 33 29 3B 00 5F 22 88 3B A0 36 00 |$;.(13);._".;.6.|
00001A60: 7C 22 C4 3B A0 36 3A 9F 36 2C 38 2C 36 2C 22 40 ||".;.6:.6,8,6,"@|
00001A70: 30 3A 4B 4F 4E 54 45 4E 2C 53 2C 57 00 8D 22 D8 |0:KONTEN,S,W..".|
00001A80: 3B 98 36 2C 4E 24 3B C7 28 31 33 29 3B 00 9A 22 |;.6,N$;.(13);.."|
00001A90: E2 3B 81 49 B2 31 A4 31 35 30 00 C6 22 EC 3B 98 |.;.I.1.150..".;.|
00001AA0: 36 2C 42 4C 28 49 29 3B C7 28 31 33 29 3B 45 42 |6,BL(I);.(13);EB|
00001AB0: 28 49 29 3B C7 28 31 33 29 3B 4A 53 28 49 29 3B |(I);.(13);JS(I);|
00001AC0: C7 28 31 33 29 3B 00 F2 22 F6 3B 98 36 2C 4A 48 |.(13);..".;.6,JH|
00001AD0: 28 49 29 3B C7 28 31 33 29 3B 50 53 28 49 29 3B |(I);.(13);PS(I);|
00001AE0: C7 28 31 33 29 3B 50 48 28 49 29 3B C7 28 31 33 |.(13);PH(I);.(13|
00001AF0: 29 3B 00 F9 22 0A 3C 82 49 00 00 23 14 3C A0 36 |);..".<.I..#.<.6|
00001B00: 00 1F 23 80 3E 93 22 30 3A 4D 45 4E 55 45 22 2C |..#.>."0:MENUE",|
00001B10: 38 3A 99 22 93 11 11 11 52 55 4E 13 22 3A 80 00 |8:."....RUN.":..|
00001B20: 00 00 |.. |
....... 7FIBU KONTENDRUCK."....4,4./....
LE$(20).>...L$(2)."00".L...L$(1)."0".\..
.L$(3)."000".I...L$(0)."".W...LE$(0)."".
....LE$(1)." "... .LE$(2)." "...!.LE$(3
)." "...".LE$(4)." ".L.#.LE$(5)."
"...$.LE$(6)." "...%.LE$(7)."
"...&.LE$(8)." ".".'.LE$(9)."
".;.(.LE$(10)." ".U.).
LE$(11)." ".P.*.LE$(12)."
"...+.LE$(13)." "...,
.LE$(14)." ".G.-.LE$(15)."
".....LE$(16)."
".../.LE$(17)." ".'
.0.LE$(18)." ".I.1.LE$(
19)." "...2..A0$(60):.
A1$(60):.A2$(60):.A3$(60):.A4$(60):.A5$(
60)...7..A6$(60):.B6$(60):.A7$(60)...<..
A(150):.A$(150):.OD(150)...A..K$(150):.B
L(150):.EB(150):.JS(150):.JH(150).#.F..P
S(150):.PH(150):.PD$(150):.K1(150):.K2(1
50).0.K..S$(150).<.P..BK(15).N.H..".....
....................................";..
.R..". FIBU 150/64 - DRUCKROUTINE KO
NTEN ".O...."*** SIND KONTENVORDRUCKE E
INGELEGT ? ***"......"*** C> DANN .RET
URN.-TASTE DRUECKEN ***":......X$."":.X
$:.X$."".240.3... 1:.1,8,15,"I0": 1.O...
6:.6,8,6,"0:SORTER,S,R.\....I.1.150.I..
..6,S$(I).P."..I.W.,. 6.}.6........"....
.....................................";.
.....". FIBU 150/64 - DRUCKROUTINE K
ONTEN "......:." . WARTEN .".
.... 1:.1,8,15,"I": 1.2.&. 6:.6,8,6,"0:V
ERWEIS,S,R.[.0. 15:.15,8,15:.15,Q,Q$,Q1,
Q2:.Q.0.580.F.:..10000.O.?..550.Y.D..6,N
$...N..I.1.150...X..6,A(I),A$(I),OD(I)..
.B.....L. 6: 15...V.X$.N$.Z... 6:.6,8,6,
"0:".N$."CHECK,S,R..... 15:.15,8,15:.15,
Q,Q$,Q1,Q2:.Q.0.680......10000......650.
9....6,MD$,MS$,MO$,LP$,PN,BC$,WJ$.D... 6
: 15.`... 6:.6,8,6,"0:KONTEN,S,R..... 15
:.15,8,15:.15,Q,Q$,Q1,Q2:.Q.0.780......1
0000......750......6,N$......I.1.150...
..6,BL(I),EB(I),JS(I),JH(I),PS(I),PH(I).
..*..I...4. 6: 15...R. 6:.6,8,6,"0:BUSCH
L,S,R.6.\. 15:.15,8,15:.15,Q,Q$,Q1,Q2:.Q
.0.880.A.F..10000.J.K..850.U.P..I.1.9.H.
Z..6,BS(I),BK(I).O....I.Z... 6: 15.....B
K(10).1400.....BK(11).1600.L....".......
..................................";....
..". FIBU 150/64 - DRUCKROUTINE KONT
EN ":.......".MD. ";N$;" ";MD$:..D....
".WJ.";WJ$;" .LETZTES DATUM.";LP$:..L..
..".LETZTER GEBUCHTER BLOCK. ";BC$:.....
..".LETZTE GEBUCHTE PRIMANOTA. ";PN:..I.
$.."....................................
....":.:.......".O.K-STARTEN .F.ALSCH
.E.NDE"...3..X$."S".2000...8.X$."":.X$:.
X$."".1080.L.L..".......................
..................";..V..". FIBU 150/
64 - DRUCKROUTINE KONTEN ":....`.."Q
PAPIER AUSRICHTEN ":..J.J.."Q PROBEDRUCK
ZEILE MUSS DIREKT AUF DER"...T.." LINIE
UEBER DEM AUFDRUCK *M-NR*"...~.." STEH
EN":..1...."Q .RETURN. = PROBEDRUCK .S.
= START".K...X$."":.X$:.X$."".1170.\...
.X$."S".2000......4,"XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"...
...1170...P..I.1.37:.4," ":.I.J.U.B.E(BC
$)...Z.VS$."_":V1$."N"......X.1.B.....VS
$.VS$.V1$......X.<....".................
..................................";.Q..
..". VERARBEITUNGSROUTINE KONTENDRUCK LA
EUFT":.:......." KEINE TASTE DRUEC
KEN !"...4..I.1.150...>..A(I).0.5000...C
..X.1.11.U.H..A(I).BK(X).2200...R..X...\
..S$(I)..VS$.2200...F..5000.....P1$.""..
...P1$.P1$.N$."...L.C(P1$).7...P1$.P1$.L
E$(4.L).M.J.P1$.P1$.H(MD$,21).Z.T.L.C(P1
$).Y...P1$.P1$.LE$(27.L):L.C(P1$).....P1
$.P1$.H(A$(I),17):L.C(P1$).....P1$.P1$.L
E$(45.L):L.C(P1$).....P$.D(A(I)):L1.C(P$
):P$.LE$(4.(L1.1)).P$.....P1$.P1$.P$:L.C
(P1$).....P1$.P1$.LE$(50.L).%.$.BL(I).BL
(I).1.6....4,P1$;BL(I).H.8..4," ":.4," "
.X.`.P2$.LE$(10).|.J.P$.D(EB(I)):L1.C(P$
):.L1.2.2430...T.P$.L$(3.L1).P$:L1.C(P$)
.A.~.P$.H(P$,(L1.2)).",".I(P$,2):L1.C(P$
).V...P$.LE$(12.L1).P$.....P2$.P2$.P$:L.
C(P2$). ...P$.D((JS(I).JH(I).EB(I))):L1.
C(P$):.L1.2.2480.<...P$.L$(3.L1).P$:L1.C
(P$).E...P$.H(P$,(L1.2)).",".I(P$,2):L1.
C(P$).Z...P$.LE$(13.L1).P$...D.P2$.P2$.P
$:L.C(P2$)...N.P$.D(JS(I)):L1.C(P$):.L1.
2.2530.R.X.P$.L$(3.L1).P$:L1.C(P$).....P
$.LE$(10.L1).P$:P2$.P2$.P$.....P$.D(JH(I
)):L1.C(P$):.L1.2.2560.2...P$.L$(3.L1).P
$:L1.C(P$).R...P$.LE$(10.L1).P$:P2$.P2$.
P$.]....4,P2$.S....4," ":.4," ":T.0.{.(.
D.0.....D.D.1.....AX.D......I(H(S$(I),(A
X.1)),1).."J".4510.....B$.D(D)..... 6:.6
,8,6,"0:B".B$.",S,R..... 15:.15,8,15:.15
,Q,Q$,Q1,Q2:.Q.0.3250......10000......32
20.)....6,LP$,PN$.5....Z.1.60.{.F..6,A0$
(Z),A1$(Z),A2$(Z),A3$(Z),A4$(Z),A5$(Z),A
6$(Z),B6$(Z),A7$(Z)...P..Z...Z. 6: 15...
...Z.1.60......E(A2$(Z))..A(I).3500.G...
P3$.H(A1$(Z),5).....P3$.P3$.PN$:L.C(P3$)
.....P3$.P3$.LE$(9.L).....P3$.P3$.A4$(Z)
:L.C(P3$).'. .P3$.P3$.LE$(14.L).I.*.P3$.
P3$.H(A7$(Z),12):L.C(P3$)._.4.P3$.P3$.LE
$(27.L)...>.P3$.P3$.H(A0$(Z),6):L.C(P3$)
...H.P3$.P3$.LE$(33.L)...R.P$.D(E(I(A3$(
Z),1)))...\.P3$.P3$.P$...F.P$.A6$(Z):L1.
C(P$):.L1.11.3450...P.P$.I(P$,10):L1.C(P
$)...Z.P3$.P3$.LE$(10.L1).P$.%....4,P3$:
T.T.1.+.....E....E(A4$(Z))..A(I).3700.Y.
..P3$.H(A1$(Z),5).R.J.P3$.P3$.PN$:L.C(P3
$)...T.P3$.P3$.LE$(8.L).....P3$.P3$.A2$(
Z):L.C(P3$).....P3$.P3$.LE$(14.L).....P3
$.P3$.H(A7$(Z),12):L.C(P3$).....P3$.P3$.
LE$(27.L).....P3$.P3$.H(A0$(Z),6):L.C(P3
$).(...P3$.P3$.LE$(33.L).A...P$.D(E(I(A5
$(Z),1))).P.$.P3$.P3$.P$.S...P$.B6$(Z):L
1.C(P$):.L1.11.3660...8.P$.I(P$,10):L1.C
(P$)...L.P3$.P3$.LE$(20.L1).P$...V..4,P3
$:T.T.1.F.T..T.21.8000.L.~...S....Z.....
.X.1.9......A(I).BK(X).4545......X......
4590...A..A(I).0.4590.?.F..4,"AUTOMATISC
HE SYSTEMBUCHUNG ":QQ.1.I.P.T.T.1.O.....
]....D.B.3200.W....P.1.(21.T):.4," ":.P.
.....4," ":.4," ":.4,LP$... .P$.D(PS(I))
:L.C(P$):P$.LE$(10.L).P$...*.P2$."PERIOD
E ".P$...4.P$
.D(PH(I)):L.C(P$):P$.LE$(10.L).P$.'.>.P2
$.P2$.P$:.4,P2$.=.R.P2$." JAHR ".C.
\.P.(JS(I).PS(I).JH(I).PH(I).EB(I))...F.
JS(I).JS(I).PS(I):PS(I).0...P.JH(I).JH(I
).PH(I):PH(I).0...Z.P$.D(P):L.C(P$):.L.2
.4750.W...P$.L$(3.L).P$:L.C(P$).....P$.H
(P$,(L.2)).",".I(P$,2):L.C(P$).....P$.LE
$(11.L).P$. ....P.0.4800.?...P2$.P2$.P$.
" ".I....4810.H...P2$.P2$."
".P$...J.P$.D(JS(I)):L.C(P$)
:P$.LE$(10.L).P$...T.P2$.P2$.P$.G...P$.D
(JH(I)):L.C(P$):P$.LE$(10.L).P$.V...P2$.
P2$.P$......4,P2$:.4," ":.4," "......4,"
":.4," "...$........I.?....:.". KONTEND
RUCK FERTIG - BITTE WAEHLEN ":..Q....".
S = OK, DATEIEN F.NEUE PERIODE LEEREN ":
.......". F = AUSDRUCK WAR NUR INFORMATO
RISCH ".....X$."":.X$:.X$."".5040.M...
.X$."S".15000...D..X$."F".16000...N..504
0...@..4," ":.4," ".. E..4," ":.4," "..
J.BL(I).BL(I).1.A T..4,"FORTSETZUNG BLAT
T ";BL(I).S ^..4," ":.4," ".E _..4," ":.
4," ".V A..4,P1$;BL(I).. H..4," ":.4," "
:.4,.10)"FORTSETZUNG".. R..4," ":.4," ":
T.0.. |..3710.Z .'.:.".FEHLER.";Q;Q$;Q1;
Q2.. .' 6: 15..!$'X$."":.X$:.X$."".10020
.4!.'.".
";.N!8'." ...".T
!T'...!.:.".......... ABSCHLUSSROUTINE
LAEUFT - WARTEN "..!.:.U.1.B..!.:B$.D(U
)..!J: 15:.15,8,15.F!T:.15,"S0:B".B$.".N
!.: 15.U!.:.U..!.:BC$."0".."`; 6:.6,8,6,
"@0:".N$."CHECK,S,W.<"T;.6,MD$;G(13);MS$
;G(13);MO$;G(13);LP$;G(13);PN;G(13);.X"~
;.6,BC$;G(13);WJ$;G(13);._".; 6.|"D; 6:.
6,8,6,"@0:KONTEN,S,W.."X;.6,N$;G(13);.."
.;.I.1.150.F".;.6,BL(I);G(13);EB(I);G(13
);JS(I);G(13);..".;.6,JH(I);G(13);PS(I);
G(13);PH(I);G(13);..".<.I..#.< 6..#.>."0
:MENUE",8:."....RUN.":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL