_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL