ENERGIEVERBRUIK

00000000: 01 08 0B 08 0A 00 89 31  30 30 30 00 15 08 14 00  |.......1000.....|
00000010: 89 31 30 31 30 00 21 08  64 00 99 22 93 22 3B 3A  |.1010.!.d..".";:|
00000020: 8E 00 4F 08 6E 00 99 C8  28 22 13 11 11 11 11 11  |..O.n...("......|
00000030: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000040: 11 22 2C B6 28 B5 28 56  45 AA 31 29 29 29 3B 00  |.",.(.(VE.1)));.|
00000050: 5F 08 70 00 99 A6 B6 28  48 4F 29 29 3B 3A 8E 00  |_.p....(HO));:..|
00000060: 77 08 78 00 48 4F B2 B9  28 30 29 3A 56 45 B2 C2  |w.x.HO..(0):VE..|
00000070: 28 32 31 34 29 3A 8E 00  82 08 C8 00 A1 49 4E 24  |(214):.......IN$|
00000080: 3A 8E 00 97 08 D2 00 A1  49 4E 24 3A 8B 49 4E 24  |:.......IN$:.IN$|
00000090: B2 22 22 89 32 31 30 00  9D 08 DC 00 8E 00 A3 08  |."".210.........|
000000A0: FA 00 8E 00 B1 08 04 01  52 56 B2 BB 28 31 29 3A  |........RV..(1):|
000000B0: 8E 00 BF 08 0E 01 46 52  B2 B8 28 30 29 3A 8E 00  |......FR..(0):..|
000000C0: E8 08 2C 01 53 52 24 B2  C4 28 53 52 29 3A 8B C8  |..,.SR$..(SR):..|
000000D0: 28 53 52 24 2C 31 29 B2  22 20 22 A7 53 52 24 B2  |(SR$,1)." ".SR$.|
000000E0: CA 28 53 52 24 2C 32 29  00 EE 08 2D 01 8E 00 07  |.(SR$,2)...-....|
000000F0: 09 36 01 53 52 24 B2 22  22 3A 8B 53 52 B3 30 A7  |.6.SR$."":.SR.0.|
00000100: 53 52 24 B2 22 2D 22 00  2E 09 37 01 53 52 24 B2  |SR$."-"...7.SR$.|
00000110: 53 52 24 AA CA 28 C4 28  B5 28 B6 28 53 52 29 AA  |SR$..(.(.(.(SR).|
00000120: 2E 35 AC 31 30 AE AB 43  4E 29 29 2C 32 29 00 59  |.5.10..CN)),2).Y|
00000130: 09 38 01 8B C3 28 53 52  24 29 B3 43 54 AB 43 4E  |.8...(SR$).CT.CN|
00000140: AA 28 43 4E B3 B1 30 29  A7 53 52 24 B2 22 20 22  |.(CN..0).SR$." "|
00000150: AA 53 52 24 3A 89 33 31  32 00 73 09 39 01 8B 43  |.SR$:.312.s.9..C|
00000160: 4E B2 30 B0 B6 28 53 52  29 B1 B2 31 45 31 30 89  |N.0..(SR)..1E10.|
00000170: 33 31 35 00 A7 09 3A 01  53 52 24 B2 53 52 24 AA  |315...:.SR$.SR$.|
00000180: CA 28 C4 28 31 AA B6 28  53 52 29 AB B5 28 B6 28  |.(.(1..(SR)..(.(|
00000190: 53 52 29 29 AA 2E 35 AC  31 30 AE AB 43 4E 29 2C  |SR))..5.10..CN),|
000001A0: 33 2C 43 4E AA 31 29 00  C7 09 3B 01 8B C3 28 53  |3,CN.1)...;...(S|
000001B0: 52 24 29 B3 43 54 A7 53  52 24 B2 53 52 24 AA 22  |R$).CT.SR$.SR$."|
000001C0: 20 22 3A 89 33 31 35 00  DD 09 3C 01 8B C3 28 53  | ":.315...<...(S|
000001D0: 52 24 29 B1 43 54 A7 53  52 24 B2 22 22 00 FD 09  |R$).CT.SR$.""...|
000001E0: 3D 01 8B C3 28 53 52 24  29 B3 43 54 A7 53 52 24  |=...(SR$).CT.SR$|
000001F0: B2 53 52 24 AA 22 2A 22  3A 89 33 31 37 00 03 0A  |.SR$."*":.317...|
00000200: 3E 01 8E 00 19 0A 5E 01  9F 34 2C 34 3A 98 34 2C  |>.....^..4,4:.4,|
00000210: 53 52 24 3B 3A A0 34 3A  8E 00 2A 0A 68 01 9F 34  |SR$;:.4:..*.h..4|
00000220: 2C 34 3A 98 34 3A A0 34  3A 8E 00 4A 0A E8 03 41  |,4:.4:.4:..J...A|
00000230: B2 32 30 30 3A 89 32 30  3A 8F 20 45 4E 45 52 47  |.200:.20:. ENERG|
00000240: 49 45 56 45 52 42 52 55  49 4B 00 6C 0A F2 03 86  |IEVERBRUIK.l....|
00000250: 4A 47 28 32 30 30 29 2C  44 55 28 32 30 29 2C 53  |JG(200),DU(20),S|
00000260: 54 28 32 30 29 2C 4C 45  28 31 32 29 00 84 0A FC  |T(20),LE(12)....|
00000270: 03 8D 31 30 30 3A 48 4F  B2 35 3A 56 45 B2 34 3A  |..100:HO.5:VE.4:|
00000280: 8D 31 31 30 00 A6 0A 06  04 99 22 C5 CE C5 D2 C7  |.110......".....|
00000290: C9 C5 20 20 D6 C5 D2 C2  D2 D5 C9 CB D3 2D C3 C9  |..  .........-..|
000002A0: CA C6 C5 D2 D3 22 00 C8  0A 10 04 8C 3A 8D 31 37  |....."......:.17|
000002B0: 33 30 3A 4A 56 B2 44 54  3A 8F 20 49 4E 49 54 49  |30:JV.DT:. INITI|
000002C0: 41 4C 49 53 41 54 49 45  00 F3 0A 1A 04 48 4F B2  |ALISATIE.....HO.|
000002D0: 31 35 3A 56 45 B2 31 35  3A 8F 20 42 45 50 41 41  |15:VE.15:. BEPAA|
000002E0: 4C 20 42 45 45 4C 44 53  43 48 45 52 4D 4F 4D 56  |L BEELDSCHERMOMV|
000002F0: 41 4E 47 00 1C 0B 24 04  48 4F B2 48 4F AA 31 3A  |ANG...$.HO.HO.1:|
00000300: 42 42 B2 48 4F 3A 8D 31  31 30 3A 8D 31 32 30 3A  |BB.HO:.110:.120:|
00000310: 8B 42 42 B2 48 4F 20 A7  31 30 36 30 00 4A 0B 2E  |.BB.HO .1060.J..|
00000320: 04 48 4F B2 30 3A 42 42  B2 42 42 AB 31 3A 8F 20  |.HO.0:BB.BB.1:. |
00000330: 42 45 45 4C 44 53 43 48  45 52 4D 42 52 45 45 44  |BEELDSCHERMBREED|
00000340: 54 45 20 42 45 50 41 41  4C 44 00 73 0B 38 04 56  |TE BEPAALD.s.8.V|
00000350: 45 B2 56 45 AA 31 3A 56  4D B2 56 45 3A 8D 31 31  |E.VE.1:VM.VE:.11|
00000360: 30 3A 8D 31 32 30 3A 8B  56 4D B2 56 45 20 A7 31  |0:.120:.VM.VE .1|
00000370: 30 38 30 00 93 0B 42 04  56 4D B2 56 4D AB 31 3A  |080...B.VM.VM.1:|
00000380: 8F 20 42 45 45 4C 44 53  43 48 45 52 4D 48 4F 4F  |. BEELDSCHERMHOO|
00000390: 47 54 45 00 A6 0B 4C 04  48 4F B2 30 3A 56 45 B2  |GTE...L.HO.0:VE.|
000003A0: 38 3A 8D 31 31 30 00 CF  0B 56 04 99 22 D7 49 4C  |8:.110...V..".IL|
000003B0: 54 20 D5 20 45 45 4E 20  47 52 41 46 49 53 43 48  |T . EEN GRAFISCH|
000003C0: 45 20 57 45 45 52 47 41  56 45 20 50 45 52 22 00  |E WEERGAVE PER".|
000003D0: FB 0B 60 04 99 22 44 41  47 20 28 C4 29 20 4F 46  |..`.."DAG (.) OF|
000003E0: 20 50 45 52 20 57 45 45  4B 20 28 D7 29 22 3B 3A  | PER WEEK (.)";:|
000003F0: 8D 32 31 30 3A 57 24 B2  49 4E 24 00 1F 0C 6A 04  |.210:W$.IN$...j.|
00000400: 99 57 24 3A 8B 28 57 24  B3 B1 22 D7 22 29 20 AF  |.W$:.(W$..".") .|
00000410: 28 57 24 B3 B1 22 C4 22  29 20 A7 31 31 30 30 00  |(W$..".") .1100.|
00000420: 25 0C 74 04 99 00 54 0C  7E 04 8B 57 24 B2 22 D7  |%.t...T.~..W$.".|
00000430: 22 20 A7 99 22 C7 45 4D  49 44 44 45 4C 44 20 44  |" ..".EMIDDELD D|
00000440: 41 47 56 45 52 42 52 55  49 4B 20 50 45 52 20 57  |AGVERBRUIK PER W|
00000450: 45 45 4B 22 00 7F 0C 88  04 8B 57 24 B2 22 C4 22  |EEK"......W$."."|
00000460: 20 A7 99 22 C7 45 4D 49  44 44 45 4C 44 20 56 45  | ..".EMIDDELD VE|
00000470: 52 42 52 55 49 4B 20 50  45 52 20 44 41 47 22 00  |RBRUIK PER DAG".|
00000480: 98 0C 92 04 87 41 24 3A  8B 41 24 B2 22 D3 D4 CF  |.....A$:.A$."...|
00000490: D0 22 20 A7 31 32 32 30  00 BA 0C 9C 04 8D 31 38  |." .1220......18|
000004A0: 39 30 3A 8F 20 42 45 52  45 4B 45 4E 20 44 41 47  |90:. BEREKEN DAG|
000004B0: 47 45 4D 49 44 44 45 4C  44 45 00 CD 0C A6 04 8B  |GEMIDDELDE......|
000004C0: 57 24 B2 22 D7 22 20 A7  8D 32 32 35 30 00 E9 0C  |W$."." ..2250...|
000004D0: B0 04 8D 31 34 34 30 3A  8F 20 54 45 4B 45 4E 53  |...1440:. TEKENS|
000004E0: 55 42 52 4F 55 54 49 4E  45 00 08 0D BA 04 89 31  |UBROUTINE......1|
000004F0: 31 37 30 3A 8F 20 47 41  20 44 4F 4F 52 20 54 4F  |170:. GA DOOR TO|
00000500: 54 20 27 53 54 4F 50 27  00 28 0D C4 04 8D 31 30  |T 'STOP'.(....10|
00000510: 30 3A 8C 3A 99 22 D6 C5  D2 C2 D2 D5 C9 CB D3 2D  |0:.:.".........-|
00000520: C3 C9 CA C6 C5 D2 D3 22  00 47 0D CE 04 87 41 24  |.......".G....A$|
00000530: 3A 8B 41 24 B3 B1 22 D3  D4 CF D0 C4 C1 D4 D5 CD  |:.A$..".........|
00000540: 22 20 A7 31 32 33 30 00  50 0D D8 04 54 52 B2 30  |" .1230.P...TR.0|
00000550: 00 69 0D E2 04 87 41 24  3A 8B 41 24 B2 22 D3 D4  |.i....A$:.A$."..|
00000560: CF D0 22 20 A7 31 33 39  30 00 84 0D EC 04 8B 41  |.." .1390......A|
00000570: 24 B2 22 C7 C1 D3 22 20  A7 50 52 B2 47 50 3A 56  |$."..." .PR.GP:V|
00000580: 50 B2 56 47 00 A1 0D F6  04 8B 41 24 B2 22 D7 C1  |P.VG......A$."..|
00000590: D4 C5 D2 22 20 A7 50 52  B2 57 50 3A 56 50 B2 56  |..." .PR.WP:VP.V|
000005A0: 57 00 C0 0D 00 05 8B 41  24 B2 22 C5 CC C5 CB D4  |W......A$.".....|
000005B0: D2 C1 22 20 A7 50 52 B2  45 50 3A 56 50 B2 56 45  |.." .PR.EP:VP.VE|
000005C0: 00 D7 0D 0A 05 81 4A B2  31 20 A4 4A 56 3A 87 53  |......J.1 .JV:.S|
000005D0: 54 28 4A 29 3A 82 4A 00  0B 0E 14 05 54 54 B2 53  |T(J):.J.....TT.S|
000005E0: 54 28 4A 56 29 AB 53 54  28 31 29 3A 47 45 B2 54  |T(JV).ST(1):GE.T|
000005F0: 54 AD 54 3A 42 45 B2 54  54 AC 50 52 AA 56 50 AC  |T.T:BE.TT.PR.VP.|
00000600: 4A 56 3A 54 52 B2 42 45  AA 54 52 00 17 0E 1E 05  |JV:TR.BE.TR.....|
00000610: 99 3A 99 41 24 3A 99 00  30 0E 28 05 43 4E B2 31  |.:.A$:..0.(.CN.1|
00000620: 3A 43 54 B2 36 3A 53 52  B2 54 54 3A 8D 33 31 30  |:CT.6:SR.TT:.310|
00000630: 00 5D 0E 32 05 99 22 D4  CF D4 C1 C1 CC 20 D6 C5  |.].2.."...... ..|
00000640: D2 C2 D2 D5 C9 CB 20 C9  CE 20 22 3B 54 3B 22 20  |...... .. ";T;" |
00000650: C4 C1 C7 C5 CE 20 3D 20  22 3B 53 52 24 00 6C 0E  |..... = ";SR$.l.|
00000660: 3C 05 53 52 B2 47 45 3A  8D 33 31 30 00 8B 0E 46  |<.SR.GE:.310...F|
00000670: 05 99 22 D6 C5 D2 C2 D2  D5 C9 CB 20 D0 C5 D2 20  |.."........ ... |
00000680: C4 C1 C7 20 3D 20 22 3B  53 52 24 00 A4 0E 50 05  |... = ";SR$...P.|
00000690: 43 4E B2 32 3A 43 54 B2  38 3A 53 52 B2 42 45 3A  |CN.2:CT.8:SR.BE:|
000006A0: 8D 33 31 30 00 CF 0E 5A  05 99 22 D4 CF D4 C1 C1  |.310...Z..".....|
000006B0: CC 20 C2 C5 C4 D2 C1 C7  20 C9 CE 20 22 3B 54 3B  |. ...... .. ";T;|
000006C0: 22 20 C4 C1 C7 C5 CE 20  3D 20 22 3B 53 52 24 00  |" ..... = ";SR$.|
000006D0: EE 0E 64 05 89 31 32 35  30 3A 8F 20 47 41 20 44  |..d..1250:. GA D|
000006E0: 4F 4F 52 20 54 4F 54 20  27 53 54 4F 50 27 00 07  |OOR TOT 'STOP'..|
000006F0: 0F 6E 05 53 52 B2 54 52  3A 43 54 B2 38 3A 43 4E  |.n.SR.TR:CT.8:CN|
00000700: B2 32 3A 8D 33 31 30 00  27 0F 78 05 99 3A 99 22  |.2:.310.'.x..:."|
00000710: D2 C5 CB C5 CE C9 CE C7  2D D4 CF D4 C1 C1 CC 20  |........-...... |
00000720: C6 CC 22 3B 53 52 24 00  3C 0F 82 05 8D 32 34 36  |..";SR$.<....246|
00000730: 30 3A 8D 32 35 38 30 3A  8D 31 31 30 00 62 0F 8C  |0:.2580:.110.b..|
00000740: 05 99 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |.."             |
00000750: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000760: 22 3B 00 82 0F 96 05 80  3A 8F 20 45 49 4E 44 45  |";......:. EINDE|
00000770: 20 56 41 4E 20 48 45 54  20 50 52 4F 47 52 41 4D  | VAN HET PROGRAM|
00000780: 4D 41 00 91 0F A0 05 8F  20 54 45 4B 45 4E 53 55  |MA...... TEKENSU|
00000790: 42 00 BB 0F AA 05 8F 20  4B 4C 41 41 52 20 53 54  |B...... KLAAR ST|
000007A0: 41 41 54 20 4E 55 20 4A  47 28 4A 49 29 2C 20 44  |AAT NU JG(JI), D|
000007B0: 45 20 52 45 45 4B 53 20  4D 45 54 00 DE 0F B4 05  |E REEKS MET.....|
000007C0: 8F 20 4A 49 20 47 45 4D  49 44 44 45 4C 44 45 4E  |. JI GEMIDDELDEN|
000007D0: 20 28 44 41 47 20 4F 46  20 57 45 45 4B 29 00 08  | (DAG OF WEEK)..|
000007E0: 10 BE 05 8F 20 57 45 45  52 47 45 47 45 56 45 4E  |.... WEERGEGEVEN|
000007F0: 20 57 4F 52 44 54 20 53  54 45 45 44 53 20 44 45  | WORDT STEEDS DE|
00000800: 20 47 52 41 46 49 45 4B  00 1E 10 C8 05 58 48 B2  | GRAFIEK.....XH.|
00000810: 4A 47 28 31 29 3A 58 4C  B2 4A 47 28 31 29 00 2B  |JG(1):XL.JG(1).+|
00000820: 10 D2 05 81 49 B2 32 20  A4 4A 49 00 43 10 DC 05  |....I.2 .JI.C...|
00000830: 8B 4A 47 28 49 29 B3 58  4C 20 A7 58 4C B2 4A 47  |.JG(I).XL .XL.JG|
00000840: 28 49 29 00 5B 10 E6 05  8B 4A 47 28 49 29 B1 58  |(I).[....JG(I).X|
00000850: 48 20 A7 58 48 B2 4A 47  28 49 29 00 62 10 F0 05  |H .XH.JG(I).b...|
00000860: 82 49 00 7C 10 FA 05 58  48 B2 28 58 48 AB 58 4C  |.I.|...XH.(XH.XL|
00000870: 29 AD 28 42 42 AC 2E 37  29 AA 58 48 00 96 10 04  |).(BB..7).XH....|
00000880: 06 58 4C B2 28 58 4C AB  58 48 29 AD 28 42 42 AC  |.XL.(XL.XH).(BB.|
00000890: 2E 37 29 AA 58 4C 00 B2  10 0E 06 8D 31 30 30 3A  |.7).XL......100:|
000008A0: 8D 32 35 31 30 3A 44 24  B2 53 44 24 3A 8D 32 30  |.2510:D$.SD$:.20|
000008B0: 37 30 00 C4 10 18 06 43  54 B2 34 3A 43 4E B2 30  |70.....CT.4:CN.0|
000008C0: 3A 4A B2 30 00 D1 10 22  06 81 49 B2 31 20 A4 4A  |:J.0..."..I.1 .J|
000008D0: 49 00 EA 10 2C 06 4A B2  4A AA 31 3A 8B 4A B2 56  |I...,.J.J.1:.J.V|
000008E0: 4D AB 34 20 A7 8D 32 39  34 30 00 03 11 36 06 8D  |M.4 ..2940...6..|
000008F0: 32 33 39 30 3A 8F 20 42  45 50 41 41 4C 20 44 41  |2390:. BEPAAL DA|
00000900: 54 55 4D 00 1F 11 40 06  8B 49 B2 4A 49 AB 56 4D  |TUM...@..I.JI.VM|
00000910: AA 33 20 A7 4D 52 B2 4D  41 3A 44 52 B2 44 41 00  |.3 .MR.MA:DR.DA.|
00000920: 39 11 4A 06 53 52 B2 54  44 3A 8D 33 31 30 3A 99  |9.J.SR.TD:.310:.|
00000930: 53 52 24 3B 22 20 21 22  3B 00 5A 11 54 06 54 41  |SR$;" !";.Z.T.TA|
00000940: B2 28 58 48 AB 4A 47 28  49 29 29 AD 28 58 48 AB  |.(XH.JG(I)).(XH.|
00000950: 58 4C 29 AC 28 42 42 AB  36 29 00 71 11 5E 06 99  |XL).(BB.6).q.^..|
00000960: A3 42 42 AB B5 28 54 41  AA 2E 35 29 29 3B 22 2A  |.BB..(TA..5));"*|
00000970: 22 00 78 11 68 06 82 49  00 93 11 72 06 44 41 B2  |".x.h..I...r.DA.|
00000980: 44 52 3A 4D 41 B2 4D 52  3A 8D 31 30 30 3A 8D 32  |DR:MA.MR:.100:.2|
00000990: 35 31 30 00 A6 11 7C 06  81 49 B2 4A 49 AB 56 4D  |510...|..I.JI.VM|
000009A0: AA 34 20 A4 4A 49 00 C6  11 86 06 8D 32 33 39 30  |.4 .JI......2390|
000009B0: 3A 53 52 B2 54 44 3A 8D  33 31 30 3A 99 53 52 24  |:SR.TD:.310:.SR$|
000009C0: 3B 22 20 21 22 3B 00 E7  11 90 06 54 41 B2 28 58  |;" !";.....TA.(X|
000009D0: 48 AB 4A 47 28 49 29 29  AD 28 58 48 AB 58 4C 29  |H.JG(I)).(XH.XL)|
000009E0: AC 28 42 42 AB 36 29 00  FE 11 9A 06 99 A3 42 42  |.(BB.6).......BB|
000009F0: AB B5 28 54 41 AA 2E 35  29 29 3B 22 2A 22 00 05  |..(TA..5));"*"..|
00000A00: 12 A4 06 82 49 00 0F 12  AE 06 8D 32 34 36 30 00  |....I......2460.|
00000A10: 15 12 B8 06 8E 00 2F 12  C2 06 8F 20 49 4E 49 54  |....../.... INIT|
00000A20: 49 41 4C 49 53 45 52 49  4E 47 53 2D 53 55 42 00  |IALISERINGS-SUB.|
00000A30: 59 12 CC 06 8F 20 56 55  4C 54 20 45 45 52 53 54  |Y.... VULT EERST|
00000A40: 20 44 45 20 56 45 52 53  43 48 49 4C 4C 45 4E 44  | DE VERSCHILLEND|
00000A50: 45 20 50 52 49 4A 5A 45  4E 00 7F 12 D6 06 8F 20  |E PRIJZEN...... |
00000A60: 44 41 41 52 4E 41 20 44  45 20 4C 45 4E 47 54 45  |DAARNA DE LENGTE|
00000A70: 20 56 41 4E 20 44 45 20  4D 41 41 4E 44 45 4E 00  | VAN DE MAANDEN.|
00000A80: AA 12 E0 06 8F 20 4C 45  45 53 54 20 44 45 20 53  |..... LEEST DE S|
00000A90: 54 41 52 54 44 41 54 55  4D 20 45 4E 20 44 41 41  |TARTDATUM EN DAA|
00000AA0: 52 4E 41 20 53 54 45 45  44 53 00 D2 12 EA 06 8F  |RNA STEEDS......|
00000AB0: 20 44 45 20 56 4F 4C 47  45 4E 44 45 20 44 41 54  | DE VOLGENDE DAT|
00000AC0: 55 4D 20 54 4F 54 20 27  53 54 4F 50 44 41 54 55  |UM TOT 'STOPDATU|
00000AD0: 4D 27 00 F3 12 F4 06 8F  20 44 41 41 52 4E 41 20  |M'...... DAARNA |
00000AE0: 49 53 20 44 55 28 31 2E  2E 4E 29 20 47 45 56 55  |IS DU(1..N) GEVU|
00000AF0: 4C 44 2E 00 F9 12 FE 06  8C 00 10 13 08 07 87 56  |LD.............V|
00000B00: 47 2C 56 57 2C 56 45 2C  47 50 2C 45 50 2C 57 50  |G,VW,VE,GP,EP,WP|
00000B10: 00 27 13 12 07 81 58 B2  30 20 A4 31 32 3A 87 4C  |.'....X.0 .12:.L|
00000B20: 45 28 58 29 3A 82 58 00  3F 13 1C 07 8D 32 30 31  |E(X):.X.?....201|
00000B30: 30 3A 8F 20 44 41 54 55  4D 20 53 55 42 52 2E 00  |0:. DATUM SUBR..|
00000B40: 5B 13 26 07 53 44 24 B2  44 24 3A 53 44 B2 44 41  |[.&.SD$.D$:SD.DA|
00000B50: 3A 53 4D B2 4D 41 3A 44  54 B2 31 00 73 13 30 07  |:SM.MA:DT.1.s.0.|
00000B60: 8D 32 30 31 30 3A 8F 20  44 41 54 55 4D 20 53 55  |.2010:. DATUM SU|
00000B70: 42 52 2E 00 8A 13 3A 07  8B 44 24 B2 22 D3 D4 CF  |BR....:..D$."...|
00000B80: D0 C4 C1 D4 D5 CD 22 20  A7 8E 00 A0 13 44 07 45  |......" .....D.E|
00000B90: 44 B2 44 41 3A 45 4D B2  4D 41 3A 8D 32 31 30 30  |D.DA:EM.MA:.2100|
00000BA0: 00 B8 13 4E 07 44 54 B2  44 54 AA 31 3A 53 44 B2  |...N.DT.DT.1:SD.|
00000BB0: 45 44 3A 53 4D B2 45 4D  00 C2 13 58 07 89 31 38  |ED:SM.EM...X..18|
00000BC0: 34 30 00 E5 13 62 07 8F  20 42 45 52 45 4B 45 4E  |40...b.. BEREKEN|
00000BD0: 20 48 45 54 20 56 45 52  42 52 55 49 4B 20 50 45  | HET VERBRUIK PE|
00000BE0: 52 20 44 41 47 00 0D 14  6C 07 8F 20 45 45 52 53  |R DAG...l.. EERS|
00000BF0: 54 20 57 4F 52 44 54 20  53 54 3D 44 45 20 53 54  |T WORDT ST=DE ST|
00000C00: 41 4E 44 20 49 4E 47 45  4C 45 5A 45 4E 00 33 14  |AND INGELEZEN.3.|
00000C10: 76 07 8F 20 44 41 41 52  4E 41 20 57 4F 52 44 54  |v.. DAARNA WORDT|
00000C20: 20 48 45 54 20 44 41 47  47 45 4D 49 44 44 45 4C  | HET DAGGEMIDDEL|
00000C30: 44 45 20 00 58 14 80 07  8F 20 49 4E 20 4A 47 28  |DE .X.... IN JG(|
00000C40: 29 20 47 45 5A 45 54 20  4D 45 54 20 54 20 41 4C  |) GEZET MET T AL|
00000C50: 53 20 54 45 4C 4C 45 52  00 6F 14 8A 07 81 4A B2  |S TELLER.o....J.|
00000C60: 31 20 A4 4A 56 3A 87 53  54 28 4A 29 3A 82 4A 00  |1 .JV:.ST(J):.J.|
00000C70: 77 14 94 07 54 B2 30 00  86 14 9E 07 81 49 B2 31  |w...T.0......I.1|
00000C80: 20 A4 4A 56 AB 31 00 96  14 A8 07 81 4A B2 31 20  | .JV.1......J.1 |
00000C90: A4 44 55 28 49 29 00 BC  14 B2 07 54 B2 54 AA 31  |.DU(I).....T.T.1|
00000CA0: 3A 4A 47 28 54 29 B2 28  53 54 28 49 AA 31 29 AB  |:JG(T).(ST(I.1).|
00000CB0: 53 54 28 49 29 29 AD 44  55 28 49 29 00 C3 14 BC  |ST(I)).DU(I)....|
00000CC0: 07 82 4A 00 CA 14 C6 07  82 49 00 DA 14 D0 07 4A  |..J......I.....J|
00000CD0: 49 B2 54 3A 44 54 B2 31  3A 8E 00 F1 14 DA 07 8F  |I.T:DT.1:.......|
00000CE0: 20 44 41 54 55 4D 2D 53  55 42 52 4F 55 54 49 4E  | DATUM-SUBROUTIN|
00000CF0: 45 00 0D 15 E4 07 8F 20  4C 45 45 53 54 20 45 45  |E...... LEEST EE|
00000D00: 4E 20 44 41 54 55 4D 20  49 4E 20 44 24 00 34 15  |N DATUM IN D$.4.|
00000D10: EE 07 8F 20 50 52 4F 44  55 43 45 45 52 54 20 42  |... PRODUCEERT B|
00000D20: 49 4A 20 45 45 4E 20 47  45 4C 44 49 47 45 20 44  |IJ EEN GELDIGE D|
00000D30: 41 54 55 4D 00 59 15 F8  07 8F 20 48 45 54 20 44  |ATUM.Y.... HET D|
00000D40: 41 47 2D 4E 55 4D 4D 45  52 20 45 4E 20 4D 41 41  |AG-NUMMER EN MAA|
00000D50: 4E 44 2D 4E 55 4D 4D 45  52 00 74 15 02 08 8F 20  |ND-NUMMER.t.... |
00000D60: 45 4E 20 49 4E 20 49 45  44 45 52 20 47 45 56 41  |EN IN IEDER GEVA|
00000D70: 4C 20 44 24 00 7C 15 0C  08 87 44 24 00 96 15 16  |L D$.|....D$....|
00000D80: 08 44 31 24 B2 C8 28 44  24 2C 32 29 3A 44 41 B2  |.D1$..(D$,2):DA.|
00000D90: C5 28 44 31 24 29 00 B0  15 20 08 44 31 24 B2 C9  |.(D1$)... .D1$..|
00000DA0: 28 44 24 2C 32 29 3A 4D  41 B2 C5 28 44 31 24 29  |(D$,2):MA..(D1$)|
00000DB0: 00 B6 15 2A 08 8E 00 CF  15 34 08 8F 20 50 45 52  |...*.....4.. PER|
00000DC0: 49 4F 44 45 20 53 55 42  52 4F 55 54 49 4E 45 00  |IODE SUBROUTINE.|
00000DD0: FA 15 3E 08 8F 20 42 45  50 41 41 4C 54 20 44 45  |..>.. BEPAALT DE|
00000DE0: 20 50 45 52 49 4F 44 45  2D 4C 45 4E 47 54 45 20  | PERIODE-LENGTE |
00000DF0: 4D 45 54 20 42 45 48 55  4C 50 00 13 16 48 08 8F  |MET BEHULP...H..|
00000E00: 20 56 41 4E 20 53 44 2C  53 4D 20 45 4E 20 45 44  | VAN SD,SM EN ED|
00000E10: 2C 45 4D 00 3A 16 52 08  8F 20 5A 45 54 20 48 45  |,EM.:.R.. ZET HE|
00000E20: 54 20 52 45 53 55 4C 54  41 41 54 20 49 4E 20 56  |T RESULTAAT IN V|
00000E30: 45 4B 54 4F 52 20 44 55  28 29 00 4F 16 5C 08 8B  |EKTOR DU().O.\..|
00000E40: 45 4D B3 53 4D 20 A7 53  4D B2 53 4D AB 31 32 00  |EM.SM .SM.SM.12.|
00000E50: 77 16 66 08 54 4D B2 45  4D AB 53 4D 3A 8F 20 54  |w.f.TM.EM.SM:. T|
00000E60: 4D 3D 54 45 4C 4C 45 52  20 41 41 4E 54 41 4C 20  |M=TELLER AANTAL |
00000E70: 4D 41 41 4E 44 45 4E 00  91 16 70 08 8B 54 4D B2  |MAANDEN...p..TM.|
00000E80: 30 20 A7 44 55 28 44 54  29 B2 45 44 AB 53 44 3A  |0 .DU(DT).ED.SD:|
00000E90: 8E 00 9F 16 7A 08 44 55  28 44 54 29 B2 45 44 00  |....z.DU(DT).ED.|
00000EA0: AB 16 84 08 54 4D B2 54  4D AB 31 00 BB 16 8E 08  |....TM.TM.1.....|
00000EB0: 8B 54 4D B2 30 20 A7 32  32 33 30 00 D7 16 98 08  |.TM.0 .2230.....|
00000EC0: 44 55 28 44 54 29 B2 44  55 28 44 54 29 AA 4C 45  |DU(DT).DU(DT).LE|
00000ED0: 28 53 4D AA 44 54 29 00  E3 16 A2 08 54 4D B2 54  |(SM.DT).....TM.T|
00000EE0: 4D AB 31 00 F3 16 AC 08  8B 54 4D B1 30 20 A7 32  |M.1......TM.0 .2|
00000EF0: 32 30 30 00 0F 17 B6 08  44 55 28 44 54 29 B2 44  |200.....DU(DT).D|
00000F00: 55 28 44 54 29 AA 4C 45  28 53 4D 29 AB 53 44 00  |U(DT).LE(SM).SD.|
00000F10: 15 17 C0 08 8E 00 36 17  CA 08 8F 20 42 45 52 45  |......6.... BERE|
00000F20: 4B 45 4E 20 44 45 20 57  45 45 4B 47 45 4D 49 44  |KEN DE WEEKGEMID|
00000F30: 44 45 4C 44 45 4E 00 47  17 D4 08 57 54 B2 B5 28  |DELDEN.G...WT..(|
00000F40: 4A 49 AD 37 29 AB 31 00  55 17 DE 08 81 49 57 B2  |JI.7).1.U....IW.|
00000F50: 30 20 A4 57 54 00 6F 17  E8 08 57 47 B2 30 3A 8F  |0 .WT.o...WG.0:.|
00000F60: 20 57 45 45 4B 47 45 4D  49 44 44 45 4C 44 45 00  | WEEKGEMIDDELDE.|
00000F70: 8F 17 F2 08 44 54 B2 49  57 AC 37 3A 8F 20 44 41  |....DT.IW.7:. DA|
00000F80: 47 54 45 4C 4C 45 52 20  49 4E 20 4A 47 28 29 00  |GTELLER IN JG().|
00000F90: 9B 17 FC 08 81 49 B2 31  20 A4 37 00 AE 17 06 09  |.....I.1 .7.....|
00000FA0: 57 47 B2 4A 47 28 44 54  AA 49 29 AA 57 47 00 B5  |WG.JG(DT.I).WG..|
00000FB0: 17 10 09 82 49 00 C7 17  1A 09 4A 47 28 49 57 AA  |....I.....JG(IW.|
00000FC0: 31 29 B2 57 47 AD 37 00  CF 17 24 09 82 49 57 00  |1).WG.7...$..IW.|
00000FD0: ED 17 2E 09 57 47 B2 30  3A 44 54 B2 28 57 54 AA  |....WG.0:DT.(WT.|
00000FE0: 31 29 AC 37 3A 49 52 B2  4A 49 AB 44 54 00 0C 18  |1).7:IR.JI.DT...|
00000FF0: 38 09 81 49 B2 31 20 A4  49 52 3A 57 47 B2 4A 47  |8..I.1 .IR:WG.JG|
00001000: 28 44 54 AA 49 29 AA 57  47 3A 82 49 00 2A 18 42  |(DT.I).WG:.I.*.B|
00001010: 09 4A 49 B2 57 54 AA 32  3A 4A 47 28 4A 49 29 B2  |.JI.WT.2:JG(JI).|
00001020: 57 47 AD 49 52 3A 44 54  B2 37 00 30 18 4C 09 8E  |WG.IR:DT.7.0.L..|
00001030: 00 60 18 56 09 8F 20 42  45 52 45 4B 45 4E 20 54  |.`.V.. BEREKEN T|
00001040: 45 4C 4B 45 4E 53 20 44  45 20 44 41 54 55 4D 20  |ELKENS DE DATUM |
00001050: 45 4E 20 5A 45 54 20 44  49 45 20 49 4E 20 54 44  |EN ZET DIE IN TD|
00001060: 00 6F 18 60 09 8B 49 B2  31 20 A7 32 34 34 30 00  |.o.`..I.1 .2440.|
00001070: 7C 18 6A 09 44 41 B2 44  41 AA 44 54 00 A1 18 74  ||.j.DA.DA.DT...t|
00001080: 09 8B 44 41 B1 4C 45 28  4D 41 29 20 A7 44 41 B2  |..DA.LE(MA) .DA.|
00001090: 44 41 AB 4C 45 28 4D 41  29 3A 4D 41 B2 4D 41 AA  |DA.LE(MA):MA.MA.|
000010A0: 31 00 B6 18 7E 09 8B 4D  41 B1 31 32 20 A7 4D 41  |1...~..MA.12 .MA|
000010B0: B2 4D 41 AB 31 32 00 C7  18 88 09 54 44 B2 4D 41  |.MA.12.....TD.MA|
000010C0: AC 31 30 30 AA 44 41 00  CD 18 92 09 8E 00 EF 18  |.100.DA.........|
000010D0: 9C 09 8F 20 56 52 41 41  47 20 44 45 20 56 4F 4C  |... VRAAG DE VOL|
000010E0: 47 45 4E 44 45 20 50 41  47 49 4E 41 20 4F 50 00  |GENDE PAGINA OP.|
000010F0: 07 19 A6 09 8D 32 30 30  3A 8B 49 4E 24 B3 B1 22  |.....200:.IN$.."|
00001100: 22 20 A7 32 34 37 30 00  29 19 B0 09 99 22 C4 52  |" .2470.)....".R|
00001110: 55 4B 20 4F 50 20 45 45  4E 20 54 4F 45 54 53 20  |UK OP EEN TOETS |
00001120: 2E 2E 22 3B 3A 8D 32 31  30 00 3C 19 BA 09 8D 31  |..";:.210.<....1|
00001130: 32 30 3A 48 4F B2 30 3A  8D 31 31 30 00 5C 19 C4  |20:HO.0:.110.\..|
00001140: 09 99 22 C5 45 4E 20 4F  47 45 4E 42 4C 49 4B 20  |..".EN OGENBLIK |
00001150: 41 2E 55 2E 42 2E 2E 2E  22 3B 3A 8E 00 7C 19 CE  |A.U.B...";:..|..|
00001160: 09 8F 20 54 45 4B 45 4E  20 44 45 20 4B 4F 50 20  |.. TEKEN DE KOP |
00001170: 56 2F 44 20 54 45 4B 45  4E 49 4E 47 00 8F 19 D8  |V/D TEKENING....|
00001180: 09 56 45 B2 31 3A 48 4F  B2 30 3A 8D 31 31 30 00  |.VE.1:HO.0:.110.|
00001190: A8 19 E2 09 43 54 B2 36  3A 43 4E B2 33 3A 53 52  |....CT.6:CN.3:SR|
000011A0: B2 58 4C 3A 8D 33 31 30  00 D4 19 EC 09 99 22 20  |.XL:.310......" |
000011B0: 20 20 20 22 3B 53 52 24  3B A3 B5 28 42 42 AD 32  |   ";SR$;..(BB.2|
000011C0: 29 AB 35 29 3B 41 24 3B  22 2D D6 C5 D2 C2 D2 D5  |).5);A$;"-......|
000011D0: C9 CB 22 3B 00 EF 19 F6  09 53 52 B2 58 48 3A 8D  |..";.....SR.XH:.|
000011E0: 33 31 30 3A 99 A3 42 42  AB 36 29 3B 53 52 24 00  |310:..BB.6);SR$.|
000011F0: 19 1A 00 0A 99 22 C4 C1  D4 D5 CD 2B 22 3B 3A 81  |.....".....+";:.|
00001200: 49 31 B2 31 20 A4 42 42  AB 37 3A 99 22 2D 22 3B  |I1.1 .BB.7:."-";|
00001210: 3A 82 49 31 3A 99 22 2B  22 00 29 1A 0A 0A 43 54  |:.I1:."+".)...CT|
00001220: B2 34 3A 43 4E B2 30 3A  8E 00 42 1A 14 0A 8F 20  |.4:CN.0:..B.... |
00001230: 54 41 42 45 4C 4C 45 4E  53 55 42 52 4F 55 54 49  |TABELLENSUBROUTI|
00001240: 4E 45 00 4E 1A 1E 0A 8D  32 38 33 30 3A 8C 00 65  |NE.N....2830:..e|
00001250: 1A 28 0A 87 56 47 2C 56  57 2C 56 45 2C 47 50 2C  |.(..VG,VW,VE,GP,|
00001260: 45 50 2C 57 50 00 7C 1A  32 0A 81 58 B2 30 20 A4  |EP,WP.|.2..X.0 .|
00001270: 31 32 3A 87 4C 45 28 58  29 3A 82 58 00 98 1A 3C  |12:.LE(X):.X...<|
00001280: 0A 8D 32 30 31 30 3A 8F  20 44 41 54 55 4D 53 55  |..2010:. DATUMSU|
00001290: 42 52 4F 55 54 49 4E 45  00 A1 1A 46 0A 44 54 B2  |BROUTINE...F.DT.|
000012A0: 30 00 AB 1A 50 0A 8D 32  34 34 30 00 C9 1A 5A 0A  |0...P..2440...Z.|
000012B0: 44 54 B2 44 54 AA 31 3A  48 4F B2 30 3A 56 45 B2  |DT.DT.1:HO.0:VE.|
000012C0: 34 AA 44 54 3A 8D 31 31  30 00 E2 1A 64 0A 43 54  |4.DT:.110...d.CT|
000012D0: B2 34 3A 43 4E B2 30 3A  53 52 B2 54 44 3A 8D 33  |.4:CN.0:SR.TD:.3|
000012E0: 31 30 00 F6 1A 6E 0A 99  53 52 24 3B 22 21 22 3B  |10...n..SR$;"!";|
000012F0: 3A 8D 32 30 31 30 00 11  1B 78 0A 8B 44 24 B3 B1  |:.2010...x..D$..|
00001300: 22 D3 D4 CF D0 C4 C1 D4  D5 CD 22 20 A7 32 36 34  |"........." .264|
00001310: 30 00 2D 1B 82 0A 87 41  24 3A 8B 41 24 B2 22 D3  |0.-....A$:.A$.".|
00001320: D4 CF D0 22 20 A7 8D 32  34 36 30 3A 8E 00 41 1B  |..." ..2460:..A.|
00001330: 8C 0A 8B 41 24 B2 22 C7  C1 D3 22 20 A7 48 53 B2  |...A$."..." .HS.|
00001340: 35 00 5A 1B 96 0A 8B 41  24 B2 22 C5 CC C5 CB D4  |5.Z....A$.".....|
00001350: D2 C1 22 20 A7 48 53 B2  31 36 00 71 1B A0 0A 8B  |.." .HS.16.q....|
00001360: 41 24 B2 22 D7 C1 D4 C5  D2 22 20 A7 48 53 B2 32  |A$."....." .HS.2|
00001370: 37 00 88 1B AA 0A 81 4A  B2 31 20 A4 4A 56 3A 87  |7......J.1 .JV:.|
00001380: 53 54 28 4A 29 3A 82 4A  00 97 1B B4 0A 81 4A B2  |ST(J):.J......J.|
00001390: 31 20 A4 4A 56 AB 31 00  AD 1B BE 0A 56 45 B2 35  |1 .JV.1.....VE.5|
000013A0: AA 4A 3A 48 4F B2 48 53  3A 8D 31 31 30 00 D9 1B  |.J:HO.HS:.110...|
000013B0: C8 0A 53 52 B2 53 54 28  4A AA 31 29 AB 53 54 28  |..SR.ST(J.1).ST(|
000013C0: 4A 29 3A 43 54 B2 34 3A  43 4E B2 30 3A 8B 48 53  |J):CT.4:CN.0:.HS|
000013D0: B1 32 35 20 A7 43 4E B2  31 00 EC 1B D2 0A 8D 33  |.25 .CN.1......3|
000013E0: 31 30 3A 99 53 52 24 3B  22 21 22 3B 00 09 1C DC  |10:.SR$;"!";....|
000013F0: 0A 53 52 B2 28 53 54 28  4A AA 31 29 AB 53 54 28  |.SR.(ST(J.1).ST(|
00001400: 4A 29 29 AD 44 55 28 4A  29 00 24 1C E6 0A 43 54  |J)).DU(J).$...CT|
00001410: B2 34 3A 43 4E B2 31 3A  8B 48 53 B1 32 35 20 A7  |.4:CN.1:.HS.25 .|
00001420: 43 4E B2 32 00 38 1C F0  0A 8D 33 31 30 3A 99 53  |CN.2.8....310:.S|
00001430: 52 24 3B 22 21 21 22 3B  00 3F 1C FA 0A 82 4A 00  |R$;"!!";.?....J.|
00001440: 51 1C 04 0B 99 3A 8D 32  39 32 30 3A 89 32 36 39  |Q....:.2920:.269|
00001450: 30 00 68 1C 0E 0B 8F 20  4B 4F 50 20 56 41 4E 20  |0.h.... KOP VAN |
00001460: 44 45 20 54 41 42 45 4C  00 71 1C 18 0B 8D 31 30  |DE TABEL.q....10|
00001470: 30 00 90 1C 22 0B 99 22  D6 45 52 42 52 55 49 4B  |0..."..".ERBRUIK|
00001480: 20 49 4E 20 CD 2A 2A 33  20 45 4E 20 CB D7 48 22  | IN .**3 EN ..H"|
00001490: 00 B9 1C 2C 0B 99 22 28  D4 4F 54 41 41 4C 2F 50  |...,.."(.OTAAL/P|
000014A0: 45 52 49 4F 44 45 20 45  4E 20 47 45 4D 49 44 44  |ERIODE EN GEMIDD|
000014B0: 45 4C 44 2F 44 41 47 29  22 00 C3 1C 36 0B 8D 32  |ELD/DAG)"...6..2|
000014C0: 39 32 30 00 F1 1C 40 0B  99 22 D6 C1 CE 21 21 20  |920...@.."...!! |
000014D0: 20 20 C7 C1 D3 20 20 20  21 21 20 C5 CC C5 CB D4  |  ...   !! .....|
000014E0: D2 C1 20 21 21 20 20 D7  C1 D4 C5 D2 20 20 21 21  |.. !!  .....  !!|
000014F0: 22 00 1F 1D 4A 0B 99 22  D4 CF D4 21 21 20 D4 4F  |"...J.."...!! .O|
00001500: 54 21 20 C7 45 4D 21 21  20 D4 4F 54 21 20 C7 45  |T! .EM!! .OT! .E|
00001510: 4D 21 21 20 D4 4F 54 21  20 C7 45 4D 21 21 22 00  |M!! .OT! .EM!!".|
00001520: 29 1D 54 0B 8D 32 39 32  30 00 2F 1D 5E 0B 8E 00  |).T..2920./.^...|
00001530: 44 1D 68 0B 8F 20 53 54  52 45 45 50 20 54 45 4B  |D.h.. STREEP TEK|
00001540: 45 4E 45 4E 00 74 1D 72  0B 99 22 2D 2D 2D 2D 2D  |ENEN.t.r.."-----|
00001550: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001560: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001570: 2D 22 3A 8E 00 8E 1D 7C  0B 8F 20 4D 41 41 4B 20  |-":....|.. MAAK |
00001580: 44 45 20 47 52 41 46 49  45 4B 20 56 4F 4C 00 AD  |DE GRAFIEK VOL..|
00001590: 1D 86 0B 4A B2 30 3A 8D  32 34 36 30 3A 8F 20 57  |...J.0:.2460:. W|
000015A0: 41 43 48 54 20 4F 50 20  54 4F 45 54 53 00 CC 1D  |ACHT OP TOETS...|
000015B0: 90 0B 8D 31 30 30 3A 8D  32 35 31 30 3A 8F 20 4E  |...100:.2510:. N|
000015C0: 49 45 55 57 45 20 50 41  47 49 4E 41 00 D2 1D 9A  |IEUWE PAGINA....|
000015D0: 0B 8E 00 FC 1D A8 61 8F  20 20 47 41 53 20 20 20  |......a.  GAS   |
000015E0: 45 4C 45 4B 54 52 41 20  57 41 54 45 52 20 20 56  |ELEKTRA WATER  V|
000015F0: 41 53 54 52 45 43 48 54  2F 44 41 47 00 16 1E B2  |ASTRECHT/DAG....|
00001600: 61 83 20 2E 31 35 35 32  2C 20 2E 31 36 35 35 2C  |a. .1552, .1655,|
00001610: 20 2E 32 34 36 33 00 40  1E BC 61 8F 20 20 47 41  | .2463.@..a.  GA|
00001620: 53 20 20 20 45 4C 45 4B  54 52 41 20 57 41 54 45  |S   ELEKTRA WATE|
00001630: 52 20 20 50 52 49 4A 53  2F 45 45 4E 48 45 49 44  |R  PRIJS/EENHEID|
00001640: 00 5B 1E C6 61 83 20 2E  34 39 34 35 2C 20 2E 32  |.[..a. .4945, .2|
00001650: 35 37 32 2C 20 32 2E 30  35 39 32 00 85 1E D0 61  |572, 2.0592....a|
00001660: 8F 20 20 4C 45 4E 47 54  45 20 56 2F 44 20 4D 41  |.  LENGTE V/D MA|
00001670: 41 4E 44 45 4E 20 28 53  54 41 52 54 3D 44 45 43  |ANDEN (START=DEC|
00001680: 45 4D 42 2E 29 00 AA 1E  DA 61 83 20 33 31 2C 20  |EMB.)....a. 31, |
00001690: 33 31 2C 20 32 38 2C 20  33 31 2C 20 33 30 2C 20  |31, 28, 31, 30, |
000016A0: 33 31 2C 20 33 30 2C 20  33 31 00 C3 1E E4 61 83  |31, 30, 31....a.|
000016B0: 20 33 31 2C 20 33 30 2C  20 33 31 2C 20 33 30 2C  | 31, 30, 31, 30,|
000016C0: 20 33 31 00 D5 1E EE 61  8F 20 4F 50 4E 41 4D 45  | 31....a. OPNAME|
000016D0: 2D 44 41 54 41 00 F6 1E  F8 61 83 22 30 31 31 31  |-DATA....a."0111|
000016E0: 22 2C 22 30 38 31 31 22  2C 22 31 36 31 31 22 2C  |","0811","1611",|
000016F0: 22 32 33 31 31 22 00 17  1F 02 62 83 22 33 30 31  |"2311"....b."301|
00001700: 31 22 2C 22 31 36 31 32  22 2C 22 30 31 30 31 22  |1","1612","0101"|
00001710: 2C 22 31 35 30 31 22 00  46 1F 0C 62 83 22 30 31  |,"1501".F..b."01|
00001720: 30 32 22 2C 22 31 35 30  32 22 2C 22 30 34 30 33  |02","1502","0403|
00001730: 22 2C 22 31 39 30 33 22  2C 22 30 31 30 34 22 2C  |","1903","0104",|
00001740: 22 31 37 30 34 22 00 57  1F 16 62 83 22 D3 D4 CF  |"1704".W..b."...|
00001750: D0 C4 C1 D4 D5 CD 22 00  62 1F 20 62 83 22 C7 C1  |......".b. b."..|
00001760: D3 22 00 89 1F 2A 62 8F  20 4D 45 54 45 52 53 54  |."...*b. METERST|
00001770: 41 4E 44 20 47 41 53 20  49 4E 20 4B 55 42 49 45  |AND GAS IN KUBIE|
00001780: 4B 45 20 4D 45 54 45 52  53 00 A9 1F 34 62 83 20  |KE METERS...4b. |
00001790: 33 35 35 31 37 2E 33 2C  20 33 35 35 38 34 2E 35  |35517.3, 35584.5|
000017A0: 2C 20 33 35 36 35 37 2E  33 00 D2 1F 3E 62 83 20  |, 35657.3...>b. |
000017B0: 33 35 37 32 35 2E 35 2C  20 33 35 38 30 35 2E 31  |35725.5, 35805.1|
000017C0: 2C 20 33 36 30 30 36 2E  32 2C 20 33 36 31 39 35  |, 36006.2, 36195|
000017D0: 2E 30 00 FB 1F 48 62 83  20 33 36 33 33 37 2E 38  |.0...Hb. 36337.8|
000017E0: 2C 20 33 36 35 33 33 2E  36 2C 20 33 36 37 33 31  |, 36533.6, 36731|
000017F0: 2E 38 2C 20 33 36 39 36  39 2E 38 00 19 20 52 62  |.8, 36969.8.. Rb|
00001800: 83 20 33 37 31 32 30 20  20 2C 20 33 37 32 37 30  |. 37120  , 37270|
00001810: 2E 34 2C 20 33 37 34 31  32 00 28 20 5C 62 83 22  |.4, 37412.( \b."|
00001820: C5 CC C5 CB D4 D2 C1 22  00 4E 20 66 62 8F 20 4D  |.......".N fb. M|
00001830: 45 54 45 52 53 54 2E 45  4C 45 4B 54 52 41 20 49  |ETERST.ELEKTRA I|
00001840: 4E 20 4B 49 4C 4F 57 41  54 54 2F 55 55 52 00 6F  |N KILOWATT/UUR.o|
00001850: 20 70 62 83 20 33 36 34  37 39 2C 20 33 36 35 34  | pb. 36479, 3654|
00001860: 34 2C 20 33 36 36 31 32  2C 20 33 36 36 38 34 00  |4, 36612, 36684.|
00001870: 97 20 7A 62 83 20 33 36  37 34 37 2C 20 33 36 38  |. zb. 36747, 368|
00001880: 38 30 2C 20 33 37 30 31  36 2C 20 33 37 31 32 36  |80, 37016, 37126|
00001890: 2C 20 33 37 32 38 31 00  BF 20 84 62 83 20 33 37  |, 37281.. .b. 37|
000018A0: 33 37 33 2C 20 33 37 34  39 39 2C 20 33 37 36 31  |373, 37499, 3761|
000018B0: 30 2C 20 33 37 37 30 34  2C 20 33 37 38 30 37 00  |0, 37704, 37807.|
000018C0: CC 20 8E 62 83 22 D7 C1  D4 C5 D2 22 00 F5 20 98  |. .b.".....".. .|
000018D0: 62 8F 20 4D 45 54 45 52  53 54 41 4E 44 20 57 41  |b. METERSTAND WA|
000018E0: 54 45 52 20 49 4E 20 4B  55 42 49 45 4B 45 20 4D  |TER IN KUBIEKE M|
000018F0: 45 54 45 52 53 00 12 21  A2 62 83 20 34 33 32 2E  |ETERS..!.b. 432.|
00001900: 36 34 2C 20 34 33 36 2E  31 34 2C 20 34 34 30 2E  |64, 436.14, 440.|
00001910: 32 37 00 37 21 AC 62 83  20 34 34 34 2E 36 38 2C  |27.7!.b. 444.68,|
00001920: 20 34 34 38 2E 34 35 2C  20 34 35 36 2E 38 35 2C  | 448.45, 456.85,|
00001930: 20 34 36 35 2E 31 36 00  5C 21 B6 62 83 20 34 37  | 465.16.\!.b. 47|
00001940: 31 2E 37 35 2C 20 34 38  32 2E 30 37 2C 20 34 38  |1.75, 482.07, 48|
00001950: 37 2E 32 33 2C 20 34 39  36 2E 33 31 00 79 21 C0  |7.23, 496.31.y!.|
00001960: 62 83 20 35 30 33 2E 38  35 2C 20 35 31 30 2E 37  |b. 503.85, 510.7|
00001970: 33 2C 20 35 31 39 2E 33  36 00 85 21 CA 62 83 22  |3, 519.36..!.b."|
00001980: D3 D4 CF D0 22 00 99 21  30 75 8F 20 4A 4F 53 20  |...."..!0u. JOS |
00001990: 42 55 52 47 48 4F 55 54  53 00 A9 21 3A 75 8F 20  |BURGHOUTS..!:u. |
000019A0: 50 55 54 48 4F 46 20 33  35 00 C2 21 44 75 8F 20  |PUTHOF 35..!Du. |
000019B0: 35 36 35 35 20 41 4D 20  20 45 49 4E 44 48 4F 56  |5655 AM  EINDHOV|
000019C0: 45 4E 00 D8 21 4E 75 8F  20 54 45 4C 2E 20 30 34  |EN..!Nu. TEL. 04|
000019D0: 30 2D 35 32 38 33 37 32  00 06 22 58 75 8F 20 50  |0-528372.."Xu. P|
000019E0: 52 4F 47 52 41 4D 4D 41  20 47 45 4D 41 41 4B 54  |ROGRAMMA GEMAAKT|
000019F0: 20 4F 50 20 45 45 4E 20  4F 53 49 2F 53 55 50 45  | OP EEN OSI/SUPE|
00001A00: 52 42 4F 41 52 44 00 1A  22 62 75 8F 20 4D 45 54  |RBOARD.."bu. MET|
00001A10: 20 32 34 20 4B 20 52 41  4D 2E 00 4E 22 6C 75 8F  | 24 K RAM..N"lu.|
00001A20: 20 56 49 44 45 4F 20 56  2F 48 20 53 55 50 45 52  | VIDEO V/H SUPER|
00001A30: 42 4F 41 52 44 20 49 53  20 32 36 20 52 45 47 45  |BOARD IS 26 REGE|
00001A40: 4C 53 2F 34 38 20 4B 4F  4C 4F 4D 4D 45 4E 00 77  |LS/48 KOLOMMEN.w|
00001A50: 22 76 75 8F 20 47 45 47  45 56 45 4E 53 20 4B 4F  |"vu. GEGEVENS KO|
00001A60: 4D 45 4E 20 55 49 54 20  44 45 20 57 49 4E 54 45  |MEN UIT DE WINTE|
00001A70: 52 20 38 32 2F 38 33 00  A3 22 80 75 8F 20 44 45  |R 82/83..".u. DE|
00001A80: 20 50 52 49 4A 5A 45 4E  20 55 49 54 20 31 39 38  | PRIJZEN UIT 198|
00001A90: 32 20 28 4F 50 47 41 56  45 20 44 45 4C 46 4C 41  |2 (OPGAVE DELFLA|
00001AA0: 4E 44 29 00 CD 22 8A 75  8F 20 50 41 53 20 44 49  |ND)..".u. PAS DI|
00001AB0: 54 20 41 41 4E 20 56 4F  4F 52 20 55 57 20 45 49  |T AAN VOOR UW EI|
00001AC0: 47 45 4E 20 53 49 54 55  41 54 49 45 2C 00 04 23  |GEN SITUATIE,..#|
00001AD0: 94 75 8F 20 45 52 20 5A  49 4A 4E 20 4C 41 4E 44  |.u. ER ZIJN LAND|
00001AE0: 45 4C 49 4A 4B 20 4E 4F  47 41 4C 20 57 41 54 20  |ELIJK NOGAL WAT |
00001AF0: 50 52 49 4A 53 2D 56 45  52 53 43 48 49 4C 4C 45  |PRIJS-VERSCHILLE|
00001B00: 4E 20 21 21 00 37 23 9E  75 8F 20 41 4C 53 20 41  |N !!.7#.u. ALS A|
00001B10: 4C 4C 45 20 4F 56 45 52  42 4F 44 49 47 45 20 52  |LLE OVERBODIGE R|
00001B20: 45 4D 27 53 20 57 4F 52  44 45 4E 20 56 45 52 57  |EM'S WORDEN VERW|
00001B30: 49 4A 44 45 52 44 2C 00  5B 23 A8 75 8F 20 50 41  |IJDERD,.[#.u. PA|
00001B40: 53 54 20 44 49 54 20 50  52 4F 47 52 41 4D 4D 41  |ST DIT PROGRAMMA|
00001B50: 20 49 4E 20 38 4B 20 52  41 4D 2E 00 83 23 B2 75  | IN 8K RAM...#.u|
00001B60: 8F 20 47 45 42 52 55 49  4B 54 45 20 42 41 53 49  |. GEBRUIKTE BASI|
00001B70: 43 4F 44 45 2D 32 20 53  55 42 52 4F 55 54 49 4E  |CODE-2 SUBROUTIN|
00001B80: 45 53 3B 00 A1 23 BC 75  8F 20 31 30 30 2C 20 31  |ES;..#.u. 100, 1|
00001B90: 31 30 2C 20 31 32 30 2C  20 32 31 30 2C 20 33 31  |10, 120, 210, 31|
00001BA0: 30 00 BC 23 C6 75 8F 20  45 4E 20 49 4E 44 49 52  |0..#.u. EN INDIR|
00001BB0: 45 4B 54 20 32 30 30 2C  20 33 30 30 00 00 00 52  |EKT 200, 300...R|
00001BC0: 50                                                |P               |

.......1000......1010.!.D..".";:..O.N..H
(".......................",.(.(VE.1)));.
_.P....(HO));:..W.X.HO..(0):VE.B(214):..
..H..IN$:....R..IN$:.IN$."".210.........
........RV..(1):......FR..(0):....,.SR$.
D(SR):.H(SR$,1)." ".SR$.J(SR$,2)...-....
.6.SR$."":.SR.0.SR$."-"...7.SR$.SR$.J(D(
.(.(SR)..5.10..CN)),2).Y.8..C(SR$).CT.CN
.(CN..0).SR$." ".SR$:.312.S.9..CN.0..(SR
)..1E10.315...:.SR$.SR$.J(D(1..(SR)..(.(
SR))..5.10..CN),3,CN.1).G.;..C(SR$).CT.S
R$.SR$." ":.315...<..C(SR$).CT.SR$.""...
=..C(SR$).CT.SR$.SR$."*":.317...>.....^.
.4,4:.4,SR$;: 4:..*.H..4,4:.4: 4:..J...A
.200:.20:. ENERGIEVERBRUIK.L....JG(200),
DU(20),ST(20),LE(12)......100:HO.5:VE.4:
.110......"ENERGIE  VERBRUIKS-CIJFERS".H
....:.1730:JV.DT:. INITIALISATIE.....HO.
15:VE.15:. BEPAAL BEELDSCHERMOMVANG...$.
HO.HO.1:BB.HO:.110:.120:.BB.HO .1060.J..
.HO.0:BB.BB.1:. BEELDSCHERMBREEDTE BEPAA
LD.S.8.VE.VE.1:VM.VE:.110:.120:.VM.VE .1
080...B.VM.VM.1:. BEELDSCHERMHOOGTE...L.
HO.0:VE.8:.110.O.V.."WILT U EEN GRAFISCH
E WEERGAVE PER"...`.."DAG (D) OF PER WEE
K (W)";:.210:W$.IN$...J..W$:.(W$.."W") .
(W$.."D") .1100.%.T...T.~..W$."W" .."GEM
IDDELD DAGVERBRUIK PER WEEK".....W$."D"
 .."GEMIDDELD VERBRUIK PER DAG"......A$:
.A$."STOP" .1220......1890:. BEREKEN DAG
GEMIDDELDE.M....W$."W" ..2250......1440:
. TEKENSUBROUTINE......1170:. GA DOOR TO
T 'STOP'.(.D..100:.:."VERBRUIKS-CIJFERS"
.G.N..A$:.A$.."STOPDATUM" .1230.P.X.TR.0
.I....A$:.A$."STOP" .1390......A$."GAS" 
.PR.GP:VP.VG......A$."WATER" .PR.WP:VP.V
W......A$."ELEKTRA" .PR.EP:VP.VE.W....J.
1 .JV:.ST(J):.J.....TT.ST(JV).ST(1):GE.T
T.T:BE.TT.PR.VP.JV:TR.BE.TR......:.A$:..
0.(.CN.1:CT.6:SR.TT:.310.].2.."TOTAAL VE
RBRUIK IN ";T;" DAGEN = ";SR$.L.<.SR.GE:
.310...F.."VERBRUIK PER DAG = ";SR$...P.
CN.2:CT.8:SR.BE:.310.O.Z.."TOTAAL BEDRAG
 IN ";T;" DAGEN = ";SR$...D..1250:. GA D
OOR TOT 'STOP'...N.SR.TR:CT.8:CN.2:.310.
'.X..:."REKENING-TOTAAL FL";SR$.<....246
0:.2580:.110.B...."                     
        ";......:. EINDE VAN HET PROGRAM
MA... .. TEKENSUB...... KLAAR STAAT NU J
G(JI), DE REEKS MET...... JI GEMIDDELDEN
 (DAG OF WEEK)...... WEERGEGEVEN WORDT S
TEEDS DE GRAFIEK...H.XH.JG(1):XL.JG(1).+
.R..I.2 .JI.C....JG(I).XL .XL.JG(I).[...
.JG(I).XH .XH.JG(I).B....I.|...XH.(XH.XL
).(BB..7).XH.....XL.(XL.XH).(BB..7).XL..
....100:.2510:D$.SD$:.2070.D...CT.4:CN.0
:J.0.Q."..I.1 .JI...,.J.J.1:.J.VM.4 ..29
40...6..2390:. BEPAAL DATUM...@..I.JI.VM
.3 .MR.MA:DR.DA.9.J.SR.TD:.310:.SR$;" !"
;.Z.T.TA.(XH.JG(I)).(XH.XL).(BB.6).Q.^..
.BB..(TA..5));"*".X.H..I...R.DA.DR:MA.MR
:.100:.2510...|..I.JI.VM.4 .JI.F....2390
:SR.TD:.310:.SR$;" !";.....TA.(XH.JG(I))
.(XH.XL).(BB.6).......BB..(TA..5));"*"..
....I......2460......./.B.. INITIALISERI
NGS-SUB.Y.L.. VULT EERST DE VERSCHILLEND
E PRIJZEN..V.. DAARNA DE LENGTE VAN DE 
MAANDEN...... LEEST DE STARTDATUM EN DAA
RNA STEEDS.R.... DE VOLGENDE DATUM TOT '
STOPDATUM'...... DAARNA IS DU(1..N) GEVU
LD.............VG,VW,VE,GP,EP,WP.'....X.
0 .12:.LE(X):.X.?....2010:. DATUM SUBR..
[.&.SD$.D$:SD.DA:SM.MA:DT.1.S.0..2010:. 
DATUM SUBR....:..D$."STOPDATUM" ... .D.E
D.DA:EM.MA:.2100...N.DT.DT.1:SD.ED:SM.EM
.B.X..1840...B.. BEREKEN HET VERBRUIK PE
R DAG...L.. EERST WORDT ST=DE STAND INGE
LEZEN.3.V.. DAARNA WORDT HET DAGGEMIDDEL
DE .X.... IN JG() GEZET MET T ALS TELLER
.O....J.1 .JV:.ST(J):.J.W...T.0......I.1
 .JV.1......J.1 .DU(I).....T.T.1:JG(T).(
ST(I.1).ST(I)).DU(I).C....J.J.F..I.Z.P.J
I.T:DT.1:....Z.. DATUM-SUBROUTINE...... 
LEEST EEN DATUM IN D$.4.... PRODUCEERT B
IJ EEN GELDIGE DATUM.Y.... HET DAG-NUMME
R EN MAAND-NUMMER.T.... EN IN IEDER GEVA
L D$.|....D$.....D1$.H(D$,2):DA.E(D1$)..
. .D1$.I(D$,2):MA.E(D1$)...*...O.4.. PER
IODE SUBROUTINE...>.. BEPAALT DE PERIODE
-LENGTE MET BEHULP...H.. VAN SD,SM EN ED
,EM.:.R.. ZET HET RESULTAAT IN VEKTOR DU
().O.\..EM.SM .SM.SM.12.W.F.TM.EM.SM:. T
M=TELLER AANTAL MAANDEN...P..TM.0 .DU(DT
).ED.SD:....Z.DU(DT).ED.....TM.TM.1.....
.TM.0 .2230.W...DU(DT).DU(DT).LE(SM.DT).
....TM.TM.1......TM.0 .2200.....DU(DT).D
U(DT).LE(SM).SD.......6.J.. BEREKEN DE W
EEKGEMIDDELDEN.G.T.WT..(JI.7).1.U....IW.
0 .WT.O...WG.0:. WEEKGEMIDDELDE.....DT.I
W.7:. DAGTELLER IN JG()......I.1 .7.....
WG.JG(DT.I).WG......I.G...JG(IW.1).WG.7.
O.$..IW.....WG.0:DT.(WT.1).7:IR.JI.DT...
8..I.1 .IR:WG.JG(DT.I).WG:.I.*.B.JI.WT.2
:JG(JI).WG.IR:DT.7.0.L...`.V.. BEREKEN T
ELKENS DE DATUM EN ZET DIE IN TD.O.`..I.
1 .2440.|.J.DA.DA.DT...T..DA.LE(MA) .DA.
DA.LE(MA):MA.MA.1...~..MA.12 .MA.MA.12.G
...TD.MA.100.DA.M.......... VRAAG DE VOL
GENDE PAGINA OP......200:.IN$.."" .2470.
)...."DRUK OP EEN TOETS ..";:.210.<....1
20:HO.0:.110.\.D.."EEN OGENBLIK A.U.B...
";:..|.N.. TEKEN DE KOP V/D TEKENING...X
.VE.1:HO.0:.110.....CT.6:CN.3:SR.XL:.310
.T...."    ";SR$;..(BB.2).5);A$;"-VERBRU
IK";.....SR.XH:.310:..BB.6);SR$......"DA
TUM+";:.I1.1 .BB.7:."-";:.I1:."+".)...CT
.4:CN.0:..B.... TABELLENSUBROUTINE.N....
2830:..E.(..VG,VW,VE,GP,EP,WP.|.2..X.0 .
12:.LE(X):.X...<..2010:. DATUMSUBROUTINE
...F.DT.0...P..2440.I.Z.DT.DT.1:HO.0:VE.
4.DT:.110...D.CT.4:CN.0:SR.TD:.310...N..
SR$;"!";:.2010...X..D$.."STOPDATUM" .264
0.-....A$:.A$."STOP" ..2460:..A....A$."G
AS" .HS.5.Z....A$."ELEKTRA" .HS.16.Q. ..
A$."WATER" .HS.27......J.1 .JV:.ST(J):.J
......J.1 .JV.1.....VE.5.J:HO.HS:.110.Y.
H.SR.ST(J.1).ST(J):CT.4:CN.0:.HS.25 .CN.
1...R..310:.SR$;"!";.....SR.(ST(J.1).ST(
J)).DU(J).$...CT.4:CN.1:.HS.25 .CN.2.8..
..310:.SR$;"!!";.?....J.Q....:.2920:.269
0.H.... KOP VAN DE TABEL.Q....100...".."
VERBRUIK IN M**3 EN KWH"...,.."(TOTAAL/P
ERIODE EN GEMIDDELD/DAG)".C.6..2920...@.
."VAN!!   GAS   !! ELEKTRA !!  WATER  !!
"...J.."TOT!! TOT! GEM!! TOT! GEM!! TOT!
 GEM!!".).T..2920./.^...D.H.. STREEP TEK
ENEN.T.R.."-----------------------------
---------":....|.. MAAK DE GRAFIEK VOL..
...J.0:.2460:. WACHT OP TOETS.L....100:.
2510:. NIEUWE PAGINA.R........A.  GAS   
ELEKTRA WATER  VASTRECHT/DAG....A. .1552
, .1655, .2463.@..A.  GAS   ELEKTRA WATE
R  PRIJS/EENHEID.[.FA. .4945, .2572, 2.0
592...PA.  LENGTE V/D MAANDEN (START=DEC
EMB.)...ZA. 31, 31, 28, 31, 30, 31, 30, 
31.C..A. 31, 30, 31, 30, 31.U..A. OPNAME
-DATA....A."0111","0811","1611","2311"..
..B."3011","1612","0101","1501".F..B."01
02","1502","0403","1903","0104","1704".W
..B."STOPDATUM".B. B."GAS"...*B. METERST
AND GAS IN KUBIEKE METERS...4B. 35517.3,
 35584.5, 35657.3.R.>B. 35725.5, 35805.1
, 36006.2, 36195.0...HB. 36337.8, 36533.
6, 36731.8, 36969.8.. RB. 37120  , 37270
.4, 37412.( \B."ELEKTRA".N FB. METERST.E
LEKTRA IN KILOWATT/UUR.O PB. 36479, 3654
4, 36612, 36684.. ZB. 36747, 36880, 3701
6, 37126, 37281.. .B. 37373, 37499, 3761
0, 37704, 37807.L .B."WATER".. .B. METER
STAND WATER IN KUBIEKE METERS..!.B. 432.
64, 436.14, 440.27.7!.B. 444.68, 448.45,
 456.85, 465.16.\!.B. 471.75, 482.07, 48
7.23, 496.31.Y!.B. 503.85, 510.73, 519.3
6..!JB."STOP"..!0U. JOS BURGHOUTS..!:U. 
PUTHOF 35.B!DU. 5655 AM  EINDHOVEN.X!NU.
 TEL. 040-528372.."XU. PROGRAMMA GEMAAKT
 OP EEN OSI/SUPERBOARD.."BU. MET 24 K RA
M..N"LU. VIDEO V/H SUPERBOARD IS 26 REGE
LS/48 KOLOMMEN.W"VU. GEGEVENS KOMEN UIT 
DE WINTER 82/83..".U. DE PRIJZEN UIT 198
2 (OPGAVE DELFLAND).M".U. PAS DIT AAN VO
OR UW EIGEN SITUATIE,..#.U. ER ZIJN LAND
ELIJK NOGAL WAT PRIJS-VERSCHILLEN !!.7#.
U. ALS ALLE OVERBODIGE REM'S WORDEN VERW
IJDERD,.[#.U. PAST DIT PROGRAMMA IN 8K R
AM...#.U. GEBRUIKTE BASICODE-2 SUBROUTIN
ES;..#.U. 100, 110, 120, 210, 310..#FU. 
EN INDIREKT 200, 300...RP

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL