FAK
FILE INFORMATION
FILENAME(S): FAK
FILE TYPE(S): PRG
FILE SIZE: 8.2K
FIRST SEEN: 2025-11-30 21:12:47
APPEARS ON: 1 disk(s)
FILE HASH
cef6fd45643ef14f66a1b87d81161d4b2c755ae8cd4a61386d87f5e59a8258a8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMMODORE 64 IP1 | FAK | PRG | DuncanTwain | 21 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..'.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00 4D 08 14 00 8F 20 2A 20 |*******.M.... * |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 73 08 | *.s.|
00000050: 1E 00 8F 20 2A 20 20 20 20 45 53 56 20 46 41 4B |... * ESV FAK|
00000060: 54 55 52 41 2F 4D 41 48 4E 45 4E 20 20 20 20 20 |TURA/MAHNEN |
00000070: 20 20 2A 00 99 08 28 00 8F 20 2A 20 20 20 20 20 | *...(.. * |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 2A 00 BF 08 32 00 8F 20 | *...2.. |
000000A0: 2A 20 56 45 52 53 49 4F 4E 3A 31 2E 30 20 20 44 |* VERSION:1.0 D|
000000B0: 41 54 55 4D 3A 38 33 2F 30 37 2F 31 38 20 2A 00 |ATUM:83/07/18 *.|
000000C0: E5 08 3C 00 8F 20 2A 20 20 20 20 20 20 20 20 20 |..<.. * |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 20 20 2A 00 0B 09 46 00 8F 20 2A 20 50 52 | *...F.. * PR|
000000F0: 4F 47 52 41 4D 4D 49 45 52 45 52 3A 20 4C 2E 46 |OGRAMMIERER: L.F|
00000100: 41 53 43 48 41 4C 45 4B 20 20 2A 00 31 09 4B 00 |ASCHALEK *.1.K.|
00000110: 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |. * |
00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000130: 2A 00 57 09 50 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*.W.P.. ********|
00000140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000150: 2A 2A 2A 2A 2A 2A 2A 00 66 09 5A 00 53 4F B2 31 |*******.f.Z.SO.1|
00000160: 32 AC 34 30 39 36 00 9F 09 5F 00 8B C2 28 53 4F |2.4096..._...(SO|
00000170: 29 B3 B1 37 36 AF C2 28 53 4F AA 31 29 B3 B1 36 |)..76..(SO.1)..6|
00000180: 36 AF C2 28 53 4F AA 32 29 B3 B1 31 39 32 A7 93 |6..(SO.2)..192..|
00000190: 22 53 4F 52 54 2E 43 30 58 58 22 2C 38 2C 31 00 |"SORT.C0XX",8,1.|
000001A0: B3 09 64 00 4B 44 B2 32 3A 4B 55 B2 38 3A 4B 43 |..d.KD.2:KU.8:KC|
000001B0: B2 31 35 00 EF 09 66 00 41 5A B2 35 30 30 3A 86 |.15...f.AZ.500:.|
000001C0: 20 41 24 28 41 5A 29 2C 52 4E 28 41 5A 29 2C 52 | A$(AZ),RN(AZ),R|
000001D0: 42 28 41 5A 29 2C 44 41 28 41 5A 29 2C 4E 41 24 |B(AZ),DA(AZ),NA$|
000001E0: 28 41 5A 29 2C 4D 5A 28 41 5A 29 3A 49 B2 30 00 |(AZ),MZ(AZ):I.0.|
000001F0: 36 0A 69 00 44 4C 24 B2 22 C0 C0 C0 C0 C0 C0 C0 |6.i.DL$.".......|
00000200: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000210: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000220: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000230: C0 C0 C0 C0 C0 22 00 7D 0A 6A 00 42 5A 24 B2 22 |.....".}.j.BZ$."|
00000240: C1 52 54 2E 20 C2 45 5A 45 49 43 48 4E 55 4E 47 |.RT. .EZEICHNUNG|
00000250: 20 20 20 20 20 20 20 20 20 20 CD 45 4E 47 45 20 | .ENGE |
00000260: 20 20 20 20 D0 52 45 49 53 20 2D 25 20 CD 57 D3 | .REIS -% .W.|
00000270: 54 20 20 20 20 20 C7 45 53 41 4D 54 22 00 CD 0A |T .ESAMT"...|
00000280: 6B 00 44 46 24 B2 22 20 20 20 20 20 20 20 20 20 |k.DF$." |
00000290: 41 41 41 41 20 41 41 41 41 41 41 41 41 41 41 41 |AAAA AAAAAAAAAAA|
000002A0: 41 41 41 41 41 41 41 41 41 20 39 39 39 39 39 20 |AAAAAAAAA 99999 |
000002B0: 39 39 39 39 39 39 2E 39 39 20 39 39 20 39 39 2E |999999.99 99 99.|
000002C0: 39 20 53 39 39 39 39 39 39 2E 39 39 22 00 1D 0B |9 S999999.99"...|
000002D0: 6C 00 45 46 24 B2 22 20 20 20 20 20 20 20 20 20 |l.EF$." |
000002E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000300: 20 20 20 41 41 41 41 41 41 41 41 41 41 41 41 41 | AAAAAAAAAAAAA|
00000310: 20 53 39 39 39 39 39 39 39 2E 39 39 22 00 64 0B | S9999999.99".d.|
00000320: 6D 00 44 32 24 B2 22 20 20 20 20 20 20 20 20 20 |m.D2$." |
00000330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000350: 20 20 20 20 20 20 20 20 20 C0 C0 C0 C0 C0 C0 C0 | .......|
00000360: C0 C0 C0 22 00 72 0B 6E 00 43 52 24 B2 C7 28 31 |...".r.n.CR$..(1|
00000370: 33 29 00 C2 0B 70 00 4D 5A 24 B2 22 20 20 20 20 |3)...p.MZ$." |
00000380: 20 20 20 20 20 D2 45 43 48 4E 2E CE 52 2E 20 20 | .ECHN..R. |
00000390: 20 20 20 20 20 20 20 C4 41 54 55 4D 20 20 20 20 | .ATUM |
000003A0: 20 20 20 20 20 20 CD D3 20 20 20 20 20 20 20 20 | .. |
000003B0: 20 20 20 20 20 20 20 20 20 20 20 C7 45 53 41 4D | .ESAM|
000003C0: 54 22 00 12 0C 71 00 4D 46 24 B2 22 20 20 20 20 |T"...q.MF$." |
000003D0: 20 20 20 20 20 39 39 39 39 39 39 39 39 39 20 20 | 999999999 |
000003E0: 20 20 20 20 20 20 20 39 39 39 39 39 39 20 20 20 | 999999 |
000003F0: 20 20 20 20 20 20 20 5A 20 20 20 20 20 20 20 20 | Z |
00000400: 20 20 20 20 20 20 20 39 39 39 39 39 39 39 2E 39 | 9999999.9|
00000410: 39 22 00 25 0C 78 00 9F 4B 43 2C 4B 55 2C 4B 43 |9".%.x..KC,KU,KC|
00000420: 3A 8D 36 30 30 00 30 0C 7D 00 51 24 B2 22 4E 22 |:.600.0.}.Q$."N"|
00000430: 00 49 0C 82 00 85 22 20 4D 41 48 4E 45 4E 20 28 |.I...." MAHNEN (|
00000440: 4A 2F 4E 29 20 22 3B 51 24 00 5A 0C 8C 00 8B 51 |J/N) ";Q$.Z....Q|
00000450: 24 B2 22 4A 22 A7 36 30 30 30 00 64 0C BE 00 89 |$."J".6000.d....|
00000460: 31 30 30 30 00 91 0C C8 00 58 24 B2 C4 28 B5 28 |1000.....X$..(.(|
00000470: 31 30 30 AC 58 AA 2E 35 29 29 3A 58 53 24 B2 C8 |100.X..5)):XS$..|
00000480: 28 58 24 2C 31 29 3A 58 24 B2 CA 28 58 24 2C 32 |(X$,1):X$..(X$,2|
00000490: 29 00 AD 0C D2 00 8B C3 28 58 24 29 B3 33 A7 58 |).......(X$).3.X|
000004A0: 24 B2 22 30 22 AA 58 24 3A 89 32 31 30 00 E8 0C |$."0".X$:.210...|
000004B0: DC 00 58 24 B2 C9 28 22 20 20 20 20 20 20 20 20 |..X$..(" |
000004C0: 20 20 20 22 AA 58 53 24 AA C8 28 58 24 2C C3 28 | ".XS$..(X$,.(|
000004D0: 58 24 29 AB 32 29 AA 22 2E 22 AA C9 28 58 24 2C |X$).2)."."..(X$,|
000004E0: 32 29 2C 31 31 29 3A 8E 00 FD 0C F9 00 8F 20 46 |2),11):....... F|
000004F0: 4F 52 4D 41 54 20 49 4E 54 45 47 45 52 00 29 0D |ORMAT INTEGER.).|
00000500: FA 00 58 24 B2 C4 28 B5 28 58 29 29 3A 58 53 24 |..X$..(.(X)):XS$|
00000510: B2 C8 28 58 24 2C 31 29 3A 58 24 B2 C9 28 58 24 |..(X$,1):X$..(X$|
00000520: 2C C3 28 58 24 29 AB 31 29 00 46 0D 04 01 58 24 |,.(X$).1).F...X$|
00000530: B2 58 53 24 AA C9 28 22 30 30 30 30 30 22 AA 58 |.XS$..("00000".X|
00000540: 24 2C 35 29 3A 8E 00 61 0D 58 02 9F 4B 44 2C 4B |$,5):..a.X..KD,K|
00000550: 55 2C 4B 44 2C 22 53 59 53 44 41 54 2C 55 2C 52 |U,KD,"SYSDAT,U,R|
00000560: 22 00 7B 0D 5D 02 84 4B 43 2C 4B 45 2C 4B 45 24 |".{.]..KC,KE,KE$|
00000570: 3A 8B 4B 45 A7 8D 39 39 39 3A 8E 00 8F 0D 62 02 |:.KE..999:....b.|
00000580: 84 4B 44 2C 53 30 24 2C 53 31 24 2C 53 32 24 00 |.KD,S0$,S1$,S2$.|
00000590: BB 0D 6C 02 84 4B 44 2C 53 33 24 2C 53 34 24 2C |..l..KD,S3$,S4$,|
000005A0: 53 35 24 2C 53 36 24 2C 53 37 24 2C 53 38 24 2C |S5$,S6$,S7$,S8$,|
000005B0: 53 39 24 2C 53 41 24 2C 53 42 24 00 CF 0D 76 02 |S9$,SA$,SB$...v.|
000005C0: 84 4B 44 2C 53 43 24 2C 53 44 24 2C 53 45 24 00 |.KD,SC$,SD$,SE$.|
000005D0: ED 0D 80 02 84 4B 44 2C 53 28 31 29 2C 53 28 32 |.....KD,S(1),S(2|
000005E0: 29 2C 53 28 33 29 3A 8F 20 4D 57 53 54 00 0E 0E |),S(3):. MWST...|
000005F0: 8A 02 84 4B 44 2C 53 34 2C 53 35 3A 8F 20 4C 41 |...KD,S4,S5:. LA|
00000600: 47 45 52 2C 4B 55 4E 44 45 4E 20 4D 41 58 00 19 |GER,KUNDEN MAX..|
00000610: 0E 94 02 8D 39 39 39 3A 8E 00 32 0E BB 02 8F 20 |....999:..2.... |
00000620: 57 52 49 54 45 20 53 59 53 54 45 4D 20 44 41 54 |WRITE SYSTEM DAT|
00000630: 45 4E 00 50 0E BC 02 9F 4B 44 2C 4B 55 2C 4B 44 |EN.P....KD,KU,KD|
00000640: 2C 22 40 30 3A 53 59 53 44 41 54 2C 55 2C 57 22 |,"@0:SYSDAT,U,W"|
00000650: 00 6A 0E C1 02 84 4B 43 2C 4B 45 2C 4B 45 24 3A |.j....KC,KE,KE$:|
00000660: 8B 4B 45 A7 8D 39 39 39 3A 8E 00 8B 0E C6 02 98 |.KE..999:.......|
00000670: 4B 44 2C 53 30 24 3B 43 52 24 3B 53 31 24 3B 43 |KD,S0$;CR$;S1$;C|
00000680: 52 24 3B 53 32 24 3B 43 52 24 3B 00 DB 0E D0 02 |R$;S2$;CR$;.....|
00000690: 98 4B 44 2C 53 33 24 3B 43 52 24 3B 53 34 24 3B |.KD,S3$;CR$;S4$;|
000006A0: 43 52 24 3B 53 35 24 3B 43 52 24 3B 53 36 24 3B |CR$;S5$;CR$;S6$;|
000006B0: 43 52 24 3B 53 37 24 3B 43 52 24 3B 53 38 24 3B |CR$;S7$;CR$;S8$;|
000006C0: 43 52 24 3B 53 39 24 3B 43 52 24 3B 53 41 24 3B |CR$;S9$;CR$;SA$;|
000006D0: 43 52 24 3B 53 42 24 3B 43 52 24 00 FC 0E DA 02 |CR$;SB$;CR$.....|
000006E0: 98 4B 44 2C 53 43 24 3B 43 52 24 3B 53 44 24 3B |.KD,SC$;CR$;SD$;|
000006F0: 43 52 24 3B 53 45 24 3B 43 52 24 3B 00 27 0F E4 |CR$;SE$;CR$;.'..|
00000700: 02 98 4B 44 2C 53 28 31 29 3B 43 52 24 3B 53 28 |..KD,S(1);CR$;S(|
00000710: 32 29 3B 43 52 24 3B 53 28 33 29 3B 43 52 24 3B |2);CR$;S(3);CR$;|
00000720: 3A 8F 20 4D 57 53 54 00 51 0F EE 02 98 4B 44 2C |:. MWST.Q....KD,|
00000730: 53 34 3B 43 52 24 3B 53 35 3B 43 52 24 3B 3A 8F |S4;CR$;S5;CR$;:.|
00000740: 20 4C 41 47 45 52 2C 4B 55 4E 44 45 4E 20 4D 41 | LAGER,KUNDEN MA|
00000750: 58 00 5C 0F F8 02 8D 39 39 39 3A 8E 00 69 0F 20 |X.\....999:..i. |
00000760: 03 9F 31 35 2C 38 2C 31 35 00 7C 0F 2A 03 84 31 |..15,8,15.|.*..1|
00000770: 35 2C 45 2C 45 24 3A 99 45 2C 45 24 00 84 0F 34 |5,E,E$:.E,E$...4|
00000780: 03 A0 31 35 00 8A 0F 3E 03 90 00 A2 0F E7 03 A0 |..15...>........|
00000790: 4B 44 3A A0 4B 43 3A 9F 4B 43 2C 4B 55 2C 4B 43 |KD:.KC:.KC,KU,KC|
000007A0: 3A 8E 00 C1 0F E8 03 8F 20 48 41 55 50 54 50 52 |:....... HAUPTPR|
000007B0: 4F 47 52 41 4D 4D 20 46 41 4B 54 55 52 41 20 36 |OGRAMM FAKTURA 6|
000007C0: 34 00 D1 0F EA 03 99 C7 28 31 34 29 3B C7 28 38 |4.......(14);.(8|
000007D0: 29 00 03 10 ED 03 99 22 93 2A 2A 2A 2A 2A 2A 2A |)......".*******|
000007E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000007F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000800: 2A 22 3B 00 34 10 F2 03 99 22 2A 2A 2A 2A 2A 2A |*";.4...."******|
00000810: 2A 2A 2A 2A 2A 20 20 20 46 41 4B 54 55 52 41 20 |***** FAKTURA |
00000820: 2D 20 36 34 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |- 64 *********|
00000830: 2A 2A 22 3B 00 64 10 F7 03 99 22 2A 2A 2A 2A 2A |**";.d...."*****|
00000840: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000860: 2A 2A 2A 22 00 7C 10 FC 03 85 22 C4 41 54 55 4D |***".|....".ATUM|
00000870: 20 20 20 20 20 20 20 22 3B 44 41 24 00 9E 10 06 | ";DA$....|
00000880: 04 85 22 D2 45 43 48 4E 55 4E 47 53 20 CE 52 22 |..".ECHNUNGS .R"|
00000890: 3B 52 4E 24 3A 52 4E B2 C5 28 52 4E 24 29 00 C6 |;RN$:RN..(RN$)..|
000008A0: 10 10 04 99 22 13 11 11 11 11 11 11 11 12 C5 49 |...."..........I|
000008B0: 4E 47 41 42 45 20 CB 55 4E 44 45 4E 20 C1 44 52 |NGABE .UNDEN .DR|
000008C0: 45 53 53 45 3A 22 00 FF 10 15 04 81 49 B2 31 A4 |ESSE:"......I.1.|
000008D0: 31 34 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 |14:." |
000008E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008F0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 00 | ":..|
00000900: 16 11 16 04 99 22 91 91 91 91 91 91 91 91 91 91 |....."..........|
00000910: 91 91 91 91 91 22 00 40 11 1A 04 50 B2 30 3A 85 |.....".@...P.0:.|
00000920: 22 C1 4E 52 45 44 45 20 31 2C 32 2C 33 22 3B 41 |".NREDE 1,2,3";A|
00000930: 30 24 3A 8B 41 30 24 B2 22 5F 22 A7 31 33 30 30 |0$:.A0$."_".1300|
00000940: 00 55 11 1C 04 58 B2 52 4E 3A 8D 32 35 30 3A 52 |.U...X.RN:.250:R|
00000950: 4E 24 B2 58 24 00 73 11 1F 04 41 30 B2 C5 28 41 |N$.X$.s...A0..(A|
00000960: 30 24 29 3A 8B 41 30 B3 31 B0 41 30 B1 33 89 31 |0$):.A0.1.A0.3.1|
00000970: 30 34 30 00 88 11 20 04 8B 41 30 B2 31 A7 41 30 |040... ..A0.1.A0|
00000980: 24 B2 22 C8 45 52 52 22 00 9D 11 21 04 8B 41 30 |$.".ERR"...!..A0|
00000990: B2 32 A7 41 30 24 B2 22 C6 52 41 55 22 00 B3 11 |.2.A0$.".RAU"...|
000009A0: 22 04 8B 41 30 B2 33 A7 41 30 24 B2 22 C6 49 52 |"..A0.3.A0$.".IR|
000009B0: 4D 41 22 00 CB 11 24 04 85 22 CE 41 4D 45 20 20 |MA"...$..".AME |
000009C0: 20 20 20 20 20 20 22 3B 41 31 24 00 E3 11 2E 04 | ";A1$.....|
000009D0: 85 22 D3 54 52 41 53 53 45 20 20 20 20 20 22 3B |.".TRASSE ";|
000009E0: 41 32 24 00 FB 11 38 04 85 22 D0 CC DA 20 20 20 |A2$...8.."... |
000009F0: 20 20 20 20 20 20 22 3B 41 33 24 00 13 12 42 04 | ";A3$...B.|
00000A00: 85 22 CF 52 54 20 2F 20 D3 54 41 44 54 20 22 3B |.".RT / .TADT ";|
00000A10: 41 34 24 00 2B 12 4C 04 85 22 C2 45 4D 45 52 4B |A4$.+.L..".EMERK|
00000A20: 55 4E 47 20 20 20 22 3B 41 35 24 00 6B 12 4D 04 |UNG ";A5$.k.M.|
00000A30: 81 49 B2 30 A4 33 3A 52 28 49 29 B2 30 3A 82 3A |.I.0.3:R(I).0:.:|
00000A40: 50 B2 30 3A 52 32 24 B2 22 22 3A 52 33 24 B2 22 |P.0:R2$."":R3$."|
00000A50: 22 3A 52 34 24 B2 22 22 3A 52 35 24 B2 22 22 3A |":R4$."":R5$."":|
00000A60: 52 38 24 B2 22 22 3A 52 37 B2 30 00 84 12 51 04 |R8$."":R7.0...Q.|
00000A70: 8D 20 32 30 30 30 20 3A 8F 20 52 45 43 48 4E 2E |. 2000 :. RECHN.|
00000A80: 4B 4F 50 46 00 BE 12 56 04 99 22 13 11 11 11 11 |KOPF...V..".....|
00000A90: 11 11 11 11 11 11 11 11 11 11 12 D2 45 43 48 4E |............ECHN|
00000AA0: 55 4E 47 53 44 41 54 45 4E 3A 22 3B 3A 58 B2 50 |UNGSDATEN:";:X.P|
00000AB0: 3A 8D 32 35 30 3A 99 58 24 3B 22 20 22 3B 00 D0 |:.250:.X$;" ";..|
00000AC0: 12 57 04 58 B2 52 37 3A 8D 32 30 30 3A 99 58 24 |.W.X.R7:.200:.X$|
00000AD0: 00 07 13 5B 04 81 49 B2 31 A4 37 3A 99 22 20 20 |...[..I.1.7:." |
00000AE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B00: 20 20 20 20 22 3A 82 00 17 13 5C 04 99 22 91 91 | ":....\.."..|
00000B10: 91 91 91 91 91 91 22 00 3D 13 60 04 85 22 C1 52 |......".=.`..".R|
00000B20: 54 2E CE 55 4D 4D 45 52 20 20 22 3B 52 30 24 3A |T..UMMER ";R0$:|
00000B30: 8B 52 30 24 B2 22 5F 22 A7 31 32 30 30 00 55 13 |.R0$."_".1200.U.|
00000B40: 6A 04 85 22 C2 45 5A 45 49 43 48 4E 55 4E 47 20 |j..".EZEICHNUNG |
00000B50: 22 3B 52 31 24 00 77 13 74 04 85 22 CD 45 4E 47 |";R1$.w.t..".ENG|
00000B60: 45 20 20 20 20 20 20 20 22 3B 52 32 24 3A 52 32 |E ";R2$:R2|
00000B70: B2 C5 28 52 32 24 29 00 99 13 7E 04 85 22 D2 41 |..(R2$)...~..".A|
00000B80: 42 41 54 54 20 28 25 29 20 20 22 3B 52 33 24 3A |BATT (%) ";R3$:|
00000B90: 52 33 B2 C5 28 52 33 24 29 00 BB 13 88 04 85 22 |R3..(R3$)......"|
00000BA0: CD 57 D3 54 2E 20 31 2C 32 2C 33 20 22 3B 52 34 |.W.T. 1,2,3 ";R4|
00000BB0: 24 3A 52 34 B2 C5 28 52 34 24 29 00 D6 13 8D 04 |$:R4..(R4$).....|
00000BC0: 8B 52 34 B3 31 B0 52 34 B1 33 A7 99 22 91 91 22 |.R4.1.R4.3..".."|
00000BD0: 3A 89 31 31 36 30 00 0C 14 92 04 85 22 C5 49 4E |:.1160......".IN|
00000BE0: 5A 45 4C 50 52 45 49 53 20 22 3B 52 35 24 3A 52 |ZELPREIS ";R5$:R|
00000BF0: 35 B2 C5 28 52 35 24 29 3A 52 36 B2 52 35 AC 52 |5..(R5$):R6.R5.R|
00000C00: 32 AC 28 31 AB 52 33 AD 31 30 30 29 00 32 14 9C |2.(1.R3.100).2..|
00000C10: 04 52 37 B2 52 37 AA 52 36 3A 52 28 52 34 29 B2 |.R7.R7.R6:R(R4).|
00000C20: 52 28 52 34 29 AA 52 36 AC 53 28 52 34 29 AD 31 |R(R4).R6.S(R4).1|
00000C30: 30 30 00 53 14 A1 04 8D 20 33 30 30 30 20 3A 8F |00.S.... 3000 :.|
00000C40: 20 44 52 55 43 4B 45 20 52 45 43 48 4E 2E 5A 45 | DRUCKE RECHN.ZE|
00000C50: 49 4C 45 00 68 14 A6 04 50 B2 50 AA 31 3A 8B 50 |ILE.h...P.P.1:.P|
00000C60: B3 32 32 89 31 31 31 30 00 80 14 B0 04 8F 20 52 |.22.1110...... R|
00000C70: 45 43 48 4E 55 4E 47 53 20 53 43 48 4C 55 53 53 |ECHNUNGS SCHLUSS|
00000C80: 00 B7 14 BA 04 81 49 B2 31 A4 36 3A 99 22 20 20 |......I.1.6:." |
00000C90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CB0: 20 20 20 20 22 3A 82 00 C6 14 C4 04 99 22 91 91 | ":......."..|
00000CC0: 91 91 91 91 91 22 00 06 15 CE 04 85 22 D2 41 42 |....."......".AB|
00000CD0: 41 54 54 20 20 20 20 20 20 22 3B 52 38 24 3A 8B |ATT ";R8$:.|
00000CE0: C6 28 C9 28 52 38 24 2C 31 29 29 B2 33 37 A7 52 |.(.(R8$,1)).37.R|
00000CF0: 38 B2 AB C5 28 52 38 24 29 AC 52 37 AD 31 30 30 |8...(R8$).R7.100|
00000D00: 3A 89 31 32 33 35 00 34 15 D1 04 52 38 B2 AB C5 |:.1235.4...R8...|
00000D10: 28 52 38 24 29 3A 52 38 24 B2 C4 28 B5 28 31 30 |(R8$):R8$..(.(10|
00000D20: 30 30 AC 52 38 AD 52 37 AA 2E 35 29 AD 31 30 29 |00.R8.R7..5).10)|
00000D30: AA 22 25 22 00 4C 15 D3 04 85 22 C2 45 53 54 45 |."%".L....".ESTE|
00000D40: 4C 4C 54 45 58 54 20 22 3B 42 54 24 00 6C 15 D8 |LLTEXT ";BT$.l..|
00000D50: 04 8D 20 34 30 30 30 20 3A 8F 20 20 44 52 55 43 |.. 4000 :. DRUC|
00000D60: 4B 20 52 45 43 48 4E 2E 45 4E 44 45 00 8D 15 E2 |K RECHN.ENDE....|
00000D70: 04 8D 20 35 30 30 30 20 3A 8F 20 41 50 50 45 4E |.. 5000 :. APPEN|
00000D80: 44 20 52 45 43 48 4E 2E 44 41 54 45 4E 00 A0 15 |D RECHN.DATEN...|
00000D90: EC 04 52 4E B2 52 4E AA 31 3A 89 20 31 30 34 30 |..RN.RN.1:. 1040|
00000DA0: 00 BA 15 14 05 8F 20 45 4E 44 45 20 52 45 43 48 |...... ENDE RECH|
00000DB0: 4E 2E 50 52 4F 47 52 41 4D 4D 00 D2 15 1E 05 89 |N.PROGRAMM......|
00000DC0: 20 36 30 30 30 3A 8F 20 4D 41 48 4E 45 4E 20 2E | 6000:. MAHNEN .|
00000DD0: 2E 2E 00 E9 15 D0 07 8F 20 44 52 55 43 4B 20 52 |........ DRUCK R|
00000DE0: 45 43 48 4E 2E 4B 4F 50 46 00 FA 15 D5 07 9F 37 |ECHN.KOPF......7|
00000DF0: 2C 34 2C 37 3A 98 37 3A A0 37 00 13 16 DA 07 9F |,4,7:.7:.7......|
00000E00: 34 2C 34 2C 30 3A 9F 31 2C 34 2C 31 3A 9F 32 2C |4,4,0:.1,4,1:.2,|
00000E10: 34 2C 32 00 25 16 EE 07 98 34 2C 22 22 3B A3 39 |4,2.%....4,"";.9|
00000E20: 29 3B 53 30 24 00 37 16 F8 07 98 34 2C 22 22 3B |);S0$.7....4,"";|
00000E30: A3 39 29 3B 53 31 24 00 49 16 02 08 98 34 2C 22 |.9);S1$.I....4,"|
00000E40: 22 3B A3 39 29 3B 53 32 24 00 59 16 0C 08 81 49 |";.9);S2$.Y....I|
00000E50: B2 31 A4 36 3A 98 34 3A 82 00 A8 16 16 08 98 32 |.1.6:.4:.......2|
00000E60: 2C 22 20 20 20 20 20 20 20 20 20 41 41 41 41 41 |," AAAAA|
00000E70: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 20 |AAAAAAAAAAAAAAA |
00000E80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E90: 20 20 20 41 41 41 41 41 41 41 41 41 41 41 41 41 | AAAAAAAAAAAAA|
00000EA0: 41 41 41 41 41 41 41 22 00 BB 16 20 08 98 31 2C |AAAAAAA"... ..1,|
00000EB0: 22 20 22 3B 22 1D 22 3B 53 33 24 00 CE 16 2A 08 |" ";".";S3$...*.|
00000EC0: 98 31 2C 41 30 24 3B 22 1D 22 3B 53 34 24 00 E1 |.1,A0$;".";S4$..|
00000ED0: 16 34 08 98 31 2C 41 31 24 3B 22 1D 22 3B 53 35 |.4..1,A1$;".";S5|
00000EE0: 24 00 F4 16 3E 08 98 31 2C 22 20 22 3B 22 1D 22 |$...>..1," ";"."|
00000EF0: 3B 53 36 24 00 07 17 48 08 98 31 2C 41 32 24 3B |;S6$...H..1,A2$;|
00000F00: 22 1D 22 3B 53 37 24 00 22 17 52 08 98 31 2C 41 |".";S7$.".R..1,A|
00000F10: 33 24 AA 22 20 22 AA 41 34 24 3B 22 1D 22 3B 53 |3$." ".A4$;".";S|
00000F20: 38 24 00 35 17 5C 08 98 31 2C 22 20 22 3B 22 1D |8$.5.\..1," ";".|
00000F30: 22 3B 53 39 24 00 48 17 66 08 98 31 2C 41 35 24 |";S9$.H.f..1,A5$|
00000F40: 3B 22 1D 22 3B 53 41 24 00 5B 17 70 08 98 31 2C |;".";SA$.[.p..1,|
00000F50: 22 20 22 3B 22 1D 22 3B 53 42 24 00 68 17 7A 08 |" ";".";SB$.h.z.|
00000F60: 98 34 3A 98 34 3A 98 34 00 6F 17 84 08 98 34 00 |.4:.4:.4.o....4.|
00000F70: B4 17 8E 08 8B 4D 4D B2 30 A7 98 34 2C 22 22 3B |.....MM.0..4,"";|
00000F80: A3 39 29 3B 22 D2 C5 C3 C8 CE D5 CE C7 20 CE 52 |.9);"........ .R|
00000F90: 2E 3A 22 3B 52 4E 24 3B 22 20 20 20 20 20 20 20 |.:";RN$;" |
00000FA0: 20 20 20 20 20 20 20 20 C4 C1 D4 D5 CD 3A 20 22 | .....: "|
00000FB0: 3B 44 41 24 00 F9 17 93 08 8B 4D 4D B2 31 A7 98 |;DA$......MM.1..|
00000FC0: 34 2C 22 22 3B A3 39 29 3B 22 DA 41 48 4C 55 4E |4,"";.9);".AHLUN|
00000FD0: 47 53 2D C5 52 49 4E 4E 45 52 55 4E 47 20 20 20 |GS-.RINNERUNG |
00000FE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 C4 C1 D4 | ...|
00000FF0: D5 CD 3A 20 22 3B 44 41 24 00 00 18 98 08 98 34 |..: ";DA$......4|
00001000: 00 12 18 A2 08 98 34 2C 22 22 3B A3 39 29 3B 44 |......4,"";.9);D|
00001010: 4C 24 00 2B 18 AC 08 8B 4D 4D B2 30 A7 20 98 34 |L$.+....MM.0. .4|
00001020: 2C 22 22 3B A3 39 29 3B 42 5A 24 00 3D 18 B1 08 |,"";.9);BZ$.=...|
00001030: 8B 4D 4D B2 31 A7 20 98 34 2C 4D 5A 24 00 4F 18 |.MM.1. .4,MZ$.O.|
00001040: B6 08 98 34 2C 22 22 3B A3 39 29 3B 44 4C 24 00 |...4,"";.9);DL$.|
00001050: 61 18 C0 08 8B 4D 4D B2 30 A7 20 98 32 2C 44 46 |a....MM.0. .2,DF|
00001060: 24 00 73 18 C5 08 8B 4D 4D B2 31 A7 20 98 32 2C |$.s....MM.1. .2,|
00001070: 4D 46 24 00 79 18 CA 08 8E 00 97 18 B8 0B 8F 20 |MF$.y.......... |
00001080: 44 52 55 43 4B 45 20 45 49 4E 45 20 52 45 43 48 |DRUCKE EINE RECH|
00001090: 4E 2E 5A 45 49 4C 45 00 C0 18 C2 0B 98 31 2C 52 |N.ZEILE......1,R|
000010A0: 30 24 3B 22 1D 22 3B 52 31 24 3B 22 1D 22 3B 52 |0$;".";R1$;".";R|
000010B0: 32 3B 52 35 3B 52 33 3B 53 28 52 34 29 3B 52 36 |2;R5;R3;S(R4);R6|
000010C0: 00 C6 18 CC 0B 8E 00 E3 18 AC 0D 8F 20 44 52 55 |............ DRU|
000010D0: 43 4B 45 20 45 49 4E 45 20 4D 41 48 4E 2E 5A 45 |CKE EINE MAHN.ZE|
000010E0: 49 4C 45 00 02 19 B6 0D 98 31 2C 52 4E 28 4A 29 |ILE......1,RN(J)|
000010F0: 3B 44 41 28 4A 29 3B 4D 5A 28 4A 29 3B 52 42 28 |;DA(J);MZ(J);RB(|
00001100: 4A 29 00 0E 19 C0 0D 50 B2 50 AA 31 3A 8E 00 26 |J).....P.P.1:..&|
00001110: 19 A0 0F 8F 20 52 45 43 48 4E 55 4E 47 53 20 53 |.... RECHNUNGS S|
00001120: 43 48 4C 55 53 53 00 37 19 AA 0F 8B 20 50 B2 32 |CHLUSS.7.... P.2|
00001130: 31 20 A7 34 30 33 30 00 48 19 B4 0F 81 49 B2 50 |1 .4030.H....I.P|
00001140: A4 32 31 3A 98 34 3A 82 00 5A 19 BE 0F 98 34 2C |.21:.4:..Z....4,|
00001150: 22 22 3B A3 39 29 3B 44 4C 24 00 65 19 C8 0F 98 |"";.9);DL$.e....|
00001160: 32 2C 45 46 24 00 78 19 D4 0F 98 31 2C 22 D3 55 |2,EF$.x....1,".U|
00001170: 4D 4D 45 1D 22 3B 52 37 00 89 19 D7 0F 98 34 2C |MME.";R7......4,|
00001180: 22 22 A3 39 29 3B 44 32 24 00 A9 19 DC 0F 98 31 |"".9);D2$......1|
00001190: 2C 22 CD 57 53 54 22 AA C4 28 53 28 31 29 29 AA |,".WST"..(S(1)).|
000011A0: 22 25 1D 22 3B 52 28 31 29 00 C9 19 E6 0F 98 31 |"%.";R(1)......1|
000011B0: 2C 22 CD 57 53 54 22 AA C4 28 53 28 32 29 29 AA |,".WST"..(S(2)).|
000011C0: 22 25 1D 22 3B 52 28 32 29 00 E9 19 F0 0F 98 31 |"%.";R(2)......1|
000011D0: 2C 22 CD 57 53 54 22 AA C4 28 53 28 33 29 29 AA |,".WST"..(S(3)).|
000011E0: 22 25 1D 22 3B 52 28 33 29 00 04 1A FA 0F 98 31 |"%.";R(3)......1|
000011F0: 2C 22 D2 41 42 41 54 54 22 AA 52 38 24 AA 22 1D |,".ABATT".R8$.".|
00001200: 22 3B 52 38 00 15 1A FF 0F 98 34 2C 22 22 A3 39 |";R8......4,"".9|
00001210: 29 3B 44 32 24 00 31 1A 04 10 52 39 B2 52 37 AA |);D2$.1...R9.R7.|
00001220: 52 28 31 29 AA 52 28 32 29 AA 52 28 33 29 AA 52 |R(1).R(2).R(3).R|
00001230: 38 00 45 1A 06 10 98 31 2C 22 C2 45 54 52 41 47 |8.E....1,".ETRAG|
00001240: 1D 22 3B 52 39 00 56 1A 09 10 98 34 2C 22 22 A3 |.";R9.V....4,"".|
00001250: 39 29 3B 44 32 24 00 5D 1A 0E 10 98 34 00 70 1A |9);D2$.]....4.p.|
00001260: 18 10 98 34 2C 22 22 3B A3 32 34 29 3B 42 54 24 |...4,"";.24);BT$|
00001270: 00 80 1A 22 10 81 49 B2 31 A4 32 3A 98 34 3A 82 |..."..I.1.2:.4:.|
00001280: 00 92 1A 2C 10 98 34 2C 22 22 3B A3 39 29 3B 53 |...,..4,"";.9);S|
00001290: 43 24 00 A4 1A 36 10 98 34 2C 22 22 3B A3 39 29 |C$...6..4,"";.9)|
000012A0: 3B 53 44 24 00 B6 1A 40 10 98 34 2C 22 22 3B A3 |;SD$...@..4,"";.|
000012B0: 39 29 3B 53 45 24 00 C6 1A 4A 10 81 49 B2 31 A4 |9);SE$...J..I.1.|
000012C0: 36 3A 98 34 3A 82 00 D3 1A 54 10 A0 32 3A A0 31 |6:.4:....T..2:.1|
000012D0: 3A A0 34 00 D9 1A 5E 10 8E 00 F0 1A 68 10 8F 20 |:.4...^.....h.. |
000012E0: 4D 41 48 4E 55 4E 47 53 20 53 43 48 4C 55 53 53 |MAHNUNGS SCHLUSS|
000012F0: 00 01 1B 72 10 8B 20 50 B2 32 31 20 A7 34 32 33 |...r.. P.21 .423|
00001300: 30 00 12 1B 7C 10 81 49 B2 50 A4 32 31 3A 98 34 |0...|..I.P.21:.4|
00001310: 3A 82 00 24 1B 86 10 98 34 2C 22 22 3B A3 39 29 |:..$....4,"";.9)|
00001320: 3B 44 4C 24 00 2F 1B 90 10 98 32 2C 45 46 24 00 |;DL$./....2,EF$.|
00001330: 42 1B 9C 10 98 31 2C 22 D3 55 4D 4D 45 1D 22 3B |B....1,".UMME.";|
00001340: 53 58 00 53 1B 9F 10 98 34 2C 22 22 A3 39 29 3B |SX.S....4,"".9);|
00001350: 44 32 24 00 64 1B B6 10 81 49 B2 31 A4 31 31 3A |D2$.d....I.1.11:|
00001360: 98 34 3A 82 00 76 1B B8 10 98 34 2C 22 22 3B A3 |.4:..v....4,"";.|
00001370: 39 29 3B 53 43 24 00 88 1B B9 10 98 34 2C 22 22 |9);SC$......4,""|
00001380: 3B A3 39 29 3B 53 44 24 00 9A 1B BA 10 98 34 2C |;.9);SD$......4,|
00001390: 22 22 3B A3 39 29 3B 53 45 24 00 AA 1B BC 10 81 |"";.9);SE$......|
000013A0: 49 B2 31 A4 36 3A 98 34 3A 82 00 B7 1B BE 10 A0 |I.1.6:.4:.......|
000013B0: 32 3A A0 31 3A A0 34 00 BD 1B C2 10 8E 00 DE 1B |2:.1:.4.........|
000013C0: 88 13 8F 20 41 50 50 45 4E 44 20 44 41 54 45 4E |... APPEND DATEN|
000013D0: 20 5A 55 20 52 45 43 48 4E 2E 46 49 4C 45 00 FB | ZU RECHN.FILE..|
000013E0: 1B 8D 13 9F 4B 55 2C 4B 55 2C 4B 55 2C 22 52 45 |....KU,KU,KU,"RE|
000013F0: 43 48 4E 44 41 54 2C 53 2C 41 22 00 2B 1C 92 13 |CHNDAT,S,A".+...|
00001400: 98 4B 55 2C 52 4E 3B 43 52 24 3B 44 41 24 3B 43 |.KU,RN;CR$;DA$;C|
00001410: 52 24 3B 41 31 24 3B 43 52 24 3B 52 39 3B 43 52 |R$;A1$;CR$;R9;CR|
00001420: 24 3B C4 28 30 29 3B 43 52 24 3B 00 35 1C 9C 13 |$;.(0);CR$;.5...|
00001430: A0 4B 55 3A 8E 00 4B 1C 7C 15 8F 20 52 45 41 44 |.KU:..K.|.. READ|
00001440: 20 52 45 43 48 4E 2E 46 49 4C 45 00 53 1C 81 15 | RECHN.FILE.S...|
00001450: 49 B2 30 00 70 1C 86 15 9F 4B 44 2C 4B 55 2C 4B |I.0.p....KD,KU,K|
00001460: 44 2C 22 52 45 43 48 4E 44 41 54 2C 53 2C 52 22 |D,"RECHNDAT,S,R"|
00001470: 00 A9 1C 90 15 84 4B 44 2C 52 4E 28 49 29 2C 44 |......KD,RN(I),D|
00001480: 41 28 49 29 2C 4E 41 24 28 49 29 2C 52 42 28 49 |A(I),NA$(I),RB(I|
00001490: 29 2C 4D 5A 28 49 29 3A 8B 53 54 B2 30 A7 49 B2 |),MZ(I):.ST.0.I.|
000014A0: 49 AA 31 3A 89 35 35 32 30 00 B8 1C 9A 15 A0 4B |I.1:.5520......K|
000014B0: 44 3A 41 52 B2 49 3A 8E 00 CF 1C E0 15 8F 20 57 |D:AR.I:....... W|
000014C0: 52 49 54 45 20 52 45 43 48 4E 2E 46 49 4C 45 00 |RITE RECHN.FILE.|
000014D0: EF 1C EA 15 9F 4B 44 2C 4B 55 2C 4B 44 2C 22 40 |.....KD,KU,KD,"@|
000014E0: 30 3A 52 45 43 48 4E 44 41 54 2C 53 2C 57 22 00 |0:RECHNDAT,S,W".|
000014F0: 09 1D F4 15 81 49 B2 30 A4 41 52 3A 8B 52 42 28 |.....I.0.AR:.RB(|
00001500: 49 29 B2 30 A7 35 36 33 35 00 45 1D FE 15 98 4B |I).0.5635.E....K|
00001510: 44 2C 52 4E 28 49 29 3B 43 52 24 3B 44 41 28 49 |D,RN(I);CR$;DA(I|
00001520: 29 3B 43 52 24 3B 4E 41 24 28 49 29 3B 43 52 24 |);CR$;NA$(I);CR$|
00001530: 3B 52 42 28 49 29 3B 43 52 24 3B 4D 5A 28 49 29 |;RB(I);CR$;MZ(I)|
00001540: 3B 43 52 24 3B 00 4B 1D 03 16 82 00 55 1D 08 16 |;CR$;.K.....U...|
00001550: A0 4B 44 3A 8E 00 77 1D 44 16 8F 20 53 55 4D 4D |.KD:..w.D.. SUMM|
00001560: 49 45 52 45 4E 20 44 45 52 20 41 55 53 53 45 4E |IEREN DER AUSSEN|
00001570: 53 54 41 45 4E 44 45 00 8F 1D 4E 16 53 30 B2 30 |STAENDE...N.S0.0|
00001580: 3A 53 31 B2 30 3A 53 32 B2 30 3A 53 47 B2 30 00 |:S1.0:S2.0:SG.0.|
00001590: 9B 1D 53 16 81 49 B2 30 A4 41 52 00 B5 1D 58 16 |..S..I.0.AR...X.|
000015A0: 8B 20 4D 5A 28 49 29 B2 30 A7 53 30 B2 53 30 AA |. MZ(I).0.S0.S0.|
000015B0: 52 42 28 49 29 00 CF 1D 62 16 8B 20 4D 5A 28 49 |RB(I)...b.. MZ(I|
000015C0: 29 B2 31 A7 53 31 B2 53 31 AA 52 42 28 49 29 00 |).1.S1.S1.RB(I).|
000015D0: E9 1D 6C 16 8B 20 4D 5A 28 49 29 B2 32 A7 53 32 |..l.. MZ(I).2.S2|
000015E0: B2 53 32 AA 52 42 28 49 29 00 F9 1D 76 16 53 47 |.S2.RB(I)...v.SG|
000015F0: B2 53 47 AA 52 42 28 49 29 00 01 1E 80 16 82 3A |.SG.RB(I)......:|
00001600: 8E 00 1C 1E 70 17 8F 20 4F 46 46 45 4E 45 20 50 |....p.. OFFENE P|
00001610: 4F 53 54 45 4E 20 4D 41 48 4E 45 4E 00 2A 1E 72 |OSTEN MAHNEN.*.r|
00001620: 17 99 22 0E 22 3B C7 28 38 29 00 34 1E 75 17 8D |..".";.(8).4.u..|
00001630: 35 35 30 30 00 65 1E 7A 17 99 22 93 2A 2A 2A 2A |5500.e.z..".****|
00001640: 2A 2A 2A 2A 20 C1 55 53 53 45 4E 53 54 41 45 4E |**** .USSENSTAEN|
00001650: 44 45 20 2F 20 CD 41 48 4E 45 4E 20 2A 2A 2A 2A |DE / .AHNEN ****|
00001660: 2A 2A 2A 2A 22 00 6F 1E 7F 17 8D 35 37 30 30 00 |****".o....5700.|
00001670: 89 1E 80 17 8B 44 41 24 B2 22 22 A7 85 22 C4 41 |.....DA$.""..".A|
00001680: 54 55 4D 20 22 3B 44 41 24 00 A8 1E 84 17 58 B2 |TUM ";DA$.....X.|
00001690: 53 30 3A 8D 32 30 30 3A 99 22 D5 4E 47 45 4D 41 |S0:.200:.".NGEMA|
000016A0: 48 4E 54 3A 22 3B 58 24 00 C7 1E 8E 17 58 B2 53 |HNT:";X$.....X.S|
000016B0: 31 3A 8D 32 30 30 3A 99 22 31 2E CD 41 48 4E 55 |1:.200:."1..AHNU|
000016C0: 4E 47 3A 22 3B 58 24 00 E6 1E 98 17 58 B2 53 32 |NG:";X$.....X.S2|
000016D0: 3A 8D 32 30 30 3A 99 22 32 2E CD 41 48 4E 55 4E |:.200:."2..AHNUN|
000016E0: 47 3A 22 3B 58 24 00 05 1F A2 17 58 B2 53 47 3A |G:";X$.....X.SG:|
000016F0: 8D 32 30 30 3A 99 22 20 20 20 C7 45 53 41 4D 54 |.200:." .ESAMT|
00001700: 3A 22 3B 58 24 00 0B 1F AC 17 99 00 24 1F B6 17 |:";X$.......$...|
00001710: 99 2C 22 31 2E 2E 2E C7 45 53 41 4D 54 20 CC 49 |.,"1....ESAMT .I|
00001720: 53 54 45 22 00 3D 1F B7 17 99 2C 22 32 2E 2E 2E |STE".=....,"2...|
00001730: C6 49 52 4D 45 4E 20 CC 49 53 54 45 22 00 53 1F |.IRMEN .ISTE".S.|
00001740: B8 17 99 2C 22 33 2E 2E 2E C1 55 53 42 55 43 48 |...,"3....USBUCH|
00001750: 45 4E 22 00 66 1F B9 17 99 2C 22 34 2E 2E 2E CD |EN".f....,"4....|
00001760: 41 48 4E 45 4E 22 00 80 1F BA 17 99 2C 22 35 2E |AHNEN"......,"5.|
00001770: 2E 2E C1 4E 57 41 4C 54 53 20 CC 49 53 54 45 22 |...NWALTS .ISTE"|
00001780: 00 9A 1F BB 17 99 2C 22 5F 2E 2E 2E D0 52 4F 47 |......,"_....ROG|
00001790: 52 41 4D 4D 20 C5 4E 44 45 22 00 A0 1F C0 17 99 |RAMM .NDE"......|
000017A0: 00 B7 1F CA 17 85 22 C9 48 52 45 20 D7 41 48 4C |......".HRE .AHL|
000017B0: 20 3D 3E 22 3B 51 24 00 C8 1F D4 17 8B 51 24 B2 | =>";Q$......Q$.|
000017C0: 22 5F 22 A7 36 32 30 30 00 EF 1F DE 17 91 20 C5 |"_".6200...... .|
000017D0: 28 51 24 29 20 8D 20 37 30 30 30 2C 37 31 30 30 |(Q$) . 7000,7100|
000017E0: 2C 37 32 30 30 2C 37 33 30 30 2C 37 34 30 30 00 |,7200,7300,7400.|
000017F0: F9 1F E8 17 89 36 30 31 30 00 03 20 38 18 8D 35 |.....6010.. 8..5|
00001800: 36 30 30 00 17 20 42 18 9C 3A 99 C7 28 39 29 3A |600.. B..:..(9):|
00001810: 99 C7 28 31 34 32 29 00 2E 20 4C 18 97 35 33 32 |..(142).. L..532|
00001820: 38 30 2C 31 34 3A 97 35 33 32 38 31 2C 36 00 3B |80,14:.53281,6.;|
00001830: 20 56 18 99 22 93 1F 4E 45 57 22 00 62 20 60 18 | V.."..NEW".b `.|
00001840: 99 22 11 11 4C 4F 41 44 22 AA C7 28 33 34 29 AA |."..LOAD"..(34).|
00001850: 22 4D 45 4E 55 45 22 AA C7 28 33 34 29 AA 22 2C |"MENUE"..(34).",|
00001860: 38 22 00 8F 20 6A 18 99 22 11 11 11 11 11 11 11 |8".. j..".......|
00001870: 11 11 11 05 20 20 20 20 20 20 20 20 20 20 20 42 |.... B|
00001880: 49 54 54 45 20 57 41 52 54 45 4E 20 21 1F 22 00 |ITTE WARTEN !.".|
00001890: 9A 20 74 18 97 31 39 38 2C 37 00 B4 20 7E 18 83 |. t..198,7.. ~..|
000018A0: 31 39 2C 31 33 2C 31 33 2C 38 32 2C 38 35 2C 37 |19,13,13,82,85,7|
000018B0: 38 2C 31 33 00 CE 20 88 18 81 49 B2 31 A4 37 3A |8,13.. ...I.1.7:|
000018C0: 87 58 3A 97 36 33 30 AA 49 2C 58 3A 82 49 00 D4 |.X:.630.I,X:.I..|
000018D0: 20 92 18 80 00 E7 20 58 1B 8F 20 47 45 53 41 4D | ..... X.. GESAM|
000018E0: 54 20 4C 49 53 54 45 00 00 21 62 1B 9F 34 2C 34 |T LISTE..!b..4,4|
000018F0: 2C 30 3A 9F 32 2C 34 2C 32 3A 9F 31 2C 34 2C 31 |,0:.2,4,2:.1,4,1|
00001900: 00 0D 21 6C 1B 98 34 3A 98 34 3A 98 34 00 18 21 |..!l..4:.4:.4..!|
00001910: 76 1B 98 34 2C 53 30 24 00 23 21 80 1B 98 34 2C |v..4,S0$.#!...4,|
00001920: 53 31 24 00 2E 21 8A 1B 98 34 2C 53 32 24 00 59 |S1$..!...4,S2$.Y|
00001930: 21 94 1B 98 34 3A 98 34 2C 22 C1 55 53 53 45 4E |!...4:.4,".USSEN|
00001940: 53 54 41 4E 44 53 2D CC 49 53 54 45 20 56 4F 4D |STANDS-.ISTE VOM|
00001950: 20 22 3B 44 41 24 3A 98 34 00 A2 21 9E 1B 98 34 | ";DA$:.4..!...4|
00001960: 2C 22 20 20 20 20 20 20 20 20 20 D2 45 43 48 4E |," .ECHN|
00001970: 2E 20 20 20 C4 41 54 55 4D 20 20 C6 49 52 4D 41 |. .ATUM .IRMA|
00001980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001990: 20 20 20 20 20 20 20 C2 45 54 52 41 47 20 20 CD | .ETRAG .|
000019A0: D3 22 00 EB 21 A8 1B 98 32 2C 22 20 20 20 20 20 |."..!...2," |
000019B0: 20 20 20 20 39 39 39 39 39 39 20 20 39 39 39 39 | 999999 9999|
000019C0: 39 39 20 20 41 41 41 41 41 41 41 41 41 41 41 41 |99 AAAAAAAAAAAA|
000019D0: 41 41 41 41 41 41 41 41 41 41 20 20 39 39 39 39 |AAAAAAAAAA 9999|
000019E0: 39 39 39 2E 39 39 20 20 20 5A 22 00 05 22 B2 1B |999.99 Z".."..|
000019F0: 81 49 B2 30 A4 41 52 3A 8B 52 42 28 49 29 B2 30 |.I.0.AR:.RB(I).0|
00001A00: A7 37 30 39 32 00 2F 22 B3 1B 98 31 2C 52 4E 28 |.7092./"...1,RN(|
00001A10: 49 29 2C 44 41 28 49 29 2C 4E 41 24 28 49 29 3B |I),DA(I),NA$(I);|
00001A20: 22 1D 22 3B 52 42 28 49 29 3B 4D 5A 28 49 29 00 |".";RB(I);MZ(I).|
00001A30: 40 22 B4 1B 82 3A A0 32 3A A0 31 3A A0 34 3A 8E |@"...:.2:.1:.4:.|
00001A40: 00 5C 22 BC 1B 99 3A 85 22 C6 49 52 4D 45 4E 20 |.\"...:.".IRMEN |
00001A50: CE 41 4D 45 20 20 3A 22 3B 4E 41 24 00 6B 22 C1 |.AME :";NA$.k".|
00001A60: 1B 8B 4E 41 24 B2 22 5F 22 A7 8E 00 98 22 C6 1B |..NA$."_"...."..|
00001A70: 53 58 B2 30 3A 81 49 B2 30 A4 41 52 3A 8B C8 28 |SX.0:.I.0.AR:..(|
00001A80: 4E 41 24 28 49 29 2C C3 28 4E 41 24 29 29 B2 4E |NA$(I),.(NA$)).N|
00001A90: 41 24 A7 8D 37 31 34 30 00 B5 22 D0 1B 82 3A 58 |A$..7140.."...:X|
00001AA0: B2 53 58 3A 8D 32 30 30 3A 99 22 D3 55 4D 4D 45 |.SX:.200:.".UMME|
00001AB0: 3A 22 3B 58 24 00 BF 22 DA 1B 89 37 31 30 30 00 |:";X$.."...7100.|
00001AC0: CE 22 E4 1B 8B 52 42 28 49 29 B2 30 A7 8E 00 E9 |."...RB(I).0....|
00001AD0: 22 EE 1B 58 B2 52 4E 28 49 29 3A 8D 32 35 30 3A |"..X.RN(I):.250:|
00001AE0: 99 2C 58 24 3B 22 20 22 3B 00 0A 23 F3 1B 99 C9 |.,X$;" ";..#....|
00001AF0: 28 22 20 20 20 20 20 20 22 AA C4 28 44 41 28 49 |(" "..(DA(I|
00001B00: 29 29 2C 36 29 3B 22 20 22 3B 00 29 23 F8 1B 58 |)),6);" ";.)#..X|
00001B10: B2 52 42 28 49 29 3A 8D 32 30 30 3A 99 58 24 3B |.RB(I):.200:.X$;|
00001B20: 22 20 22 3B 4D 5A 28 49 29 00 3B 23 FD 1B 53 58 |" ";MZ(I).;#..SX|
00001B30: B2 53 58 AA 52 42 28 49 29 3A 8E 00 4B 23 20 1C |.SX.RB(I):..K# .|
00001B40: 8F 20 41 55 53 42 55 43 48 45 4E 00 64 23 2A 1C |. AUSBUCHEN.d#*.|
00001B50: 85 22 D2 45 43 48 4E 2E CE 55 4D 4D 45 52 20 3A |.".ECHN..UMMER :|
00001B60: 22 3B 52 4E 00 82 23 34 1C 81 49 B2 30 A4 41 52 |";RN..#4..I.0.AR|
00001B70: 3A 8B 52 4E 28 49 29 B2 52 4E A7 52 42 28 49 29 |:.RN(I).RN.RB(I)|
00001B80: B2 30 00 8A 23 3E 1C 82 3A 8E 00 97 23 84 1C 8F |.0..#>..:...#...|
00001B90: 20 4D 41 48 4E 45 4E 00 D1 23 89 1C 81 49 B2 30 | MAHNEN..#...I.0|
00001BA0: A4 41 52 3A 41 24 28 49 29 B2 C8 28 4E 41 24 28 |.AR:A$(I)..(NA$(|
00001BB0: 49 29 AA 22 20 20 20 20 20 20 20 22 2C 37 29 AA |I)." ",7).|
00001BC0: C9 28 22 20 20 20 22 AA C4 28 49 29 2C 33 29 3A |.(" "..(I),3):|
00001BD0: 82 00 F1 23 8E 1C 81 49 B2 41 52 AA 31 A4 41 5A |...#...I.AR.1.AZ|
00001BE0: 3A 41 24 28 49 29 B2 22 FF 22 3A 82 3A 49 49 B2 |:A$(I).".":.:II.|
00001BF0: 30 00 0C 24 90 1C 3A 3A 9E 20 53 4F 3A 8F 20 53 |0..$..::. SO:. S|
00001C00: 4F 52 54 49 45 52 54 20 41 24 28 29 00 25 24 93 |ORTIERT A$().%$.|
00001C10: 1C 4E 41 24 B2 C8 28 41 24 28 49 49 29 2C 37 29 |.NA$..(A$(II),7)|
00001C20: 3A 4B B2 49 49 00 47 24 98 1C 8B 4E 41 24 B2 C8 |:K.II.G$...NA$..|
00001C30: 28 41 24 28 4B AA 31 29 2C 37 29 A7 4B B2 4B AA |(A$(K.1),7).K.K.|
00001C40: 31 3A 89 37 33 32 30 00 70 24 9D 1C 53 58 B2 30 |1:.7320.p$..SX.0|
00001C50: 3A 81 4C B2 49 49 A4 4B 3A 4A B2 C5 28 CA 28 41 |:.L.II.K:J..(.(A|
00001C60: 24 28 4C 29 2C 38 29 29 3A 8D 37 35 34 30 3A 82 |$(L),8)):.7540:.|
00001C70: 00 96 24 A2 1C 58 B2 53 58 3A 8D 32 30 30 3A 99 |..$..X.SX:.200:.|
00001C80: 22 D3 55 4D 4D 45 3A 22 3B 58 24 3B 22 20 22 3B |".UMME:";X$;" ";|
00001C90: 4E 41 24 28 4A 29 00 B5 24 A7 1C 51 24 B2 22 4E |NA$(J)..$..Q$."N|
00001CA0: 22 3A 85 22 CD 41 48 4E 45 4E 20 28 4A 2F 4E 29 |":.".AHNEN (J/N)|
00001CB0: 20 22 3B 51 24 00 C6 24 AC 1C 8B 51 24 B2 22 4E | ";Q$..$...Q$."N|
00001CC0: 22 A7 37 33 39 30 00 E0 24 AE 1C 8D 37 36 30 30 |".7390..$...7600|
00001CD0: 3A 8F 20 49 4E 50 55 54 20 41 44 52 45 53 53 45 |:. INPUT ADRESSE|
00001CE0: 00 FB 24 B1 1C 4D 4D B2 31 3A 8D 32 30 30 30 3A |..$..MM.1:.2000:|
00001CF0: 8F 20 4D 41 48 4E 20 4B 4F 50 46 00 25 25 B6 1C |. MAHN KOPF.%%..|
00001D00: 81 4C B2 49 49 A4 4B 3A 4A B2 C5 28 CA 28 41 24 |.L.II.K:J..(.(A$|
00001D10: 28 4C 29 2C 38 29 29 3A 8B 52 42 28 4A 29 B2 30 |(L),8)):.RB(J).0|
00001D20: A7 37 33 36 30 00 49 25 BB 1C 4D 5A 28 4A 29 B2 |.7360.I%..MZ(J).|
00001D30: 4D 5A 28 4A 29 AA 31 3A 8D 33 35 30 30 3A 8F 20 |MZ(J).1:.3500:. |
00001D40: 4D 41 48 4E 5A 45 49 4C 45 00 4F 25 C0 1C 82 00 |MAHNZEILE.O%....|
00001D50: 68 25 C5 1C 8D 34 32 30 30 3A 8F 20 4D 41 48 4E |h%...4200:. MAHN|
00001D60: 20 53 43 48 4C 55 53 53 00 71 25 CA 1C 4D 4D B2 | SCHLUSS.q%..MM.|
00001D70: 30 00 89 25 DE 1C 49 49 B2 4B AA 31 3A 8B 49 49 |0..%..II.K.1:.II|
00001D80: B3 B2 41 52 A7 37 33 31 35 00 8F 25 E3 1C 8E 00 |..AR.7315..%....|
00001D90: AF 25 E8 1C 8F 20 41 4E 57 41 4C 54 53 20 4C 49 |.%... ANWALTS LI|
00001DA0: 53 54 45 20 28 33 2E 4D 41 48 4E 55 4E 47 29 00 |STE (3.MAHNUNG).|
00001DB0: C8 25 F2 1C 9F 34 2C 34 2C 30 3A 9F 32 2C 34 2C |.%...4,4,0:.2,4,|
00001DC0: 32 3A 9F 31 2C 34 2C 31 00 D5 25 FC 1C 98 34 3A |2:.1,4,1..%...4:|
00001DD0: 98 34 3A 98 34 00 E0 25 06 1D 98 34 2C 53 30 24 |.4:.4..%...4,S0$|
00001DE0: 00 EB 25 10 1D 98 34 2C 53 31 24 00 F6 25 1A 1D |..%...4,S1$..%..|
00001DF0: 98 34 2C 53 32 24 00 1C 26 24 1D 98 34 3A 98 34 |.4,S2$..&$..4:.4|
00001E00: 2C 22 C1 4E 57 41 4C 54 53 2D CC 49 53 54 45 20 |,".NWALTS-.ISTE |
00001E10: 56 4F 4D 20 22 3B 44 41 24 3A 98 34 00 65 26 2E |VOM ";DA$:.4.e&.|
00001E20: 1D 98 34 2C 22 20 20 20 20 20 20 20 20 20 D2 45 |..4," .E|
00001E30: 43 48 4E 2E 20 20 20 C4 41 54 55 4D 20 20 C6 49 |CHN. .ATUM .I|
00001E40: 52 4D 41 20 20 20 20 20 20 20 20 20 20 20 20 20 |RMA |
00001E50: 20 20 20 20 20 20 20 20 20 20 C2 45 54 52 41 47 | .ETRAG|
00001E60: 20 20 CD D3 22 00 AE 26 38 1D 98 32 2C 22 20 20 | .."..&8..2," |
00001E70: 20 20 20 20 20 20 20 39 39 39 39 39 39 20 20 39 | 999999 9|
00001E80: 39 39 39 39 39 20 20 41 41 41 41 41 41 41 41 41 |99999 AAAAAAAAA|
00001E90: 41 41 41 41 41 41 41 41 41 41 41 41 41 20 20 39 |AAAAAAAAAAAAA 9|
00001EA0: 39 39 39 39 39 39 2E 39 39 20 20 20 5A 22 00 C8 |999999.99 Z"..|
00001EB0: 26 42 1D 81 49 B2 30 A4 41 52 3A 8B 4D 5A 28 49 |&B..I.0.AR:.MZ(I|
00001EC0: 29 B3 33 A7 37 34 39 32 00 FA 26 43 1D 98 31 2C |).3.7492..&C..1,|
00001ED0: 52 4E 28 49 29 2C 44 41 28 49 29 2C 4E 41 24 28 |RN(I),DA(I),NA$(|
00001EE0: 49 29 3B 22 1D 22 3B 52 42 28 49 29 3B 4D 5A 28 |I);".";RB(I);MZ(|
00001EF0: 49 29 3A 52 42 28 49 29 B2 30 00 0B 27 44 1D 82 |I):RB(I).0..'D..|
00001F00: 3A A0 32 3A A0 31 3A A0 34 3A 8E 00 1A 27 74 1D |:.2:.1:.4:...'t.|
00001F10: 8B 52 42 28 4A 29 B2 30 A7 8E 00 35 27 7E 1D 58 |.RB(J).0...5'~.X|
00001F20: B2 52 4E 28 4A 29 3A 8D 32 35 30 3A 99 2C 58 24 |.RN(J):.250:.,X$|
00001F30: 3B 22 20 22 3B 00 56 27 83 1D 99 C9 28 22 20 20 |;" ";.V'....(" |
00001F40: 20 20 20 20 22 AA C4 28 44 41 28 4A 29 29 2C 36 | "..(DA(J)),6|
00001F50: 29 3B 22 20 22 3B 00 75 27 88 1D 58 B2 52 42 28 |);" ";.u'..X.RB(|
00001F60: 4A 29 3A 8D 32 30 30 3A 99 58 24 3B 22 20 22 3B |J):.200:.X$;" ";|
00001F70: 4D 5A 28 4A 29 00 87 27 8D 1D 53 58 B2 53 58 AA |MZ(J)..'..SX.SX.|
00001F80: 52 42 28 4A 29 3A 8E 00 A4 27 B0 1D 8F 20 45 49 |RB(J):...'... EI|
00001F90: 4E 47 41 42 45 20 4B 55 4E 44 45 4E 20 41 44 52 |NGABE KUNDEN ADR|
00001FA0: 45 53 53 45 00 C0 27 E2 1D 50 B2 30 3A 85 22 C1 |ESSE..'..P.0:.".|
00001FB0: 4E 52 45 44 45 20 31 2C 32 2C 33 22 3B 41 30 24 |NREDE 1,2,3";A0$|
00001FC0: 00 DE 27 E7 1D 41 30 B2 C5 28 41 30 24 29 3A 8B |..'..A0..(A0$):.|
00001FD0: 41 30 B3 31 B0 41 30 B1 33 89 37 36 30 30 00 F3 |A0.1.A0.3.7600..|
00001FE0: 27 E8 1D 8B 41 30 B2 31 A7 41 30 24 B2 22 C8 45 |'...A0.1.A0$.".E|
00001FF0: 52 52 22 00 08 28 E9 1D 8B 41 30 B2 32 A7 41 30 |RR"..(...A0.2.A0|
00002000: 24 B2 22 C6 52 41 55 22 00 1E 28 EA 1D 8B 41 30 |$.".RAU"..(...A0|
00002010: B2 33 A7 41 30 24 B2 22 C6 49 52 4D 41 22 00 36 |.3.A0$.".IRMA".6|
00002020: 28 EC 1D 85 22 CE 41 4D 45 20 20 20 20 20 20 20 |(...".AME |
00002030: 20 22 3B 41 31 24 00 4E 28 F6 1D 85 22 D3 54 52 | ";A1$.N(...".TR|
00002040: 41 53 53 45 20 20 20 20 20 22 3B 41 32 24 00 66 |ASSE ";A2$.f|
00002050: 28 00 1E 85 22 D0 CC DA 20 20 20 20 20 20 20 20 |(..."... |
00002060: 20 22 3B 41 33 24 00 7E 28 0A 1E 85 22 CF 52 54 | ";A3$.~(...".RT|
00002070: 20 2F 20 D3 54 41 44 54 20 22 3B 41 34 24 00 9E | / .TADT ";A4$..|
00002080: 28 0F 1E 41 35 24 B2 22 20 22 3A 85 22 C2 45 4D |(..A5$." ":.".EM|
00002090: 45 52 4B 55 4E 47 20 20 20 22 3B 41 35 24 00 A4 |ERKUNG ";A5$..|
000020A0: 28 12 1E 8E 00 00 00 |(...... |
..'.... *******************************.
M.... * *.S.
... * ESV FAKTURA/MAHNEN *...(.
. * *...2..
* VERSION:1.0 DATUM:83/07/18 *...<.. *
*...F.. * PR
OGRAMMIERER: L.FASCHALEK *.1.K.. *
*.W.P.. ********
***********************.F.Z.SO.12.4096..
._..B(SO)..76.B(SO.1)..66.B(SO.2)..192..
"SORT.C0XX",8,1...D.KD.2:KU.8:KC.15...F.
AZ.500:. A$(AZ),RN(AZ),RB(AZ),DA(AZ),NA$
(AZ),MZ(AZ):I.0.6.I.DL$."...............
........................................
.....".}.J.BZ$."ART. BEZEICHNUNG
MENGE PREIS -% MWST GESAMT".M.
K.DF$." AAAA AAAAAAAAAAAAAAAAAAA
A 99999 999999.99 99 99.9 S999999.99"...
L.EF$."
AAAAAAAAAAAAA S9999999.99".D.
M.D2$."
..........".R.N.CR$.G(1
3).B.P.MZ$." RECHN.NR. D
ATUM MS GESAM
T"...Q.MF$." 999999999 9
99999 Z 9999999.9
9".%.X..KC,KU,KC:.600.0.}.Q$."N".I...."
MAHNEN (J/N) ";Q$.Z....Q$."J".6000.D....
1000...H.X$.D(.(100.X..5)):XS$.H(X$,1):X
$.J(X$,2)...R..C(X$).3.X$."0".X$:.210...
..X$.I(" ".XS$.H(X$,C(X$).2)."
.".I(X$,2),11):....... FORMAT INTEGER.).
..X$.D(.(X)):XS$.H(X$,1):X$.I(X$,C(X$).1
).F...X$.XS$.I("00000".X$,5):..A.X..KD,K
U,KD,"SYSDAT,U,R".{.]..KC,KE,KE$:.KE..99
9:....B..KD,S0$,S1$,S2$...L..KD,S3$,S4$,
S5$,S6$,S7$,S8$,S9$,SA$,SB$.O.V..KD,SC$,
SD$,SE$......KD,S(1),S(2),S(3):. MWST...
...KD,S4,S5:. LAGER,KUNDEN MAX......999:
..2.... WRITE SYSTEM DATEN.P....KD,KU,KD
,"@0:SYSDAT,U,W".J.A..KC,KE,KE$:.KE..999
:....F..KD,S0$;CR$;S1$;CR$;S2$;CR$;...P.
.KD,S3$;CR$;S4$;CR$;S5$;CR$;S6$;CR$;S7$;
CR$;S8$;CR$;S9$;CR$;SA$;CR$;SB$;CR$...Z.
.KD,SC$;CR$;SD$;CR$;SE$;CR$;.'....KD,S(1
);CR$;S(2);CR$;S(3);CR$;:. MWST.Q....KD,
S4;CR$;S5;CR$;:. LAGER,KUNDEN MAX.\....9
99:..I. ..15,8,15.|.*..15,E,E$:.E,E$...4
. 15...>....... KD: KC:.KC,KU,KC:..A....
HAUPTPROGRAMM FAKTURA 64.Q....G(14);G(8
)......".*******************************
*********";.4...."*********** FAKTURA
- 64 ***********";.D...."*************
***************************".|...."DATUM
";DA$......"RECHNUNGS NR";RN$:RN.
E(RN$).F....".........EINGABE KUNDEN ADR
ESSE:"......I.1.14:."
":......."..........
.....".@...P.0:."ANREDE 1,2,3";A0$:.A0$.
"_".1300.U...X.RN:.250:RN$.X$.S...A0.E(A
0$):.A0.1.A0.3.1040... ..A0.1.A0$."HERR"
...!..A0.2.A0$."FRAU"..."..A0.3.A0$."FIR
MA".K.$.."NAME ";A1$......"STRASS
E ";A2$...8.."PLZ ";A3$...B.
."ORT / STADT ";A4$.+.L.."BEMERKUNG ";
A5$.K.M..I.0.3:R(I).0:.:P.0:R2$."":R3$."
":R4$."":R5$."":R8$."":R7.0...Q.. 2000 :
. RECHN.KOPF...V.."................RECHN
UNGSDATEN:";:X.P:.250:.X$;" ";.P.W.X.R7:
.200:.X$...[..I.1.7:."
":....\.."........".
=.`.."ART.NUMMER ";R0$:.R0$."_".1200.U.
J.."BEZEICHNUNG ";R1$.W.T.."MENGE
";R2$:R2.E(R2$)...~.."RABATT (%) ";R3$:
R3.E(R3$)......"MWST. 1,2,3 ";R4$:R4.E(R
4$).V....R4.1.R4.3.."..":.1160......"EIN
ZELPREIS ";R5$:R5.E(R5$):R6.R5.R2.(1.R3.
100).2...R7.R7.R6:R(R4).R(R4).R6.S(R4).1
00.S.... 3000 :. DRUCKE RECHN.ZEILE.H...
P.P.1:.P.22.1110...... RECHNUNGS SCHLUSS
......I.1.6:."
":..F.D.."......."...N.."RAB
ATT ";R8$:.F(I(R8$,1)).37.R8..E(R8$
).R7.100:.1235.4.Q.R8..E(R8$):R8$.D(.(10
00.R8.R7..5).10)."%".L.S.."BESTELLTEXT "
;BT$.L.X.. 4000 :. DRUCK RECHN.ENDE....
.. 5000 :. APPEND RECHN.DATEN. ...RN.RN.
1:. 1040...... ENDE RECHN.PROGRAMM.R....
6000:. MAHNEN ......P.. DRUCK RECHN.KOP
F...U..7,4,7:.7: 7...Z..4,4,0:.1,4,1:.2,
4,2.%....4,"";.9);S0$.7....4,"";.9);S1$.
I....4,"";.9);S2$.Y....I.1.6:.4:.......2
," AAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAA"... ..1,
" ";".";S3$.N.*..1,A0$;".";S4$...4..1,A1
$;".";S5$...>..1," ";".";S6$...H..1,A2$;
".";S7$.".R..1,A3$." ".A4$;".";S8$.5.\..
1," ";".";S9$.H.F..1,A5$;".";SA$.[.P..1,
" ";".";SB$.H.Z..4:.4:.4.O....4......MM.
0..4,"";.9);"RECHNUNG NR.:";RN$;"
DATUM: ";DA$......MM.1..4,"";.9)
;"ZAHLUNGS-ERINNERUNG DAT
UM: ";DA$......4......4,"";.9);DL$.+....
MM.0. .4,"";.9);BZ$.=....MM.1. .4,MZ$.O.
...4,"";.9);DL$.A....MM.0. .2,DF$.S.E..M
M.1. .2,MF$.Y.J........ DRUCKE EINE RECH
N.ZEILE...B..1,R0$;".";R1$;".";R2;R5;R3;
S(R4);R6.F.L........ DRUCKE EINE MAHN.ZE
ILE......1,RN(J);DA(J);MZ(J);RB(J).....P
.P.1:..&. .. RECHNUNGS SCHLUSS.7.... P.2
1 .4030.H....I.P.21:.4:..Z....4,"";.9);D
L$.E.H..2,EF$.X.T..1,"SUMME.";R7...W..4,
"".9);D2$......1,"MWST".D(S(1))."%.";R(1
).I....1,"MWST".D(S(2))."%.";R(2)......1
,"MWST".D(S(3))."%.";R(3)......1,"RABATT
".R8$.".";R8......4,"".9);D2$.1...R9.R7.
R(1).R(2).R(3).R8.E....1,"BETRAG.";R9.V.
...4,"".9);D2$.]....4.P....4,"";.24);BT$
..."..I.1.2:.4:....,..4,"";.9);SC$...6..
4,"";.9);SD$...@..4,"";.9);SE$.F.J..I.1.
6:.4:..S.T. 2: 1: 4.Y.^.....H.. MAHNUNGS
SCHLUSS...R.. P.21 .4230...|..I.P.21:.4
:..$....4,"";.9);DL$./....2,EF$.B....1,"
SUMME.";SX.S....4,"".9);D2$.D....I.1.11:
.4:..V....4,"";.9);SC$......4,"";.9);SD$
......4,"";.9);SE$......I.1.6:.4:......
2: 1: 4...B........ APPEND DATEN ZU RECH
N.FILE......KU,KU,KU,"RECHNDAT,S,A".+...
.KU,RN;CR$;DA$;CR$;A1$;CR$;R9;CR$;D(0);C
R$;.5... KU:..K.|.. READ RECHN.FILE.S...
I.0.P....KD,KU,KD,"RECHNDAT,S,R"......KD
,RN(I),DA(I),NA$(I),RB(I),MZ(I):.ST.0.I.
I.1:.5520..... KD:AR.I:..O.... WRITE REC
HN.FILE......KD,KU,KD,"@0:RECHNDAT,S,W".
.....I.0.AR:.RB(I).0.5635.E....KD,RN(I);
CR$;DA(I);CR$;NA$(I);CR$;RB(I);CR$;MZ(I)
;CR$;.K.....U... KD:..W.D.. SUMMIEREN DE
R AUSSENSTAENDE...N.S0.0:S1.0:S2.0:SG.0.
..S..I.0.AR...X.. MZ(I).0.S0.S0.RB(I).O.
B.. MZ(I).1.S1.S1.RB(I)...L.. MZ(I).2.S2
.S2.RB(I)...V.SG.SG.RB(I)......:....P..
OFFENE POSTEN MAHNEN.*.R..".";G(8).4.U..
5500.E.Z..".******** AUSSENSTAENDE / MAH
NEN ********".O...5700......DA$."".."DA
TUM ";DA$.....X.S0:.200:."UNGEMAHNT:";X$
.G...X.S1:.200:."1.MAHNUNG:";X$.....X.S2
:.200:."2.MAHNUNG:";X$.....X.SG:.200:."
GESAMT:";X$.......$....,"1...GESAMT LI
STE".=....,"2...FIRMEN LISTE".S....,"3..
.AUSBUCHEN".F....,"4...MAHNEN"......,"5.
..ANWALTS LISTE"......,"_...PROGRAMM END
E". .......J.."IHRE WAHL =>";Q$.H.T..Q$.
"_".6200...... E(Q$) . 7000,7100,7200,73
00,7400......6010.. 8..5600.. B..:.G(9):
.G(142).. L..53280,14:.53281,6.; V.."..N
EW".B `.."..LOAD".G(34)."MENUE".G(34).",
8".. J.."........... BITTE WAR
TEN !.".. T..198,7.. ~..19,13,13,82,85,7
8,13.N ...I.1.7:.X:.630.I,X:.I.T ..... X
.. GESAMT LISTE..!B..4,4,0:.2,4,2:.1,4,1
..!L..4:.4:.4..!V..4,S0$.#!...4,S1$..!..
.4,S2$.Y!...4:.4,"AUSSENSTANDS-LISTE VOM
";DA$:.4..!...4," RECHN. DATU
M FIRMA BETRAG M
S"..!...2," 999999 999999 AAAA
AAAAAAAAAAAAAAAAAA 9999999.99 Z".."..
.I.0.AR:.RB(I).0.7092./"...1,RN(I),DA(I)
,NA$(I);".";RB(I);MZ(I).@"...: 2: 1: 4:.
.\"...:."FIRMEN NAME :";NA$.K"A..NA$."_
"...."F.SX.0:.I.0.AR:.H(NA$(I),C(NA$)).N
A$..7140.."P..:X.SX:.200:."SUMME:";X$.."
Z..7100.N"...RB(I).0...."..X.RN(I):.250:
.,X$;" ";..#...I(" ".D(DA(I)),6);"
";.)#..X.RB(I):.200:.X$;" ";MZ(I).;#..SX
.SX.RB(I):..K# .. AUSBUCHEN.D#*.."RECHN.
NUMMER :";RN..#4..I.0.AR:.RN(I).RN.RB(I)
.0..#>..:...#... MAHNEN.Q#...I.0.AR:A$(I
).H(NA$(I)." ",7).I(" ".D(I),3):
...#...I.AR.1.AZ:A$(I).".":.:II.0..$..::
. SO:. SORTIERT A$().%$..NA$.H(A$(II),7)
:K.II.G$...NA$.H(A$(K.1),7).K.K.1:.7320.
P$..SX.0:.L.II.K:J.E(J(A$(L),8)):.7540:.
..$..X.SX:.200:."SUMME:";X$;" ";NA$(J)..
$..Q$."N":."MAHNEN (J/N) ";Q$.F$...Q$."N
".7390..$...7600:. INPUT ADRESSE..$..MM.
1:.2000:. MAHN KOPF.%%...L.II.K:J.E(J(A$
(L),8)):.RB(J).0.7360.I%..MZ(J).MZ(J).1:
.3500:. MAHNZEILE.O%....H%E..4200:. MAHN
SCHLUSS.Q%J.MM.0..%..II.K.1:.II..AR.731
5..%.....%... ANWALTS LISTE (3.MAHNUNG).
H%...4,4,0:.2,4,2:.1,4,1.U%...4:.4:.4..%
...4,S0$..%...4,S1$..%...4,S2$..&$..4:.4
,"ANWALTS-LISTE VOM ";DA$:.4.E&...4,"
RECHN. DATUM FIRMA
BETRAG MS"..&8..2," 9
99999 999999 AAAAAAAAAAAAAAAAAAAAAA 9
999999.99 Z".H&B..I.0.AR:.MZ(I).3.7492
..&C..1,RN(I),DA(I),NA$(I);".";RB(I);MZ(
I):RB(I).0..'D..: 2: 1: 4:...'T..RB(J).0
...5'~.X.RN(J):.250:.,X$;" ";.V'...I("
".D(DA(J)),6);" ";.U'..X.RB(J):.200:
.X$;" ";MZ(J)..'..SX.SX.RB(J):...'... EI
NGABE KUNDEN ADRESSE..'..P.0:."ANREDE 1,
2,3";A0$..'..A0.E(A0$):.A0.1.A0.3.7600..
'...A0.1.A0$."HERR"..(...A0.2.A0$."FRAU"
..(...A0.3.A0$."FIRMA".6(..."NAME
";A1$.N(..."STRASSE ";A2$.F(..."PLZ
";A3$.~(..."ORT / STADT ";A4$..
(..A5$." ":."BEMERKUNG ";A5$..(......
> CLICK IMAGE PREVIEW FOR FULL MODAL