RENTE
FILE INFORMATION
FILENAME(S): RENTE
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-11-30 21:23:58
APPEARS ON: 1 disk(s)
FILE HASH
c56133dc7d5ba773ae95b99d9556dd8e8d9698c693af703a0fa1fb54716b75b2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 41 1 | RENTE | PRG | DuncanTwain | 35 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 02 00 97 35 33 32 38 30 2C 31 31 3A |.."....53280,11:|
00000010: 97 35 33 32 38 31 2C 31 31 3A 97 20 36 34 36 2C |.53281,11:. 646,|
00000020: 31 35 00 2F 08 0A 00 99 22 93 22 C7 28 38 29 00 |15./....".".(8).|
00000030: 49 08 14 00 8D 31 30 30 30 3A 8F 20 49 4E 49 54 |I....1000:. INIT|
00000040: 49 41 4C 49 53 45 52 45 4E 00 5C 08 1E 00 8D 32 |IALISEREN.\....2|
00000050: 30 30 30 3A 8F 20 49 4E 56 4F 45 52 00 73 08 28 |000:. INVOER.s.(|
00000060: 00 8D 33 30 30 30 3A 8F 20 42 45 52 45 4B 45 4E |..3000:. BEREKEN|
00000070: 49 4E 47 00 86 08 32 00 8D 35 30 30 30 3A 8F 20 |ING...2..5000:. |
00000080: 53 50 41 54 49 45 00 AB 08 3C 00 8B 41 24 B3 B1 |SPATIE...<..A$..|
00000090: 22 4B 41 4E 20 4E 49 45 54 20 21 21 22 A7 8D 34 |"KAN NIET !!"..4|
000000A0: 30 30 30 3A 8F 20 54 41 42 45 4C 00 B3 08 46 00 |000:. TABEL...F.|
000000B0: 89 33 30 00 B9 08 50 00 80 00 CD 08 E8 03 8F 20 |.30...P........ |
000000C0: 49 4E 49 54 49 41 4C 49 53 45 52 45 4E 00 F1 08 |INITIALISEREN...|
000000D0: F2 03 56 45 24 B2 22 13 11 11 11 11 11 11 11 11 |..VE$.".........|
000000E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000000F0: 22 00 23 09 FC 03 42 4C 24 B2 22 20 20 20 20 20 |".#...BL$." |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000120: 20 20 22 00 5B 09 06 04 4B 24 B2 22 31 32 30 30 | ".[...K$."1200|
00000130: 2E 30 30 22 3A 52 4A 24 B2 22 31 30 2E 30 30 30 |.00":RJ$."10.000|
00000140: 22 3A 4E 54 24 B2 22 31 32 22 3A 4E 4D 24 B2 22 |":NT$."12":NM$."|
00000150: 31 22 3A 41 46 4C 24 B2 22 3F 22 00 66 09 10 04 |1":AFL$."?".f...|
00000160: 99 C7 28 31 34 29 00 6F 09 1A 04 9F 31 2C 30 00 |..(14).o....1,0.|
00000170: 75 09 4B 04 8E 00 82 09 D0 07 8F 20 49 4E 56 4F |u.K........ INVO|
00000180: 45 52 00 8D 09 DA 07 58 B2 B8 28 30 29 00 9F 09 |ER.....X..(0)...|
00000190: E4 07 4B 45 55 5A 45 B2 30 3A 41 24 B2 22 22 00 |..KEUZE.0:A$."".|
000001A0: C9 09 EE 07 99 22 93 22 3A 99 A3 31 30 29 22 12 |.....".":..10)".|
000001B0: 9A C1 4E 4E 55 49 54 45 49 54 45 4E 2D 42 45 52 |..NNUITEITEN-BER|
000001C0: 45 4B 45 4E 49 4E 47 9B 22 00 E4 09 F8 07 99 22 |EKENING."......"|
000001D0: 11 11 CB 41 50 49 54 41 41 4C 3A 22 3B A3 33 30 |...APITAAL:";.30|
000001E0: 29 3B 4B 24 00 0F 0A 02 08 99 22 11 D2 45 4E 54 |);K$......"..ENT|
000001F0: 45 2D 50 45 52 43 2E 20 4F 50 20 4A 41 41 52 42 |E-PERC. OP JAARB|
00000200: 41 53 49 53 3A 22 3B A3 33 30 29 3B 52 4A 24 00 |ASIS:";.30);RJ$.|
00000210: 32 0A 0C 08 99 22 11 C1 41 4E 54 41 4C 20 54 45 |2...."..ANTAL TE|
00000220: 52 4D 49 4A 4E 45 4E 3A 22 3B A3 33 30 29 3B 4E |RMIJNEN:";.30);N|
00000230: 54 24 00 5F 0A 16 08 99 22 11 C1 41 4E 54 41 4C |T$._...."..ANTAL|
00000240: 20 4D 41 41 4E 44 45 4E 20 50 45 52 20 54 45 52 | MAANDEN PER TER|
00000250: 4D 49 4A 4E 3A 22 3B A3 33 30 29 3B 4E 4D 24 00 |MIJN:";.30);NM$.|
00000260: 81 0A 20 08 99 22 11 D4 45 52 4D 49 4A 4E 2D 42 |.. .."..ERMIJN-B|
00000270: 45 44 52 41 47 3A 22 3B A3 33 30 29 3B 41 46 4C |EDRAG:";.30);AFL|
00000280: 24 00 8A 0A 2A 08 99 22 11 11 00 B6 0A 34 08 99 |$...*..".....4..|
00000290: 22 20 9E 20 20 27 2A 27 9B 20 20 3A 20 56 4F 4F |" . '*'. : VOO|
000002A0: 52 47 45 44 52 55 4B 54 45 20 57 41 41 52 44 45 |RGEDRUKTE WAARDE|
000002B0: 20 47 4F 45 44 22 00 DD 0A 3E 08 99 22 20 9E 20 | GOED"...>.." . |
000002C0: 20 27 3F 27 20 9B 20 3A 20 57 41 41 52 44 45 20 | '?' . : WAARDE |
000002D0: 4F 4E 42 45 4B 45 4E 44 20 28 31 58 29 00 0B 0B |ONBEKEND (1X)...|
000002E0: 52 08 99 22 20 9E 27 53 54 4F 50 27 9B 20 3A 20 |R.." .'STOP'. : |
000002F0: 53 54 4F 50 50 45 4E 20 4D 45 54 20 48 45 54 20 |STOPPEN MET HET |
00000300: 50 52 4F 47 52 41 4D 4D 41 22 3B 00 44 0B 5C 08 |PROGRAMMA";.D.\.|
00000310: 52 4E B2 34 3A 41 24 B2 4B 24 3A 4F 47 B2 30 3A |RN.4:A$.K$:OG.0:|
00000320: 42 47 B2 31 45 36 AB 30 2E 30 31 3A 4E 44 45 43 |BG.1E6.0.01:NDEC|
00000330: B2 32 3A 8D 32 37 30 30 3A 4B 24 B2 49 4E 24 3A |.2:.2700:K$.IN$:|
00000340: 4B B2 49 4E 00 7B 0B 66 08 52 4E B2 36 3A 41 24 |K.IN.{.f.RN.6:A$|
00000350: B2 52 4A 24 3A 4F 47 B2 30 3A 42 47 B2 31 30 30 |.RJ$:OG.0:BG.100|
00000360: 3A 4E 44 45 43 B2 33 3A 8D 32 37 30 30 3A 52 4A |:NDEC.3:.2700:RJ|
00000370: 24 B2 49 4E 24 3A 52 4A B2 49 4E 00 B3 0B 70 08 |$.IN$:RJ.IN...p.|
00000380: 52 4E B2 38 3A 41 24 B2 4E 54 24 3A 4F 47 B2 31 |RN.8:A$.NT$:OG.1|
00000390: 3A 42 47 B2 31 30 30 30 3A 4E 44 45 43 B2 30 3A |:BG.1000:NDEC.0:|
000003A0: 8D 32 37 30 30 3A 4E 54 24 B2 49 4E 24 3A 4E 54 |.2700:NT$.IN$:NT|
000003B0: B2 49 4E 00 EA 0B 7A 08 52 4E B2 31 30 3A 41 24 |.IN...z.RN.10:A$|
000003C0: B2 4E 4D 24 3A 4F 47 B2 31 3A 42 47 B2 32 34 3A |.NM$:OG.1:BG.24:|
000003D0: 4E 44 45 43 B2 30 3A 8D 32 37 30 30 3A 4E 4D 24 |NDEC.0:.2700:NM$|
000003E0: B2 49 4E 24 3A 4E 4D B2 49 4E 00 2A 0C 84 08 52 |.IN$:NM.IN.*...R|
000003F0: 4E B2 31 32 3A 41 24 B2 41 46 4C 24 3A 4F 47 B2 |N.12:A$.AFL$:OG.|
00000400: 30 3A 42 47 B2 31 45 36 AB 30 2E 30 31 3A 4E 44 |0:BG.1E6.0.01:ND|
00000410: 45 43 B2 32 3A 8D 32 37 30 30 3A 41 46 4C 24 B2 |EC.2:.2700:AFL$.|
00000420: 49 4E 24 3A 41 46 4C B2 49 4E 00 47 0C 8E 08 99 |IN$:AFL.IN.G....|
00000430: C8 28 56 45 24 2C 31 34 29 3A 81 49 B2 31 A4 38 |.(VE$,14):.I.1.8|
00000440: 3A 99 42 4C 24 3A 82 00 4D 0C 97 08 8E 00 57 0C |:.BL$:..M.....W.|
00000450: 8C 0A 8F 20 49 4E 24 00 81 0C 96 0A 99 C8 28 56 |... IN$.......(V|
00000460: 45 24 2C 52 4E 29 3A 99 A3 33 30 29 22 20 20 20 |E$,RN):..30)" |
00000470: 20 20 20 20 20 22 3A 99 A3 33 30 29 22 91 22 41 | ":..30)"."A|
00000480: 24 00 A2 0C A0 0A 99 C8 28 56 45 24 2C 52 4E AA |$.......(VE$,RN.|
00000490: 31 29 3A 99 A3 33 30 29 22 22 3B 3A 84 31 2C 49 |1):..30)"";:.1,I|
000004A0: 4E 24 00 D6 0C AA 0A 8B 49 4E 24 B2 22 53 54 4F |N$......IN$."STO|
000004B0: 50 22 A7 99 22 93 11 11 11 11 11 11 1D 1D 1D 1D |P".."...........|
000004C0: 1D 96 D4 4F 54 20 5A 49 45 4E 53 9B 22 C7 28 39 |...OT ZIENS.".(9|
000004D0: 29 3A A0 31 3A 80 00 F0 0C B4 0A 8B 20 C8 28 49 |):.1:....... .(I|
000004E0: 4E 24 2C 31 29 B2 22 2A 22 A7 49 4E 24 B2 41 24 |N$,1)."*".IN$.A$|
000004F0: 00 21 0D BE 0A 8B 49 4E 24 B2 22 3F 22 AF 28 4B |.!....IN$."?".(K|
00000500: 45 55 5A 45 B2 30 29 AF 52 4E B3 B1 31 30 A7 4B |EUZE.0).RN..10.K|
00000510: 45 55 5A 45 B2 52 4E AD 32 AB 31 3A 89 32 37 39 |EUZE.RN.2.1:.279|
00000520: 30 00 2F 0D C8 0A 49 4E B2 C5 28 49 4E 24 29 00 |0./...IN..(IN$).|
00000530: 47 0D D2 0A 8B 49 4E B3 4F 47 20 B0 49 4E B1 42 |G....IN.OG .IN.B|
00000540: 47 20 A7 32 37 31 30 00 66 0D D4 0A 8B 28 4E 44 |G .2710.f....(ND|
00000550: 45 43 B2 30 29 AF 20 B5 28 49 4E 29 B3 B1 49 4E |EC.0). .(IN)..IN|
00000560: 20 A7 32 37 31 30 00 8B 0D D6 0A 8B 49 4E 24 B2 | .2710......IN$.|
00000570: 22 3F 22 AF 28 28 4B 45 55 5A 45 B3 B1 30 29 B0 |"?".((KEUZE..0).|
00000580: 52 4E B2 31 30 29 A7 32 37 31 30 00 B0 0D D8 0A |RN.10).2710.....|
00000590: 8B 52 4E B2 31 32 AF 20 28 4B 45 55 5A 45 B2 30 |.RN.12. (KEUZE.0|
000005A0: 29 AF 20 49 4E 24 B3 B1 22 3F 22 A7 32 37 31 30 |). IN$.."?".2710|
000005B0: 00 CC 0D DC 0A 58 B2 49 4E 3A 8D 31 30 30 30 30 |.....X.IN:.10000|
000005C0: 3A 49 4E B2 58 3A 49 4E 24 B2 58 24 00 F7 0D E6 |:IN.X:IN$.X$....|
000005D0: 0A 99 C8 28 56 45 24 2C 52 4E 29 3A 99 A3 33 30 |...(VE$,RN):..30|
000005E0: 29 22 20 20 20 20 20 20 20 20 22 3A 99 A3 33 30 |)" ":..30|
000005F0: 29 22 91 22 49 4E 24 00 18 0E EB 0A 99 C8 28 56 |)"."IN$.......(V|
00000600: 45 24 2C 52 4E AA 31 29 3A 99 A3 33 30 29 22 20 |E$,RN.1):..30)" |
00000610: 20 20 20 20 20 20 20 22 00 1E 0E EF 0A 8E 00 2F | "......./|
00000620: 0E B8 0B 8F 20 42 45 52 45 4B 45 4E 49 4E 47 00 |.... BEREKENING.|
00000630: 43 0E C2 0B 52 50 B2 4E 4D AD 31 32 AC 52 4A AD |C...RP.NM.12.RJ.|
00000640: 31 30 30 00 68 0E CC 0B 91 4B 45 55 5A 45 8D 33 |100.h....KEUZE.3|
00000650: 31 30 30 2C 33 33 30 30 2C 33 35 30 30 2C 32 30 |100,3300,3500,20|
00000660: 30 30 30 2C 33 37 30 30 00 8B 0E D6 0B 99 C8 28 |000,3700.......(|
00000670: 56 45 24 2C 32 AC 28 4B 45 55 5A 45 AA 31 29 29 |VE$,2.(KEUZE.1))|
00000680: 3A 99 A3 33 30 29 22 12 22 41 24 00 91 0E 1B 0C |:..30)"."A$.....|
00000690: 8E 00 A9 0E 1C 0C 8F 20 4B 41 50 49 54 41 41 4C |....... KAPITAAL|
000006A0: 20 4F 4E 42 45 4B 45 4E 44 00 C2 0E 26 0C 8B 52 | ONBEKEND...&..R|
000006B0: 50 B2 30 A7 4B B2 41 46 4C AC 4E 54 3A 89 33 31 |P.0.K.AFL.NT:.31|
000006C0: 34 30 00 ED 0E 30 0C 48 31 B2 28 31 AA 52 50 29 |40...0.H1.(1.RP)|
000006D0: AE 4E 54 3A 48 32 B2 48 31 AB 31 3A 8B 48 32 B3 |.NT:H2.H1.1:.H2.|
000006E0: 31 45 AB 33 A7 48 32 B2 52 50 AC 4E 54 00 00 0F |1E.3.H2.RP.NT...|
000006F0: 3A 0C 4B B2 41 46 4C AC 48 32 AD 52 50 AD 48 31 |:.K.AFL.H2.RP.H1|
00000700: 00 20 0F 44 0C 4E 44 45 43 B2 32 3A 58 B2 4B 3A |. .D.NDEC.2:X.K:|
00000710: 8D 31 30 30 30 30 3A 4B B2 58 3A 4B 24 B2 58 24 |.10000:K.X:K$.X$|
00000720: 00 2A 0F 4E 0C 41 24 B2 4B 24 00 30 0F 7F 0C 8E |.*.N.A$.K$.0....|
00000730: 00 45 0F E4 0C 8F 20 52 45 4E 54 45 20 4F 4E 42 |.E.... RENTE ONB|
00000740: 45 4B 45 4E 44 00 91 0F EE 0C 96 A5 46 28 58 29 |EKEND.......F(X)|
00000750: B2 28 58 AE 4E 54 AC 28 28 4E 54 AB 31 29 AC 28 |.(X.NT.((NT.1).(|
00000760: 41 46 AA 4B 29 AB 4E 54 AC 4B AC 58 29 AA 41 46 |AF.K).NT.K.X).AF|
00000770: 29 AD 58 AE 28 4E 54 AB 31 29 AD 28 4E 54 AC 28 |).X.(NT.1).(NT.(|
00000780: 41 46 AA 4B 29 AB 28 4E 54 AA 31 29 AC 4B AC 58 |AF.K).(NT.1).K.X|
00000790: 29 00 B6 0F F8 0C 8B 4E 54 AC 41 46 4C B3 4B A7 |)......NT.AFL.K.|
000007A0: 41 24 B2 22 4B 41 4E 20 4E 49 45 54 20 21 21 22 |A$."KAN NIET !!"|
000007B0: 3A 89 33 33 39 39 00 CF 0F 02 0D 8B 4E 54 AC 41 |:.3399......NT.A|
000007C0: 46 4C B2 4B A7 52 4A B2 30 3A 89 33 33 37 30 00 |FL.K.RJ.0:.3370.|
000007D0: E0 0F 0C 0D 58 4F B2 28 41 46 4C AA 4B 29 AD 4B |....XO.(AFL.K).K|
000007E0: 00 01 10 16 0D 58 4E B2 A5 46 28 58 4F 29 3A 8B |.....XN..F(XO):.|
000007F0: 58 4E B3 58 4F A7 58 4F B2 58 4E 3A 89 33 33 35 |XN.XO.XO.XN:.335|
00000800: 30 00 1D 10 20 0D 52 50 B2 58 4F AB 31 3A 52 4A |0... .RP.XO.1:RJ|
00000810: B2 31 30 30 AC 31 32 AD 4E 4D AC 52 50 00 57 10 |.100.12.NM.RP.W.|
00000820: 2A 0D 58 B2 52 4A 3A 4E 44 45 43 B2 33 3A 8D 31 |*.X.RJ:NDEC.3:.1|
00000830: 30 30 30 30 3A 52 4A B2 58 3A 52 50 B2 4E 4D AD |0000:RJ.X:RP.NM.|
00000840: 31 32 AD 31 30 30 AC 52 4A 3A 52 4A 24 B2 58 24 |12.100.RJ:RJ$.X$|
00000850: 3A 41 24 B2 52 4A 24 00 5D 10 47 0D 8E 00 7D 10 |:A$.RJ$.].G...}.|
00000860: AC 0D 8F 20 41 41 4E 54 41 4C 20 54 45 52 4D 49 |... AANTAL TERMI|
00000870: 4A 4E 45 4E 20 4F 4E 42 45 4B 45 4E 44 00 A1 10 |JNEN ONBEKEND...|
00000880: B6 0D 8B 41 46 4C B3 B2 4B AC 52 50 A7 41 24 B2 |...AFL..K.RP.A$.|
00000890: 22 4B 41 4E 20 4E 49 45 54 21 22 3A 89 33 35 39 |"KAN NIET!":.359|
000008A0: 39 00 BA 10 C0 0D 8B 52 50 B2 30 A7 4E 54 B2 4B |9......RP.0.NT.K|
000008B0: AD 41 46 4C 3A 89 33 35 34 30 00 DB 10 CA 0D 4E |.AFL:.3540.....N|
000008C0: 54 B2 BC 28 41 46 4C AD 28 41 46 4C AB 4B AC 52 |T..(AFL.(AFL.K.R|
000008D0: 50 29 29 AD BC 28 31 AA 52 50 29 00 F5 10 D4 0D |P))..(1.RP).....|
000008E0: 8B B5 28 4E 54 29 B3 B1 4E 54 A7 4E 54 B2 B5 28 |..(NT)..NT.NT..(|
000008F0: 4E 54 AA 31 29 00 03 11 DE 0D 4E 54 24 B2 C4 28 |NT.1).....NT$..(|
00000900: 4E 54 29 00 22 11 E8 0D 8B C8 28 4E 54 24 2C 31 |NT).".....(NT$,1|
00000910: 29 B2 22 20 22 A7 4E 54 24 B2 CA 28 4E 54 24 2C |)." ".NT$..(NT$,|
00000920: 32 29 00 2D 11 F2 0D 41 24 B2 4E 54 24 00 33 11 |2).-...A$.NT$.3.|
00000930: 0F 0E 8E 00 4C 11 74 0E 8F 20 41 46 4C 4F 53 53 |....L.t.. AFLOSS|
00000940: 49 4E 47 20 4F 4E 42 45 4B 45 4E 44 00 65 11 7E |ING ONBEKEND.e.~|
00000950: 0E 8B 52 50 B2 30 A7 41 46 4C B2 4B AD 4E 54 3A |..RP.0.AFL.K.NT:|
00000960: 89 33 37 34 30 00 90 11 88 0E 48 31 B2 28 31 AA |.3740.....H1.(1.|
00000970: 52 50 29 AE 4E 54 3A 48 32 B2 48 31 AB 31 3A 8B |RP).NT:H2.H1.1:.|
00000980: 48 32 B3 31 45 AB 33 A7 48 32 B2 4E 54 AC 52 50 |H2.1E.3.H2.NT.RP|
00000990: 00 A3 11 92 0E 41 46 4C B2 4B AC 52 50 AC 48 31 |.....AFL.K.RP.H1|
000009A0: AD 48 32 00 D1 11 9C 0E 4E 44 45 43 B2 32 3A 58 |.H2.....NDEC.2:X|
000009B0: B2 41 46 4C 3A 8D 31 30 30 30 30 3A 41 46 4C B2 |.AFL:.10000:AFL.|
000009C0: 58 3A 41 46 4C 24 B2 58 24 3A 41 24 B2 41 46 4C |X:AFL$.X$:A$.AFL|
000009D0: 24 00 D7 11 D7 0E 8E 00 E3 11 A0 0F 8F 20 54 41 |$............ TA|
000009E0: 42 45 4C 00 F2 11 AA 0F 99 C8 28 56 45 24 2C 32 |BEL.......(VE$,2|
000009F0: 34 29 00 1F 12 B4 0F 99 22 D7 49 4C 20 4A 45 20 |4)......".IL JE |
00000A00: 45 45 4E 20 41 46 4C 4F 53 53 49 4E 47 53 2D 54 |EEN AFLOSSINGS-T|
00000A10: 41 42 45 4C 20 3F 20 28 4A 2F 4E 29 20 22 3B 00 |ABEL ? (J/N) ";.|
00000A20: 3E 12 BE 0F A1 42 24 3A 8B 42 24 B3 B1 22 4A 22 |>....B$:.B$.."J"|
00000A30: AF 42 24 B3 B1 22 4E 22 A7 89 34 30 33 30 00 50 |.B$.."N"..4030.P|
00000A40: 12 C8 0F 8B 42 24 B2 22 4E 22 A7 89 34 32 39 39 |....B$."N"..4299|
00000A50: 00 5A 12 D2 0F 99 22 93 22 3B 00 73 12 DC 0F 99 |.Z....".";.s....|
00000A60: 22 CB 41 50 49 54 41 41 4C 3A 22 3B A3 33 30 29 |".APITAAL:";.30)|
00000A70: 3B 4B 24 00 99 12 E6 0F 99 22 D2 45 4E 54 45 2D |;K$......".ENTE-|
00000A80: 50 45 52 43 2E 20 50 45 52 20 4A 41 41 52 3A 22 |PERC. PER JAAR:"|
00000A90: 3B A3 33 30 29 3B 52 4A 24 00 BB 12 F0 0F 99 22 |;.30);RJ$......"|
00000AA0: C1 41 4E 54 41 4C 20 54 45 52 4D 49 4A 4E 45 4E |.ANTAL TERMIJNEN|
00000AB0: 3A 22 3B A3 33 30 29 3B 4E 54 24 00 E7 12 FA 0F |:";.30);NT$.....|
00000AC0: 99 22 C1 41 4E 54 41 4C 20 4D 41 41 4E 44 45 4E |.".ANTAL MAANDEN|
00000AD0: 20 50 45 52 20 54 45 52 4D 49 4A 4E 3A 22 3B A3 | PER TERMIJN:";.|
00000AE0: 33 30 29 3B 4E 4D 24 00 08 13 04 10 99 22 D4 45 |30);NM$......".E|
00000AF0: 52 4D 49 4A 4E 2D 42 45 44 52 41 47 3A 22 3B A3 |RMIJN-BEDRAG:";.|
00000B00: 33 30 29 3B 41 46 4C 24 00 0E 13 0E 10 99 00 41 |30);AFL$.......A|
00000B10: 13 18 10 99 22 11 96 1D 20 20 54 45 52 4D 49 4A |...."... TERMIJ|
00000B20: 4E 20 20 20 20 20 52 45 4E 54 45 20 20 41 46 4C |N RENTE AFL|
00000B30: 4F 53 53 49 4E 47 20 20 20 53 43 48 55 4C 44 9B |OSSING SCHULD.|
00000B40: 22 00 64 13 22 10 54 4E B2 31 3A 4E 44 45 43 B2 |".d.".TN.1:NDEC.|
00000B50: 32 3A 53 B2 4B 3A 53 41 B2 30 3A 53 52 B2 30 3A |2:S.K:SA.0:SR.0:|
00000B60: 52 4E B2 30 00 70 13 2C 10 52 4E B2 52 4E AA 31 |RN.0.p.,.RN.RN.1|
00000B70: 00 9A 13 2E 10 8B 52 4E B1 31 30 A7 8D 35 30 30 |......RN.10..500|
00000B80: 30 3A 99 C8 28 56 45 24 2C 39 29 3A 81 49 B2 31 |0:..(VE$,9):.I.1|
00000B90: A4 31 35 3A 99 42 4C 24 3A 82 00 B4 13 30 10 8B |.15:.BL$:....0..|
00000BA0: 52 4E B1 31 30 A7 99 C8 28 56 45 24 2C 39 29 3A |RN.10...(VE$,9):|
00000BB0: 52 4E B2 31 00 F5 13 36 10 8B 52 4E B2 31 A7 99 |RN.1...6..RN.1..|
00000BC0: 22 20 22 3B 54 4E 3B 22 2D 22 3B 3A 48 48 B2 54 |" ";TN;"-";:HH.T|
00000BD0: 4E AA 39 3A 48 48 B2 AB 48 48 AC 28 4E 54 B1 B2 |N.9:HH..HH.(NT..|
00000BE0: 48 48 29 AB 4E 54 AC 28 4E 54 B3 48 48 29 3A 99 |HH).NT.(NT.HH):.|
00000BF0: 48 48 22 11 22 00 15 14 40 10 8D 34 37 30 30 3A |HH"."...@..4700:|
00000C00: 54 4E B2 54 4E AA 31 3A 8B 54 4E B3 B2 4E 54 A7 |TN.TN.1:.TN..NT.|
00000C10: 89 34 31 34 30 00 2A 14 4A 10 81 49 58 B2 31 A4 |.4140.*.J..IX.1.|
00000C20: 33 39 3A 99 22 3D 22 3B 3A 82 00 30 14 4F 10 99 |39:."=";:..0.O..|
00000C30: 00 51 14 54 10 58 B2 53 41 AA 53 52 3A 8D 31 30 |.Q.T.X.SA.SR:.10|
00000C40: 30 30 30 3A 99 A3 39 AB C3 28 58 24 29 29 58 24 |000:..9..(X$))X$|
00000C50: 3B 00 70 14 5E 10 58 B2 53 52 3A 8D 31 30 30 30 |;.p.^.X.SR:.1000|
00000C60: 30 3A 99 A3 31 39 AB C3 28 58 24 29 29 58 24 3B |0:..19..(X$))X$;|
00000C70: 00 9C 14 68 10 58 B2 53 41 3A 8D 31 30 30 30 30 |...h.X.SA:.10000|
00000C80: 3A 99 A3 32 39 AB C3 28 58 24 29 29 58 24 3B 22 |:..29..(X$))X$;"|
00000C90: 20 20 20 20 54 4F 54 41 41 4C 22 3B 00 A6 14 72 | TOTAAL";...r|
00000CA0: 10 8D 35 30 30 30 00 AC 14 CB 10 8E 00 C0 14 5C |..5000.........\|
00000CB0: 12 8F 20 52 45 47 45 4C 20 50 52 49 4E 54 45 4E |.. REGEL PRINTEN|
00000CC0: 00 CB 14 66 12 52 B2 53 AC 52 50 00 DE 14 70 12 |...f.R.S.RP...p.|
00000CD0: 58 B2 52 3A 8D 31 30 30 30 30 3A 52 B2 58 00 06 |X.R:.10000:R.X..|
00000CE0: 15 7A 12 41 41 B2 41 46 4C AB 52 3A 8B 41 41 B3 |.z.AA.AFL.R:.AA.|
00000CF0: 30 2E 30 31 AF 4B B3 B1 30 B0 4E 54 AC 41 46 4C |0.01.K..0.NT.AFL|
00000D00: B1 B2 31 45 37 A7 00 21 15 84 12 99 A3 31 39 AB |..1E7..!.....19.|
00000D10: C3 28 58 24 29 29 58 24 3B 3A 53 52 B2 53 52 AA |.(X$))X$;:SR.SR.|
00000D20: 52 00 36 15 8E 12 8B 4E 54 B2 54 4E B0 41 41 B1 |R.6....NT.TN.AA.|
00000D30: 53 A7 41 41 B2 53 00 62 15 98 12 58 B2 41 41 3A |S.AA.S.b...X.AA:|
00000D40: 8D 31 30 30 30 30 3A 41 41 B2 58 3A 99 A3 32 39 |.10000:AA.X:..29|
00000D50: AB C3 28 58 24 29 29 58 24 3A 53 41 B2 53 41 AA |..(X$))X$:SA.SA.|
00000D60: 41 41 00 85 15 A2 12 58 B2 41 41 AA 52 3A 8D 31 |AA.....X.AA.R:.1|
00000D70: 30 30 30 30 3A 99 A3 39 AB C3 28 58 24 29 29 22 |0000:..9..(X$))"|
00000D80: 91 22 58 24 3B 00 90 15 AC 12 53 B2 53 AB 41 41 |."X$;.....S.S.AA|
00000D90: 00 AD 15 B6 12 58 B2 53 3A 8D 31 30 30 30 30 3A |.....X.S:.10000:|
00000DA0: 99 A3 33 39 AB C3 28 58 24 29 29 58 24 00 B3 15 |..39..(X$))X$...|
00000DB0: BF 12 8E 00 CD 15 88 13 8F 20 53 50 41 54 49 45 |......... SPATIE|
00000DC0: 20 56 4F 4F 52 20 56 45 52 56 4F 4C 47 00 00 16 | VOOR VERVOLG...|
00000DD0: 92 13 99 C8 28 56 45 24 2C 32 34 29 3A 99 A3 37 |....(VE$,24):..7|
00000DE0: 29 22 12 96 54 4F 45 54 53 20 53 50 41 54 49 45 |)"..TOETS SPATIE|
00000DF0: 20 56 4F 4F 52 20 56 45 52 56 4F 4C 47 9B 22 3B | VOOR VERVOLG.";|
00000E00: 00 17 16 9C 13 A1 42 24 3A 8B 42 24 B3 B1 22 20 |......B$:.B$.." |
00000E10: 22 A7 89 35 30 32 30 00 1D 16 A6 13 8E 00 51 16 |"..5020.......Q.|
00000E20: 10 27 8F 20 41 46 52 4F 4E 44 45 4E 20 4F 50 20 |.'. AFRONDEN OP |
00000E30: 4E 44 45 43 20 44 45 43 49 4D 41 4C 45 4E 20 45 |NDEC DECIMALEN E|
00000E40: 4E 20 53 54 52 49 4E 47 43 4F 4E 56 45 52 53 49 |N STRINGCONVERSI|
00000E50: 45 00 72 16 1A 27 8B 4E 44 45 43 B2 30 A7 58 24 |E.r..'.NDEC.0.X$|
00000E60: B2 C4 28 B5 28 58 AA 2E 35 29 29 3A 89 31 30 30 |..(.(X..5)):.100|
00000E70: 36 30 00 8A 16 24 27 81 49 58 B2 31 A4 4E 44 45 |60...$'.IX.1.NDE|
00000E80: 43 3A 58 B2 31 30 AC 58 3A 82 00 A0 16 2E 27 58 |C:X.10.X:.....'X|
00000E90: B2 B5 28 58 AA 2E 35 29 3A 58 24 B2 C4 28 58 29 |..(X..5):X$..(X)|
00000EA0: 00 C3 16 38 27 8B C3 28 58 24 29 B3 4E 44 45 43 |...8'..(X$).NDEC|
00000EB0: AA 31 A7 58 24 B2 22 30 22 AA 58 24 3A 89 31 30 |.1.X$."0".X$:.10|
00000EC0: 30 34 30 00 EA 16 42 27 58 24 B2 C8 28 58 24 2C |040...B'X$..(X$,|
00000ED0: C3 28 58 24 29 AB 4E 44 45 43 29 AA 22 2E 22 AA |.(X$).NDEC).".".|
00000EE0: C9 28 58 24 2C 4E 44 45 43 29 00 F6 16 4C 27 58 |.(X$,NDEC)...L'X|
00000EF0: B2 C5 28 58 24 29 00 12 17 56 27 8B C8 28 58 24 |..(X$)...V'..(X$|
00000F00: 2C 31 29 B2 22 20 22 A7 58 24 B2 CA 28 58 24 2C |,1)." ".X$..(X$,|
00000F10: 32 29 00 18 17 73 27 8E 00 00 00 4F 56 |2)...s'....OV |
.."....53280,11:.53281,11:. 646,15./....
"."G(8).I....1000:. INITIALISEREN.\....2
000:. INVOER.S.(..3000:. BEREKENING...2.
.5000:. SPATIE...<..A$.."KAN NIET !!"..4
000:. TABEL...F..30...P...M.... INITIALI
SEREN.....VE$.".........................
".#...BL$."
".[...K$."1200.00":RJ$."10.000
":NT$."12":NM$."1":AFL$."?".F....G(14).O
....1,0.U.K.....P.. INVOER...Z.X..(0)...
..KEUZE.0:A$."".I....".":..10)"..ANNUITE
ITEN-BEREKENING."......"..KAPITAAL:";.30
);K$......".RENTE-PERC. OP JAARBASIS:";.
30);RJ$.2....".AANTAL TERMIJNEN:";.30);N
T$._....".AANTAL MAANDEN PER TERMIJN:";.
30);NM$... ..".TERMIJN-BEDRAG:";.30);AFL
$...*..".....4.." . '*'. : VOORGEDRUKT
E WAARDE GOED"...>.." . '?' . : WAARDE
ONBEKEND (1X)...R.." .'STOP'. : STOPPEN
MET HET PROGRAMMA";.D.\.RN.4:A$.K$:OG.0:
BG.1E6.0.01:NDEC.2:.2700:K$.IN$:K.IN.{.F
.RN.6:A$.RJ$:OG.0:BG.100:NDEC.3:.2700:RJ
$.IN$:RJ.IN...P.RN.8:A$.NT$:OG.1:BG.1000
:NDEC.0:.2700:NT$.IN$:NT.IN...Z.RN.10:A$
.NM$:OG.1:BG.24:NDEC.0:.2700:NM$.IN$:NM.
IN.*...RN.12:A$.AFL$:OG.0:BG.1E6.0.01:ND
EC.2:.2700:AFL$.IN$:AFL.IN.G....H(VE$,14
):.I.1.8:.BL$:..M.....W.... IN$......H(V
E$,RN):..30)" ":..30)"."A$... ..H
(VE$,RN.1):..30)"";:.1,IN$.V....IN$."STO
P"..".............TOT ZIENS."G(9): 1:...
.... H(IN$,1)."*".IN$.A$.!....IN$."?".(K
EUZE.0).RN..10.KEUZE.RN.2.1:.2790./.H.IN
.E(IN$).G.R..IN.OG .IN.BG .2710.F.T..(ND
EC.0). .(IN)..IN .2710...V..IN$."?".((KE
UZE..0).RN.10).2710...X..RN.12. (KEUZE.0
). IN$.."?".2710.L...X.IN:.10000:IN.X:IN
$.X$......H(VE$,RN):..30)" ":..30
)"."IN$......H(VE$,RN.1):..30)" "
......./.... BEREKENING.C.B.RP.NM.12.RJ.
100.H.L..KEUZE.3100,3300,3500,20000,3700
...V..H(VE$,2.(KEUZE.1)):..30)"."A$.....
....... KAPITAAL ONBEKEND.B.&..RP.0.K.AF
L.NT:.3140...0.H1.(1.RP).NT:H2.H1.1:.H2.
1E.3.H2.RP.NT...:.K.AFL.H2.RP.H1. .D.NDE
C.2:X.K:.10000:K.X:K$.X$.*.N.A$.K$.0...
.E.... RENTE ONBEKEND.......F(X).(X.NT.(
(NT.1).(AF.K).NT.K.X).AF).X.(NT.1).(NT.(
AF.K).(NT.1).K.X)......NT.AFL.K.A$."KAN
NIET !!":.3399.O....NT.AFL.K.RJ.0:.3370.
....XO.(AFL.K).K.....XN..F(XO):.XN.XO.XO
.XN:.3350... .RP.XO.1:RJ.100.12.NM.RP.W.
*.X.RJ:NDEC.3:.10000:RJ.X:RP.NM.12.100.R
J:RJ$.X$:A$.RJ$.].G...}.... AANTAL TERMI
JNEN ONBEKEND......AFL..K.RP.A$."KAN NIE
T!":.3599......RP.0.NT.K.AFL:.3540...J.N
T..(AFL.(AFL.K.RP))..(1.RP)...T...(NT)..
NT.NT..(NT.1).....NT$.D(NT)."....H(NT$,1
)." ".NT$.J(NT$,2).-...A$.NT$.3.....L.T.
. AFLOSSING ONBEKEND.E.~..RP.0.AFL.K.NT:
.3740.....H1.(1.RP).NT:H2.H1.1:.H2.1E.3.
H2.NT.RP.....AFL.K.RP.H1.H2.Q...NDEC.2:X
.AFL:.10000:AFL.X:AFL$.X$:A$.AFL$.W.W...
.. .. TABEL......H(VE$,24)......"WIL JE
EEN AFLOSSINGS-TABEL ? (J/N) ";.>....B$:
.B$.."J".B$.."N"..4030.P.H..B$."N"..4299
.Z.R..".";.S...."KAPITAAL:";.30);K$.....
."RENTE-PERC. PER JAAR:";.30);RJ$......"
AANTAL TERMIJNEN:";.30);NT$......"AANTAL
MAANDEN PER TERMIJN:";.30);NM$......"TE
RMIJN-BEDRAG:";.30);AFL$.......A...."...
TERMIJN RENTE AFLOSSING SCHULD.
".D.".TN.1:NDEC.2:S.K:SA.0:SR.0:RN.0.P.,
.RN.RN.1......RN.10..5000:.H(VE$,9):.I.1
.15:.BL$:....0..RN.10..H(VE$,9):RN.1...6
..RN.1.." ";TN;"-";:HH.TN.9:HH..HH.(NT..
HH).NT.(NT.HH):.HH"."...@..4700:TN.TN.1:
.TN..NT..4140.*.J..IX.1.39:."=";:..0.O..
.Q.T.X.SA.SR:.10000:..9.C(X$))X$;.P.^.X.
SR:.10000:..19.C(X$))X$;...H.X.SA:.10000
:..29.C(X$))X$;" TOTAAL";...R..5000..
.K.....\.. REGEL PRINTEN.K.F.R.S.RP...P.
X.R:.10000:R.X...Z.AA.AFL.R:.AA.0.01.K..
0.NT.AFL..1E7..!.....19.C(X$))X$;:SR.SR.
R.6....NT.TN.AA.S.AA.S.B...X.AA:.10000:A
A.X:..29.C(X$))X$:SA.SA.AA.....X.AA.R:.1
0000:..9.C(X$))"."X$;.....S.S.AA.....X.S
:.10000:..39.C(X$))X$.......M.... SPATIE
VOOR VERVOLG......H(VE$,24):..7)"..TOET
S SPATIE VOOR VERVOLG.";......B$:.B$.."
"..5020.......Q..'. AFRONDEN OP NDEC DEC
IMALEN EN STRINGCONVERSIE.R..'.NDEC.0.X$
.D(.(X..5)):.10060...$'.IX.1.NDEC:X.10.X
:.. ..'X..(X..5):X$.D(X).C.8'.C(X$).NDEC
.1.X$."0".X$:.10040...B'X$.H(X$,C(X$).ND
EC).".".I(X$,NDEC)...L'X.E(X$)...V'.H(X$
,1)." ".X$.J(X$,2)...S'....OV
> CLICK IMAGE PREVIEW FOR FULL MODAL