GAS&WATER
FILE INFORMATION
FILENAME(S): GAS&WATER
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-12-02 00:01:54
APPEARS ON: 2 disk(s)
FILE HASH
3daed3c7f771b251bdb242fc9a02e146b4876d9626d5b46d223a5c7dbbdde0bc
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | GAS&WATER | PRG | earthshaker | 12 | 17 | DOWNLOAD FILE |
| DE GROOT | GAS&WATER | PRG | earthshaker | 15 | 11 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 01 00 97 35 33 32 38 31 2C 31 3A 97 |.......53281,1:.|
00000010: 35 33 32 38 30 2C 31 35 00 31 08 02 00 86 20 41 |53280,15.1.... A|
00000020: 24 28 31 32 29 2C 42 28 31 32 29 2C 42 24 28 37 |$(12),B(12),B$(7|
00000030: 29 00 37 08 03 00 8C 00 56 08 04 00 81 49 B2 31 |).7.....V....I.1|
00000040: 20 A4 20 31 32 3A 87 20 41 24 28 49 29 2C 42 28 | . 12:. A$(I),B(|
00000050: 49 29 3A 82 20 49 00 6C 08 05 00 81 49 B2 31 20 |I):. I.l....I.1 |
00000060: A4 20 37 20 3A 87 20 42 24 28 49 29 00 93 08 06 |. 7 :. B$(I)....|
00000070: 00 42 53 24 B2 22 42 45 47 49 4E 20 53 54 41 4E |.BS$."BEGIN STAN|
00000080: 44 20 47 41 53 20 20 20 3D 22 3A 42 53 B2 31 39 |D GAS =":BS.19|
00000090: 35 38 39 00 B8 08 07 00 42 57 24 B2 22 42 45 47 |589.....BW$."BEG|
000000A0: 49 4E 53 54 41 4E 44 20 57 41 54 45 52 20 20 3D |INSTAND WATER =|
000000B0: 22 3A 42 57 B2 35 37 34 00 E0 08 08 00 50 24 20 |":BW.574.....P$ |
000000C0: B2 22 50 52 49 4A 53 20 50 45 52 20 4D 33 20 47 |."PRIJS PER M3 G|
000000D0: 41 53 20 20 3D 22 3A 50 20 B2 2E 36 32 31 33 32 |AS =":P ..62132|
000000E0: 00 08 09 09 00 50 57 24 B2 22 50 52 49 4A 53 20 |.....PW$."PRIJS |
000000F0: 50 45 52 20 4D 33 20 57 41 54 45 52 3D 22 3A 50 |PER M3 WATER=":P|
00000100: 57 B2 31 2E 31 33 33 36 00 2E 09 0A 00 56 56 24 |W.1.1336.....VV$|
00000110: B2 22 31 39 38 34 2E 2E 56 45 52 42 52 2E 3A 47 |."1984..VERBR.:G|
00000120: 41 53 20 20 3D 22 3A 56 56 B2 33 34 30 30 00 53 |AS =":VV.3400.S|
00000130: 09 0B 00 56 57 24 B2 22 31 39 38 34 2E 2E 56 45 |...VW$."1984..VE|
00000140: 52 42 52 2E 3A 57 41 54 45 52 3D 22 3A 56 57 B2 |RBR.:WATER=":VW.|
00000150: 31 37 30 00 7B 09 0C 00 54 48 24 B2 22 54 4F 45 |170.{...TH$."TOE|
00000160: 53 54 45 4C 4C 45 4E 20 48 55 55 52 20 20 20 3D |STELLEN HUUR =|
00000170: 22 3A 54 48 B2 31 32 34 2E 30 34 00 A2 09 0D 00 |":TH.124.04.....|
00000180: 52 47 24 B2 22 56 41 53 54 45 20 52 45 43 48 54 |RG$."VASTE RECHT|
00000190: 3A 47 41 53 20 20 20 3D 22 3A 52 47 B2 36 37 2E |:GAS =":RG.67.|
000001A0: 32 36 00 C9 09 0E 00 52 57 24 B2 22 56 41 53 54 |26.....RW$."VAST|
000001B0: 45 20 52 45 43 48 54 3A 57 41 54 45 52 20 3D 22 |E RECHT:WATER ="|
000001C0: 3A 52 57 B2 36 35 2E 34 30 00 E7 09 0F 00 48 53 |:RW.65.40.....HS|
000001D0: 24 B2 22 48 55 49 44 49 47 45 20 4D 54 52 2E 20 |$."HUIDIGE MTR. |
000001E0: 3A 47 41 53 20 3D 22 00 05 0A 10 00 48 57 24 B2 |:GAS =".....HW$.|
000001F0: 22 48 55 49 44 49 47 45 20 4D 54 52 2E 57 41 54 |"HUIDIGE MTR.WAT|
00000200: 45 52 20 3D 22 00 17 0A 11 00 59 B2 31 39 38 34 |ER =".....Y.1984|
00000210: 3A 99 22 93 22 3A 99 00 3C 0A 12 00 99 22 1D 1D |:.".":..<...."..|
00000220: 1D 1D 1D 1D 1D 1D 1D 1D 12 9C 47 41 53 20 26 20 |..........GAS & |
00000230: 57 41 54 45 52 3A 31 39 38 34 92 22 00 5A 0A 13 |WATER:1984.".Z..|
00000240: 00 85 22 11 11 44 41 54 55 4D 3A 44 41 47 2C 4D |.."..DATUM:DAG,M|
00000250: 41 41 4E 44 22 3B 44 2C 4D 24 00 94 0A 14 00 85 |AAND";D,M$......|
00000260: 22 11 11 48 55 49 44 49 47 45 20 53 54 41 4E 44 |"..HUIDIGE STAND|
00000270: 3A 47 41 53 22 3B 48 53 3A 85 22 11 11 48 55 49 |:GAS";HS:."..HUI|
00000280: 44 49 47 45 20 53 54 41 4E 44 3A 57 41 54 45 52 |DIGE STAND:WATER|
00000290: 22 3B 48 57 00 BB 0A 15 00 99 22 93 22 3A 99 22 |";HW......".":."|
000002A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 1E 47 41 53 3A |............GAS:|
000002B0: 31 39 38 34 92 22 3A 99 22 1F 22 00 CC 0A 16 00 |1984.":.".".....|
000002C0: 99 A3 31 31 29 3B 44 3B 4D 24 3B 59 00 FE 0A 17 |..11);D;M$;Y....|
000002D0: 00 99 22 1F C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..".............|
000002E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000002F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 1E 22 00 14 |............."..|
00000300: 0B 18 00 99 42 53 24 3B 42 53 3B 22 20 20 20 20 |....BS$;BS;" |
00000310: 20 4D 33 22 00 2F 0B 19 00 99 22 1E 22 3A 99 48 | M3"./....".":.H|
00000320: 53 24 3B 48 53 3B 22 20 20 20 20 20 4D 33 22 00 |S$;HS;" M3".|
00000330: 5C 0B 1A 00 99 20 22 11 56 45 52 42 52 55 49 4B |\.... ".VERBRUIK|
00000340: 20 20 20 20 20 20 20 20 20 20 3D 22 48 53 AB 42 | ="HS.B|
00000350: 53 3B 22 20 20 20 20 20 20 4D 33 22 00 68 0B 1B |S;" M3".h..|
00000360: 00 81 58 B2 31 A4 31 32 00 8B 0B 1C 00 8B C8 28 |..X.1.12.......(|
00000370: 41 24 28 58 29 2C 33 29 B2 C8 28 4D 24 2C 33 29 |A$(X),3)..(M$,3)|
00000380: A7 20 44 44 B2 42 28 58 29 AA 44 00 93 0B 1D 00 |. DD.B(X).D.....|
00000390: 82 20 58 00 AC 0B 1E 00 99 3A 99 50 24 3B 50 22 |. X......:.P$;P"|
000003A0: 20 20 20 20 47 55 4C 44 45 4E 53 22 00 E1 0B 1F | GULDENS"....|
000003B0: 00 99 3A 99 22 45 4E 20 44 41 54 20 4B 4F 53 54 |..:."EN DAT KOST|
000003C0: 20 54 4F 54 20 4E 55 3D 22 28 48 53 AB 42 53 29 | TOT NU="(HS.BS)|
000003D0: AC 50 20 22 20 20 20 47 55 4C 44 45 4E 53 22 3A |.P " GULDENS":|
000003E0: 99 00 0F 0C 20 00 99 22 47 45 4D 2E 20 56 45 52 |.... .."GEM. VER|
000003F0: 42 52 55 49 4B 20 20 20 20 20 3D 22 28 48 53 AB |BRUIK ="(HS.|
00000400: 42 53 29 AD 44 44 3B 22 4D 33 2F 44 41 47 22 00 |BS).DD;"M3/DAG".|
00000410: 28 0C 21 00 99 3A 99 22 1F 4F 56 45 52 22 44 44 |(.!..:.".OVER"DD|
00000420: 22 44 41 47 45 4E 1E 22 00 58 0C 22 00 99 22 C0 |"DAGEN.".X."..".|
00000430: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000440: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000450: C0 C0 C0 C0 C0 C0 C0 22 00 80 0C 23 00 99 22 1D |......."...#..".|
00000460: 1D 1D 1D 12 1F 57 49 4C 54 20 55 20 56 45 52 44 |.....WILT U VERD|
00000470: 45 52 3F 28 4A 2F 4E 29 92 22 3A 99 22 1E 20 22 |ER?(J/N).":.". "|
00000480: 00 93 0C 24 00 A1 4E 24 3A 8B 20 4E 24 B2 22 22 |...$..N$:. N$.""|
00000490: A7 33 36 00 A1 0C 25 00 8B 4E 24 B2 22 4E 22 A7 |.36...%..N$."N".|
000004A0: 80 00 B1 0C 26 00 8B 4E 24 B3 B1 22 4A 22 A7 33 |....&..N$.."J".3|
000004B0: 36 00 F5 0C 27 00 99 22 93 22 3A 99 22 1D 1D 1D |6...'..".":."...|
000004C0: 1D 1D 1D 1D 1D 1D 1D 12 1E 47 41 53 20 26 20 57 |.........GAS & W|
000004D0: 41 54 45 52 3A 31 39 38 34 92 22 3A 99 22 1D 1D |ATER:1984.":."..|
000004E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 1C 50 52 4F 47 4E |...........PROGN|
000004F0: 4F 53 45 92 22 00 27 0D 28 00 99 22 1F C0 C0 C0 |OSE.".'.(.."....|
00000500: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000510: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000520: C0 C0 C0 C0 C0 1E 22 00 55 0D 29 00 99 56 56 24 |......".U.)..VV$|
00000530: 3B 56 56 22 20 20 20 20 20 20 4D 33 22 20 3A 99 |;VV" M3" :.|
00000540: 3A 99 50 24 3B 50 22 20 20 20 20 47 55 4C 44 45 |:.P$;P" GULDE|
00000550: 4E 53 22 3A 99 00 92 0D 2A 00 99 22 44 41 54 20 |NS":....*.."DAT |
00000560: 49 53 20 45 45 4E 20 47 45 4D 2E 22 3A 99 22 47 |IS EEN GEM.":."G|
00000570: 41 53 20 56 45 52 2E 20 56 41 4E 20 20 20 20 20 |AS VER. VAN |
00000580: 20 3D 22 56 56 AD 33 36 36 20 22 4D 33 2F 44 41 | ="VV.366 "M3/DA|
00000590: 47 22 00 C1 0D 2B 00 99 3A 99 22 54 4F 54 41 41 |G"...+..:."TOTAA|
000005A0: 4C 20 50 52 49 4A 53 3A 47 41 53 20 20 3D 22 56 |L PRIJS:GAS ="V|
000005B0: 56 AC 50 3B 22 20 20 47 55 4C 44 45 4E 53 22 3A |V.P;" GULDENS":|
000005C0: 99 00 F1 0D 2C 00 99 56 57 24 3B 56 57 22 20 20 |....,..VW$;VW" |
000005D0: 20 20 20 20 20 4D 33 22 3A 99 3A 99 50 57 24 3B | M3":.:.PW$;|
000005E0: 50 57 22 20 20 20 20 47 55 4C 44 45 4E 53 22 3A |PW" GULDENS":|
000005F0: 99 00 2D 0E 2D 00 99 22 44 41 54 20 49 53 20 45 |..-.-.."DAT IS E|
00000600: 45 4E 20 47 45 4D 2E 22 3A 99 22 57 41 54 45 52 |EN GEM.":."WATER|
00000610: 20 56 45 52 2E 20 56 41 4E 20 20 20 20 3D 22 56 | VER. VAN ="V|
00000620: 57 AD 33 36 36 22 4D 33 2F 44 41 47 22 00 5C 0E |W.366"M3/DAG".\.|
00000630: 2E 00 99 3A 99 22 54 4F 54 41 41 4C 20 50 52 49 |...:."TOTAAL PRI|
00000640: 4A 53 3A 57 41 54 45 52 3D 22 56 57 AC 50 57 3B |JS:WATER="VW.PW;|
00000650: 22 20 20 20 47 55 4C 44 45 4E 53 22 00 8C 0E 2F |" GULDENS".../|
00000660: 00 99 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..".............|
00000670: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000680: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 B4 0E 30 |..........."...0|
00000690: 00 99 22 1D 1D 1D 1D 12 1F 57 49 4C 54 20 55 20 |.."......WILT U |
000006A0: 56 45 52 44 45 52 3F 28 4A 2F 4E 29 92 22 3A 99 |VERDER?(J/N).":.|
000006B0: 22 1E 20 22 00 C7 0E 31 00 A1 4E 24 3A 8B 20 4E |". "...1..N$:. N|
000006C0: 24 B2 22 22 A7 34 39 00 D6 0E 32 00 8B 20 4E 24 |$."".49...2.. N$|
000006D0: B2 22 4E 22 A7 80 00 E6 0E 33 00 8B 4E 24 B3 B1 |."N".....3..N$..|
000006E0: 22 4A 22 A7 34 39 00 0C 0F 34 00 99 22 93 22 3A |"J".49...4..".":|
000006F0: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 1E 20 57 |."............ W|
00000700: 41 54 45 52 3A 31 39 38 34 92 5E 22 00 3E 0F 35 |ATER:1984.^".>.5|
00000710: 00 99 22 1F C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..".............|
00000720: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000730: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 1E 22 00 5A |.............".Z|
00000740: 0F 36 00 99 A3 31 31 29 22 12 1F 22 3B 44 3B 4D |.6...11)"..";D;M|
00000750: 24 3B 59 3B 22 1E 92 22 3A 99 00 82 0F 37 00 99 |$;Y;"..":....7..|
00000760: 42 57 24 3B 42 57 3B 22 20 20 20 20 4D 33 22 3A |BW$;BW;" M3":|
00000770: 99 3A 99 48 57 24 3B 48 57 3B 22 20 20 20 20 4D |.:.HW$;HW;" M|
00000780: 33 22 00 9D 0F 38 00 99 3A 99 50 57 24 3B 50 57 |3"...8..:.PW$;PW|
00000790: 3B 22 20 47 55 4C 44 45 4E 53 22 3A 99 00 C7 0F |;" GULDENS":....|
000007A0: 39 00 99 22 56 45 52 42 52 55 49 4B 20 20 20 20 |9.."VERBRUIK |
000007B0: 20 20 20 20 20 20 3D 22 48 57 AB 42 57 3B 22 20 | ="HW.BW;" |
000007C0: 20 20 20 20 4D 33 22 00 F9 0F 3A 00 99 3A 99 22 | M3"...:..:."|
000007D0: 45 4E 20 44 41 54 20 4B 4F 53 54 20 54 4F 54 20 |EN DAT KOST TOT |
000007E0: 4E 55 3A 22 3B 28 48 57 AB 42 57 29 AC 50 57 3B |NU:";(HW.BW).PW;|
000007F0: 22 47 55 4C 44 45 4E 53 22 00 12 10 3B 00 99 3A |"GULDENS"...;..:|
00000800: 99 22 1F 4F 56 45 52 22 44 44 22 44 41 47 45 4E |.".OVER"DD"DAGEN|
00000810: 1E 22 00 44 10 3C 00 99 22 1F C0 C0 C0 C0 C0 C0 |.".D.<..".......|
00000820: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000830: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000840: C0 C0 1E 22 00 6C 10 3D 00 99 22 1D 1D 1D 1D 12 |...".l.=..".....|
00000850: 1F 57 49 4C 54 20 55 20 56 45 52 44 45 52 3F 28 |.WILT U VERDER?(|
00000860: 4A 2F 4E 29 92 22 3A 99 22 1E 20 22 00 7F 10 3E |J/N).":.". "...>|
00000870: 00 A1 4E 24 3A 8B 20 4E 24 B2 22 22 A7 36 32 00 |..N$:. N$."".62.|
00000880: 8E 10 3F 00 8B 20 4E 24 B2 22 4E 22 A7 80 00 9E |..?.. N$."N"....|
00000890: 10 40 00 8B 4E 24 B3 B1 22 4A 22 A7 36 32 00 C8 |.@..N$.."J".62..|
000008A0: 10 41 00 99 22 93 22 3A 99 22 1D 1D 1D 1D 1D 1D |.A..".":."......|
000008B0: 1D 1D 1D 1D 12 1E 47 41 53 20 26 20 57 41 54 45 |......GAS & WATE|
000008C0: 52 3A 31 39 38 34 92 22 00 FA 10 42 00 99 22 1F |R:1984."...B..".|
000008D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000008E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000008F0: C0 C0 C0 C0 C0 C0 C0 C0 1E 22 00 17 11 43 00 99 |........."...C..|
00000900: 52 57 24 3B 52 57 3B 22 20 20 47 55 4C 44 45 4E |RW$;RW;" GULDEN|
00000910: 53 2F 4A 41 41 52 22 00 34 11 44 00 99 3A 99 52 |S/JAAR".4.D..:.R|
00000920: 47 24 3B 52 47 22 20 47 55 4C 44 45 4E 53 2F 4A |G$;RG" GULDENS/J|
00000930: 41 41 52 22 00 51 11 45 00 99 3A 99 54 48 24 3B |AAR".Q.E..:.TH$;|
00000940: 54 48 3B 22 47 55 4C 44 45 4E 53 2F 4A 41 41 52 |TH;"GULDENS/JAAR|
00000950: 22 00 89 11 46 00 99 3A 99 22 54 4F 54 2E 56 41 |"...F..:."TOT.VA|
00000960: 53 54 45 20 4B 4F 53 54 45 4E 3A 20 3D 22 3B 52 |STE KOSTEN: =";R|
00000970: 57 AA 52 47 AA 54 48 3B 22 20 47 55 4C 44 45 4E |W.RG.TH;" GULDEN|
00000980: 53 2F 4A 41 41 52 22 3A 99 00 B1 11 47 00 99 22 |S/JAAR":....G.."|
00000990: 1D 1D 1D 1D 12 1F 57 49 4C 54 20 55 20 56 45 52 |......WILT U VER|
000009A0: 44 45 52 3F 28 4A 2F 4E 29 92 22 3A 99 22 1E 20 |DER?(J/N).":.". |
000009B0: 22 00 E3 11 48 00 99 22 90 C0 C0 C0 C0 C0 C0 C0 |"...H.."........|
000009C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000009D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000009E0: C0 1E 22 00 F6 11 49 00 A1 4E 24 3A 8B 20 4E 24 |.."...I..N$:. N$|
000009F0: B2 22 22 A7 37 33 00 05 12 4A 00 8B 20 4E 24 B2 |."".73...J.. N$.|
00000A00: 22 4E 22 A7 80 00 15 12 4B 00 8B 4E 24 B3 B1 22 |"N".....K..N$.."|
00000A10: 4A 22 A7 37 33 00 3F 12 4C 00 99 22 93 22 3A 99 |J".73.?.L..".":.|
00000A20: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 1E 47 41 53 |"............GAS|
00000A30: 20 26 20 57 41 54 45 52 3A 31 39 38 34 92 22 00 | & WATER:1984.".|
00000A40: 71 12 4D 00 99 22 1F C0 C0 C0 C0 C0 C0 C0 C0 C0 |q.M.."..........|
00000A50: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000A60: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 1E |................|
00000A70: 22 00 99 12 4E 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D |"...N.."........|
00000A80: 1D 1D 12 90 54 4F 54 41 41 4C 20 4F 56 45 52 5A |....TOTAAL OVERZ|
00000A90: 49 43 48 54 92 1E 22 3A 99 00 CB 12 4F 00 99 22 |ICHT..":....O.."|
00000AA0: 50 52 2E 20 47 41 53 20 54 4F 54 20 4E 55 20 20 |PR. GAS TOT NU |
00000AB0: 20 20 3D 22 3B 28 48 53 AB 42 53 29 AC 50 3B 22 | =";(HS.BS).P;"|
00000AC0: 20 47 55 4C 44 45 4E 53 22 3A 99 00 FC 12 50 00 | GULDENS":....P.|
00000AD0: 99 22 50 52 2E 20 57 41 54 45 52 20 54 4F 54 20 |."PR. WATER TOT |
00000AE0: 4E 55 20 20 3D 22 3B 28 48 57 AB 42 57 29 AC 50 |NU =";(HW.BW).P|
00000AF0: 57 3B 22 20 47 55 4C 44 45 4E 53 22 00 2E 13 51 |W;" GULDENS"...Q|
00000B00: 00 99 3A 99 22 54 4F 54 2E 56 2E 4B 20 20 20 54 |..:."TOT.V.K T|
00000B10: 4F 54 20 4E 55 20 20 3D 22 28 28 52 57 AA 52 47 |OT NU ="((RW.RG|
00000B20: AA 54 48 29 AD 33 36 35 29 AC 44 44 3A 99 00 78 |.TH).365).DD:..x|
00000B30: 13 52 00 99 22 54 4F 54 2E 4B 4F 53 54 45 4E 20 |.R.."TOT.KOSTEN |
00000B40: 54 4F 54 20 4E 55 20 3D 22 3B 28 28 48 53 AB 42 |TOT NU =";((HS.B|
00000B50: 53 29 AC 50 29 AA 28 28 48 57 AB 42 57 29 AC 50 |S).P).((HW.BW).P|
00000B60: 57 29 AA 28 28 28 52 57 AA 52 47 AA 54 48 29 AD |W).(((RW.RG.TH).|
00000B70: 33 36 35 29 AC 44 44 29 00 AB 13 53 00 8B 28 28 |365).DD)...S..((|
00000B80: 48 53 AB 42 53 29 AD 44 44 29 B3 28 56 56 AD 33 |HS.BS).DD).(VV.3|
00000B90: 36 36 29 A7 99 22 47 4F 45 44 20 5A 4F 21 21 20 |66).."GOED ZO!! |
00000BA0: 47 41 53 20 56 45 52 2E 3D 22 3B 00 DE 13 54 00 |GAS VER.=";...T.|
00000BB0: 8B 28 28 48 53 AB 42 53 29 AD 44 44 29 B3 28 56 |.((HS.BS).DD).(V|
00000BC0: 56 AD 33 36 36 29 A7 99 28 56 56 AD 33 36 36 29 |V.366)..(VV.366)|
00000BD0: AB 28 28 48 53 AB 42 53 29 AD 44 44 29 3B 00 17 |.((HS.BS).DD);..|
00000BE0: 14 55 00 8B 28 28 48 53 AB 42 53 29 AD 44 44 29 |.U..((HS.BS).DD)|
00000BF0: B3 28 56 56 AD 33 36 36 29 A7 99 22 4D 33 2F 44 |.(VV.366).."M3/D|
00000C00: 41 47 22 2C 22 4F 4E 44 45 52 20 56 45 52 57 41 |AG","ONDER VERWA|
00000C10: 43 48 54 49 4E 47 22 00 5F 14 56 00 8B 28 28 48 |CHTING"._.V..((H|
00000C20: 53 AB 42 53 29 AD 44 44 29 B1 28 56 56 AD 33 36 |S.BS).DD).(VV.36|
00000C30: 36 29 A7 99 22 11 47 41 53 56 45 52 42 52 55 49 |6)..".GASVERBRUI|
00000C40: 4B 20 49 53 20 20 20 20 22 28 28 48 53 AB 42 53 |K IS "((HS.BS|
00000C50: 29 AD 44 44 29 AB 28 56 56 AD 33 36 36 29 3B 00 |).DD).(VV.366);.|
00000C60: 8F 14 57 00 8B 28 28 48 53 AB 42 53 29 AD 44 44 |..W..((HS.BS).DD|
00000C70: 29 B1 28 56 56 AD 33 36 36 29 A7 99 22 20 4D 33 |).(VV.366).." M3|
00000C80: 2F 44 41 47 22 2C 22 54 45 20 48 4F 4F 47 22 00 |/DAG","TE HOOG".|
00000C90: AD 14 58 00 8B 44 44 B2 33 36 36 AF 28 48 53 AB |..X..DD.366.(HS.|
00000CA0: 42 53 29 B1 33 34 30 30 A7 8D 31 30 37 00 E5 14 |BS).3400..107...|
00000CB0: 59 00 99 3A 99 22 1C C0 C0 C0 C0 C0 C0 C0 C0 C0 |Y..:."..........|
00000CC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000CD0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 |..............."|
00000CE0: 3A 99 22 1E 22 00 0F 15 5A 00 99 22 1D 1D 1D 1D |:."."...Z.."....|
00000CF0: 1D 1D 12 1F 57 49 4C 54 20 55 20 56 45 52 44 45 |....WILT U VERDE|
00000D00: 52 3F 28 4A 2F 4E 29 92 22 3A 99 22 1E 20 22 00 |R?(J/N).":.". ".|
00000D10: 22 15 5B 00 A1 4E 24 3A 8B 20 4E 24 B2 22 22 A7 |".[..N$:. N$."".|
00000D20: 39 31 00 31 15 5C 00 8B 20 4E 24 B2 22 4E 22 A7 |91.1.\.. N$."N".|
00000D30: 80 00 41 15 5D 00 8B 4E 24 B3 B1 22 4A 22 A7 39 |..A.]..N$.."J".9|
00000D40: 31 00 69 15 5E 00 99 3A 99 22 1D 1D 1D 1D 1D 1D |1.i.^..:."......|
00000D50: 12 90 44 41 54 20 57 41 53 20 41 4C 4C 45 53 20 |..DAT WAS ALLES |
00000D60: 54 4F 54 20 4E 55 21 92 22 00 96 15 5F 00 99 3A |TOT NU!."..._..:|
00000D70: 99 22 1D 1D 1D 1D 1D 1F 57 49 4C 54 20 55 20 4F |."......WILT U O|
00000D80: 50 4E 49 45 55 57 20 42 45 47 49 4E 4E 45 4E 3F |PNIEUW BEGINNEN?|
00000D90: 28 4A 2F 4E 29 22 00 C8 15 60 00 99 3A 99 22 C0 |(J/N)"...`..:.".|
00000DA0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000DB0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000DC0: C0 C0 C0 C0 C0 C0 C0 22 00 DB 15 61 00 A1 4E 24 |......."...a..N$|
00000DD0: 3A 8B 20 4E 24 B2 22 22 A7 39 37 00 EA 15 62 00 |:. N$."".97...b.|
00000DE0: 8B 20 4E 24 B2 22 4E 22 A7 80 00 F9 15 63 00 8B |. N$."N".....c..|
00000DF0: 4E 24 B2 22 4A 22 A7 32 31 00 1C 16 64 00 83 20 |N$."J".21...d.. |
00000E00: 4A 41 4E 55 41 52 49 2C 32 37 2C 46 45 42 52 55 |JANUARI,27,FEBRU|
00000E10: 41 52 49 2C 35 38 2C 4D 41 41 52 54 00 40 16 65 |ARI,58,MAART.@.e|
00000E20: 00 83 20 38 37 2C 41 50 52 49 4C 2C 31 31 38 2C |.. 87,APRIL,118,|
00000E30: 4D 45 49 2C 31 34 38 2C 4A 55 4E 49 2C 31 37 39 |MEI,148,JUNI,179|
00000E40: 00 5E 16 66 00 83 20 4A 55 4C 49 20 2C 32 30 39 |.^.f.. JULI ,209|
00000E50: 2C 41 55 47 55 53 54 55 53 20 2C 32 34 30 00 7E |,AUGUSTUS ,240.~|
00000E60: 16 67 00 83 20 53 45 50 54 45 4D 42 45 52 2C 32 |.g.. SEPTEMBER,2|
00000E70: 37 31 2C 4F 4B 54 4F 42 45 52 2C 33 30 31 00 9E |71,OKTOBER,301..|
00000E80: 16 68 00 83 20 4E 4F 56 45 4D 42 45 52 2C 33 33 |.h.. NOVEMBER,33|
00000E90: 32 2C 44 45 43 45 4D 42 45 52 2C 33 36 32 00 C3 |2,DECEMBER,362..|
00000EA0: 16 69 00 83 5A 4F 4E 44 41 47 2C 4D 41 41 4E 44 |.i..ZONDAG,MAAND|
00000EB0: 41 47 2C 44 49 4E 53 44 41 47 2C 57 4F 45 4E 53 |AG,DINSDAG,WOENS|
00000EC0: 44 41 47 00 E4 16 6A 00 83 20 44 4F 4E 44 45 52 |DAG...j.. DONDER|
00000ED0: 44 41 47 2C 56 52 49 4A 44 41 47 2C 5A 41 54 45 |DAG,VRIJDAG,ZATE|
00000EE0: 52 44 41 47 00 0A 17 6B 00 99 22 12 1C 1D 1D 1D |RDAG...k..".....|
00000EF0: 1D 57 41 54 20 4A 41 4D 4D 45 52 20 4E 4F 55 21 |.WAT JAMMER NOU!|
00000F00: 21 20 55 20 4D 4F 45 54 20 22 00 27 17 6C 00 99 |! U MOET ".'.l..|
00000F10: 22 1C 1D 1D 1D 1D 1D 1D 1D 1D 1D 42 49 4A 42 45 |"..........BIJBE|
00000F20: 54 41 4C 45 4E 1E 22 00 2D 17 6D 00 8E 00 00 00 |TALEN.".-.m.....|
.......53281,1:.53280,15.1.... A$(12),B(
12),B$(7).7.....V....I.1 . 12:. A$(I),B(
I):. I.L....I.1 . 7 :. B$(I).....BS$."BE
GIN STAND GAS =":BS.19589.....BW$."BEG
INSTAND WATER =":BW.574.....P$ ."PRIJS
PER M3 GAS =":P ..62132.....PW$."PRIJS
PER M3 WATER=":PW.1.1336.....VV$."1984..
VERBR.:GAS =":VV.3400.S...VW$."1984..VE
RBR.:WATER=":VW.170.{...TH$."TOESTELLEN
HUUR =":TH.124.04.....RG$."VASTE RECHT
:GAS =":RG.67.26.I...RW$."VASTE RECHT:
WATER =":RW.65.40.....HS$."HUIDIGE MTR.
:GAS =".....HW$."HUIDIGE MTR.WATER ="...
..Y.1984:.".":..<...."............GAS &
WATER:1984.".Z...."..DATUM:DAG,MAAND";D,
M$......"..HUIDIGE STAND:GAS";HS:."..HUI
DIGE STAND:WATER";HW......".":."........
....GAS:1984.":.".".L.....11);D;M$;Y....
..".....................................
....."......BS$;BS;" M3"./....".":.H
S$;HS;" M3".\.... ".VERBRUIK
="HS.BS;" M3".H....X.1.12......H(
A$(X),3).H(M$,3). DD.B(X).D...... X.....
.:.P$;P" GULDENS"......:."EN DAT KOST
TOT NU="(HS.BS).P " GULDENS":.... .."
GEM. VERBRUIK ="(HS.BS).DD;"M3/DAG".
(.!..:.".OVER"DD"DAGEN.".X."..".........
..............................."...#..".
.....WILT U VERDER?(J/N).":.". "...$..N$
:. N$."".36...%..N$."N".....&..N$.."J".3
6...'..".":."............GAS & WATER:198
4.":.".............PROGNOSE.".'.(.."....
......................................".
U.)..VV$;VV" M3" :.:.P$;P" GULDE
NS":....*.."DAT IS EEN GEM.":."GAS VER.
VAN ="VV.366 "M3/DAG".A.+..:."TOTAA
L PRIJS:GAS ="VV.P;" GULDENS":....,..V
W$;VW" M3":.:.PW$;PW" GULDENS":
..-.-.."DAT IS EEN GEM.":."WATER VER. VA
N ="VW.366"M3/DAG".\....:."TOTAAL PRI
JS:WATER="VW.PW;" GULDENS".../..".....
..................................."...0
.."......WILT U VERDER?(J/N).":.". ".G.1
..N$:. N$."".49.V.2.. N$."N".....3..N$..
"J".49...4..".":."............ WATER:198
4.^".>.5..".............................
.............".Z.6...11)"..";D;M$;Y;".."
:....7..BW$;BW;" M3":.:.HW$;HW;" M
3"...8..:.PW$;PW;" GULDENS":..G.9.."VERB
RUIK ="HW.BW;" M3"...:..:."
EN DAT KOST TOT NU:";(HW.BW).PW;"GULDENS
"...;..:.".OVER"DD"DAGEN.".D.<..".......
...................................".L.=
.."......WILT U VERDER?(J/N).":.". "..>
..N$:. N$."".62...?.. N$."N".....@..N$..
"J".62.H.A..".":."............GAS & WATE
R:1984."...B..".........................
................."...C..RW$;RW;" GULDEN
S/JAAR".4.D..:.RG$;RG" GULDENS/JAAR".Q.E
..:.TH$;TH;"GULDENS/JAAR"...F..:."TOT.VA
STE KOSTEN: =";RW.RG.TH;" GULDENS/JAAR":
....G.."......WILT U VERDER?(J/N).":.".
"...H.."................................
.........."...I..N$:. N$."".73...J.. N$.
"N".....K..N$.."J".73.?.L..".":.".......
.....GAS & WATER:1984.".Q.M.."..........
................................"...N.."
............TOTAAL OVERZICHT..":..K.O.."
PR. GAS TOT NU =";(HS.BS).P;" GULDENS
":....P.."PR. WATER TOT NU =";(HW.BW).P
W;" GULDENS"...Q..:."TOT.V.K TOT NU =
"((RW.RG.TH).365).DD:..X.R.."TOT.KOSTEN
TOT NU =";((HS.BS).P).((HW.BW).PW).(((RW
.RG.TH).365).DD)...S..((HS.BS).DD).(VV.3
66).."GOED ZO!! GAS VER.=";...T..((HS.BS
).DD).(VV.366)..(VV.366).((HS.BS).DD);..
.U..((HS.BS).DD).(VV.366).."M3/DAG","OND
ER VERWACHTING"._.V..((HS.BS).DD).(VV.36
6)..".GASVERBRUIK IS "((HS.BS).DD).(V
V.366);...W..((HS.BS).DD).(VV.366).." M3
/DAG","TE HOOG"...X..DD.366.(HS.BS).3400
..107...Y..:."..........................
...............":."."...Z.."........WILT
U VERDER?(J/N).":.". ".".[..N$:. N$."".
91.1.\.. N$."N"...A.]..N$.."J".91.I.^..:
."........DAT WAS ALLES TOT NU!."..._..:
."......WILT U OPNIEUW BEGINNEN?(J/N)".H
.`..:.".................................
......."...A..N$:. N$."".97...B.. N$."N"
.....C..N$."J".21...D.. JANUARI,27,FEBRU
ARI,58,MAART.@.E.. 87,APRIL,118,MEI,148,
JUNI,179.^.F.. JULI ,209,AUGUSTUS ,240.~
.G.. SEPTEMBER,271,OKTOBER,301...H.. NOV
EMBER,332,DECEMBER,362.C.I..ZONDAG,MAAND
AG,DINSDAG,WOENSDAG...J.. DONDERDAG,VRIJ
DAG,ZATERDAG...K.."......WAT JAMMER NOU!
! U MOET ".'.L.."..........BIJBETALEN.".
-.M.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL