GAS V2.1
FILE INFORMATION
FILENAME(S): GAS V2.1
FILE TYPE(S): PRG
FILE SIZE: 9.8K
FIRST SEEN: 2025-11-02 16:38:58
APPEARS ON: 2 disk(s)
FILE HASH
7154bfd2a04c3240ed1d4ecf499932df98fd42afbd2c2f5dae904307b9c28cbf
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER SONDERH 56 | GAS V2.1 | PRG | Treasure Chest - Plattfuss | 25 | 11 | DOWNLOAD FILE |
| 64 ER SONDERH 56 | GAS V2.1 | PRG | C64er | 25 | 11 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 E8 03 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 00 4B 08 F2 03 8F 20 2A 20 20 |******.K.... * |
00000030: 20 20 50 52 4F 47 52 41 4D 4D 20 20 20 47 41 53 | PROGRAMM GAS|
00000040: 4B 4F 53 54 45 4E 20 20 20 20 2A 00 70 08 FC 03 |KOSTEN *.p...|
00000050: 8F 20 2A 20 20 20 20 20 20 20 20 20 56 20 32 2E |. * V 2.|
00000060: 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A |1 *|
00000070: 00 95 08 06 04 8F 20 2A 20 20 20 20 55 2E 20 53 |...... * U. S|
00000080: 43 48 57 45 42 49 4E 47 48 41 55 53 20 20 20 20 |CHWEBINGHAUS |
00000090: 20 20 20 20 2A 00 BA 08 10 04 8F 20 2A 20 20 20 | *...... * |
000000A0: 20 45 52 42 53 43 48 4C 4F 45 52 20 53 54 52 2E | ERBSCHLOER STR.|
000000B0: 20 31 31 35 20 20 20 20 20 2A 00 DF 08 1A 04 8F | 115 *......|
000000C0: 20 2A 20 20 20 20 35 36 30 30 20 57 55 50 50 45 | * 5600 WUPPE|
000000D0: 52 54 41 4C 20 32 31 20 20 20 20 20 20 20 2A 00 |RTAL 21 *.|
000000E0: 04 09 24 04 8F 20 2A 20 20 20 20 20 20 20 20 20 |..$.. * |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 20 2A 00 29 09 2E 04 8F 20 2A 2A 2A 2A 2A | *.).... *****|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2F 09 38 04 3A 00 |*********./.8.:.|
00000130: 35 09 3D 04 3A 00 3B 09 3E 04 3A 00 41 09 3F 04 |5.=.:.;.>.:.A.?.|
00000140: 3A 00 66 09 4C 04 8F 20 2A 2A 2A 2A 2A 2A 2A 20 |:.f.L.. ******* |
00000150: 56 4F 52 42 45 52 45 49 54 55 4E 47 20 2A 2A 2A |VORBEREITUNG ***|
00000160: 2A 2A 2A 2A 2A 2A 00 6C 09 56 04 3A 00 80 09 60 |******.l.V.:...`|
00000170: 04 86 20 56 54 28 31 32 29 2C 56 4E 28 31 32 29 |.. VT(12),VN(12)|
00000180: 00 86 09 6A 04 3A 00 8C 09 C9 04 3A 00 92 09 CA |...j.:.....:....|
00000190: 04 3A 00 AE 09 CE 04 8F 20 2A 2A 2A 2A 2A 2A 2A |.:...... *******|
000001A0: 20 4D 45 4E 55 45 20 2A 2A 2A 2A 2A 2A 2A 00 B4 | MENUE *******..|
000001B0: 09 D3 04 3A 00 D8 09 D8 04 43 44 24 B2 22 11 11 |...:.....CD$."..|
000001C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000001D0: 11 11 11 11 11 11 11 22 00 FA 09 DD 04 54 54 24 |.......".....TT$|
000001E0: B2 22 47 20 41 20 53 20 2D 20 52 20 45 20 43 20 |."G A S - R E C |
000001F0: 48 20 4E 20 55 20 4E 20 47 22 00 1C 0A E2 04 54 |H N U N G".....T|
00000200: 55 24 B2 22 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |U$."............|
00000210: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 22 00 3E 0A E7 |...........".>..|
00000220: 04 4D 50 24 28 31 29 B2 22 49 4E 46 4F 52 4D 41 |.MP$(1)."INFORMA|
00000230: 54 49 4F 4E 45 4E 20 20 20 20 20 20 20 22 00 60 |TIONEN ".`|
00000240: 0A EC 04 4D 50 24 28 32 29 B2 22 4B 4F 53 54 45 |...MP$(2)."KOSTE|
00000250: 4E 44 41 54 45 4E 2D 45 49 4E 47 41 42 45 20 22 |NDATEN-EINGABE "|
00000260: 00 82 0A F1 04 4D 50 24 28 33 29 B2 22 5A 41 45 |.....MP$(3)."ZAE|
00000270: 48 4C 45 52 44 41 54 45 4E 2D 45 49 4E 47 41 42 |HLERDATEN-EINGAB|
00000280: 45 22 00 A4 0A F6 04 4D 50 24 28 34 29 B2 22 44 |E".....MP$(4)."D|
00000290: 41 54 55 4D 53 2D 45 49 4E 47 41 42 45 20 20 20 |ATUMS-EINGABE |
000002A0: 20 20 20 22 00 C6 0A FB 04 4D 50 24 28 35 29 B2 | ".....MP$(5).|
000002B0: 22 55 45 42 45 52 53 49 43 48 54 20 44 45 52 20 |"UEBERSICHT DER |
000002C0: 44 41 54 45 4E 22 00 E8 0A 00 05 4D 50 24 28 36 |DATEN".....MP$(6|
000002D0: 29 B2 22 41 42 52 45 43 48 4E 55 4E 47 20 20 20 |)."ABRECHNUNG |
000002E0: 20 20 20 20 20 20 20 22 00 0A 0B 05 05 4D 50 24 | ".....MP$|
000002F0: 28 37 29 B2 22 53 50 45 49 43 48 45 52 4E 20 44 |(7)."SPEICHERN D|
00000300: 45 52 20 44 41 54 45 4E 20 22 00 2C 0B 0A 05 4D |ER DATEN ".,...M|
00000310: 50 24 28 38 29 B2 22 4C 41 44 45 4E 20 56 4F 4E |P$(8)."LADEN VON|
00000320: 20 44 41 54 45 4E 20 20 20 20 20 22 00 4E 0B 0F | DATEN ".N..|
00000330: 05 4D 50 24 28 39 29 B2 22 50 52 4F 47 52 41 4D |.MP$(9)."PROGRAM|
00000340: 4D 2D 45 4E 44 45 20 20 20 20 20 20 20 22 00 68 |M-ENDE ".h|
00000350: 0B 14 05 97 20 35 33 32 38 30 2C 31 35 3A 97 20 |.... 53280,15:. |
00000360: 35 33 32 38 31 2C 31 35 00 82 0B 19 05 99 22 93 |53281,15......".|
00000370: 11 05 22 A3 35 29 54 54 24 3A 99 20 A3 35 29 54 |..".5)TT$:. .5)T|
00000380: 55 24 00 8A 0B 1E 05 99 3A 99 00 AD 0B 23 05 81 |U$......:....#..|
00000390: 20 49 B2 31 20 A4 20 39 3A 99 22 9E 22 A3 35 29 | I.1 . 9:.".".5)|
000003A0: 20 4D 50 24 28 49 29 3A 99 3A 82 20 49 00 DE 0B | MP$(I):.:. I...|
000003B0: 28 05 99 22 90 11 57 41 48 4C 20 4D 49 54 20 43 |(.."..WAHL MIT C|
000003C0: 55 52 53 4F 52 20 55 50 20 55 4E 44 20 44 4F 57 |URSOR UP UND DOW|
000003D0: 4E 20 55 4E 44 20 52 45 54 55 52 4E 22 3B 00 EE |N UND RETURN";..|
000003E0: 0B 2D 05 8B 20 52 B2 30 20 A7 20 52 B2 31 00 F8 |.-.. R.0 . R.1..|
000003F0: 0B 2F 05 8D 31 33 36 35 00 0F 0C 32 05 A1 20 41 |./..1365...2.. A|
00000400: 24 3A 8B 20 41 24 B2 22 22 20 A7 31 33 33 30 00 |$:. A$."" .1330.|
00000410: 24 0C 37 05 8B 20 41 24 B2 22 11 22 20 A7 20 8D |$.7.. A$."." . .|
00000420: 31 33 38 35 00 39 0C 3C 05 8B 20 41 24 B2 22 91 |1385.9.<.. A$.".|
00000430: 22 20 A7 20 8D 31 34 30 30 00 4F 0C 41 05 8B 20 |" . .1400.O.A.. |
00000440: 41 24 B3 B1 C7 28 31 33 29 20 A7 31 33 33 30 00 |A$...(13) .1330.|
00000450: 62 0C 46 05 8B 20 52 B2 39 20 A7 20 99 22 93 22 |b.F.. R.9 . ."."|
00000460: 3A 80 00 9B 0C 4B 05 91 20 52 20 8D 20 37 30 30 |:....K.. R . 700|
00000470: 30 2C 31 35 34 30 2C 32 30 30 30 2C 34 31 33 30 |0,1540,2000,4130|
00000480: 2C 38 30 30 30 2C 32 33 30 30 2C 35 30 30 30 2C |,8000,2300,5000,|
00000490: 36 30 30 30 3A 89 20 31 33 30 35 00 A1 0C 50 05 |6000:. 1305...P.|
000004A0: 3A 00 CC 0C 55 05 99 22 13 11 11 11 11 11 22 C8 |:...U.."......".|
000004B0: 28 43 44 24 2C 28 52 AB 31 29 AC 32 29 A3 35 29 |(CD$,(R.1).2).5)|
000004C0: 22 05 12 22 4D 50 24 28 52 29 3A 8E 00 D2 0C 5A |".."MP$(R):....Z|
000004D0: 05 3A 00 FC 0C 5F 05 99 22 13 11 11 11 11 11 22 |.:..._.."......"|
000004E0: C8 28 43 44 24 2C 28 52 AB 31 29 AC 32 29 A3 35 |.(CD$,(R.1).2).5|
000004F0: 29 22 9E 22 4D 50 24 28 52 29 3A 8E 00 02 0D 64 |)"."MP$(R):....d|
00000500: 05 3A 00 1E 0D 69 05 8D 31 33 37 35 3A 52 B2 52 |.:...i..1375:R.R|
00000510: AA 31 3A 8B 20 52 B1 39 20 A7 20 52 B2 31 00 2A |.1:. R.9 . R.1.*|
00000520: 0D 6E 05 8D 31 33 36 35 3A 8E 00 30 0D 73 05 3A |.n..1365:..0.s.:|
00000530: 00 4C 0D 78 05 8D 31 33 37 35 3A 52 B2 52 AB 31 |.L.x..1375:R.R.1|
00000540: 3A 8B 20 52 B3 31 20 A7 20 52 B2 39 00 58 0D 7D |:. R.1 . R.9.X.}|
00000550: 05 8D 31 33 36 35 3A 8E 00 5E 0D 82 05 3A 00 64 |..1365:..^...:.d|
00000560: 0D FA 05 3A 00 89 0D 04 06 8F 20 2A 2A 2A 2A 20 |...:...... **** |
00000570: 4B 4F 53 54 45 4E 44 41 54 45 4E 2D 45 49 4E 47 |KOSTENDATEN-EING|
00000580: 41 42 45 20 2A 2A 2A 2A 2A 00 8F 0D 0E 06 3A 00 |ABE *****.....:.|
00000590: 9A 0D 18 06 99 22 93 11 11 22 00 B6 0D 22 06 99 |....."..."..."..|
000005A0: 22 12 4B 4F 53 54 45 4E 44 41 54 45 4E 2D 45 49 |".KOSTENDATEN-EI|
000005B0: 4E 47 41 42 45 22 00 BC 0D 2C 06 99 00 DF 0D 36 |NGABE"...,.....6|
000005C0: 06 85 22 41 4E 5A 41 48 4C 20 44 45 52 20 4B 4F |.."ANZAHL DER KO|
000005D0: 53 54 45 4E 53 41 45 54 5A 45 22 3B 41 4B 25 00 |STENSAETZE";AK%.|
000005E0: E5 0D 3B 06 99 00 F9 0D 40 06 8B 20 41 4B 25 B1 |..;.....@.. AK%.|
000005F0: 31 32 20 A7 20 31 35 36 30 00 FF 0D 45 06 3A 00 |12 . 1560...E.:.|
00000600: 19 0E 4A 06 3A 20 20 20 20 20 20 20 20 20 81 20 |..J.: . |
00000610: 49 B2 31 20 A4 20 41 4B 25 00 1F 0E 4F 06 3A 00 |I.1 . AK%...O.:.|
00000620: 3B 0E 51 06 99 22 93 11 12 4B 4F 53 54 45 4E 44 |;.Q.."...KOSTEND|
00000630: 41 54 45 4E 2D 53 41 54 5A 22 49 00 5B 0E 54 06 |ATEN-SATZ"I.[.T.|
00000640: 99 22 11 50 52 45 49 53 20 50 52 4F 20 45 49 4E |.".PREIS PRO EIN|
00000650: 48 45 49 54 20 49 4E 20 50 46 22 00 67 0E 5E 06 |HEIT IN PF".g.^.|
00000660: 85 20 50 54 28 49 29 00 8A 0E 7C 06 99 22 11 47 |. PT(I)...|..".G|
00000670: 52 55 4E 44 50 52 45 49 53 20 50 52 4F 20 4D 4F |RUNDPREIS PRO MO|
00000680: 4E 41 54 20 49 4E 20 44 4D 22 00 96 0E 86 06 85 |NAT IN DM"......|
00000690: 20 47 50 28 49 29 00 B0 0E 90 06 99 22 11 53 4F | GP(I)......".SO|
000006A0: 4E 44 45 52 41 42 47 41 42 45 20 49 4E 20 25 22 |NDERABGABE IN %"|
000006B0: 00 BC 0E 9A 06 85 20 41 41 28 49 29 00 D8 0E A4 |...... AA(I)....|
000006C0: 06 99 22 11 4D 45 48 52 57 45 52 54 53 54 45 55 |..".MEHRWERTSTEU|
000006D0: 45 52 20 49 4E 20 25 22 00 E4 0E AE 06 85 20 4D |ER IN %"...... M|
000006E0: 57 28 49 29 00 08 0F B8 06 99 22 11 44 41 54 45 |W(I)......".DATE|
000006F0: 4E 20 47 55 45 4C 54 49 47 20 42 49 53 20 45 49 |N GUELTIG BIS EI|
00000700: 4E 53 43 48 4C 2E 22 3B 00 24 0F C2 06 99 22 20 |NSCHL.";.$...." |
00000710: 20 20 12 20 20 92 2E 12 20 20 92 9D 9D 9D 9D 9D | . ... ......|
00000720: 9D 9D 22 3B 00 31 0F CC 06 85 20 47 4B 24 28 49 |..";.1.... GK$(I|
00000730: 29 00 46 0F CD 06 44 24 B2 47 4B 24 28 49 29 3A |).F...D$.GK$(I):|
00000740: 8D 20 39 30 30 30 00 58 0F CE 06 8B 20 45 52 B2 |. 9000.X.... ER.|
00000750: 31 20 A7 20 31 37 32 30 00 7B 0F CF 06 44 31 24 |1 . 1720.{...D1$|
00000760: B2 47 4B 24 28 49 AB 31 29 3A 44 32 24 B2 47 4B |.GK$(I.1):D2$.GK|
00000770: 24 28 49 29 3A 8D 20 39 32 30 30 00 8D 0F D0 06 |$(I):. 9200.....|
00000780: 8B 20 45 52 B2 31 20 A7 20 31 37 32 30 00 93 0F |. ER.1 . 1720...|
00000790: D1 06 3A 00 B7 0F D2 06 99 22 11 11 12 4B 92 4F |..:......"...K.O|
000007A0: 52 52 45 4B 54 55 52 20 4F 44 45 52 20 12 57 92 |RREKTUR ODER .W.|
000007B0: 45 49 54 45 52 3F 22 00 BD 0F D3 06 3A 00 D5 0F |EITER?".....:...|
000007C0: D6 06 A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 |... A$:. A$."" .|
000007D0: 20 31 37 35 30 00 DB 0F DB 06 3A 00 EE 0F E0 06 | 1750.....:.....|
000007E0: 8B 20 41 24 B2 22 4B 22 A7 20 31 36 31 37 00 01 |. A$."K". 1617..|
000007F0: 10 EA 06 8B 20 41 24 B2 22 57 22 A7 20 31 38 30 |.... A$."W". 180|
00000800: 30 00 07 10 EF 06 3A 00 12 10 F4 06 89 20 31 37 |0.....:...... 17|
00000810: 35 30 00 18 10 FE 06 3A 00 2A 10 08 07 3A 20 20 |50.....:.*...: |
00000820: 20 20 20 20 20 20 20 82 20 49 00 30 10 12 07 3A | . I.0...:|
00000830: 00 3A 10 1C 07 3A 20 20 20 8E 00 40 10 26 07 3A |.:...: ..@.&.:|
00000840: 00 46 10 30 07 3A 00 6B 10 D0 07 8F 20 2A 2A 2A |.F.0.:.k.... ***|
00000850: 2A 20 5A 41 45 48 4C 45 52 44 41 54 45 4E 2D 45 |* ZAEHLERDATEN-E|
00000860: 49 4E 47 41 42 45 20 2A 2A 2A 2A 00 71 10 DA 07 |INGABE ****.q...|
00000870: 3A 00 91 10 E4 07 99 22 93 11 11 12 5A 41 45 48 |:......"....ZAEH|
00000880: 4C 45 52 44 41 54 45 4E 2D 45 49 4E 47 41 42 45 |LERDATEN-EINGABE|
00000890: 22 00 97 10 EE 07 3A 00 B3 10 F8 07 99 22 11 41 |".....:......".A|
000008A0: 4C 54 45 52 20 5A 41 45 48 4C 45 52 53 54 41 4E |LTER ZAEHLERSTAN|
000008B0: 44 3A 22 00 D1 10 16 08 99 22 11 5A 41 45 48 4C |D:"......".ZAEHL|
000008C0: 45 52 20 49 4E 20 4B 55 42 49 4B 4D 45 54 45 52 |ER IN KUBIKMETER|
000008D0: 22 00 DD 10 20 08 85 20 5A 54 28 30 29 00 E3 10 |"... .. ZT(0)...|
000008E0: 2A 08 3A 00 00 11 34 08 99 22 11 11 4E 45 55 45 |*.:...4.."..NEUE|
000008F0: 52 20 5A 41 45 48 4C 45 52 53 54 41 4E 44 3A 22 |R ZAEHLERSTAND:"|
00000900: 00 1E 11 52 08 99 22 11 5A 41 45 48 4C 45 52 20 |...R..".ZAEHLER |
00000910: 49 4E 20 4B 55 42 49 4B 4D 45 54 45 52 22 00 2A |IN KUBIKMETER".*|
00000920: 11 5C 08 85 20 5A 54 28 31 29 00 46 11 5D 08 99 |.\.. ZT(1).F.]..|
00000930: 22 11 11 55 4D 52 45 43 48 4E 55 4E 47 53 2D 46 |"..UMRECHNUNGS-F|
00000940: 41 4B 54 4F 52 22 00 4F 11 5E 08 85 20 55 46 00 |AKTOR".O.^.. UF.|
00000950: 62 11 61 08 5A 54 B2 5A 54 28 31 29 AB 5A 54 28 |b.a.ZT.ZT(1).ZT(|
00000960: 30 29 00 7C 11 62 08 8B 20 5A 54 B3 30 20 A7 20 |0).|.b.. ZT.0 . |
00000970: 5A 54 B2 5A 54 AA 31 30 30 30 30 30 00 89 11 64 |ZT.ZT.100000...d|
00000980: 08 5A 54 B2 5A 54 AC 55 46 00 8F 11 66 08 3A 00 |.ZT.ZT.UF...f.:.|
00000990: B1 11 70 08 99 22 11 12 4B 92 4F 52 52 45 4B 54 |..p.."..K.ORREKT|
000009A0: 55 52 20 4F 44 45 52 20 12 4D 92 45 4E 55 45 3F |UR ODER .M.ENUE?|
000009B0: 22 00 B7 11 75 08 3A 00 CF 11 7A 08 A1 20 41 24 |"...u.:...z.. A$|
000009C0: 3A 8B 20 41 24 B2 22 22 20 A7 20 32 31 37 30 00 |:. A$."" . 2170.|
000009D0: D5 11 84 08 3A 00 E9 11 8E 08 8B 20 41 24 B2 22 |....:...... A$."|
000009E0: 4B 22 20 A7 20 32 30 32 30 00 FD 11 98 08 8B 20 |K" . 2020...... |
000009F0: 41 24 B2 22 4D 22 20 A7 20 32 32 35 30 00 03 12 |A$."M" . 2250...|
00000A00: A2 08 3A 00 0E 12 AC 08 89 20 32 31 37 30 00 14 |..:...... 2170..|
00000A10: 12 B6 08 3A 00 25 12 CA 08 3A 20 20 20 20 20 20 |...:.%...: |
00000A20: 20 20 20 20 8E 00 2B 12 D4 08 3A 00 31 12 DE 08 | ..+...:.1...|
00000A30: 3A 00 56 12 FC 08 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |:.V.... ********|
00000A40: 20 41 42 52 45 43 48 4E 55 4E 47 20 2A 2A 2A 2A | ABRECHNUNG ****|
00000A50: 2A 2A 2A 2A 2A 2A 00 5C 12 06 09 3A 00 6F 12 10 |******.\...:.o..|
00000A60: 09 8B 20 41 4B 25 B2 30 20 A7 20 33 32 38 30 00 |.. AK%.0 . 3280.|
00000A70: 82 12 1A 09 8B 20 5A 54 B2 30 20 20 A7 20 33 32 |..... ZT.0 . 32|
00000A80: 38 30 00 9F 12 24 09 8B 20 41 42 24 B2 22 22 20 |80...$.. AB$."" |
00000A90: B0 20 41 45 24 B2 22 22 20 A7 20 33 32 38 30 00 |. AE$."" . 3280.|
00000AA0: A5 12 2E 09 3A 00 AB 12 88 09 3A 00 B5 12 8D 09 |....:.....:.....|
00000AB0: 99 22 93 22 3B 00 D4 12 92 09 99 A3 38 29 22 47 |.".";.......8)"G|
00000AC0: 41 53 4B 4F 53 54 45 4E 2D 41 42 52 45 43 48 4E |ASKOSTEN-ABRECHN|
00000AD0: 55 4E 47 22 00 F5 12 97 09 99 A3 38 29 22 A3 A3 |UNG".......8)"..|
00000AE0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000AF0: A3 A3 A3 A3 22 00 09 13 9C 09 99 20 A3 35 29 22 |...."...... .5)"|
00000B00: 56 4F 4E 20 22 41 42 24 3B 00 22 13 A6 09 99 22 |VON "AB$;."...."|
00000B10: 20 42 49 53 20 45 49 4E 53 43 48 4C 2E 20 22 41 | BIS EINSCHL. "A|
00000B20: 45 24 00 2A 13 B0 09 99 3A 99 00 4E 13 BA 09 4B |E$.*....:..N...K|
00000B30: 24 B2 22 4D 4F 4E 41 54 20 56 45 52 42 52 41 55 |$."MONAT VERBRAU|
00000B40: 43 48 20 20 20 52 4F 48 50 52 45 49 53 22 00 65 |CH ROHPREIS".e|
00000B50: 13 C4 09 4B 24 B2 4B 24 AA 22 20 20 45 4E 44 50 |...K$.K$." ENDP|
00000B60: 52 45 49 53 22 00 6E 13 CE 09 99 20 4B 24 00 92 |REIS".n.... K$..|
00000B70: 13 D8 09 4B 24 B2 22 B7 B7 B7 B7 B7 B7 B7 B7 B7 |...K$.".........|
00000B80: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000B90: B7 22 00 AA 13 E2 09 4B 24 B2 4B 24 AA 22 B7 B7 |.".....K$.K$."..|
00000BA0: B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 C1 13 EC 09 99 |........."......|
00000BB0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000BC0: 22 00 CA 13 F6 09 99 20 4B 24 00 D0 13 00 0A 3A |"...... K$.....:|
00000BD0: 00 D6 13 0A 0A 3A 00 E8 13 14 0A 41 B2 C5 28 C8 |.....:.....A..(.|
00000BE0: 28 41 42 24 2C 32 29 29 00 FA 13 1E 0A 45 B2 C5 |(AB$,2)).....E..|
00000BF0: 28 C8 28 41 45 24 2C 32 29 29 00 07 14 28 0A 49 |(.(AE$,2))...(.I|
00000C00: B2 41 3A 44 56 B2 30 00 0D 14 2D 0A 3A 00 29 14 |.A:DV.0...-.:.).|
00000C10: 32 0A 8B 20 49 B2 31 32 20 B0 20 49 B2 31 20 A7 |2.. I.12 . I.1 .|
00000C20: 20 44 56 B2 44 56 AA 31 35 00 46 14 3C 0A 8B 20 | DV.DV.15.F.<.. |
00000C30: 49 B2 31 30 20 B0 20 49 B2 31 31 20 A7 20 44 56 |I.10 . I.11 . DV|
00000C40: B2 44 56 AA 31 30 00 61 14 46 0A 8B 20 49 B2 32 |.DV.10.a.F.. I.2|
00000C50: 20 B0 20 49 B2 33 20 A7 20 44 56 B2 44 56 AA 31 | . I.3 . DV.DV.1|
00000C60: 30 00 7C 14 50 0A 8B 20 49 B1 33 20 AF 20 49 B3 |0.|.P.. I.3 . I.|
00000C70: 31 30 20 A7 20 44 56 B2 44 56 AA 35 00 82 14 55 |10 . DV.DV.5...U|
00000C80: 0A 3A 00 93 14 5A 0A 8B 20 49 B2 45 20 A7 20 32 |.:...Z.. I.E . 2|
00000C90: 37 30 30 00 9D 14 64 0A 49 B2 49 AA 31 00 B1 14 |700...d.I.I.1...|
00000CA0: 6E 0A 8B 20 49 B1 31 32 20 A7 20 49 B2 49 AB 31 |n.. I.12 . I.I.1|
00000CB0: 32 00 BC 14 78 0A 89 20 32 36 31 30 00 C2 14 82 |2...x.. 2610....|
00000CC0: 0A 3A 00 D1 14 8C 0A 81 20 49 B2 31 20 A4 20 31 |.:...... I.1 . 1|
00000CD0: 32 00 D7 14 96 0A 3A 00 E8 14 A0 0A 3A 20 20 20 |2.....:.....: |
00000CE0: 20 56 54 28 49 29 B2 30 00 EE 14 AA 0A 3A 00 F4 | VT(I).0.....:..|
00000CF0: 14 B4 0A 3A 00 FC 14 BE 0A 82 20 49 00 02 15 C8 |...:...... I....|
00000D00: 0A 3A 00 16 15 D2 0A 3A 20 20 20 20 20 20 20 20 |.:.....: |
00000D10: 20 20 20 49 B2 41 00 1C 15 DC 0A 3A 00 3E 15 E6 | I.A.....:.>..|
00000D20: 0A 8B 20 49 B2 31 32 20 B0 20 49 B2 31 20 A7 20 |.. I.12 . I.1 . |
00000D30: 56 54 28 49 29 B2 5A 54 AD 44 56 AC 31 35 00 61 |VT(I).ZT.DV.15.a|
00000D40: 15 FA 0A 8B 20 49 B2 31 30 20 B0 20 49 B2 31 31 |.... I.10 . I.11|
00000D50: 20 A7 20 56 54 28 49 29 B2 5A 54 AD 44 56 AC 31 | . VT(I).ZT.DV.1|
00000D60: 30 00 82 15 09 0B 8B 20 49 B2 32 20 B0 20 49 B2 |0...... I.2 . I.|
00000D70: 33 20 A7 20 56 54 28 49 29 B2 5A 54 AD 44 56 AC |3 . VT(I).ZT.DV.|
00000D80: 31 30 00 A3 15 0E 0B 8B 20 49 B1 33 20 AF 20 49 |10...... I.3 . I|
00000D90: B3 31 30 20 A7 20 56 54 28 49 29 B2 5A 54 AD 44 |.10 . VT(I).ZT.D|
00000DA0: 56 AC 35 00 A9 15 22 0B 3A 00 BA 15 2C 0B 8B 20 |V.5...".:...,.. |
00000DB0: 49 B2 45 20 A7 20 32 39 32 30 00 C0 15 36 0B 3A |I.E . 2920...6.:|
00000DC0: 00 D6 15 40 0B 3A 20 20 20 20 20 20 20 20 20 20 |...@.: |
00000DD0: 20 49 B2 49 AA 31 00 F6 15 4A 0B 3A 20 20 20 20 | I.I.1...J.: |
00000DE0: 20 20 20 20 20 20 20 8B 20 49 B1 31 32 20 A7 20 | . I.12 . |
00000DF0: 49 B2 49 AB 31 32 00 01 16 54 0B 89 20 32 37 39 |I.I.12...T.. 279|
00000E00: 30 00 07 16 5E 0B 3A 00 24 16 68 0B 8F 20 45 49 |0...^.:.$.h.. EI|
00000E10: 47 45 4E 54 4C 49 43 48 45 20 41 42 52 45 43 48 |GENTLICHE ABRECH|
00000E20: 4E 55 4E 47 00 2A 16 72 0B 3A 00 3C 16 7C 0B 3A |NUNG.*.r.:.<.|.:|
00000E30: 20 20 20 20 20 20 20 20 20 49 B2 41 00 4A 16 81 | I.A.J..|
00000E40: 0B 53 52 B2 30 3A 53 45 B2 30 00 67 16 83 0B 3A |.SR.0:SE.0.g...:|
00000E50: 20 20 20 20 20 20 20 20 20 4A 41 B2 C5 28 C9 28 | JA..(.(|
00000E60: 41 42 24 2C 32 29 29 00 70 16 86 0B 4D 41 B2 49 |AB$,2)).p...MA.I|
00000E70: 00 8F 16 90 0B 8B 20 4D 41 B1 31 32 20 A7 20 4D |...... MA.12 . M|
00000E80: 41 B2 4D 41 AB 31 32 3A 4A 41 B2 4A 41 AA 31 00 |A.MA.12:JA.JA.1.|
00000E90: A3 16 AE 0B 8D 20 39 34 30 30 3A 8F 20 4B 4F 53 |..... 9400:. KOS|
00000EA0: 41 54 5A 00 B5 16 B8 0B 8B 20 45 52 B2 31 20 A7 |ATZ...... ER.1 .|
00000EB0: 20 33 32 38 30 00 BB 16 C2 0B 3A 00 D0 16 D6 0B | 3280.....:.....|
00000EC0: 52 50 B2 56 54 28 4D 41 29 AC 50 54 28 4B 53 29 |RP.VT(MA).PT(KS)|
00000ED0: 00 E5 16 E0 0B 52 50 B2 52 50 AD 31 30 30 AA 47 |.....RP.RP.100.G|
00000EE0: 50 28 4B 53 29 00 F2 16 E5 0B 53 52 B2 53 52 AA |P(KS).....SR.SR.|
00000EF0: 52 50 00 0A 17 F4 0B 45 50 B2 52 50 AA 41 41 28 |RP.....EP.RP.AA(|
00000F00: 4B 53 29 AC 52 50 AD 31 30 30 00 22 17 FE 0B 45 |KS).RP.100."...E|
00000F10: 50 B2 45 50 AA 4D 57 28 4B 53 29 AC 45 50 AD 31 |P.EP.MW(KS).EP.1|
00000F20: 30 30 00 2F 17 03 0C 53 45 B2 53 45 AA 45 50 00 |00./...SE.SE.EP.|
00000F30: 35 17 08 0C 3A 00 43 17 0D 0C 3A 20 20 8D 20 39 |5...:.C...: . 9|
00000F40: 36 34 30 00 49 17 0F 0C 3A 00 4F 17 12 0C 3A 00 |640.I...:.O...:.|
00000F50: 6B 17 1C 0C 3A 20 20 20 20 20 20 20 20 20 8B 20 |k...: . |
00000F60: 4D 41 B2 45 20 A7 20 33 31 34 30 00 7F 17 26 0C |MA.E . 3140...&.|
00000F70: 3A 20 20 20 20 20 20 20 20 20 49 B2 49 AA 31 00 |: I.I.1.|
00000F80: 94 17 30 0C 3A 20 20 20 20 20 20 20 20 20 89 20 |..0.: . |
00000F90: 32 39 34 37 00 9A 17 3A 0C 3A 00 B6 17 44 0C 8F |2947...:.:...D..|
00000FA0: 20 53 43 48 4C 55 53 53 5A 45 49 4C 45 4E 20 44 | SCHLUSSZEILEN D|
00000FB0: 52 55 43 4B 45 4E 00 BC 17 4E 0C 3A 00 C5 17 58 |RUCKEN...N.:...X|
00000FC0: 0C 99 20 4B 24 00 D3 17 62 0C 50 52 24 B2 C4 28 |.. K$...b.PR$..(|
00000FD0: 5A 54 29 00 EB 17 6C 0C 99 20 A3 34 AA 36 AB C3 |ZT)...l.. .4.6..|
00000FE0: 28 50 52 24 29 29 20 50 52 24 3B 00 04 18 7D 0C |(PR$)) PR$;...}.|
00000FF0: 50 52 24 B2 C4 28 B5 28 53 52 AC 31 30 30 29 AD |PR$..(.(SR.100).|
00001000: 31 30 30 29 00 0A 18 80 0C 3A 00 19 18 82 0C 3A |100).....:.....:|
00001010: 20 20 20 8D 20 39 38 30 30 00 1F 18 84 0C 3A 00 | . 9800.....:.|
00001020: 38 18 86 0C 99 20 A3 31 38 AA 37 AB C3 28 50 52 |8.... .18.7..(PR|
00001030: 24 29 29 20 50 52 24 3B 00 51 18 87 0C 50 52 24 |$)) PR$;.Q...PR$|
00001040: B2 C4 28 B5 28 53 45 AC 31 30 30 29 AD 31 30 30 |..(.(SE.100).100|
00001050: 29 00 57 18 88 0C 3A 00 66 18 89 0C 3A 20 20 20 |).W...:.f...: |
00001060: 8D 20 39 38 30 30 00 6C 18 8A 0C 3A 00 84 18 8B |. 9800.l...:....|
00001070: 0C 99 20 A3 32 38 AA 37 AB C3 28 50 52 24 29 29 |.. .28.7..(PR$))|
00001080: 20 50 52 24 00 9A 18 8C 0C 99 20 A3 32 38 29 22 | PR$...... .28)"|
00001090: 3D 3D 3D 3D 3D 3D 3D 22 3A 99 00 A0 18 8F 0C 3A |=======":......:|
000010A0: 00 AF 18 94 0C 3A 20 20 20 8D 20 39 39 30 30 00 |.....: . 9900.|
000010B0: B5 18 B2 0C 3A 00 CA 18 D0 0C 3A 20 20 20 20 20 |....:.....: |
000010C0: 20 20 20 20 20 20 20 20 20 8E 00 D0 18 DA 0C 3A | ......:|
000010D0: 00 D6 18 E4 0C 3A 00 FB 18 22 10 8F 20 2A 2A 2A |.....:...".. ***|
000010E0: 2A 2A 20 41 42 52 45 43 48 4E 55 4E 47 53 5A 45 |** ABRECHNUNGSZE|
000010F0: 49 54 52 41 55 4D 20 2A 2A 2A 2A 00 01 19 2C 10 |ITRAUM ****...,.|
00001100: 3A 00 20 19 36 10 99 22 93 11 41 42 52 45 43 48 |:. .6.."..ABRECH|
00001110: 4E 55 4E 47 53 5A 45 49 54 52 41 55 4D 22 3A 99 |NUNGSZEITRAUM":.|
00001120: 00 41 19 40 10 99 22 56 4F 4E 20 4D 4F 4E 41 54 |.A.@.."VON MONAT|
00001130: 2E 4A 41 48 52 20 28 4D 4D 2E 4A 4A 29 20 20 22 |.JAHR (MM.JJ) "|
00001140: 3B 00 5B 19 4A 10 99 22 20 12 20 20 92 2E 12 20 |;.[.J.." . ... |
00001150: 20 92 9D 9D 9D 9D 9D 9D 9D 22 3B 00 7C 19 54 10 | ........";.|.T.|
00001160: 85 41 42 24 3A 8F 20 2A 20 41 42 52 45 43 48 4E |.AB$:. * ABRECHN|
00001170: 55 4E 47 53 42 45 47 49 4E 4E 20 2A 00 8E 19 56 |UNGSBEGINN *...V|
00001180: 10 44 24 B2 41 42 24 3A 8D 20 39 30 30 30 00 A0 |.D$.AB$:. 9000..|
00001190: 19 59 10 8B 20 45 52 B2 31 20 A7 20 34 31 33 30 |.Y.. ER.1 . 4130|
000011A0: 00 C2 19 5E 10 99 22 11 42 49 53 20 45 49 4E 53 |...^..".BIS EINS|
000011B0: 43 48 4C 2E 20 20 20 28 4D 4D 2E 4A 4A 29 20 20 |CHL. (MM.JJ) |
000011C0: 22 3B 00 DC 19 68 10 99 22 20 12 20 20 92 2E 12 |";...h.." . ...|
000011D0: 20 20 92 9D 9D 9D 9D 9D 9D 9D 22 3B 00 FD 19 72 | ........";...r|
000011E0: 10 85 41 45 24 3A 8F 20 2A 2A 20 41 42 52 45 43 |..AE$:. ** ABREC|
000011F0: 48 4E 55 4E 47 53 45 4E 44 45 20 2A 2A 00 03 1A |HNUNGSENDE **...|
00001200: 73 10 3A 00 15 1A 74 10 44 24 B2 41 45 24 3A 8D |s.:...t.D$.AE$:.|
00001210: 20 39 30 30 30 00 27 1A 76 10 8B 20 45 52 B2 31 | 9000.'.v.. ER.1|
00001220: 20 A7 20 34 31 33 30 00 42 1A 77 10 44 31 24 B2 | . 4130.B.w.D1$.|
00001230: 41 42 24 3A 44 32 24 B2 41 45 24 3A 8D 20 39 32 |AB$:D2$.AE$:. 92|
00001240: 30 30 00 54 1A 80 10 8B 20 45 52 B2 31 20 A7 20 |00.T.... ER.1 . |
00001250: 34 31 33 30 00 5A 1A 86 10 3A 00 6B 1A 90 10 3A |4130.Z...:.k...:|
00001260: 20 20 20 20 20 20 20 20 20 20 8E 00 71 1A 9A 10 | ..q...|
00001270: 3A 00 77 1A A4 10 3A 00 9C 1A 88 13 8F 20 2A 2A |:.w...:...... **|
00001280: 2A 2A 2A 20 44 41 54 45 4E 53 50 45 49 43 48 45 |*** DATENSPEICHE|
00001290: 52 55 4E 47 20 2A 2A 2A 2A 2A 2A 2A 00 A2 1A 92 |RUNG *******....|
000012A0: 13 3A 00 CE 1A 9C 13 8B 20 41 4B 25 B2 30 20 AF |.:...... AK%.0 .|
000012B0: 20 5A 54 B2 30 20 AF 20 41 42 24 B2 22 22 20 AF | ZT.0 . AB$."" .|
000012C0: 20 41 45 24 B2 22 22 20 A7 20 35 31 39 30 00 D4 | AE$."" . 5190..|
000012D0: 1A B0 13 3A 00 EF 1A B5 13 99 22 93 11 12 44 41 |...:......"...DA|
000012E0: 54 45 4E 53 50 45 49 43 48 45 52 55 4E 47 22 00 |TENSPEICHERUNG".|
000012F0: 0E 1B B6 13 99 22 11 11 44 41 54 45 4E 20 57 45 |....."..DATEN WE|
00001300: 52 44 45 4E 20 41 42 47 45 4C 45 47 54 22 00 14 |RDEN ABGELEGT"..|
00001310: 1B B7 13 3A 00 2F 1B B9 13 9F 20 32 2C 38 2C 31 |...:./.... 2,8,1|
00001320: 35 2C 22 53 3A 47 41 53 2D 44 41 54 45 4E 22 00 |5,"S:GAS-DATEN".|
00001330: 37 1B BA 13 A0 20 32 00 53 1B BC 13 9F 20 31 2C |7.... 2.S.... 1,|
00001340: 38 2C 34 2C 22 47 41 53 2D 44 41 54 45 4E 2C 53 |8,4,"GAS-DATEN,S|
00001350: 2C 57 22 00 59 1B C4 13 3A 00 6D 1B CE 13 98 31 |,W".Y...:.m....1|
00001360: 2C 41 42 24 3A 20 20 98 31 2C 41 45 24 00 83 1B |,AB$: .1,AE$...|
00001370: D3 13 98 31 2C 5A 54 28 30 29 3A 98 31 2C 5A 54 |...1,ZT(0):.1,ZT|
00001380: 28 31 29 00 8D 1B D8 13 98 31 2C 5A 54 00 98 1B |(1)......1,ZT...|
00001390: DD 13 98 31 2C 41 4B 25 00 9E 1B E2 13 3A 00 B8 |...1,AK%.....:..|
000013A0: 1B EC 13 3A 20 20 20 20 20 20 20 20 20 81 20 49 |...: . I|
000013B0: B2 31 20 A4 20 41 4B 25 00 BE 1B F6 13 3A 00 CB |.1 . AK%.....:..|
000013C0: 1B 00 14 98 31 2C 50 54 28 49 29 00 E1 1B 05 14 |....1,PT(I).....|
000013D0: 98 31 2C 47 50 28 49 29 3A 98 31 2C 41 41 28 49 |.1,GP(I):.1,AA(I|
000013E0: 29 00 F8 1B 0A 14 98 31 2C 4D 57 28 49 29 3A 98 |)......1,MW(I):.|
000013F0: 31 2C 47 4B 24 28 49 29 00 FE 1B 14 14 3A 00 10 |1,GK$(I).....:..|
00001400: 1C 1E 14 3A 20 20 20 20 20 20 20 20 20 82 20 49 |...: . I|
00001410: 00 16 1C 28 14 3A 00 1E 1C 32 14 A0 20 31 00 24 |...(.:...2.. 1.$|
00001420: 1C 3C 14 3A 00 34 1C 46 14 3A 20 20 20 20 20 20 |.<.:.4.F.: |
00001430: 20 20 20 8E 00 3A 1C 50 14 3A 00 40 1C 5A 14 3A | ..:.P.:.@.Z.:|
00001440: 00 63 1C 70 17 8F 20 2A 2A 2A 2A 2A 2A 20 47 41 |.c.p.. ****** GA|
00001450: 53 44 41 54 45 4E 20 4C 41 44 45 4E 20 2A 2A 2A |SDATEN LADEN ***|
00001460: 2A 2A 2A 00 69 1C 7A 17 3A 00 82 1C 7C 17 99 22 |***.i.z.:...|.."|
00001470: 93 11 12 47 41 53 44 41 54 45 4E 20 4C 41 44 45 |...GASDATEN LADE|
00001480: 4E 22 00 A3 1C 7D 17 99 22 11 11 44 41 54 45 4E |N"...}.."..DATEN|
00001490: 20 57 45 52 44 45 4E 20 45 49 4E 47 45 4C 45 53 | WERDEN EINGELES|
000014A0: 45 4E 22 00 A9 1C 7F 17 3A 00 C5 1C 84 17 9F 20 |EN".....:...... |
000014B0: 31 2C 38 2C 34 2C 22 47 41 53 2D 44 41 54 45 4E |1,8,4,"GAS-DATEN|
000014C0: 2C 53 2C 52 22 00 CB 1C 8E 17 3A 00 DD 1C 98 17 |,S,R".....:.....|
000014D0: 84 31 2C 41 42 24 3A 84 31 2C 41 45 24 00 F3 1C |.1,AB$:.1,AE$...|
000014E0: 9D 17 84 31 2C 5A 54 28 30 29 3A 84 31 2C 5A 54 |...1,ZT(0):.1,ZT|
000014F0: 28 31 29 00 FD 1C A2 17 84 31 2C 5A 54 00 08 1D |(1)......1,ZT...|
00001500: AC 17 84 31 2C 41 4B 25 00 0E 1D B6 17 3A 00 28 |...1,AK%.....:.(|
00001510: 1D C0 17 3A 20 20 20 20 20 20 20 20 20 81 20 49 |...: . I|
00001520: B2 31 20 A4 20 41 4B 25 00 2E 1D CA 17 3A 00 3B |.1 . AK%.....:.;|
00001530: 1D D4 17 84 31 2C 50 54 28 49 29 00 51 1D D6 17 |....1,PT(I).Q...|
00001540: 84 31 2C 47 50 28 49 29 3A 84 31 2C 41 41 28 49 |.1,GP(I):.1,AA(I|
00001550: 29 00 68 1D DE 17 84 31 2C 4D 57 28 49 29 3A 84 |).h....1,MW(I):.|
00001560: 31 2C 47 4B 24 28 49 29 00 6E 1D E8 17 3A 00 80 |1,GK$(I).n...:..|
00001570: 1D F2 17 3A 20 20 20 20 20 20 20 20 20 82 20 49 |...: . I|
00001580: 00 86 1D FC 17 3A 00 8E 1D 06 18 A0 20 31 00 9E |.....:...... 1..|
00001590: 1D 10 18 3A 20 20 20 20 20 20 20 20 20 8E 00 A4 |...: ...|
000015A0: 1D 1A 18 3A 00 AA 1D 24 18 3A 00 CF 1D 58 1B 8F |...:...$.:...X..|
000015B0: 20 2A 2A 2A 2A 2A 2A 2A 20 49 4E 46 4F 52 4D 41 | ******* INFORMA|
000015C0: 54 49 4F 4E 45 4E 20 2A 2A 2A 2A 2A 2A 2A 2A 00 |TIONEN ********.|
000015D0: D5 1D 62 1B 3A 00 E2 1D 67 1B 99 22 93 22 A3 36 |..b.:...g..".".6|
000015E0: 29 3B 00 05 1E 6C 1B 99 22 20 12 49 20 4E 20 46 |);...l.." .I N F|
000015F0: 20 4F 20 52 20 4D 20 41 20 54 20 49 20 4F 20 4E | O R M A T I O N|
00001600: 20 45 20 4E 22 00 23 1E 76 1B 99 A3 36 29 22 11 | E N".#.v...6)".|
00001610: 20 5A 55 4D 20 50 47 4D 20 47 41 53 4B 4F 53 54 | ZUM PGM GASKOST|
00001620: 45 4E 22 00 29 1E 7B 1B 99 00 52 1E 80 1B 99 22 |EN".).{...R...."|
00001630: 20 44 49 45 53 45 53 20 50 47 4D 20 53 4F 4C 4C | DIESES PGM SOLL|
00001640: 20 49 48 52 45 20 47 41 53 52 45 43 48 4E 55 4E | IHRE GASRECHNUN|
00001650: 47 22 00 7D 1E 94 1B 99 22 20 4B 4F 4E 54 52 4F |G".}...." KONTRO|
00001660: 4C 4C 49 45 52 42 41 52 20 55 4E 44 20 56 45 52 |LLIERBAR UND VER|
00001670: 53 54 41 45 4E 44 4C 49 43 48 45 52 22 00 8F 1E |STAENDLICHER"...|
00001680: A8 1B 99 22 20 4D 41 43 48 45 4E 2E 22 3A 99 00 |..." MACHEN.":..|
00001690: A8 1E AD 1B 99 22 20 12 44 41 54 45 4E 45 49 4E |....." .DATENEIN|
000016A0: 47 41 42 45 4E 22 3A 99 00 D9 1E B2 1B 99 22 20 |GABEN":......." |
000016B0: 5A 55 45 52 53 54 20 47 45 42 45 4E 20 53 49 45 |ZUERST GEBEN SIE|
000016C0: 20 44 49 45 20 5A 41 45 48 4C 45 52 53 54 41 45 | DIE ZAEHLERSTAE|
000016D0: 4E 44 45 20 45 49 4E 22 3B 00 06 1F EE 1B 99 22 |NDE EIN";......"|
000016E0: 20 44 45 4E 20 55 4D 52 45 43 48 4E 55 4E 47 53 | DEN UMRECHNUNGS|
000016F0: 46 41 4B 54 4F 52 2C 20 41 42 48 41 45 4E 47 49 |FAKTOR, ABHAENGI|
00001700: 47 20 56 4F 4D 22 00 31 1F F3 1B 99 22 20 42 52 |G VOM".1...." BR|
00001710: 45 4E 4E 57 45 52 54 20 44 45 53 20 47 41 53 45 |ENNWERT DES GASE|
00001720: 53 2C 20 45 4E 54 4E 45 48 4D 45 4E 20 53 49 45 |S, ENTNEHMEN SIE|
00001730: 22 00 4C 1F F5 1B 99 22 20 49 48 52 45 52 20 47 |".L...." IHRER G|
00001740: 41 53 52 45 43 48 4E 55 4E 47 2E 22 00 76 1F F8 |ASRECHNUNG.".v..|
00001750: 1B 99 22 20 57 45 49 54 45 52 48 49 4E 20 57 45 |.." WEITERHIN WE|
00001760: 52 44 45 4E 20 44 49 45 20 4B 4F 53 54 45 4E 44 |RDEN DIE KOSTEND|
00001770: 41 54 45 4E 20 22 00 89 1F 02 1C 99 22 20 47 45 |ATEN "......" GE|
00001780: 42 52 41 55 43 48 54 2E 22 00 B2 1F 0C 1C 99 22 |BRAUCHT."......"|
00001790: 20 55 4E 54 45 52 20 47 52 55 4E 44 50 52 45 49 | UNTER GRUNDPREI|
000017A0: 53 20 57 49 52 44 20 48 49 45 52 20 41 55 43 48 |S WIRD HIER AUCH|
000017B0: 20 22 00 E1 1F 20 1C 99 22 20 42 45 52 45 49 54 | "... .." BEREIT|
000017C0: 53 54 45 4C 4C 55 4E 47 53 2D 20 55 4E 44 20 56 |STELLUNGS- UND V|
000017D0: 45 52 52 45 43 48 4E 55 4E 47 53 50 52 45 49 53 |ERRECHNUNGSPREIS|
000017E0: 22 00 FB 1F 34 1C 99 22 20 4D 49 54 20 45 49 4E |"...4.." MIT EIN|
000017F0: 42 45 5A 4F 47 45 4E 2E 22 3A 99 00 2C 20 3E 1C |BEZOGEN.":.., >.|
00001800: 99 22 20 53 43 48 4C 49 45 53 53 4C 49 43 48 20 |." SCHLIESSLICH |
00001810: 4D 55 53 53 20 4E 4F 43 48 20 44 45 52 20 41 42 |MUSS NOCH DER AB|
00001820: 52 45 43 48 4E 55 4E 47 53 2D 22 3B 00 4F 20 52 |RECHNUNGS-";.O R|
00001830: 1C 99 22 20 5A 45 49 54 52 41 55 4D 20 41 4E 47 |.." ZEITRAUM ANG|
00001840: 45 47 45 42 45 4E 20 57 45 52 44 45 4E 2E 22 00 |EGEBEN WERDEN.".|
00001850: 55 20 5C 1C 3A 00 66 20 66 1C 3A 20 20 20 99 3A |U \.:.f f.: .:|
00001860: 8D 20 39 39 30 30 00 6C 20 70 1C 3A 00 89 20 7A |. 9900.l p.:.. z|
00001870: 1C 99 22 93 20 12 49 20 4E 20 46 20 4F 20 20 20 |..". .I N F O |
00001880: 47 41 53 44 41 54 45 4E 22 00 B3 20 7B 1C 99 22 |GASDATEN".. {.."|
00001890: 11 20 44 45 52 20 4D 41 58 49 4D 41 4C 45 20 41 |. DER MAXIMALE A|
000018A0: 42 52 45 43 48 4E 55 4E 47 53 5A 45 49 54 52 41 |BRECHNUNGSZEITRA|
000018B0: 55 4D 22 00 CF 20 7D 1C 99 22 20 42 45 54 52 41 |UM".. }.." BETRA|
000018C0: 45 47 54 20 31 32 20 4D 4F 4E 41 54 45 2E 22 00 |EGT 12 MONATE.".|
000018D0: ED 20 7F 1C 99 22 11 20 12 53 50 45 49 43 48 45 |. ...". .SPEICHE|
000018E0: 52 4E 20 55 4E 44 20 4C 41 44 45 4E 22 00 1D 21 |RN UND LADEN"..!|
000018F0: 84 1C 99 3A 99 22 20 57 45 49 54 45 52 48 49 4E |...:." WEITERHIN|
00001900: 20 4B 4F 45 4E 4E 45 4E 20 53 49 45 20 45 49 4E | KOENNEN SIE EIN|
00001910: 45 20 41 42 52 45 43 48 4E 55 4E 47 22 00 4B 21 |E ABRECHNUNG".K!|
00001920: 98 1C 99 22 20 53 50 45 49 43 48 45 52 4E 2C 20 |..." SPEICHERN, |
00001930: 57 45 4E 4E 20 41 4C 4C 45 20 44 41 54 45 4E 20 |WENN ALLE DATEN |
00001940: 45 49 4E 47 45 47 45 42 45 4E 22 00 5B 21 AC 1C |EINGEGEBEN".[!..|
00001950: 99 22 20 57 55 52 44 45 4E 2E 22 00 87 21 B6 1C |." WURDEN."..!..|
00001960: 99 22 20 44 49 45 53 45 20 4B 41 4E 4E 20 41 55 |." DIESE KANN AU|
00001970: 43 48 20 57 49 45 44 45 52 20 56 4F 4E 20 44 49 |CH WIEDER VON DI|
00001980: 53 4B 45 54 54 45 22 00 9F 21 C0 1C 99 22 20 47 |SKETTE"..!..." G|
00001990: 45 4C 41 44 45 4E 20 57 45 52 44 45 4E 2E 22 00 |ELADEN WERDEN.".|
000019A0: C9 21 CA 1C 99 22 20 42 45 49 20 4E 45 55 53 50 |.!..." BEI NEUSP|
000019B0: 45 49 43 48 45 52 55 4E 47 20 57 49 52 44 20 44 |EICHERUNG WIRD D|
000019C0: 49 45 20 5A 55 56 4F 52 22 00 F4 21 DE 1C 99 22 |IE ZUVOR"..!..."|
000019D0: 20 47 45 53 50 45 49 43 48 45 52 54 45 20 41 42 | GESPEICHERTE AB|
000019E0: 52 45 43 48 4E 55 4E 47 20 47 45 4C 4F 45 53 43 |RECHNUNG GELOESC|
000019F0: 48 54 2E 22 00 14 22 F2 1C 99 22 11 20 12 42 45 |HT.".."...". .BE|
00001A00: 52 45 43 48 4E 55 4E 47 53 47 52 55 4E 44 4C 41 |RECHNUNGSGRUNDLA|
00001A10: 47 45 4E 22 00 43 22 FC 1C 99 22 11 20 44 41 20 |GEN".C"...". DA |
00001A20: 4E 55 52 20 4E 4F 43 48 20 45 49 4E 4D 41 4C 20 |NUR NOCH EINMAL |
00001A30: 50 52 4F 20 4A 41 48 52 20 41 42 47 45 4C 45 53 |PRO JAHR ABGELES|
00001A40: 45 4E 22 00 72 22 10 1D 99 22 20 57 49 52 44 2C |EN".r"..." WIRD,|
00001A50: 20 4D 55 53 53 20 4D 41 4E 20 44 49 45 20 5A 57 | MUSS MAN DIE ZW|
00001A60: 49 53 43 48 45 4E 53 54 41 45 4E 44 45 20 42 45 |ISCHENSTAENDE BE|
00001A70: 49 22 00 96 22 24 1D 99 22 20 54 41 52 49 46 41 |I".."$.." TARIFA|
00001A80: 45 4E 44 45 52 55 4E 47 45 4E 20 53 43 48 41 45 |ENDERUNGEN SCHAE|
00001A90: 54 5A 45 4E 2E 22 00 9C 22 2E 1D 3A 00 B0 22 38 |TZEN.".."..:.."8|
00001AA0: 1D 3A 20 20 20 20 20 20 99 3A 8D 20 39 39 30 30 |.: .:. 9900|
00001AB0: 00 B6 22 42 1D 3A 00 D3 22 4C 1D 99 22 93 20 12 |.."B.:.."L..". .|
00001AC0: 49 20 4E 20 46 20 4F 20 20 20 47 41 53 44 41 54 |I N F O GASDAT|
00001AD0: 45 4E 22 00 01 23 56 1D 99 22 11 20 44 41 5A 55 |EN"..#V..". DAZU|
00001AE0: 20 57 49 52 44 20 48 49 45 52 20 44 45 52 20 56 | WIRD HIER DER V|
00001AF0: 45 52 42 52 41 55 43 48 20 41 55 46 20 44 49 45 |ERBRAUCH AUF DIE|
00001B00: 22 00 2E 23 6A 1D 99 22 20 4D 4F 4E 41 54 45 20 |"..#j.." MONATE |
00001B10: 44 45 52 20 41 42 52 45 43 48 4E 55 4E 47 20 56 |DER ABRECHNUNG V|
00001B20: 45 52 54 45 49 4C 54 20 55 4E 54 45 52 22 00 58 |ERTEILT UNTER".X|
00001B30: 23 7E 1D 99 22 20 42 45 41 43 48 54 55 4E 47 20 |#~.." BEACHTUNG |
00001B40: 44 45 53 20 48 4F 45 48 45 52 45 4E 20 56 45 52 |DES HOEHEREN VER|
00001B50: 42 52 41 55 43 48 53 22 00 86 23 92 1D 99 22 20 |BRAUCHS"..#..." |
00001B60: 49 4E 20 44 45 4E 20 57 49 4E 54 45 52 2D 20 55 |IN DEN WINTER- U|
00001B70: 4E 44 20 55 45 42 45 52 47 41 4E 47 53 4D 4F 4E |ND UEBERGANGSMON|
00001B80: 41 54 45 4E 2E 22 00 B2 23 A6 1D 99 22 11 20 42 |ATEN."..#...". B|
00001B90: 45 49 4D 20 45 52 52 45 43 48 4E 45 4E 20 44 45 |EIM ERRECHNEN DE|
00001BA0: 52 20 4D 4F 4E 41 54 53 45 4E 44 50 52 45 49 53 |R MONATSENDPREIS|
00001BB0: 45 22 00 DE 23 BA 1D 99 22 20 57 49 52 44 20 4E |E"..#..." WIRD N|
00001BC0: 41 43 48 20 41 44 44 49 54 49 4F 4E 20 44 45 52 |ACH ADDITION DER|
00001BD0: 20 53 4F 4E 44 45 52 41 42 47 41 42 45 22 00 07 | SONDERABGABE"..|
00001BE0: 24 CE 1D 99 22 20 44 49 45 20 4D 45 48 52 57 45 |$..." DIE MEHRWE|
00001BF0: 52 54 53 54 45 55 45 52 20 5A 55 47 45 53 43 48 |RTSTEUER ZUGESCH|
00001C00: 4C 41 47 45 4E 2E 22 00 2F 24 E2 1D 99 22 11 20 |LAGEN."./$...". |
00001C10: 42 45 49 20 47 52 4F 45 53 53 45 52 45 4E 20 55 |BEI GROESSEREN U|
00001C20: 4E 53 54 49 4D 4D 49 47 4B 45 49 54 45 4E 22 00 |NSTIMMIGKEITEN".|
00001C30: 58 24 F6 1D 99 22 20 53 50 52 45 43 48 45 4E 20 |X$..." SPRECHEN |
00001C40: 53 49 45 20 41 4D 20 42 45 53 54 45 4E 20 4D 49 |SIE AM BESTEN MI|
00001C50: 54 20 49 48 52 45 4E 22 00 6D 24 0A 1E 99 22 20 |T IHREN".m$..." |
00001C60: 53 54 41 44 54 57 45 52 4B 45 4E 21 22 00 73 24 |STADTWERKEN!".s$|
00001C70: 14 1E 3A 00 86 24 1E 1E 3A 20 20 20 20 20 99 3A |..:..$..: .:|
00001C80: 8D 20 39 39 30 30 00 8C 24 28 1E 3A 00 98 24 32 |. 9900..$(.:..$2|
00001C90: 1E 3A 20 20 20 20 20 8E 00 9E 24 3C 1E 3A 00 A4 |.: ...$<.:..|
00001CA0: 24 46 1E 3A 00 AA 24 DC 1E 80 00 CF 24 40 1F 8F |$F.:..$.....$@..|
00001CB0: 20 2A 2A 2A 2A 2A 2A 20 44 41 54 45 4E 2D 41 55 | ****** DATEN-AU|
00001CC0: 53 47 41 42 45 20 20 2A 2A 2A 2A 2A 2A 2A 2A 00 |SGABE ********.|
00001CD0: D5 24 4A 1F 3A 00 F2 24 54 1F 99 22 93 22 A3 31 |.$J.:..$T..".".1|
00001CE0: 30 29 22 12 44 41 54 45 4E 2D 41 55 53 47 41 42 |0)".DATEN-AUSGAB|
00001CF0: 45 22 00 FA 24 5E 1F 99 3A 99 00 00 25 63 1F 3A |E"..$^..:...%c.:|
00001D00: 00 08 25 65 1F 5A B2 30 00 1C 25 68 1F 8B 20 41 |..%e.Z.0..%h.. A|
00001D10: 4B 25 B2 30 20 A7 20 5A B2 5A AA 31 00 38 25 72 |K%.0 . Z.Z.1.8%r|
00001D20: 1F 8B 20 5A 54 B2 30 20 20 20 20 20 20 20 20 20 |.. ZT.0 |
00001D30: 20 A7 20 5A B2 5A AA 31 00 56 25 7C 1F 8B 20 41 | . Z.Z.1.V%|.. A|
00001D40: 42 24 B2 22 22 20 B0 20 41 45 24 B2 22 22 20 A7 |B$."" . AE$."" .|
00001D50: 20 5A B2 5A AA 31 00 67 25 81 1F 8B 20 5A B2 33 | Z.Z.1.g%... Z.3|
00001D60: 20 A7 20 38 34 30 30 00 6D 25 86 1F 3A 00 89 25 | . 8400.m%..:..%|
00001D70: 90 1F 99 22 41 42 52 45 43 48 4E 55 4E 47 53 42 |..."ABRECHNUNGSB|
00001D80: 45 47 49 4E 4E 20 20 22 3B 00 A5 25 9A 1F 8B 20 |EGINN ";..%... |
00001D90: 41 42 24 B2 22 22 20 A7 20 99 20 22 3F 22 3A 89 |AB$."" . . "?":.|
00001DA0: 20 38 31 31 30 00 AF 25 A4 1F 99 20 41 42 24 00 | 8110..%... AB$.|
00001DB0: CD 25 AE 1F 99 3A 99 22 41 42 52 45 43 48 4E 55 |.%...:."ABRECHNU|
00001DC0: 4E 47 53 45 4E 44 45 20 20 20 20 22 3B 00 E9 25 |NGSENDE ";..%|
00001DD0: B8 1F 8B 20 41 45 24 B2 22 22 20 A7 20 99 20 22 |... AE$."" . . "|
00001DE0: 3F 22 3A 89 20 38 31 34 30 00 F3 25 C2 1F 99 20 |?":. 8140..%... |
00001DF0: 41 45 24 00 FB 25 CC 1F 99 3A 99 00 1B 26 D6 1F |AE$..%...:...&..|
00001E00: 99 22 5A 41 45 48 4C 45 52 20 20 20 20 20 20 20 |."ZAEHLER |
00001E10: 28 41 4C 54 29 22 5A 54 28 30 29 00 21 26 DB 1F |(ALT)"ZT(0).!&..|
00001E20: 99 00 41 26 E0 1F 99 22 5A 41 45 48 4C 45 52 20 |..A&..."ZAEHLER |
00001E30: 20 20 20 20 20 20 28 4E 45 55 29 22 5A 54 28 31 | (NEU)"ZT(1|
00001E40: 29 00 47 26 E5 1F 99 00 4D 26 EF 1F 99 00 53 26 |).G&....M&....S&|
00001E50: F9 1F 99 00 59 26 FE 1F 99 00 5F 26 08 20 3A 00 |....Y&...._&. :.|
00001E60: 72 26 12 20 3A 20 20 20 20 20 99 3A 8D 20 39 39 |r&. : .:. 99|
00001E70: 30 30 00 78 26 1C 20 3A 00 95 26 26 20 99 22 93 |00.x&. :..&& .".|
00001E80: 22 A3 31 30 29 22 12 44 41 54 45 4E 2D 41 55 53 |".10)".DATEN-AUS|
00001E90: 47 41 42 45 22 00 B0 26 30 20 99 22 11 22 A3 31 |GABE"..&0 .".".1|
00001EA0: 30 29 22 4B 4F 53 54 45 4E 53 41 45 54 5A 45 22 |0)"KOSTENSAETZE"|
00001EB0: 00 B8 26 3A 20 99 3A 99 00 CB 26 44 20 8B 20 41 |..&: .:...&D . A|
00001EC0: 4B 25 B2 30 20 A7 20 38 34 30 30 00 D1 26 49 20 |K%.0 . 8400..&I |
00001ED0: 3A 00 E9 26 4E 20 3A 20 20 20 20 20 20 20 81 20 |:..&N : . |
00001EE0: 49 B2 31 20 A4 20 41 4B 25 00 06 27 52 20 99 22 |I.1 . AK%..'R ."|
00001EF0: 93 22 A3 31 30 29 22 12 44 41 54 45 4E 2D 41 55 |.".10)".DATEN-AU|
00001F00: 53 47 41 42 45 22 00 21 27 53 20 99 22 11 22 A3 |SGABE".!'S .".".|
00001F10: 31 30 29 22 4B 4F 53 54 45 4E 53 41 45 54 5A 45 |10)"KOSTENSAETZE|
00001F20: 22 00 29 27 55 20 99 3A 99 00 4D 27 58 20 99 22 |".)'U .:..M'X ."|
00001F30: 50 52 45 49 53 20 50 2E 20 45 49 4E 48 45 49 54 |PREIS P. EINHEIT|
00001F40: 20 20 22 50 54 28 49 29 22 20 50 46 22 00 53 27 | "PT(I)" PF".S'|
00001F50: 5D 20 99 00 59 27 67 20 99 00 7D 27 6C 20 99 22 |] ..Y'g ..}'l ."|
00001F60: 47 52 55 4E 44 50 52 45 49 53 20 50 2E 4D 4F 4E |GRUNDPREIS P.MON|
00001F70: 41 54 22 47 50 28 49 29 22 20 44 4D 22 00 83 27 |AT"GP(I)" DM"..'|
00001F80: 71 20 99 00 A2 27 76 20 99 22 53 4F 4E 44 45 52 |q ...'v ."SONDER|
00001F90: 41 42 47 41 42 45 20 20 22 41 41 28 49 29 22 A0 |ABGABE "AA(I)".|
00001FA0: 25 22 00 A8 27 7B 20 99 00 CB 27 80 20 99 22 4D |%"..'{ ...'. ."M|
00001FB0: 45 48 52 57 45 52 54 53 54 45 55 45 52 20 20 20 |EHRWERTSTEUER |
00001FC0: 20 22 4D 57 28 49 29 22 20 25 22 00 D1 27 85 20 | "MW(I)" %"..'. |
00001FD0: 99 00 F2 27 8A 20 99 22 47 55 45 4C 54 49 47 20 |...'. ."GUELTIG |
00001FE0: 42 49 53 20 4D 4F 4E 41 54 20 20 22 47 4B 24 28 |BIS MONAT "GK$(|
00001FF0: 49 29 00 F8 27 8F 20 99 00 FE 27 94 20 3A 00 10 |I)..'. ...'. :..|
00002000: 28 9E 20 3A 20 20 20 20 99 3A 8D 20 39 39 30 30 |(. : .:. 9900|
00002010: 00 16 28 A8 20 3A 00 26 28 B2 20 3A 20 20 20 20 |..(. :.&(. : |
00002020: 20 20 20 82 20 49 00 2C 28 BC 20 3A 00 37 28 C6 | . I.,(. :.7(.|
00002030: 20 89 20 38 35 30 30 00 3D 28 CB 20 3A 00 45 28 | . 8500.=(. :.E(|
00002040: D0 20 99 3A 99 00 69 28 DA 20 99 22 12 45 53 20 |. .:..i(. .".ES |
00002050: 57 55 52 44 45 4E 20 4E 4F 43 48 20 4B 45 49 4E |WURDEN NOCH KEIN|
00002060: 45 20 44 41 54 45 4E 22 3B 00 7D 28 E4 20 99 22 |E DATEN";.}(. ."|
00002070: 20 45 49 4E 47 45 47 45 42 45 4E 21 22 00 83 28 | EINGEGEBEN!"..(|
00002080: EE 20 3A 00 96 28 F8 20 3A 20 20 20 20 20 99 3A |. :..(. : .:|
00002090: 8D 20 39 39 30 30 00 9C 28 02 21 3A 00 AC 28 34 |. 9900..(.!:..(4|
000020A0: 21 3A 20 20 20 20 20 20 20 20 20 8E 00 B2 28 3E |!: ...(>|
000020B0: 21 3A 00 B8 28 48 21 3A 00 DD 28 28 23 8F 20 2A |!:..(H!:..((#. *|
000020C0: 2A 2A 2A 2A 20 53 55 42 52 4F 55 54 49 4E 45 20 |**** SUBROUTINE |
000020D0: 44 41 54 50 4C 41 55 20 2A 2A 2A 2A 2A 00 E3 28 |DATPLAU *****..(|
000020E0: 32 23 3A 00 F9 28 3C 23 8B 20 C3 28 44 24 29 B3 |2#:..(<#. .(D$).|
000020F0: B1 35 20 A7 20 39 31 30 30 00 15 29 46 23 8B 20 |.5 . 9100..)F#. |
00002100: CA 28 44 24 2C 33 2C 31 29 B3 B1 22 2E 22 20 A7 |.(D$,3,1).."." .|
00002110: 20 39 31 30 30 00 2F 29 50 23 8B 20 C5 28 C8 28 | 9100./)P#. .(.(|
00002120: 44 24 2C 32 29 29 B3 31 20 A7 20 39 31 30 30 00 |D$,2)).1 . 9100.|
00002130: 4A 29 5A 23 8B 20 C5 28 C8 28 44 24 2C 32 29 29 |J)Z#. .(.(D$,2))|
00002140: B1 31 32 20 A7 20 39 31 30 30 00 65 29 64 23 8B |.12 . 9100.e)d#.|
00002150: 20 C5 28 C9 28 44 24 2C 32 29 29 B3 36 30 20 A7 | .(.(D$,2)).60 .|
00002160: 20 39 31 30 30 00 6B 29 6E 23 3A 00 7B 29 78 23 | 9100.k)n#:.{)x#|
00002170: 45 52 B2 30 3A 89 20 39 31 32 30 00 84 29 8C 23 |ER.0:. 9120..).#|
00002180: 45 52 B2 31 00 8A 29 96 23 3A 00 97 29 A0 23 3A |ER.1..).#:..).#:|
00002190: 20 20 20 20 20 20 8E 00 9D 29 AA 23 3A 00 A3 29 | ...).#:..)|
000021A0: B4 23 3A 00 C8 29 F0 23 8F 20 2A 2A 2A 2A 2A 20 |.#:..).#. ***** |
000021B0: 53 55 42 52 4F 55 54 49 4E 45 20 44 41 54 4B 4C |SUBROUTINE DATKL|
000021C0: 45 49 20 2A 2A 2A 2A 2A 00 CE 29 FA 23 3A 00 E1 |EI *****..).#:..|
000021D0: 29 04 24 4A 31 B2 C5 28 C9 28 44 31 24 2C 32 29 |).$J1..(.(D1$,2)|
000021E0: 29 00 F4 29 0E 24 4A 32 B2 C5 28 C9 28 44 32 24 |)..).$J2..(.(D2$|
000021F0: 2C 32 29 29 00 07 2A 18 24 4D 31 B2 C5 28 C8 28 |,2))..*.$M1..(.(|
00002200: 44 31 24 2C 32 29 29 00 1A 2A 22 24 4D 32 B2 C5 |D1$,2))..*"$M2..|
00002210: 28 C8 28 44 32 24 2C 32 29 29 00 20 2A 2C 24 3A |(.(D2$,2)). *,$:|
00002220: 00 32 2A 31 24 8B 20 4A 31 B2 30 20 A7 20 39 33 |.2*1$. J1.0 . 93|
00002230: 30 30 00 45 2A 36 24 8B 20 4A 32 B3 4A 31 20 A7 |00.E*6$. J2.J1 .|
00002240: 20 39 33 31 30 00 5A 2A 3B 24 8B 20 4A 32 AB 4A | 9310.Z*;$. J2.J|
00002250: 31 B1 31 20 A7 20 39 33 31 30 00 76 2A 3D 24 8B |1.1 . 9310.v*=$.|
00002260: 20 4A 31 B3 4A 32 20 AF 20 4D 31 B3 B2 4D 32 20 | J1.J2 . M1..M2 |
00002270: A7 20 39 33 31 30 00 91 2A 40 24 8B 20 4D 32 B3 |. 9310..*@$. M2.|
00002280: 4D 31 20 AF 20 4A 31 B2 4A 32 20 A7 20 39 33 31 |M1 . J1.J2 . 931|
00002290: 30 00 97 2A 4A 24 3A 00 A7 2A 54 24 45 52 B2 30 |0..*J$:..*T$ER.0|
000022A0: 3A 89 20 39 33 33 30 00 B0 2A 5E 24 45 52 B2 31 |:. 9330..*^$ER.1|
000022B0: 00 B6 2A 68 24 3A 00 C4 2A 72 24 3A 20 20 20 20 |..*h$:..*r$: |
000022C0: 20 20 20 8E 00 CA 2A 7C 24 3A 00 D0 2A 86 24 3A | ...*|$:..*.$:|
000022D0: 00 F5 2A B8 24 8F 20 2A 2A 2A 2A 2A 20 53 55 42 |..*.$. ***** SUB|
000022E0: 52 4F 55 54 49 4E 45 20 4B 4F 53 41 54 5A 20 2A |ROUTINE KOSATZ *|
000022F0: 2A 2A 2A 2A 2A 00 FB 2A C2 24 3A 00 04 2B CC 24 |*****..*.$:..+.$|
00002300: 49 49 B2 31 00 0A 2B D6 24 3A 00 21 2B E0 24 4D |II.1..+.$:.!+.$M|
00002310: 4B B2 C5 28 C8 28 47 4B 24 28 49 49 29 2C 32 29 |K..(.(GK$(II),2)|
00002320: 29 00 38 2B EA 24 4A 4B B2 C5 28 C9 28 47 4B 24 |).8+.$JK..(.(GK$|
00002330: 28 49 49 29 2C 32 29 29 00 3E 2B F4 24 3A 00 5A |(II),2)).>+.$:.Z|
00002340: 2B FE 24 8B 20 4A 41 B2 4A 4B 20 AF 20 4D 41 B3 |+.$. JA.JK . MA.|
00002350: B2 4D 4B 20 A7 20 39 35 37 30 00 6D 2B 03 25 8B |.MK . 9570.m+.%.|
00002360: 20 4A 41 B3 4A 4B 20 A7 20 39 35 37 30 00 81 2B | JA.JK . 9570..+|
00002370: 08 25 8B 20 49 49 B2 41 4B 25 20 A7 20 39 35 33 |.%. II.AK% . 953|
00002380: 30 00 87 2B 12 25 3A 00 93 2B 1C 25 49 49 B2 49 |0..+.%:..+.%II.I|
00002390: 49 AA 31 00 9E 2B 26 25 89 20 39 34 34 30 00 A4 |I.1..+&%. 9440..|
000023A0: 2B 30 25 3A 00 C6 2B 3A 25 99 22 93 11 12 4B 4F |+0%:..+:%."...KO|
000023B0: 53 54 45 4E 53 41 45 54 5A 45 20 55 4E 50 41 53 |STENSAETZE UNPAS|
000023C0: 53 45 4E 44 20 22 00 E6 2B 44 25 99 22 12 5A 55 |SEND "..+D%.".ZU|
000023D0: 20 41 42 52 45 43 48 4E 55 4E 47 53 5A 45 49 54 | ABRECHNUNGSZEIT|
000023E0: 52 41 55 4D 21 22 00 EC 2B 49 25 3A 00 06 2C 4E |RAUM!"..+I%:..,N|
000023F0: 25 3A 20 20 20 20 20 99 3A 8D 20 39 39 30 30 3A |%: .:. 9900:|
00002400: 89 20 39 35 39 30 00 0C 2C 58 25 3A 00 16 2C 62 |. 9590..,X%:..,b|
00002410: 25 4B 53 B2 49 49 00 26 2C 6C 25 45 52 B2 30 3A |%KS.II.&,l%ER.0:|
00002420: 89 20 39 36 30 30 00 2F 2C 76 25 45 52 B2 31 00 |. 9600./,v%ER.1.|
00002430: 35 2C 80 25 3A 00 45 2C 8A 25 3A 20 20 20 20 20 |5,.%:.E,.%: |
00002440: 20 20 20 20 8E 00 4B 2C 94 25 3A 00 51 2C 9E 25 | ..K,.%:.Q,.%|
00002450: 3A 00 76 2C A8 25 8F 20 2A 2A 2A 2A 2A 20 53 55 |:.v,.%. ***** SU|
00002460: 42 52 4F 55 54 49 4E 45 20 41 55 53 44 52 55 43 |BROUTINE AUSDRUC|
00002470: 4B 20 2A 2A 2A 2A 00 7C 2C B2 25 3A 00 93 2C BC |K ****.|,.%:..,.|
00002480: 25 8B 20 4D 41 B3 31 30 20 A7 20 99 20 22 20 22 |%. MA.10 . . " "|
00002490: 4D 41 3B 00 A6 2C C6 25 8B 20 4D 41 B1 39 20 A7 |MA;..,.%. MA.9 .|
000024A0: 20 99 20 4D 41 3B 00 BB 2C D0 25 50 52 24 B2 C4 | . MA;..,.%PR$..|
000024B0: 28 B5 28 56 54 28 4D 41 29 29 29 00 D3 2C DA 25 |(.(VT(MA)))..,.%|
000024C0: 99 20 A3 34 AA 36 AB C3 28 50 52 24 29 29 20 50 |. .4.6..(PR$)) P|
000024D0: 52 24 3B 00 EC 2C F8 25 50 52 24 B2 C4 28 B5 28 |R$;..,.%PR$..(.(|
000024E0: 52 50 AC 31 30 30 29 AD 31 30 30 29 00 F2 2C FD |RP.100).100)..,.|
000024F0: 25 3A 00 00 2D FF 25 3A 20 20 8D 20 39 38 30 30 |%:..-.%: . 9800|
00002500: 00 06 2D 00 26 3A 00 1F 2D 02 26 99 20 A3 31 38 |..-.&:..-.&. .18|
00002510: AA 37 AB C3 28 50 52 24 29 29 20 50 52 24 3B 00 |.7..(PR$)) PR$;.|
00002520: 38 2D 0C 26 50 52 24 B2 C4 28 B5 28 45 50 AC 31 |8-.&PR$..(.(EP.1|
00002530: 30 30 29 AD 31 30 30 29 00 3E 2D 0E 26 3A 00 4C |00).100).>-.&:.L|
00002540: 2D 11 26 3A 20 20 8D 20 39 38 30 30 00 52 2D 13 |-.&: . 9800.R-.|
00002550: 26 3A 00 6A 2D 16 26 99 20 A3 32 38 AA 37 AB C3 |&:.j-.&. .28.7..|
00002560: 28 50 52 24 29 29 20 50 52 24 00 70 2D 20 26 3A |(PR$)) PR$.p- &:|
00002570: 00 80 2D 2A 26 3A 20 20 20 20 20 20 20 20 20 8E |..-*&: .|
00002580: 00 86 2D 34 26 3A 00 8C 2D 3E 26 3A 00 B1 2D 48 |..-4&:..->&:..-H|
00002590: 26 8F 20 2A 2A 20 53 55 42 52 4F 55 54 49 4E 45 |&. ** SUBROUTINE|
000025A0: 20 53 50 41 4C 54 45 4E 44 52 55 43 4B 20 2A 2A | SPALTENDRUCK **|
000025B0: 2A 00 B7 2D 52 26 3A 00 E9 2D 5C 26 8B 20 CA 28 |*..-R&:..-\&. .(|
000025C0: 50 52 24 2C C3 28 50 52 24 29 AB 31 2C 31 29 B2 |PR$,.(PR$).1,1).|
000025D0: 22 2E 22 20 A7 20 20 20 20 20 20 20 20 20 50 52 |"." . PR|
000025E0: 24 B2 50 52 24 AA 22 30 22 00 1E 2E 66 26 8B 20 |$.PR$."0"...f&. |
000025F0: CA 28 50 52 24 2C C3 28 50 52 24 29 AB 32 2C 31 |.(PR$,.(PR$).2,1|
00002600: 29 B3 B1 22 2E 22 20 A7 20 20 20 20 20 20 20 20 |).."." . |
00002610: 20 50 52 24 B2 50 52 24 AA 22 2E 30 30 22 00 24 | PR$.PR$.".00".$|
00002620: 2E 70 26 3A 00 31 2E 7A 26 3A 20 20 20 20 20 20 |.p&:.1.z&: |
00002630: 8E 00 37 2E 84 26 3A 00 3D 2E 8E 26 3A 00 62 2E |..7..&:.=..&:.b.|
00002640: AC 26 8F 20 2A 2A 2A 2A 2A 2A 20 53 55 42 52 4F |.&. ****** SUBRO|
00002650: 55 54 49 4E 45 20 57 45 49 54 45 52 20 2A 2A 2A |UTINE WEITER ***|
00002660: 2A 2A 00 68 2E B6 26 3A 00 84 2E B8 26 99 20 A3 |**.h..&:....&. .|
00002670: 31 30 29 22 3E 3E 3E 3E 3E 20 12 57 92 45 49 54 |10)">>>>> .W.EIT|
00002680: 45 52 22 3B 00 8A 2E BB 26 3A 00 A2 2E C0 26 A1 |ER";....&:....&.|
00002690: 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 39 39 | A$:. A$."" . 99|
000026A0: 32 30 00 A8 2E C5 26 3A 00 BD 2E CA 26 8B 20 41 |20....&:....&. A|
000026B0: 24 B3 B1 22 57 22 20 A7 20 39 39 32 30 00 C3 2E |$.."W" . 9920...|
000026C0: D4 26 3A 00 D4 2E DE 26 3A 20 20 20 20 20 20 20 |.&:....&: |
000026D0: 20 20 20 8E 00 DA 2E E8 26 3A 00 E0 2E F2 26 3A | .....&:....&:|
000026E0: 00 05 2F FC 26 8F 20 2A 2A 2A 2A 2A 2A 20 50 52 |../.&. ****** PR|
000026F0: 4F 47 52 41 4D 4D 2D 45 4E 44 45 20 2A 2A 2A 2A |OGRAMM-ENDE ****|
00002700: 2A 2A 2A 2A 2A 00 2A 2F 06 27 8F 20 2A 2A 2A 2A |*****.*/.'. ****|
00002710: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002720: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 00 00 |**********... |
..&.... ******************************.K
.... * PROGRAMM GASKOSTEN *.P...
. * V 2.1 *...... *
U. SCHWEBINGHAUS *...... *
ERBSCHLOER STR. 115 *...... * 56
00 WUPPERTAL 21 *...$.. *
*.).... *************
*****************./.8.:.5.=.:.;.>.:.A.?.
:.F.L.. ******* VORBEREITUNG *********.L
.V.:...`.. VT(12),VN(12)...J.:...I.:...J
.:...N.. ******* MENUE *******...S.:.X.X
.CD$.".........................".....TT$
."G A S - R E C H N U N G".....TU$."....
...................".>...MP$(1)."INFORMA
TIONEN ".`...MP$(2)."KOSTENDATEN-E
INGABE ".....MP$(3)."ZAEHLERDATEN-EINGAB
E".....MP$(4)."DATUMS-EINGABE ".F..
.MP$(5)."UEBERSICHT DER DATEN".....MP$(6
)."ABRECHNUNG ".....MP$(7)."SPE
ICHERN DER DATEN ".,...MP$(8)."LADEN VON
DATEN ".N...MP$(9)."PROGRAMM-ENDE
".H.... 53280,15:. 53281,15......".
..".5)TT$:. .5)TU$......:....#.. I.1 . 9
:.".".5) MP$(I):.:. I...(.."..WAHL MIT C
URSOR UP UND DOWN UND RETURN";...-.. R.0
. R.1.../..1365...2.. A$:. A$."" .1330.
$.7.. A$."." . .1385.9.<.. A$."." . .140
0.O.A.. A$..G(13) .1330.B.F.. R.9 . ."."
:....K.. R . 7000,1540,2000,4130,8000,23
00,5000,6000:. 1305...P.:.L.U.."......"H
(CD$,(R.1).2).5)".."MP$(R):..R.Z.:..._..
"......"H(CD$,(R.1).2).5)"."MP$(R):....D
.:...I..1375:R.R.1:. R.9 . R.1.*.N..1365
:..0.S.:.L.X..1375:R.R.1:. R.1 . R.9.X.}
..1365:..^...:.D...:...... **** KOSTENDA
TEN-EINGABE *****.....:......"..."..."..
".KOSTENDATEN-EINGABE"...,.....6.."ANZAH
L DER KOSTENSAETZE";AK%...;.....@.. AK%.
12 . 1560...E.:...J.: . I.1 . AK
%...O.:.;.Q.."...KOSTENDATEN-SATZ"I.[.T.
.".PREIS PRO EINHEIT IN PF".G.^.. PT(I).
..|..".GRUNDPREIS PRO MONAT IN DM"......
GP(I)......".SONDERABGABE IN %"...... A
A(I).X....".MEHRWERTSTEUER IN %"...... M
W(I)......".DATEN GUELTIG BIS EINSCHL.";
.$.B.." . ... ........";.1.L.. GK$(I
).F.M.D$.GK$(I):. 9000.X.N.. ER.1 . 1720
.{.O.D1$.GK$(I.1):D2$.GK$(I):. 9200...P.
. ER.1 . 1720...Q.:...R.."...K.ORREKTUR
ODER .W.EITER?"...S.:.U.V.. A$:. A$."" .
1750.....:...... A$."K". 1617...... A$.
"W". 1800.....:...... 1750.....:.*...:
. I.0...:.:...: ..@.&.:.F.0.:.K
.P.. **** ZAEHLERDATEN-EINGABE ****.Q.Z.
:......"....ZAEHLERDATEN-EINGABE".....:.
.....".ALTER ZAEHLERSTAND:".Q....".ZAEHL
ER IN KUBIKMETER"... .. ZT(0)...*.:...4.
."..NEUER ZAEHLERSTAND:"...R..".ZAEHLER
IN KUBIKMETER".*.\.. ZT(1).F.].."..UMREC
HNUNGS-FAKTOR".O.^.. UF.B.A.ZT.ZT(1).ZT(
0).|.B.. ZT.0 . ZT.ZT.100000...D.ZT.ZT.U
F...F.:...P.."..K.ORREKTUR ODER .M.ENUE?
"...U.:.O.Z.. A$:. A$."" . 2170.U...:...
... A$."K" . 2020...... A$."M" . 2250...
..:...... 2170.....:.%.J.: ..+.
T.:.1...:.V.... ******** ABRECHNUNG ****
******.\...:.O.... AK%.0 . 3280...... ZT
.0 . 3280...$.. AB$."" . AE$."" . 3280.
....:.....:......".";.T.....8)"GASKOSTEN
-ABRECHNUNG".......8)"..................
...."...... .5)"VON "AB$;."...." BIS EIN
SCHL. "AE$.*....:..N...K$."MONAT VERBRAU
CH ROHPREIS".E.D.K$.K$." ENDPREIS".N.
N.. K$...X.K$.".........................
.".....K$.K$."...........".A...."
".J.... K$.P...:.V...:.....A.E(H
(AB$,2)).....E.E(H(AE$,2))...(.I.A:DV.0.
..-.:.).2.. I.12 . I.1 . DV.DV.15.F.<..
I.10 . I.11 . DV.DV.10.A.F.. I.2 . I.3 .
DV.DV.10.|.P.. I.3 . I.10 . DV.DV.5...U
.:...Z.. I.E . 2700...D.I.I.1...N.. I.12
. I.I.12...X.. 2610.B...:.Q.... I.1 . 1
2.W...:... .: VT(I).0.....:.....:....
.. I...H.:...R.: I.A.....:.>..
.. I.12 . I.1 . VT(I).ZT.DV.15.A.... I.1
0 . I.11 . VT(I).ZT.DV.10...... I.2 . I.
3 . VT(I).ZT.DV.10...... I.3 . I.10 . VT
(I).ZT.DV.5...".:...,.. I.E . 2920...6.:
.V.@.: I.I.1...J.: .
I.12 . I.I.12...T.. 2790...^.:.$.H.. EI
GENTLICHE ABRECHNUNG.*.R.:.<.|.:
I.A.J...SR.0:SE.0.G...: JA.E(I(
AB$,2)).P...MA.I...... MA.12 . MA.MA.12:
JA.JA.1...... 9400:. KOSATZ...... ER.1 .
3280...B.:.P.V.RP.VT(MA).PT(KS).....RP.
RP.100.GP(KS).....SR.SR.RP.....EP.RP.AA(
KS).RP.100."...EP.EP.MW(KS).EP.100./...S
E.SE.EP.5...:.C...: . 9640.I...:.O...:.
K...: . MA.E . 3140..&.:
I.I.1...0.: . 2947...:.:...D..
SCHLUSSZEILEN DRUCKEN...N.:.E.X.. K$.S.
B.PR$.D(ZT)...L.. .4.6.C(PR$)) PR$;...}.
PR$.D(.(SR.100).100).....:.....: . 980
0.....:.8.... .18.7.C(PR$)) PR$;.Q...PR$
.D(.(SE.100).100).W...:.F...: . 9800.L
...:...... .28.7.C(PR$)) PR$...... .28)"
=======":.. ...:.....: . 9900.....:.J.
P.: ..P.Z.:.V...:...".. ***
** ABRECHNUNGSZEITRAUM ****...,.:. .6.."
..ABRECHNUNGSZEITRAUM":..A.@.."VON MONAT
.JAHR (MM.JJ) ";.[.J.." . ... .......
.";.|.T..AB$:. * ABRECHNUNGSBEGINN *...V
.D$.AB$:. 9000. .Y.. ER.1 . 4130.B.^..".
BIS EINSCHL. (MM.JJ) ";...H.." . ...
........";...R..AE$:. ** ABRECHNUNGSEN
DE **...S.:...T.D$.AE$:. 9000.'.V.. ER.1
. 4130.B.W.D1$.AB$:D2$.AE$:. 9200.T....
ER.1 . 4130.Z...:.K...: ..Q...
:.W...:...... ***** DATENSPEICHERUNG ***
****.....:.N.... AK%.0 . ZT.0 . AB$."" .
AE$."" . 5190.T...:......"...DATENSPEIC
HERUNG"......"..DATEN WERDEN ABGELEGT"..
...:./.... 2,8,15,"S:GAS-DATEN".7... 2.
S.... 1,8,4,"GAS-DATEN,S,W".Y.D.:.M.N..1
,AB$: .1,AE$...S..1,ZT(0):.1,ZT(1)...X.
.1,ZT......1,AK%.....:.....: . I
.1 . AK%.....:.K....1,PT(I)......1,GP(I)
:.1,AA(I)......1,MW(I):.1,GK$(I).....:..
...: . I...(.:...2. 1.$.<.:.4.F
.: ..:.P.:.@.Z.:.C.P.. ****** GA
SDATEN LADEN ******.I.Z.:...|.."...GASDA
TEN LADEN"...}.."..DATEN WERDEN EINGELES
EN"....:.E.... 1,8,4,"GAS-DATEN,S,R".K.
..:......1,AB$:.1,AE$......1,ZT(0):.1,ZT
(1)......1,ZT......1,AK%.....:.(...:
. I.1 . AK%...J.:.;.T..1,PT(I).Q.V.
.1,GP(I):.1,AA(I).H....1,MW(I):.1,GK$(I)
.N...:.....: . I.....:..... 1..
...: ......:...$.:.O.X.. *******
INFORMATIONEN ********.U.B.:...G..".".6
);...L.." .I N F O R M A T I O N E N".#.
V...6)". ZUM PGM GASKOSTEN".).{...R...."
DIESES PGM SOLL IHRE GASRECHNUNG".}....
" KONTROLLIERBAR UND VERSTAENDLICHER"...
..." MACHEN.":......." .DATENEINGABEN":.
.Y...." ZUERST GEBEN SIE DIE ZAEHLERSTAE
NDE EIN";......" DEN UMRECHNUNGSFAKTOR,
ABHAENGIG VOM".1...." BRENNWERT DES GASE
S, ENTNEHMEN SIE".L...." IHRER GASRECHNU
NG.".V...." WEITERHIN WERDEN DIE KOSTEND
ATEN "......" GEBRAUCHT."......" UNTER G
RUNDPREIS WIRD HIER AUCH "... .." BEREIT
STELLUNGS- UND VERRECHNUNGSPREIS"...4.."
MIT EINBEZOGEN.":.., >.." SCHLIESSLICH
MUSS NOCH DER ABRECHNUNGS-";.O R.." ZEIT
RAUM ANGEGEBEN WERDEN.".U \.:.F F.: .:
. 9900.L P.:.. Z..". .I N F O GASDATEN
".. {..". DER MAXIMALE ABRECHNUNGSZEITRA
UM".O }.." BETRAEGT 12 MONATE.".. ..".
.SPEICHERN UND LADEN"..!...:." WEITERHIN
KOENNEN SIE EINE ABRECHNUNG".K!..." SPE
ICHERN, WENN ALLE DATEN EINGEGEBEN".[!..
." WURDEN."..!..." DIESE KANN AUCH WIEDE
R VON DISKETTE"..!..." GELADEN WERDEN.".
I!J.." BEI NEUSPEICHERUNG WIRD DIE ZUVOR
"..!..." GESPEICHERTE ABRECHNUNG GELOESC
HT.".."...". .BERECHNUNGSGRUNDLAGEN".C".
..". DA NUR NOCH EINMAL PRO JAHR ABGELES
EN".R"..." WIRD, MUSS MAN DIE ZWISCHENST
AENDE BEI".."$.." TARIFAENDERUNGEN SCHAE
TZEN.".."..:.."8.: .:. 9900.."B.:.S
"L..". .I N F O GASDATEN"..#V..". DAZU
WIRD HIER DER VERBRAUCH AUF DIE"..#J.."
MONATE DER ABRECHNUNG VERTEILT UNTER".X
#~.." BEACHTUNG DES HOEHEREN VERBRAUCHS"
..#..." IN DEN WINTER- UND UEBERGANGSMON
ATEN."..#...". BEIM ERRECHNEN DER MONATS
ENDPREISE"..#..." WIRD NACH ADDITION DER
SONDERABGABE"..$N.." DIE MEHRWERTSTEUER
ZUGESCHLAGEN."./$...". BEI GROESSEREN U
NSTIMMIGKEITEN".X$..." SPRECHEN SIE AM B
ESTEN MIT IHREN".M$..." STADTWERKEN!".S$
..:..$..: .:. 9900..$(.:..$2.: .
..$<.:..$F.:..$....O$@.. ****** DATEN-AU
SGABE ********.U$J.:..$T..".".10)".DATE
N-AUSGABE"..$^..:...%C.:..%E.Z.0..%H.. A
K%.0 . Z.Z.1.8%R.. ZT.0 . Z.Z.1
.V%|.. AB$."" . AE$."" . Z.Z.1.G%... Z.3
. 8400.M%..:..%..."ABRECHNUNGSBEGINN "
;..%... AB$."" . . "?":. 8110..%... AB$.
M%...:."ABRECHNUNGSENDE ";..%... AE$.
"" . . "?":. 8140..%B.. AE$..%L..:...&V.
."ZAEHLER (ALT)"ZT(0).!&....A&..."
ZAEHLER (NEU)"ZT(1).G&....M&....S&
....Y&...._&. :.R&. : .:. 9900.X&. :
..&& .".".10)".DATEN-AUSGABE"..&0 .".".1
0)"KOSTENSAETZE"..&: .:..K&D . AK%.0 . 8
400.Q&I :..&N : . I.1 . AK%..'R ."
.".10)".DATEN-AUSGABE".!'S .".".10)"KOST
ENSAETZE".)'U .:..M'X ."PREIS P. EINHEIT
"PT(I)" PF".S'] ..Y'G ..}'L ."GRUNDPRE
IS P.MONAT"GP(I)" DM"..'Q ...'V ."SONDER
ABGABE "AA(I)" %"..'{ ..K'. ."MEHRWERTS
TEUER "MW(I)" %".Q'. ...'. ."GUELTIG
BIS MONAT "GK$(I)..'. ...'. :..(. :
.:. 9900..(. :.&(. : . I.,(. :.7(F
. 8500.=(K :.E(P .:..I(Z .".ES WURDEN N
OCH KEINE DATEN";.}(. ." EINGEGEBEN!"..(
. :..(. : .:. 9900..(.!:..(4!:
...(>!:..(H!:..((#. ***** SUBROUTINE
DATPLAU *****..(2#:..(<#. C(D$)..5 . 910
0..)F#. J(D$,3,1).."." . 9100./)P#. E(H(
D$,2)).1 . 9100.J)Z#. E(H(D$,2)).12 . 91
00.E)D#. E(I(D$,2)).60 . 9100.K)N#:.{)X#
ER.0:. 9120..).#ER.1..).#:..) #: ..
.).#:..).#:.H).#. ***** SUBROUTINE DATKL
EI *****.N).#:..).$J1.E(I(D1$,2))..).$J2
.E(I(D2$,2))..*.$M1.E(H(D1$,2))..*"$M2.E
(H(D2$,2)). *,$:.2*1$. J1.0 . 9300.E*6$.
J2.J1 . 9310.Z*;$. J2.J1.1 . 9310.V*=$.
J1.J2 . M1..M2 . 9310..*@$. M2.M1 . J1.
J2 . 9310..*J$:..*T$ER.0:. 9330..*^$ER.1
..*H$:.D*R$: ..J*|$:.P*.$:..*.$. *
**** SUBROUTINE KOSATZ ******..*B$:..+L$
II.1..+V$:.!+.$MK.E(H(GK$(II),2)).8+.$JK
.E(I(GK$(II),2)).>+.$:.Z+.$. JA.JK . MA.
.MK . 9570.M+.%. JA.JK . 9570..+.%. II.A
K% . 9530..+.%:..+.%II.II.1..+&%. 9440..
+0%:.F+:%."...KOSTENSAETZE UNPASSEND "..
+D%.".ZU ABRECHNUNGSZEITRAUM!"..+I%:..,N
%: .:. 9900:. 9590..,X%:..,B%KS.II.&
,L%ER.0:. 9600./,V%ER.1.5,.%:.E,.%:
..K,.%:.Q,.%:.V,.%. ***** SUBROUTINE
AUSDRUCK ****.|,.%:..,.%. MA.10 . . " "
MA;..,F%. MA.9 . . MA;..,P%PR$.D(.(VT(MA
))).S,Z%. .4.6.C(PR$)) PR$;..,.%PR$.D(.(
RP.100).100)..,.%:..-.%: . 9800..-.&:..
-.&. .18.7.C(PR$)) PR$;.8-.&PR$.D(.(EP.1
00).100).>-.&:.L-.&: . 9800.R-.&:.J-.&.
.28.7.C(PR$)) PR$.P- &:..-*&: .
..-4&:..->&:..-H&. ** SUBROUTINE SPALTEN
DRUCK ***..-R&:..-\&. J(PR$,C(PR$).1,1).
"." . PR$.PR$."0"...F&. J(PR$,C(
PR$).2,1).."." . PR$.PR$.".00".$
.P&:.1.Z&: ..7..&:.=..&:.B..&. ****
** SUBROUTINE WEITER *****.H..&:....&. .
10)">>>>> .W.EITER";....&:....&. A$:. A$
."" . 9920...E&:...J&. A$.."W" . 9920.C.
T&:.T..&: ..Z..&:....&:../.&. *
***** PROGRAMM-ENDE *********.*/.'. ****
**************************...
> CLICK IMAGE PREVIEW FOR FULL MODAL