ENERGIE-VERBRUIK
FILE INFORMATION
FILENAME(S): ENERGIE-VERBRUIK
FILE TYPE(S): PRG
FILE SIZE: 7K
FIRST SEEN: 2025-11-30 21:23:10
APPEARS ON: 1 disk(s)
FILE HASH
60cf607d69e550813008f80ed4dad6a0e7686e2c6464ae48601c71981f22dcfa
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 22 1 | ENERGIE-VERBRUIK | PRG | DuncanTwain | 12 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0B 04 0A 00 89 31 30 30 30 00 15 04 14 00 |.......1000.....|
00000010: 89 31 30 31 30 00 21 04 64 00 99 22 93 22 3B 3A |.1010.!.d..".";:|
00000020: 8E 00 51 04 6E 00 99 C8 28 22 13 11 11 11 11 11 |..Q.n...("......|
00000030: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000040: 11 11 11 22 2C B6 28 B5 28 56 45 AA 31 29 29 29 |...",.(.(VE.1)))|
00000050: 3B 00 61 04 70 00 99 A6 B6 28 48 4F 29 29 3B 3A |;.a.p....(HO));:|
00000060: 8E 00 79 04 78 00 48 4F B2 B9 28 30 29 3A 56 45 |..y.x.HO..(0):VE|
00000070: B2 C2 28 32 31 36 29 3A 8E 00 84 04 C8 00 A1 49 |..(216):.......I|
00000080: 4E 24 3A 8E 00 99 04 D2 00 A1 49 4E 24 3A 8B 49 |N$:.......IN$:.I|
00000090: 4E 24 B2 22 22 89 32 31 30 00 9F 04 DC 00 8E 00 |N$."".210.......|
000000A0: AC 04 FA 00 99 C7 28 37 29 3B 3A 8E 00 BA 04 04 |......(7);:.....|
000000B0: 01 52 56 B2 BB 28 31 29 3A 8E 00 C8 04 0E 01 46 |.RV..(1):......F|
000000C0: 52 B2 B8 28 30 29 3A 8E 00 F1 04 2C 01 53 52 24 |R..(0):....,.SR$|
000000D0: B2 C4 28 53 52 29 3A 8B C8 28 53 52 24 2C 31 29 |..(SR):..(SR$,1)|
000000E0: B2 22 20 22 A7 53 52 24 B2 CA 28 53 52 24 2C 32 |." ".SR$..(SR$,2|
000000F0: 29 00 F7 04 2D 01 8E 00 19 05 36 01 53 52 24 B2 |)...-.....6.SR$.|
00000100: 22 22 3A 8B 53 52 B3 AB 2E 35 AC 31 30 AE AB 43 |"":.SR...5.10..C|
00000110: 4E A7 53 52 24 B2 22 2D 22 00 3A 05 37 01 8B B6 |N.SR$."-".:.7...|
00000120: 28 53 52 29 B1 B2 31 30 AE 28 43 54 AB 43 4E AB |(SR)..10.(CT.CN.|
00000130: B4 28 43 4E 29 29 A7 33 31 37 00 61 05 38 01 53 |.(CN)).317.a.8.S|
00000140: 52 24 B2 53 52 24 AA CA 28 C4 28 B5 28 B6 28 53 |R$.SR$..(.(.(.(S|
00000150: 52 29 AA 2E 35 AC 31 30 AE AB 43 4E 29 29 2C 32 |R)..5.10..CN)),2|
00000160: 29 00 8C 05 39 01 8B C3 28 53 52 24 29 B3 43 54 |)...9...(SR$).CT|
00000170: AB 43 4E AA 28 43 4E B3 B1 30 29 A7 53 52 24 B2 |.CN.(CN..0).SR$.|
00000180: 22 20 22 AA 53 52 24 3A 89 33 31 33 00 A6 05 3A |" ".SR$:.313...:|
00000190: 01 8B 43 4E B2 30 B0 B6 28 53 52 29 B1 B2 31 45 |..CN.0..(SR)..1E|
000001A0: 31 30 89 33 31 36 00 DA 05 3B 01 53 52 24 B2 53 |10.316...;.SR$.S|
000001B0: 52 24 AA CA 28 C4 28 31 AA B6 28 53 52 29 AB B5 |R$..(.(1..(SR)..|
000001C0: 28 B6 28 53 52 29 29 AA 2E 35 AC 31 30 AE AB 43 |(.(SR))..5.10..C|
000001D0: 4E 29 2C 33 2C 43 4E AA 31 29 00 FA 05 3C 01 8B |N),3,CN.1)...<..|
000001E0: C3 28 53 52 24 29 B3 43 54 A7 53 52 24 B2 53 52 |.(SR$).CT.SR$.SR|
000001F0: 24 AA 22 20 22 3A 89 33 31 36 00 10 06 3D 01 8B |$." ":.316...=..|
00000200: C3 28 53 52 24 29 B1 43 54 A7 53 52 24 B2 22 22 |.(SR$).CT.SR$.""|
00000210: 00 30 06 3E 01 8B C3 28 53 52 24 29 B3 43 54 A7 |.0.>...(SR$).CT.|
00000220: 53 52 24 B2 53 52 24 AA 22 2A 22 3A 89 33 31 38 |SR$.SR$."*":.318|
00000230: 00 36 06 3F 01 8E 00 4C 06 5E 01 9F 34 2C 34 3A |.6.?...L.^..4,4:|
00000240: 98 34 2C 53 52 24 3B 3A A0 34 3A 8E 00 5D 06 68 |.4,SR$;:.4:..].h|
00000250: 01 9F 34 2C 34 3A 98 34 3A A0 34 3A 8E 00 7D 06 |..4,4:.4:.4:..}.|
00000260: E8 03 41 B2 32 30 30 3A 89 32 30 3A 8F 20 45 4E |..A.200:.20:. EN|
00000270: 45 52 47 49 45 56 45 52 42 52 55 49 4B 00 9F 06 |ERGIEVERBRUIK...|
00000280: F2 03 86 4A 47 28 32 30 30 29 2C 44 55 28 32 30 |...JG(200),DU(20|
00000290: 29 2C 53 54 28 32 30 29 2C 4C 45 28 31 32 29 00 |),ST(20),LE(12).|
000002A0: B7 06 FC 03 8D 31 30 30 3A 48 4F B2 35 3A 56 45 |.....100:HO.5:VE|
000002B0: B2 34 3A 8D 31 31 30 00 D9 06 06 04 99 22 45 4E |.4:.110......"EN|
000002C0: 45 52 47 49 45 20 20 56 45 52 42 52 55 49 4B 53 |ERGIE VERBRUIKS|
000002D0: 2D 43 49 4A 46 45 52 53 22 00 FB 06 10 04 8C 3A |-CIJFERS"......:|
000002E0: 8D 31 37 33 30 3A 4A 56 B2 44 54 3A 8F 20 49 4E |.1730:JV.DT:. IN|
000002F0: 49 54 49 41 4C 49 53 41 54 49 45 00 26 07 1A 04 |ITIALISATIE.&...|
00000300: 48 4F B2 31 35 3A 56 45 B2 31 35 3A 8F 20 42 45 |HO.15:VE.15:. BE|
00000310: 50 41 41 4C 20 42 45 45 4C 44 53 43 48 45 52 4D |PAAL BEELDSCHERM|
00000320: 4F 4D 56 41 4E 47 00 4F 07 24 04 48 4F B2 48 4F |OMVANG.O.$.HO.HO|
00000330: AA 31 3A 42 42 B2 48 4F 3A 8D 31 31 30 3A 8D 31 |.1:BB.HO:.110:.1|
00000340: 32 30 3A 8B 42 42 B2 48 4F 20 A7 31 30 36 30 00 |20:.BB.HO .1060.|
00000350: 7D 07 2E 04 48 4F B2 30 3A 42 42 B2 42 42 AB 31 |}...HO.0:BB.BB.1|
00000360: 3A 8F 20 42 45 45 4C 44 53 43 48 45 52 4D 42 52 |:. BEELDSCHERMBR|
00000370: 45 45 44 54 45 20 42 45 50 41 41 4C 44 00 A6 07 |EEDTE BEPAALD...|
00000380: 38 04 56 45 B2 56 45 AA 31 3A 56 4D B2 56 45 3A |8.VE.VE.1:VM.VE:|
00000390: 8D 31 31 30 3A 8D 31 32 30 3A 8B 56 4D B2 56 45 |.110:.120:.VM.VE|
000003A0: 20 A7 31 30 38 30 00 C6 07 42 04 56 4D B2 56 4D | .1080...B.VM.VM|
000003B0: AB 31 3A 8F 20 42 45 45 4C 44 53 43 48 45 52 4D |.1:. BEELDSCHERM|
000003C0: 48 4F 4F 47 54 45 00 D9 07 4C 04 48 4F B2 30 3A |HOOGTE...L.HO.0:|
000003D0: 56 45 B2 38 3A 8D 31 31 30 00 02 08 56 04 99 22 |VE.8:.110...V.."|
000003E0: 57 49 4C 54 20 55 20 45 45 4E 20 47 52 41 46 49 |WILT U EEN GRAFI|
000003F0: 53 43 48 45 20 57 45 45 52 47 41 56 45 20 50 45 |SCHE WEERGAVE PE|
00000400: 52 22 00 2E 08 60 04 99 22 44 41 47 20 28 44 29 |R"...`.."DAG (D)|
00000410: 20 4F 46 20 50 45 52 20 57 45 45 4B 20 28 57 29 | OF PER WEEK (W)|
00000420: 22 3B 3A 8D 32 31 30 3A 57 24 B2 49 4E 24 00 52 |";:.210:W$.IN$.R|
00000430: 08 6A 04 99 57 24 3A 8B 28 57 24 B3 B1 22 57 22 |.j..W$:.(W$.."W"|
00000440: 29 20 AF 28 57 24 B3 B1 22 44 22 29 20 A7 31 31 |) .(W$.."D") .11|
00000450: 30 30 00 58 08 74 04 99 00 87 08 7E 04 8B 57 24 |00.X.t.....~..W$|
00000460: B2 22 57 22 20 A7 99 22 47 45 4D 49 44 44 45 4C |."W" .."GEMIDDEL|
00000470: 44 20 44 41 47 56 45 52 42 52 55 49 4B 20 50 45 |D DAGVERBRUIK PE|
00000480: 52 20 57 45 45 4B 22 00 B2 08 88 04 8B 57 24 B2 |R WEEK"......W$.|
00000490: 22 44 22 20 A7 99 22 47 45 4D 49 44 44 45 4C 44 |"D" .."GEMIDDELD|
000004A0: 20 56 45 52 42 52 55 49 4B 20 50 45 52 20 44 41 | VERBRUIK PER DA|
000004B0: 47 22 00 CB 08 92 04 87 41 24 3A 8B 41 24 B2 22 |G"......A$:.A$."|
000004C0: 53 54 4F 50 22 20 A7 31 32 32 30 00 ED 08 9C 04 |STOP" .1220.....|
000004D0: 8D 31 38 39 30 3A 8F 20 42 45 52 45 4B 45 4E 20 |.1890:. BEREKEN |
000004E0: 44 41 47 47 45 4D 49 44 44 45 4C 44 45 00 00 09 |DAGGEMIDDELDE...|
000004F0: A6 04 8B 57 24 B2 22 57 22 20 A7 8D 32 32 35 30 |...W$."W" ..2250|
00000500: 00 1C 09 B0 04 8D 31 34 34 30 3A 8F 20 54 45 4B |......1440:. TEK|
00000510: 45 4E 53 55 42 52 4F 55 54 49 4E 45 00 3B 09 BA |ENSUBROUTINE.;..|
00000520: 04 89 31 31 37 30 3A 8F 20 47 41 20 44 4F 4F 52 |..1170:. GA DOOR|
00000530: 20 54 4F 54 20 27 53 54 4F 50 27 00 5B 09 C4 04 | TOT 'STOP'.[...|
00000540: 8D 31 30 30 3A 8C 3A 99 22 56 45 52 42 52 55 49 |.100:.:."VERBRUI|
00000550: 4B 53 2D 43 49 4A 46 45 52 53 22 00 7A 09 CE 04 |KS-CIJFERS".z...|
00000560: 87 41 24 3A 8B 41 24 B3 B1 22 53 54 4F 50 44 41 |.A$:.A$.."STOPDA|
00000570: 54 55 4D 22 20 A7 31 32 33 30 00 83 09 D8 04 54 |TUM" .1230.....T|
00000580: 52 B2 30 00 9C 09 E2 04 87 41 24 3A 8B 41 24 B2 |R.0......A$:.A$.|
00000590: 22 53 54 4F 50 22 20 A7 31 33 39 30 00 B7 09 EC |"STOP" .1390....|
000005A0: 04 8B 41 24 B2 22 47 41 53 22 20 A7 50 52 B2 47 |..A$."GAS" .PR.G|
000005B0: 50 3A 56 50 B2 56 47 00 D4 09 F6 04 8B 41 24 B2 |P:VP.VG......A$.|
000005C0: 22 57 41 54 45 52 22 20 A7 50 52 B2 57 50 3A 56 |"WATER" .PR.WP:V|
000005D0: 50 B2 56 57 00 F3 09 00 05 8B 41 24 B2 22 45 4C |P.VW......A$."EL|
000005E0: 45 4B 54 52 41 22 20 A7 50 52 B2 45 50 3A 56 50 |EKTRA" .PR.EP:VP|
000005F0: B2 56 45 00 0A 0A 0A 05 81 4A B2 31 20 A4 4A 56 |.VE......J.1 .JV|
00000600: 3A 87 53 54 28 4A 29 3A 82 4A 00 3E 0A 14 05 54 |:.ST(J):.J.>...T|
00000610: 54 B2 53 54 28 4A 56 29 AB 53 54 28 31 29 3A 47 |T.ST(JV).ST(1):G|
00000620: 45 B2 54 54 AD 54 3A 42 45 B2 54 54 AC 50 52 AA |E.TT.T:BE.TT.PR.|
00000630: 56 50 AC 4A 56 3A 54 52 B2 42 45 AA 54 52 00 4A |VP.JV:TR.BE.TR.J|
00000640: 0A 1E 05 99 3A 99 41 24 3A 99 00 63 0A 28 05 43 |....:.A$:..c.(.C|
00000650: 4E B2 31 3A 43 54 B2 36 3A 53 52 B2 54 54 3A 8D |N.1:CT.6:SR.TT:.|
00000660: 33 31 30 00 90 0A 32 05 99 22 54 4F 54 41 41 4C |310...2.."TOTAAL|
00000670: 20 56 45 52 42 52 55 49 4B 20 49 4E 20 22 3B 54 | VERBRUIK IN ";T|
00000680: 3B 22 20 44 41 47 45 4E 20 3D 20 22 3B 53 52 24 |;" DAGEN = ";SR$|
00000690: 00 9F 0A 3C 05 53 52 B2 47 45 3A 8D 33 31 30 00 |...<.SR.GE:.310.|
000006A0: BE 0A 46 05 99 22 56 45 52 42 52 55 49 4B 20 50 |..F.."VERBRUIK P|
000006B0: 45 52 20 44 41 47 20 3D 20 22 3B 53 52 24 00 D7 |ER DAG = ";SR$..|
000006C0: 0A 50 05 43 4E B2 32 3A 43 54 B2 38 3A 53 52 B2 |.P.CN.2:CT.8:SR.|
000006D0: 42 45 3A 8D 33 31 30 00 02 0B 5A 05 99 22 54 4F |BE:.310...Z.."TO|
000006E0: 54 41 41 4C 20 42 45 44 52 41 47 20 49 4E 20 22 |TAAL BEDRAG IN "|
000006F0: 3B 54 3B 22 20 44 41 47 45 4E 20 3D 20 22 3B 53 |;T;" DAGEN = ";S|
00000700: 52 24 00 21 0B 64 05 89 31 32 35 30 3A 8F 20 47 |R$.!.d..1250:. G|
00000710: 41 20 44 4F 4F 52 20 54 4F 54 20 27 53 54 4F 50 |A DOOR TOT 'STOP|
00000720: 27 00 3A 0B 6E 05 53 52 B2 54 52 3A 43 54 B2 38 |'.:.n.SR.TR:CT.8|
00000730: 3A 43 4E B2 32 3A 8D 33 31 30 00 5A 0B 78 05 99 |:CN.2:.310.Z.x..|
00000740: 3A 99 22 52 45 4B 45 4E 49 4E 47 2D 54 4F 54 41 |:."REKENING-TOTA|
00000750: 41 4C 20 46 4C 22 3B 53 52 24 00 6F 0B 82 05 8D |AL FL";SR$.o....|
00000760: 32 34 36 30 3A 8D 32 35 38 30 3A 8D 31 31 30 00 |2460:.2580:.110.|
00000770: 95 0B 8C 05 99 22 20 20 20 20 20 20 20 20 20 20 |....." |
00000780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000790: 20 20 20 22 3B 00 B5 0B 96 05 80 3A 8F 20 45 49 | ";......:. EI|
000007A0: 4E 44 45 20 56 41 4E 20 48 45 54 20 50 52 4F 47 |NDE VAN HET PROG|
000007B0: 52 41 4D 4D 41 00 C4 0B A0 05 8F 20 54 45 4B 45 |RAMMA...... TEKE|
000007C0: 4E 53 55 42 00 EE 0B AA 05 8F 20 4B 4C 41 41 52 |NSUB...... KLAAR|
000007D0: 20 53 54 41 41 54 20 4E 55 20 4A 47 28 4A 49 29 | STAAT NU JG(JI)|
000007E0: 2C 20 44 45 20 52 45 45 4B 53 20 4D 45 54 00 11 |, DE REEKS MET..|
000007F0: 0C B4 05 8F 20 4A 49 20 47 45 4D 49 44 44 45 4C |.... JI GEMIDDEL|
00000800: 44 45 4E 20 28 44 41 47 20 4F 46 20 57 45 45 4B |DEN (DAG OF WEEK|
00000810: 29 00 3B 0C BE 05 8F 20 57 45 45 52 47 45 47 45 |).;.... WEERGEGE|
00000820: 56 45 4E 20 57 4F 52 44 54 20 53 54 45 45 44 53 |VEN WORDT STEEDS|
00000830: 20 44 45 20 47 52 41 46 49 45 4B 00 51 0C C8 05 | DE GRAFIEK.Q...|
00000840: 58 48 B2 4A 47 28 31 29 3A 58 4C B2 4A 47 28 31 |XH.JG(1):XL.JG(1|
00000850: 29 00 5E 0C D2 05 81 49 B2 32 20 A4 4A 49 00 76 |).^....I.2 .JI.v|
00000860: 0C DC 05 8B 4A 47 28 49 29 B3 58 4C 20 A7 58 4C |....JG(I).XL .XL|
00000870: B2 4A 47 28 49 29 00 8E 0C E6 05 8B 4A 47 28 49 |.JG(I)......JG(I|
00000880: 29 B1 58 48 20 A7 58 48 B2 4A 47 28 49 29 00 95 |).XH .XH.JG(I)..|
00000890: 0C F0 05 82 49 00 AF 0C FA 05 58 48 B2 28 58 48 |....I.....XH.(XH|
000008A0: AB 58 4C 29 AD 28 42 42 AC 2E 37 29 AA 58 48 00 |.XL).(BB..7).XH.|
000008B0: C9 0C 04 06 58 4C B2 28 58 4C AB 58 48 29 AD 28 |....XL.(XL.XH).(|
000008C0: 42 42 AC 2E 37 29 AA 58 4C 00 E5 0C 0E 06 8D 31 |BB..7).XL......1|
000008D0: 30 30 3A 8D 32 35 31 30 3A 44 24 B2 53 44 24 3A |00:.2510:D$.SD$:|
000008E0: 8D 32 30 37 30 00 F7 0C 18 06 43 54 B2 34 3A 43 |.2070.....CT.4:C|
000008F0: 4E B2 30 3A 4A B2 30 00 04 0D 22 06 81 49 B2 31 |N.0:J.0..."..I.1|
00000900: 20 A4 4A 49 00 1D 0D 2C 06 4A B2 4A AA 31 3A 8B | .JI...,.J.J.1:.|
00000910: 4A B2 56 4D AB 34 20 A7 8D 32 39 34 30 00 36 0D |J.VM.4 ..2940.6.|
00000920: 36 06 8D 32 33 39 30 3A 8F 20 42 45 50 41 41 4C |6..2390:. BEPAAL|
00000930: 20 44 41 54 55 4D 00 52 0D 40 06 8B 49 B2 4A 49 | DATUM.R.@..I.JI|
00000940: AB 56 4D AA 33 20 A7 4D 52 B2 4D 41 3A 44 52 B2 |.VM.3 .MR.MA:DR.|
00000950: 44 41 00 6C 0D 4A 06 53 52 B2 54 44 3A 8D 33 31 |DA.l.J.SR.TD:.31|
00000960: 30 3A 99 53 52 24 3B 22 20 21 22 3B 00 8D 0D 54 |0:.SR$;" !";...T|
00000970: 06 54 41 B2 28 58 48 AB 4A 47 28 49 29 29 AD 28 |.TA.(XH.JG(I)).(|
00000980: 58 48 AB 58 4C 29 AC 28 42 42 AB 36 29 00 A4 0D |XH.XL).(BB.6)...|
00000990: 5E 06 99 A3 42 42 AB B5 28 54 41 AA 2E 35 29 29 |^...BB..(TA..5))|
000009A0: 3B 22 2A 22 00 AB 0D 68 06 82 49 00 C6 0D 72 06 |;"*"...h..I...r.|
000009B0: 44 41 B2 44 52 3A 4D 41 B2 4D 52 3A 8D 31 30 30 |DA.DR:MA.MR:.100|
000009C0: 3A 8D 32 35 31 30 00 D9 0D 7C 06 81 49 B2 4A 49 |:.2510...|..I.JI|
000009D0: AB 56 4D AA 34 20 A4 4A 49 00 F9 0D 86 06 8D 32 |.VM.4 .JI......2|
000009E0: 33 39 30 3A 53 52 B2 54 44 3A 8D 33 31 30 3A 99 |390:SR.TD:.310:.|
000009F0: 53 52 24 3B 22 20 21 22 3B 00 1A 0E 90 06 54 41 |SR$;" !";.....TA|
00000A00: B2 28 58 48 AB 4A 47 28 49 29 29 AD 28 58 48 AB |.(XH.JG(I)).(XH.|
00000A10: 58 4C 29 AC 28 42 42 AB 36 29 00 31 0E 9A 06 99 |XL).(BB.6).1....|
00000A20: A3 42 42 AB B5 28 54 41 AA 2E 35 29 29 3B 22 2A |.BB..(TA..5));"*|
00000A30: 22 00 38 0E A4 06 82 49 00 42 0E AE 06 8D 32 34 |".8....I.B....24|
00000A40: 36 30 00 48 0E B8 06 8E 00 62 0E C2 06 8F 20 49 |60.H.....b.... I|
00000A50: 4E 49 54 49 41 4C 49 53 45 52 49 4E 47 53 2D 53 |NITIALISERINGS-S|
00000A60: 55 42 00 8C 0E CC 06 8F 20 56 55 4C 54 20 45 45 |UB...... VULT EE|
00000A70: 52 53 54 20 44 45 20 56 45 52 53 43 48 49 4C 4C |RST DE VERSCHILL|
00000A80: 45 4E 44 45 20 50 52 49 4A 5A 45 4E 00 B2 0E D6 |ENDE PRIJZEN....|
00000A90: 06 8F 20 44 41 41 52 4E 41 20 44 45 20 4C 45 4E |.. DAARNA DE LEN|
00000AA0: 47 54 45 20 56 41 4E 20 44 45 20 4D 41 41 4E 44 |GTE VAN DE MAAND|
00000AB0: 45 4E 00 DD 0E E0 06 8F 20 4C 45 45 53 54 20 44 |EN...... LEEST D|
00000AC0: 45 20 53 54 41 52 54 44 41 54 55 4D 20 45 4E 20 |E STARTDATUM EN |
00000AD0: 44 41 41 52 4E 41 20 53 54 45 45 44 53 00 05 0F |DAARNA STEEDS...|
00000AE0: EA 06 8F 20 44 45 20 56 4F 4C 47 45 4E 44 45 20 |... DE VOLGENDE |
00000AF0: 44 41 54 55 4D 20 54 4F 54 20 27 53 54 4F 50 44 |DATUM TOT 'STOPD|
00000B00: 41 54 55 4D 27 00 26 0F F4 06 8F 20 44 41 41 52 |ATUM'.&.... DAAR|
00000B10: 4E 41 20 49 53 20 44 55 28 31 2E 2E 4E 29 20 47 |NA IS DU(1..N) G|
00000B20: 45 56 55 4C 44 2E 00 2C 0F FE 06 8C 00 43 0F 08 |EVULD..,.....C..|
00000B30: 07 87 56 47 2C 56 57 2C 56 45 2C 47 50 2C 45 50 |..VG,VW,VE,GP,EP|
00000B40: 2C 57 50 00 5A 0F 12 07 81 58 B2 30 20 A4 31 32 |,WP.Z....X.0 .12|
00000B50: 3A 87 4C 45 28 58 29 3A 82 58 00 72 0F 1C 07 8D |:.LE(X):.X.r....|
00000B60: 32 30 31 30 3A 8F 20 44 41 54 55 4D 20 53 55 42 |2010:. DATUM SUB|
00000B70: 52 2E 00 8E 0F 26 07 53 44 24 B2 44 24 3A 53 44 |R....&.SD$.D$:SD|
00000B80: B2 44 41 3A 53 4D B2 4D 41 3A 44 54 B2 31 00 A6 |.DA:SM.MA:DT.1..|
00000B90: 0F 30 07 8D 32 30 31 30 3A 8F 20 44 41 54 55 4D |.0..2010:. DATUM|
00000BA0: 20 53 55 42 52 2E 00 BD 0F 3A 07 8B 44 24 B2 22 | SUBR....:..D$."|
00000BB0: 53 54 4F 50 44 41 54 55 4D 22 20 A7 8E 00 D3 0F |STOPDATUM" .....|
00000BC0: 44 07 45 44 B2 44 41 3A 45 4D B2 4D 41 3A 8D 32 |D.ED.DA:EM.MA:.2|
00000BD0: 31 30 30 00 EB 0F 4E 07 44 54 B2 44 54 AA 31 3A |100...N.DT.DT.1:|
00000BE0: 53 44 B2 45 44 3A 53 4D B2 45 4D 00 F5 0F 58 07 |SD.ED:SM.EM...X.|
00000BF0: 89 31 38 34 30 00 18 10 62 07 8F 20 42 45 52 45 |.1840...b.. BERE|
00000C00: 4B 45 4E 20 48 45 54 20 56 45 52 42 52 55 49 4B |KEN HET VERBRUIK|
00000C10: 20 50 45 52 20 44 41 47 00 40 10 6C 07 8F 20 45 | PER DAG.@.l.. E|
00000C20: 45 52 53 54 20 57 4F 52 44 54 20 53 54 3D 44 45 |ERST WORDT ST=DE|
00000C30: 20 53 54 41 4E 44 20 49 4E 47 45 4C 45 5A 45 4E | STAND INGELEZEN|
00000C40: 00 66 10 76 07 8F 20 44 41 41 52 4E 41 20 57 4F |.f.v.. DAARNA WO|
00000C50: 52 44 54 20 48 45 54 20 44 41 47 47 45 4D 49 44 |RDT HET DAGGEMID|
00000C60: 44 45 4C 44 45 20 00 8B 10 80 07 8F 20 49 4E 20 |DELDE ...... IN |
00000C70: 4A 47 28 29 20 47 45 5A 45 54 20 4D 45 54 20 54 |JG() GEZET MET T|
00000C80: 20 41 4C 53 20 54 45 4C 4C 45 52 00 A2 10 8A 07 | ALS TELLER.....|
00000C90: 81 4A B2 31 20 A4 4A 56 3A 87 53 54 28 4A 29 3A |.J.1 .JV:.ST(J):|
00000CA0: 82 4A 00 AA 10 94 07 54 B2 30 00 B9 10 9E 07 81 |.J.....T.0......|
00000CB0: 49 B2 31 20 A4 4A 56 AB 31 00 C9 10 A8 07 81 4A |I.1 .JV.1......J|
00000CC0: B2 31 20 A4 44 55 28 49 29 00 EF 10 B2 07 54 B2 |.1 .DU(I).....T.|
00000CD0: 54 AA 31 3A 4A 47 28 54 29 B2 28 53 54 28 49 AA |T.1:JG(T).(ST(I.|
00000CE0: 31 29 AB 53 54 28 49 29 29 AD 44 55 28 49 29 00 |1).ST(I)).DU(I).|
00000CF0: F6 10 BC 07 82 4A 00 FD 10 C6 07 82 49 00 0D 11 |.....J......I...|
00000D00: D0 07 4A 49 B2 54 3A 44 54 B2 31 3A 8E 00 24 11 |..JI.T:DT.1:..$.|
00000D10: DA 07 8F 20 44 41 54 55 4D 2D 53 55 42 52 4F 55 |... DATUM-SUBROU|
00000D20: 54 49 4E 45 00 40 11 E4 07 8F 20 4C 45 45 53 54 |TINE.@.... LEEST|
00000D30: 20 45 45 4E 20 44 41 54 55 4D 20 49 4E 20 44 24 | EEN DATUM IN D$|
00000D40: 00 67 11 EE 07 8F 20 50 52 4F 44 55 43 45 45 52 |.g.... PRODUCEER|
00000D50: 54 20 42 49 4A 20 45 45 4E 20 47 45 4C 44 49 47 |T BIJ EEN GELDIG|
00000D60: 45 20 44 41 54 55 4D 00 8C 11 F8 07 8F 20 48 45 |E DATUM...... HE|
00000D70: 54 20 44 41 47 2D 4E 55 4D 4D 45 52 20 45 4E 20 |T DAG-NUMMER EN |
00000D80: 4D 41 41 4E 44 2D 4E 55 4D 4D 45 52 00 A7 11 02 |MAAND-NUMMER....|
00000D90: 08 8F 20 45 4E 20 49 4E 20 49 45 44 45 52 20 47 |.. EN IN IEDER G|
00000DA0: 45 56 41 4C 20 44 24 00 AF 11 0C 08 87 44 24 00 |EVAL D$......D$.|
00000DB0: C9 11 16 08 44 31 24 B2 C8 28 44 24 2C 32 29 3A |....D1$..(D$,2):|
00000DC0: 44 41 B2 C5 28 44 31 24 29 00 E3 11 20 08 44 31 |DA..(D1$)... .D1|
00000DD0: 24 B2 C9 28 44 24 2C 32 29 3A 4D 41 B2 C5 28 44 |$..(D$,2):MA..(D|
00000DE0: 31 24 29 00 E9 11 2A 08 8E 00 02 12 34 08 8F 20 |1$)...*.....4.. |
00000DF0: 50 45 52 49 4F 44 45 20 53 55 42 52 4F 55 54 49 |PERIODE SUBROUTI|
00000E00: 4E 45 00 2D 12 3E 08 8F 20 42 45 50 41 41 4C 54 |NE.-.>.. BEPAALT|
00000E10: 20 44 45 20 50 45 52 49 4F 44 45 2D 4C 45 4E 47 | DE PERIODE-LENG|
00000E20: 54 45 20 4D 45 54 20 42 45 48 55 4C 50 00 46 12 |TE MET BEHULP.F.|
00000E30: 48 08 8F 20 56 41 4E 20 53 44 2C 53 4D 20 45 4E |H.. VAN SD,SM EN|
00000E40: 20 45 44 2C 45 4D 00 6D 12 52 08 8F 20 5A 45 54 | ED,EM.m.R.. ZET|
00000E50: 20 48 45 54 20 52 45 53 55 4C 54 41 41 54 20 49 | HET RESULTAAT I|
00000E60: 4E 20 56 45 4B 54 4F 52 20 44 55 28 29 00 82 12 |N VEKTOR DU()...|
00000E70: 5C 08 8B 45 4D B3 53 4D 20 A7 53 4D B2 53 4D AB |\..EM.SM .SM.SM.|
00000E80: 31 32 00 AA 12 66 08 54 4D B2 45 4D AB 53 4D 3A |12...f.TM.EM.SM:|
00000E90: 8F 20 54 4D 3D 54 45 4C 4C 45 52 20 41 41 4E 54 |. TM=TELLER AANT|
00000EA0: 41 4C 20 4D 41 41 4E 44 45 4E 00 C4 12 70 08 8B |AL MAANDEN...p..|
00000EB0: 54 4D B2 30 20 A7 44 55 28 44 54 29 B2 45 44 AB |TM.0 .DU(DT).ED.|
00000EC0: 53 44 3A 8E 00 D2 12 7A 08 44 55 28 44 54 29 B2 |SD:....z.DU(DT).|
00000ED0: 45 44 00 DE 12 84 08 54 4D B2 54 4D AB 31 00 EE |ED.....TM.TM.1..|
00000EE0: 12 8E 08 8B 54 4D B2 30 20 A7 32 32 33 30 00 0A |....TM.0 .2230..|
00000EF0: 13 98 08 44 55 28 44 54 29 B2 44 55 28 44 54 29 |...DU(DT).DU(DT)|
00000F00: AA 4C 45 28 53 4D AA 44 54 29 00 16 13 A2 08 54 |.LE(SM.DT).....T|
00000F10: 4D B2 54 4D AB 31 00 26 13 AC 08 8B 54 4D B1 30 |M.TM.1.&....TM.0|
00000F20: 20 A7 32 32 30 30 00 42 13 B6 08 44 55 28 44 54 | .2200.B...DU(DT|
00000F30: 29 B2 44 55 28 44 54 29 AA 4C 45 28 53 4D 29 AB |).DU(DT).LE(SM).|
00000F40: 53 44 00 48 13 C0 08 8E 00 69 13 CA 08 8F 20 42 |SD.H.....i.... B|
00000F50: 45 52 45 4B 45 4E 20 44 45 20 57 45 45 4B 47 45 |EREKEN DE WEEKGE|
00000F60: 4D 49 44 44 45 4C 44 45 4E 00 7A 13 D4 08 57 54 |MIDDELDEN.z...WT|
00000F70: B2 B5 28 4A 49 AD 37 29 AB 31 00 88 13 DE 08 81 |..(JI.7).1......|
00000F80: 49 57 B2 30 20 A4 57 54 00 A2 13 E8 08 57 47 B2 |IW.0 .WT.....WG.|
00000F90: 30 3A 8F 20 57 45 45 4B 47 45 4D 49 44 44 45 4C |0:. WEEKGEMIDDEL|
00000FA0: 44 45 00 C2 13 F2 08 44 54 B2 49 57 AC 37 3A 8F |DE.....DT.IW.7:.|
00000FB0: 20 44 41 47 54 45 4C 4C 45 52 20 49 4E 20 4A 47 | DAGTELLER IN JG|
00000FC0: 28 29 00 CE 13 FC 08 81 49 B2 31 20 A4 37 00 E1 |()......I.1 .7..|
00000FD0: 13 06 09 57 47 B2 4A 47 28 44 54 AA 49 29 AA 57 |...WG.JG(DT.I).W|
00000FE0: 47 00 E8 13 10 09 82 49 00 FA 13 1A 09 4A 47 28 |G......I.....JG(|
00000FF0: 49 57 AA 31 29 B2 57 47 AD 37 00 02 14 24 09 82 |IW.1).WG.7...$..|
00001000: 49 57 00 20 14 2E 09 57 47 B2 30 3A 44 54 B2 28 |IW. ...WG.0:DT.(|
00001010: 57 54 AA 31 29 AC 37 3A 49 52 B2 4A 49 AB 44 54 |WT.1).7:IR.JI.DT|
00001020: 00 3F 14 38 09 81 49 B2 31 20 A4 49 52 3A 57 47 |.?.8..I.1 .IR:WG|
00001030: B2 4A 47 28 44 54 AA 49 29 AA 57 47 3A 82 49 00 |.JG(DT.I).WG:.I.|
00001040: 5D 14 42 09 4A 49 B2 57 54 AA 32 3A 4A 47 28 4A |].B.JI.WT.2:JG(J|
00001050: 49 29 B2 57 47 AD 49 52 3A 44 54 B2 37 00 63 14 |I).WG.IR:DT.7.c.|
00001060: 4C 09 8E 00 93 14 56 09 8F 20 42 45 52 45 4B 45 |L.....V.. BEREKE|
00001070: 4E 20 54 45 4C 4B 45 4E 53 20 44 45 20 44 41 54 |N TELKENS DE DAT|
00001080: 55 4D 20 45 4E 20 5A 45 54 20 44 49 45 20 49 4E |UM EN ZET DIE IN|
00001090: 20 54 44 00 A2 14 60 09 8B 49 B2 31 20 A7 32 34 | TD...`..I.1 .24|
000010A0: 34 30 00 AF 14 6A 09 44 41 B2 44 41 AA 44 54 00 |40...j.DA.DA.DT.|
000010B0: D4 14 74 09 8B 44 41 B1 4C 45 28 4D 41 29 20 A7 |..t..DA.LE(MA) .|
000010C0: 44 41 B2 44 41 AB 4C 45 28 4D 41 29 3A 4D 41 B2 |DA.DA.LE(MA):MA.|
000010D0: 4D 41 AA 31 00 E9 14 7E 09 8B 4D 41 B1 31 32 20 |MA.1...~..MA.12 |
000010E0: A7 4D 41 B2 4D 41 AB 31 32 00 FA 14 88 09 54 44 |.MA.MA.12.....TD|
000010F0: B2 4D 41 AC 31 30 30 AA 44 41 00 00 15 92 09 8E |.MA.100.DA......|
00001100: 00 22 15 9C 09 8F 20 56 52 41 41 47 20 44 45 20 |.".... VRAAG DE |
00001110: 56 4F 4C 47 45 4E 44 45 20 50 41 47 49 4E 41 20 |VOLGENDE PAGINA |
00001120: 4F 50 00 3A 15 A6 09 8D 32 30 30 3A 8B 49 4E 24 |OP.:....200:.IN$|
00001130: B3 B1 22 22 20 A7 32 34 37 30 00 5C 15 B0 09 99 |.."" .2470.\....|
00001140: 22 44 52 55 4B 20 4F 50 20 45 45 4E 20 54 4F 45 |"DRUK OP EEN TOE|
00001150: 54 53 20 2E 2E 22 3B 3A 8D 32 31 30 00 6F 15 BA |TS ..";:.210.o..|
00001160: 09 8D 31 32 30 3A 48 4F B2 30 3A 8D 31 31 30 00 |..120:HO.0:.110.|
00001170: 8F 15 C4 09 99 22 45 45 4E 20 4F 47 45 4E 42 4C |....."EEN OGENBL|
00001180: 49 4B 20 41 2E 55 2E 42 2E 2E 2E 22 3B 3A 8E 00 |IK A.U.B...";:..|
00001190: AF 15 CE 09 8F 20 54 45 4B 45 4E 20 44 45 20 4B |..... TEKEN DE K|
000011A0: 4F 50 20 56 2F 44 20 54 45 4B 45 4E 49 4E 47 00 |OP V/D TEKENING.|
000011B0: C2 15 D8 09 56 45 B2 31 3A 48 4F B2 30 3A 8D 31 |....VE.1:HO.0:.1|
000011C0: 31 30 00 DB 15 E2 09 43 54 B2 36 3A 43 4E B2 33 |10.....CT.6:CN.3|
000011D0: 3A 53 52 B2 58 4C 3A 8D 33 31 30 00 07 16 EC 09 |:SR.XL:.310.....|
000011E0: 99 22 20 20 20 20 22 3B 53 52 24 3B A3 B5 28 42 |." ";SR$;..(B|
000011F0: 42 AD 32 29 AB 35 29 3B 41 24 3B 22 2D 56 45 52 |B.2).5);A$;"-VER|
00001200: 42 52 55 49 4B 22 3B 00 22 16 F6 09 53 52 B2 58 |BRUIK";."...SR.X|
00001210: 48 3A 8D 33 31 30 3A 99 A3 42 42 AB 36 29 3B 53 |H:.310:..BB.6);S|
00001220: 52 24 00 4C 16 00 0A 99 22 44 41 54 55 4D 2B 22 |R$.L...."DATUM+"|
00001230: 3B 3A 81 49 31 B2 31 20 A4 42 42 AB 37 3A 99 22 |;:.I1.1 .BB.7:."|
00001240: 2D 22 3B 3A 82 49 31 3A 99 22 2B 22 00 5C 16 0A |-";:.I1:."+".\..|
00001250: 0A 43 54 B2 34 3A 43 4E B2 30 3A 8E 00 75 16 14 |.CT.4:CN.0:..u..|
00001260: 0A 8F 20 54 41 42 45 4C 4C 45 4E 53 55 42 52 4F |.. TABELLENSUBRO|
00001270: 55 54 49 4E 45 00 81 16 1E 0A 8D 32 38 33 30 3A |UTINE......2830:|
00001280: 8C 00 98 16 28 0A 87 56 47 2C 56 57 2C 56 45 2C |....(..VG,VW,VE,|
00001290: 47 50 2C 45 50 2C 57 50 00 AF 16 32 0A 81 58 B2 |GP,EP,WP...2..X.|
000012A0: 30 20 A4 31 32 3A 87 4C 45 28 58 29 3A 82 58 00 |0 .12:.LE(X):.X.|
000012B0: CB 16 3C 0A 8D 32 30 31 30 3A 8F 20 44 41 54 55 |..<..2010:. DATU|
000012C0: 4D 53 55 42 52 4F 55 54 49 4E 45 00 D4 16 46 0A |MSUBROUTINE...F.|
000012D0: 44 54 B2 30 00 DE 16 50 0A 8D 32 34 34 30 00 FC |DT.0...P..2440..|
000012E0: 16 5A 0A 44 54 B2 44 54 AA 31 3A 48 4F B2 30 3A |.Z.DT.DT.1:HO.0:|
000012F0: 56 45 B2 34 AA 44 54 3A 8D 31 31 30 00 15 17 64 |VE.4.DT:.110...d|
00001300: 0A 43 54 B2 34 3A 43 4E B2 30 3A 53 52 B2 54 44 |.CT.4:CN.0:SR.TD|
00001310: 3A 8D 33 31 30 00 29 17 6E 0A 99 53 52 24 3B 22 |:.310.).n..SR$;"|
00001320: 21 22 3B 3A 8D 32 30 31 30 00 44 17 78 0A 8B 44 |!";:.2010.D.x..D|
00001330: 24 B3 B1 22 53 54 4F 50 44 41 54 55 4D 22 20 A7 |$.."STOPDATUM" .|
00001340: 32 36 34 30 00 60 17 82 0A 87 41 24 3A 8B 41 24 |2640.`....A$:.A$|
00001350: B2 22 53 54 4F 50 22 20 A7 8D 32 34 36 30 3A 8E |."STOP" ..2460:.|
00001360: 00 74 17 8C 0A 8B 41 24 B2 22 47 41 53 22 20 A7 |.t....A$."GAS" .|
00001370: 48 53 B2 35 00 8D 17 96 0A 8B 41 24 B2 22 45 4C |HS.5......A$."EL|
00001380: 45 4B 54 52 41 22 20 A7 48 53 B2 31 36 00 A4 17 |EKTRA" .HS.16...|
00001390: A0 0A 8B 41 24 B2 22 57 41 54 45 52 22 20 A7 48 |...A$."WATER" .H|
000013A0: 53 B2 32 37 00 BB 17 AA 0A 81 4A B2 31 20 A4 4A |S.27......J.1 .J|
000013B0: 56 3A 87 53 54 28 4A 29 3A 82 4A 00 CA 17 B4 0A |V:.ST(J):.J.....|
000013C0: 81 4A B2 31 20 A4 4A 56 AB 31 00 E0 17 BE 0A 56 |.J.1 .JV.1.....V|
000013D0: 45 B2 35 AA 4A 3A 48 4F B2 48 53 3A 8D 31 31 30 |E.5.J:HO.HS:.110|
000013E0: 00 0C 18 C8 0A 53 52 B2 53 54 28 4A AA 31 29 AB |.....SR.ST(J.1).|
000013F0: 53 54 28 4A 29 3A 43 54 B2 34 3A 43 4E B2 30 3A |ST(J):CT.4:CN.0:|
00001400: 8B 48 53 B1 32 35 20 A7 43 4E B2 31 00 1F 18 D2 |.HS.25 .CN.1....|
00001410: 0A 8D 33 31 30 3A 99 53 52 24 3B 22 21 22 3B 00 |..310:.SR$;"!";.|
00001420: 3C 18 DC 0A 53 52 B2 28 53 54 28 4A AA 31 29 AB |<...SR.(ST(J.1).|
00001430: 53 54 28 4A 29 29 AD 44 55 28 4A 29 00 57 18 E6 |ST(J)).DU(J).W..|
00001440: 0A 43 54 B2 34 3A 43 4E B2 31 3A 8B 48 53 B1 32 |.CT.4:CN.1:.HS.2|
00001450: 35 20 A7 43 4E B2 32 00 6B 18 F0 0A 8D 33 31 30 |5 .CN.2.k....310|
00001460: 3A 99 53 52 24 3B 22 21 21 22 3B 00 72 18 FA 0A |:.SR$;"!!";.r...|
00001470: 82 4A 00 84 18 04 0B 99 3A 8D 32 39 32 30 3A 89 |.J......:.2920:.|
00001480: 32 36 39 30 00 9B 18 0E 0B 8F 20 4B 4F 50 20 56 |2690...... KOP V|
00001490: 41 4E 20 44 45 20 54 41 42 45 4C 00 A4 18 18 0B |AN DE TABEL.....|
000014A0: 8D 31 30 30 00 C3 18 22 0B 99 22 56 45 52 42 52 |.100...".."VERBR|
000014B0: 55 49 4B 20 49 4E 20 4D 2A 2A 33 20 45 4E 20 4B |UIK IN M**3 EN K|
000014C0: 57 48 22 00 EC 18 2C 0B 99 22 28 54 4F 54 41 41 |WH"...,.."(TOTAA|
000014D0: 4C 2F 50 45 52 49 4F 44 45 20 45 4E 20 47 45 4D |L/PERIODE EN GEM|
000014E0: 49 44 44 45 4C 44 2F 44 41 47 29 22 00 F6 18 36 |IDDELD/DAG)"...6|
000014F0: 0B 8D 32 39 32 30 00 24 19 40 0B 99 22 56 41 4E |..2920.$.@.."VAN|
00001500: 21 21 20 20 20 47 41 53 20 20 20 21 21 20 45 4C |!! GAS !! EL|
00001510: 45 4B 54 52 41 20 21 21 20 20 57 41 54 45 52 20 |EKTRA !! WATER |
00001520: 20 21 21 22 00 52 19 4A 0B 99 22 54 4F 54 21 21 | !!".R.J.."TOT!!|
00001530: 20 54 4F 54 21 20 47 45 4D 21 21 20 54 4F 54 21 | TOT! GEM!! TOT!|
00001540: 20 47 45 4D 21 21 20 54 4F 54 21 20 47 45 4D 21 | GEM!! TOT! GEM!|
00001550: 21 22 00 5C 19 54 0B 8D 32 39 32 30 00 62 19 5E |!".\.T..2920.b.^|
00001560: 0B 8E 00 77 19 68 0B 8F 20 53 54 52 45 45 50 20 |...w.h.. STREEP |
00001570: 54 45 4B 45 4E 45 4E 00 A7 19 72 0B 99 22 2D 2D |TEKENEN...r.."--|
00001580: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001590: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000015A0: 2D 2D 2D 2D 22 3A 8E 00 C1 19 7C 0B 8F 20 4D 41 |----":....|.. MA|
000015B0: 41 4B 20 44 45 20 47 52 41 46 49 45 4B 20 56 4F |AK DE GRAFIEK VO|
000015C0: 4C 00 E0 19 86 0B 4A B2 30 3A 8D 32 34 36 30 3A |L.....J.0:.2460:|
000015D0: 8F 20 57 41 43 48 54 20 4F 50 20 54 4F 45 54 53 |. WACHT OP TOETS|
000015E0: 00 FF 19 90 0B 8D 31 30 30 3A 8D 32 35 31 30 3A |......100:.2510:|
000015F0: 8F 20 4E 49 45 55 57 45 20 50 41 47 49 4E 41 00 |. NIEUWE PAGINA.|
00001600: 05 1A 9A 0B 8E 00 2F 1A A8 61 8F 20 20 47 41 53 |....../..a. GAS|
00001610: 20 20 20 45 4C 45 4B 54 52 41 20 57 41 54 45 52 | ELEKTRA WATER|
00001620: 20 20 56 41 53 54 52 45 43 48 54 2F 44 41 47 00 | VASTRECHT/DAG.|
00001630: 49 1A B2 61 83 20 2E 31 35 35 32 2C 20 2E 31 36 |I..a. .1552, .16|
00001640: 35 35 2C 20 2E 32 34 36 33 00 73 1A BC 61 8F 20 |55, .2463.s..a. |
00001650: 20 47 41 53 20 20 20 45 4C 45 4B 54 52 41 20 57 | GAS ELEKTRA W|
00001660: 41 54 45 52 20 20 50 52 49 4A 53 2F 45 45 4E 48 |ATER PRIJS/EENH|
00001670: 45 49 44 00 8E 1A C6 61 83 20 2E 34 39 34 35 2C |EID....a. .4945,|
00001680: 20 2E 32 35 37 32 2C 20 32 2E 30 35 39 32 00 B8 | .2572, 2.0592..|
00001690: 1A D0 61 8F 20 20 4C 45 4E 47 54 45 20 56 2F 44 |..a. LENGTE V/D|
000016A0: 20 4D 41 41 4E 44 45 4E 20 28 53 54 41 52 54 3D | MAANDEN (START=|
000016B0: 44 45 43 45 4D 42 2E 29 00 DD 1A DA 61 83 20 33 |DECEMB.)....a. 3|
000016C0: 31 2C 20 33 31 2C 20 32 38 2C 20 33 31 2C 20 33 |1, 31, 28, 31, 3|
000016D0: 30 2C 20 33 31 2C 20 33 30 2C 20 33 31 00 F6 1A |0, 31, 30, 31...|
000016E0: E4 61 83 20 33 31 2C 20 33 30 2C 20 33 31 2C 20 |.a. 31, 30, 31, |
000016F0: 33 30 2C 20 33 31 00 08 1B EE 61 8F 20 4F 50 4E |30, 31....a. OPN|
00001700: 41 4D 45 2D 44 41 54 41 00 29 1B F8 61 83 22 30 |AME-DATA.)..a."0|
00001710: 31 31 31 22 2C 22 30 38 31 31 22 2C 22 31 36 31 |111","0811","161|
00001720: 31 22 2C 22 32 33 31 31 22 00 4A 1B 02 62 83 22 |1","2311".J..b."|
00001730: 33 30 31 31 22 2C 22 31 36 31 32 22 2C 22 30 31 |3011","1612","01|
00001740: 30 31 22 2C 22 31 35 30 31 22 00 79 1B 0C 62 83 |01","1501".y..b.|
00001750: 22 30 31 30 32 22 2C 22 31 35 30 32 22 2C 22 30 |"0102","1502","0|
00001760: 34 30 33 22 2C 22 31 39 30 33 22 2C 22 30 31 30 |403","1903","010|
00001770: 34 22 2C 22 31 37 30 34 22 00 8A 1B 16 62 83 22 |4","1704"....b."|
00001780: 53 54 4F 50 44 41 54 55 4D 22 00 95 1B 20 62 83 |STOPDATUM"... b.|
00001790: 22 47 41 53 22 00 BC 1B 2A 62 8F 20 4D 45 54 45 |"GAS"...*b. METE|
000017A0: 52 53 54 41 4E 44 20 47 41 53 20 49 4E 20 4B 55 |RSTAND GAS IN KU|
000017B0: 42 49 45 4B 45 20 4D 45 54 45 52 53 00 DC 1B 34 |BIEKE METERS...4|
000017C0: 62 83 20 33 35 35 31 37 2E 33 2C 20 33 35 35 38 |b. 35517.3, 3558|
000017D0: 34 2E 35 2C 20 33 35 36 35 37 2E 33 00 05 1C 3E |4.5, 35657.3...>|
000017E0: 62 83 20 33 35 37 32 35 2E 35 2C 20 33 35 38 30 |b. 35725.5, 3580|
000017F0: 35 2E 31 2C 20 33 36 30 30 36 2E 32 2C 20 33 36 |5.1, 36006.2, 36|
00001800: 31 39 35 2E 30 00 2E 1C 48 62 83 20 33 36 33 33 |195.0...Hb. 3633|
00001810: 37 2E 38 2C 20 33 36 35 33 33 2E 36 2C 20 33 36 |7.8, 36533.6, 36|
00001820: 37 33 31 2E 38 2C 20 33 36 39 36 39 2E 38 00 4C |731.8, 36969.8.L|
00001830: 1C 52 62 83 20 33 37 31 32 30 20 20 2C 20 33 37 |.Rb. 37120 , 37|
00001840: 32 37 30 2E 34 2C 20 33 37 34 31 32 00 5B 1C 5C |270.4, 37412.[.\|
00001850: 62 83 22 45 4C 45 4B 54 52 41 22 00 81 1C 66 62 |b."ELEKTRA"...fb|
00001860: 8F 20 4D 45 54 45 52 53 54 2E 45 4C 45 4B 54 52 |. METERST.ELEKTR|
00001870: 41 20 49 4E 20 4B 49 4C 4F 57 41 54 54 2F 55 55 |A IN KILOWATT/UU|
00001880: 52 00 A2 1C 70 62 83 20 33 36 34 37 39 2C 20 33 |R...pb. 36479, 3|
00001890: 36 35 34 34 2C 20 33 36 36 31 32 2C 20 33 36 36 |6544, 36612, 366|
000018A0: 38 34 00 CA 1C 7A 62 83 20 33 36 37 34 37 2C 20 |84...zb. 36747, |
000018B0: 33 36 38 38 30 2C 20 33 37 30 31 36 2C 20 33 37 |36880, 37016, 37|
000018C0: 31 32 36 2C 20 33 37 32 38 31 00 F2 1C 84 62 83 |126, 37281....b.|
000018D0: 20 33 37 33 37 33 2C 20 33 37 34 39 39 2C 20 33 | 37373, 37499, 3|
000018E0: 37 36 31 30 2C 20 33 37 37 30 34 2C 20 33 37 38 |7610, 37704, 378|
000018F0: 30 37 00 FF 1C 8E 62 83 22 57 41 54 45 52 22 00 |07....b."WATER".|
00001900: 28 1D 98 62 8F 20 4D 45 54 45 52 53 54 41 4E 44 |(..b. METERSTAND|
00001910: 20 57 41 54 45 52 20 49 4E 20 4B 55 42 49 45 4B | WATER IN KUBIEK|
00001920: 45 20 4D 45 54 45 52 53 00 45 1D A2 62 83 20 34 |E METERS.E..b. 4|
00001930: 33 32 2E 36 34 2C 20 34 33 36 2E 31 34 2C 20 34 |32.64, 436.14, 4|
00001940: 34 30 2E 32 37 00 6A 1D AC 62 83 20 34 34 34 2E |40.27.j..b. 444.|
00001950: 36 38 2C 20 34 34 38 2E 34 35 2C 20 34 35 36 2E |68, 448.45, 456.|
00001960: 38 35 2C 20 34 36 35 2E 31 36 00 8F 1D B6 62 83 |85, 465.16....b.|
00001970: 20 34 37 31 2E 37 35 2C 20 34 38 32 2E 30 37 2C | 471.75, 482.07,|
00001980: 20 34 38 37 2E 32 33 2C 20 34 39 36 2E 33 31 00 | 487.23, 496.31.|
00001990: AC 1D C0 62 83 20 35 30 33 2E 38 35 2C 20 35 31 |...b. 503.85, 51|
000019A0: 30 2E 37 33 2C 20 35 31 39 2E 33 36 00 B8 1D CA |0.73, 519.36....|
000019B0: 62 83 22 53 54 4F 50 22 00 CC 1D 30 75 8F 20 4A |b."STOP"...0u. J|
000019C0: 4F 53 20 42 55 52 47 48 4F 55 54 53 00 DC 1D 3A |OS BURGHOUTS...:|
000019D0: 75 8F 20 50 55 54 48 4F 46 20 33 35 00 F5 1D 44 |u. PUTHOF 35...D|
000019E0: 75 8F 20 35 36 35 35 20 41 4D 20 20 45 49 4E 44 |u. 5655 AM EIND|
000019F0: 48 4F 56 45 4E 00 0B 1E 4E 75 8F 20 54 45 4C 2E |HOVEN...Nu. TEL.|
00001A00: 20 30 34 30 2D 35 32 38 33 37 32 00 39 1E 58 75 | 040-528372.9.Xu|
00001A10: 8F 20 50 52 4F 47 52 41 4D 4D 41 20 47 45 4D 41 |. PROGRAMMA GEMA|
00001A20: 41 4B 54 20 4F 50 20 45 45 4E 20 4F 53 49 2F 53 |AKT OP EEN OSI/S|
00001A30: 55 50 45 52 42 4F 41 52 44 00 4D 1E 62 75 8F 20 |UPERBOARD.M.bu. |
00001A40: 4D 45 54 20 32 34 20 4B 20 52 41 4D 2E 00 81 1E |MET 24 K RAM....|
00001A50: 6C 75 8F 20 56 49 44 45 4F 20 56 2F 48 20 53 55 |lu. VIDEO V/H SU|
00001A60: 50 45 52 42 4F 41 52 44 20 49 53 20 32 36 20 52 |PERBOARD IS 26 R|
00001A70: 45 47 45 4C 53 2F 34 38 20 4B 4F 4C 4F 4D 4D 45 |EGELS/48 KOLOMME|
00001A80: 4E 00 AA 1E 76 75 8F 20 47 45 47 45 56 45 4E 53 |N...vu. GEGEVENS|
00001A90: 20 4B 4F 4D 45 4E 20 55 49 54 20 44 45 20 57 49 | KOMEN UIT DE WI|
00001AA0: 4E 54 45 52 20 38 32 2F 38 33 00 D6 1E 80 75 8F |NTER 82/83....u.|
00001AB0: 20 44 45 20 50 52 49 4A 5A 45 4E 20 55 49 54 20 | DE PRIJZEN UIT |
00001AC0: 31 39 38 32 20 28 4F 50 47 41 56 45 20 44 45 4C |1982 (OPGAVE DEL|
00001AD0: 46 4C 41 4E 44 29 00 00 1F 8A 75 8F 20 50 41 53 |FLAND)....u. PAS|
00001AE0: 20 44 49 54 20 41 41 4E 20 56 4F 4F 52 20 55 57 | DIT AAN VOOR UW|
00001AF0: 20 45 49 47 45 4E 20 53 49 54 55 41 54 49 45 2C | EIGEN SITUATIE,|
00001B00: 00 37 1F 94 75 8F 20 45 52 20 5A 49 4A 4E 20 4C |.7..u. ER ZIJN L|
00001B10: 41 4E 44 45 4C 49 4A 4B 20 4E 4F 47 41 4C 20 57 |ANDELIJK NOGAL W|
00001B20: 41 54 20 50 52 49 4A 53 2D 56 45 52 53 43 48 49 |AT PRIJS-VERSCHI|
00001B30: 4C 4C 45 4E 20 21 21 00 6A 1F 9E 75 8F 20 41 4C |LLEN !!.j..u. AL|
00001B40: 53 20 41 4C 4C 45 20 4F 56 45 52 42 4F 44 49 47 |S ALLE OVERBODIG|
00001B50: 45 20 52 45 4D 27 53 20 57 4F 52 44 45 4E 20 56 |E REM'S WORDEN V|
00001B60: 45 52 57 49 4A 44 45 52 44 2C 00 8E 1F A8 75 8F |ERWIJDERD,....u.|
00001B70: 20 50 41 53 54 20 44 49 54 20 50 52 4F 47 52 41 | PAST DIT PROGRA|
00001B80: 4D 4D 41 20 49 4E 20 38 4B 20 52 41 4D 2E 00 B6 |MMA IN 8K RAM...|
00001B90: 1F B2 75 8F 20 47 45 42 52 55 49 4B 54 45 20 42 |..u. GEBRUIKTE B|
00001BA0: 41 53 49 43 4F 44 45 2D 32 20 53 55 42 52 4F 55 |ASICODE-2 SUBROU|
00001BB0: 54 49 4E 45 53 3B 00 D4 1F BC 75 8F 20 31 30 30 |TINES;....u. 100|
00001BC0: 2C 20 31 31 30 2C 20 31 32 30 2C 20 32 31 30 2C |, 110, 120, 210,|
00001BD0: 20 33 31 30 00 EF 1F C6 75 8F 20 45 4E 20 49 4E | 310....u. EN IN|
00001BE0: 44 49 52 45 4B 54 20 32 30 30 2C 20 33 30 30 00 |DIREKT 200, 300.|
00001BF0: 00 00 D9 |... |
.......1000......1010.!.D..".";:..Q.N..H
(".........................",.(.(VE.1)))
;.A.P....(HO));:..Y.X.HO..(0):VE.B(216):
....H..IN$:....R..IN$:.IN$."".210.......
.....G(7);:......RV..(1):..H...FR..(0):.
...,.SR$.D(SR):.H(SR$,1)." ".SR$.J(SR$,2
)...-.....6.SR$."":.SR...5.10..CN.SR$."-
".:.7...(SR)..10.(CT.CN..(CN)).317.A.8.S
R$.SR$.J(D(.(.(SR)..5.10..CN)),2)...9..C
(SR$).CT.CN.(CN..0).SR$." ".SR$:.313...:
..CN.0..(SR)..1E10.316.Z.;.SR$.SR$.J(D(1
..(SR)..(.(SR))..5.10..CN),3,CN.1)...<..
C(SR$).CT.SR$.SR$." ":.316...=..C(SR$).C
T.SR$."".0.>..C(SR$).CT.SR$.SR$."*":.318
.6.?...L.^..4,4:.4,SR$;: 4:..].H..4,4:.4
: 4:..}...A.200:.20:. ENERGIEVERBRUIK...
...JG(200),DU(20),ST(20),LE(12)......100
:HO.5:VE.4:.110.Y...."ENERGIE VERBRUIKS
-CIJFERS"......:.1730:JV.DT:. INITIALISA
TIE.&...HO.15:VE.15:. BEPAAL BEELDSCHERM
OMVANG.O.$.HO.HO.1:BB.HO:.110:.120:.BB.H
O .1060.}...HO.0:BB.BB.1:. BEELDSCHERMBR
EEDTE BEPAALD...8.VE.VE.1:VM.VE:.110:.12
0:.VM.VE .1080.F.B.VM.VM.1:. BEELDSCHERM
HOOGTE.Y.L.HO.0:VE.8:.110...V.."WILT U E
EN GRAFISCHE WEERGAVE PER"...`.."DAG (D)
OF PER WEEK (W)";:.210:W$.IN$.R.J..W$:.
(W$.."W") .(W$.."D") .1100.X.T.....~..W$
."W" .."GEMIDDELD DAGVERBRUIK PER WEEK".
.....W$."D" .."GEMIDDELD VERBRUIK PER DA
G".K....A$:.A$."STOP" .1220......1890:.
BEREKEN DAGGEMIDDELDE......W$."W" ..2250
......1440:. TEKENSUBROUTINE.;....1170:.
GA DOOR TOT 'STOP'.[.D..100:.:."VERBRUI
KS-CIJFERS".Z.N..A$:.A$.."STOPDATUM" .12
30...X.TR.0......A$:.A$."STOP" .1390....
..A$."GAS" .PR.GP:VP.VG.T....A$."WATER"
.PR.WP:VP.VW......A$."ELEKTRA" .PR.EP:VP
.VE......J.1 .JV:.ST(J):.J.>...TT.ST(JV)
.ST(1):GE.TT.T:BE.TT.PR.VP.JV:TR.BE.TR.J
....:.A$:..C.(.CN.1:CT.6:SR.TT:.310...2.
."TOTAAL VERBRUIK IN ";T;" DAGEN = ";SR$
...<.SR.GE:.310...F.."VERBRUIK PER DAG =
";SR$.W.P.CN.2:CT.8:SR.BE:.310...Z.."TO
TAAL BEDRAG IN ";T;" DAGEN = ";SR$.!.D..
1250:. GA DOOR TOT 'STOP'.:.N.SR.TR:CT.8
:CN.2:.310.Z.X..:."REKENING-TOTAAL FL";S
R$.O....2460:.2580:.110......"
";......:. EINDE VAN
HET PROGRAMMA.D. .. TEKENSUB...... KLAAR
STAAT NU JG(JI), DE REEKS MET...... JI
GEMIDDELDEN (DAG OF WEEK).;.... WEERGEGE
VEN WORDT STEEDS DE GRAFIEK.Q.H.XH.JG(1)
:XL.JG(1).^.R..I.2 .JI.V....JG(I).XL .XL
.JG(I)......JG(I).XH .XH.JG(I)......I...
..XH.(XH.XL).(BB..7).XH.I...XL.(XL.XH).(
BB..7).XL......100:.2510:D$.SD$:.2070...
..CT.4:CN.0:J.0..."..I.1 .JI...,.J.J.1:.
J.VM.4 ..2940.6.6..2390:. BEPAAL DATUM.R
.@..I.JI.VM.3 .MR.MA:DR.DA.L.J.SR.TD:.31
0:.SR$;" !";...T.TA.(XH.JG(I)).(XH.XL).(
BB.6)...^...BB..(TA..5));"*"...H..I.F.R.
DA.DR:MA.MR:.100:.2510.Y.|..I.JI.VM.4 .J
I......2390:SR.TD:.310:.SR$;" !";.....TA
.(XH.JG(I)).(XH.XL).(BB.6).1.....BB..(TA
..5));"*".8....I.B....2460.H.....B.B.. I
NITIALISERINGS-SUB...L.. VULT EERST DE V
ERSCHILLENDE PRIJZEN...V.. DAARNA DE LEN
GTE VAN DE MAANDEN...... LEEST DE STARTD
ATUM EN DAARNA STEEDS...... DE VOLGENDE
DATUM TOT 'STOPDATUM'.&.... DAARNA IS DU
(1..N) GEVULD..,.....C....VG,VW,VE,GP,EP
,WP.Z....X.0 .12:.LE(X):.X.R....2010:. D
ATUM SUBR....&.SD$.D$:SD.DA:SM.MA:DT.1..
.0..2010:. DATUM SUBR....:..D$."STOPDATU
M" ...S.D.ED.DA:EM.MA:.2100...N.DT.DT.1:
SD.ED:SM.EM...X..1840...B.. BEREKEN HET
VERBRUIK PER DAG.@.L.. EERST WORDT ST=DE
STAND INGELEZEN.F.V.. DAARNA WORDT HET
DAGGEMIDDELDE ...... IN JG() GEZET MET T
ALS TELLER......J.1 .JV:.ST(J):.J.....T
.0......I.1 .JV.1.I....J.1 .DU(I).....T.
T.1:JG(T).(ST(I.1).ST(I)).DU(I)......J..
.F..I...P.JI.T:DT.1:..$.Z.. DATUM-SUBROU
TINE.@.... LEEST EEN DATUM IN D$.G.... P
RODUCEERT BIJ EEN GELDIGE DATUM...... HE
T DAG-NUMMER EN MAAND-NUMMER...... EN IN
IEDER GEVAL D$......D$.I...D1$.H(D$,2):
DA.E(D1$)... .D1$.I(D$,2):MA.E(D1$)...*.
....4.. PERIODE SUBROUTINE.-.>.. BEPAALT
DE PERIODE-LENGTE MET BEHULP.F.H.. VAN
SD,SM EN ED,EM.M.R.. ZET HET RESULTAAT I
N VEKTOR DU()...\..EM.SM .SM.SM.12...F.T
M.EM.SM:. TM=TELLER AANTAL MAANDEN.D.P..
TM.0 .DU(DT).ED.SD:..R.Z.DU(DT).ED.....T
M.TM.1......TM.0 .2230.....DU(DT).DU(DT)
.LE(SM.DT).....TM.TM.1.&....TM.0 .2200.B
...DU(DT).DU(DT).LE(SM).SD.H.....I.J.. B
EREKEN DE WEEKGEMIDDELDEN.Z.T.WT..(JI.7)
.1......IW.0 .WT.....WG.0:. WEEKGEMIDDEL
DE.B...DT.IW.7:. DAGTELLER IN JG().N....
I.1 .7.....WG.JG(DT.I).WG......I.....JG(
IW.1).WG.7...$..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.C.L.....V.
. BEREKEN TELKENS DE DATUM EN ZET DIE IN
TD...`..I.1 .2440...J.DA.DA.DT.T.T..DA.
LE(MA) .DA.DA.LE(MA):MA.MA.1...~..MA.12
.MA.MA.12.....TD.MA.100.DA.......".... V
RAAG DE VOLGENDE PAGINA OP.:....200:.IN$
.."" .2470.\...."DRUK OP EEN TOETS ..";:
.210.O....120:HO.0:.110...D.."EEN OGENBL
IK A.U.B...";:....N.. TEKEN DE KOP V/D T
EKENING.B.X.VE.1:HO.0:.110.....CT.6:CN.3
:SR.XL:.310......" ";SR$;..(BB.2).5);
A$;"-VERBRUIK";."...SR.XH:.310:..BB.6);S
R$.L...."DATUM+";:.I1.1 .BB.7:."-";:.I1:
."+".\...CT.4:CN.0:..U.... TABELLENSUBRO
UTINE......2830:....(..VG,VW,VE,GP,EP,WP
...2..X.0 .12:.LE(X):.X.K.<..2010:. DATU
MSUBROUTINE.T.F.DT.0...P..2440...Z.DT.DT
.1:HO.0:VE.4.DT:.110...D.CT.4:CN.0:SR.TD
:.310.).N..SR$;"!";:.2010.D.X..D$.."STOP
DATUM" .2640.`....A$:.A$."STOP" ..2460:.
.T....A$."GAS" .HS.5......A$."ELEKTRA" .
HS.16... ..A$."WATER" .HS.27......J.1 .J
V:.ST(J):.J.J....J.1 .JV.1.....VE.5.J:HO
.HS:.110...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).W...CT.4:CN.1:.HS.2
5 .CN.2.K....310:.SR$;"!!";.R....J......
:.2920:.2690...... KOP VAN DE TABEL.....
.100.C.".."VERBRUIK IN M**3 EN KWH"...,.
."(TOTAAL/PERIODE EN GEMIDDELD/DAG)"...6
..2920.$.@.."VAN!! GAS !! ELEKTRA !!
WATER !!".R.J.."TOT!! TOT! GEM!! TOT!
GEM!! TOT! GEM!!".\.T..2920.B.^...W.H..
STREEP TEKENEN...R.."------------------
--------------------":..A.|.. MAAK DE GR
AFIEK VOL.....J.0:.2460:. WACHT OP TOETS
......100:.2510:. NIEUWE PAGINA......./.
.A. GAS ELEKTRA WATER VASTRECHT/DAG.
I..A. .1552, .1655, .2463.S..A. GAS E
LEKTRA WATER PRIJS/EENHEID...FA. .4945,
.2572, 2.0592...PA. LENGTE V/D MAANDEN
(START=DECEMB.)...ZA. 31, 31, 28, 31, 3
0, 31, 30, 31....A. 31, 30, 31, 30, 31..
..A. OPNAME-DATA.)..A."0111","0811","161
1","2311".J..B."3011","1612","0101","150
1".Y..B."0102","1502","0403","1903","010
4","1704"....B."STOPDATUM"... B."GAS"...
*B. METERSTAND GAS IN KUBIEKE METERS...4
B. 35517.3, 35584.5, 35657.3...>B. 35725
.5, 35805.1, 36006.2, 36195.0...HB. 3633
7.8, 36533.6, 36731.8, 36969.8.L.RB. 371
20 , 37270.4, 37412.[.\B."ELEKTRA"...FB
. METERST.ELEKTRA IN KILOWATT/UUR...PB.
36479, 36544, 36612, 36684.J.ZB. 36747,
36880, 37016, 37126, 37281....B. 37373,
37499, 37610, 37704, 37807....B."WATER".
(..B. METERSTAND WATER IN KUBIEKE METERS
.E..B. 432.64, 436.14, 440.27.J..B. 444.
68, 448.45, 456.85, 465.16....B. 471.75,
482.07, 487.23, 496.31....B. 503.85, 51
0.73, 519.36...JB."STOP".L.0U. JOS BURGH
OUTS...:U. PUTHOF 35...DU. 5655 AM EIND
HOVEN...NU. TEL. 040-528372.9.XU. PROGRA
MMA GEMAAKT OP EEN OSI/SUPERBOARD.M.BU.
MET 24 K RAM....LU. VIDEO V/H SUPERBOARD
IS 26 REGELS/48 KOLOMMEN...VU. GEGEVENS
KOMEN UIT DE WINTER 82/83.V..U. DE PRIJ
ZEN UIT 1982 (OPGAVE DELFLAND)....U. PAS
DIT AAN VOOR UW EIGEN SITUATIE,.7..U. E
R ZIJN LANDELIJK NOGAL WAT PRIJS-VERSCHI
LLEN !!.J..U. ALS ALLE OVERBODIGE REM'S
WORDEN VERWIJDERD,....U. PAST DIT PROGRA
MMA IN 8K RAM.....U. GEBRUIKTE BASICODE-
2 SUBROUTINES;.T..U. 100, 110, 120, 210,
310...FU. EN INDIREKT 200, 300...Y
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL