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

RENTEKNUSER

FILE INFORMATION

FILENAME(S): RENTEKNUSER

FILE TYPE(S): PRG

FILE SIZE: 1.9K

FIRST SEEN: 2025-11-30 20:09:43

APPEARS ON: 1 disk(s)

FILE HASH

d2c4f8705c39bffd3bdbccd2cec71b474806a5652a7f430b01d34525e3337c86

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
COMMODORE 64 RENTEKNUSER PRG Curtcool, Klaus & Jan 27 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 07 08 0A 00 8F 00  21 08 14 00 8F 20 2D 41  |........!.... -A|
00000010: 46 42 45 54 41 64 59 47  53 50 52 4F 47 52 41 4D  |FBETAdYGSPROGRAM|
00000020: 2D 00 3B 08 1E 00 8F 20  20 41 52 54 49 53 41 4E  |-.;....  ARTISAN|
00000030: 20 44 41 54 41 20 20 31  39 38 35 00 54 08 28 00  | DATA  1985.T.(.|
00000040: 8F 20 20 20 43 41 52 53  54 45 4E 20 41 4E 44 45  |.   CARSTEN ANDE|
00000050: 52 53 45 4E 00 6C 08 32  00 8F 20 20 20 20 4A 4F  |RSEN.l.2..    JO|
00000060: 48 4E 20 48 56 49 44 4C  59 4B 4B 45 00 72 08 3C  |HN HVIDLYKKE.r.<|
00000070: 00 8F 00 8F 08 46 00 96  A5 41 28 58 29 B2 B5 28  |.....F...A(X)..(|
00000080: 28 58 AC 31 30 30 29 AA  2E 35 29 AD 31 30 30 00  |(X.100)..5).100.|
00000090: AC 08 50 00 97 35 33 32  38 30 2C 36 3A 97 35 33  |..P..53280,6:.53|
000000A0: 32 38 31 2C 36 3A 97 36  34 36 2C 31 00 BE 08 5A  |281,6:.646,1...Z|
000000B0: 00 99 C7 28 31 34 37 29  3A 99 3A 99 3A 99 00 EB  |...(147):.:.:...|
000000C0: 08 64 00 99 A3 32 29 3A  99 C7 28 31 31 31 29 3B  |.d...2):..(111);|
000000D0: 3A 81 41 B2 31 A4 33 32  3A 99 C7 28 31 38 33 29  |:.A.1.32:..(183)|
000000E0: 3B 3A 82 3A 99 C7 28 31  31 32 29 00 16 09 6E 00  |;:.:..(112)...n.|
000000F0: 81 42 B2 30 A4 31 31 3A  99 A3 32 29 3A 99 C7 28  |.B.0.11:..2):..(|
00000100: 31 38 30 29 3B 3A 99 A3  33 35 29 3B 3A 99 C7 28  |180);:..35);:..(|
00000110: 31 37 30 29 3A 82 00 43  09 78 00 99 A3 32 29 3A  |170):..C.x...2):|
00000120: 99 C7 28 31 30 38 29 3B  3A 81 41 B2 31 A4 33 32  |..(108);:.A.1.32|
00000130: 3A 99 C7 28 31 37 35 29  3B 3A 82 3A 99 C7 28 31  |:..(175);:.:..(1|
00000140: 38 36 29 00 64 09 82 00  97 37 38 31 2C 36 3A 97  |86).d....781,6:.|
00000150: 37 38 32 2C 31 30 3A 97  37 38 33 2C 30 3A 9E 36  |782,10:.783,0:.6|
00000160: 35 35 32 30 00 7E 09 8C  00 99 22 41 46 42 45 54  |5520.~...."AFBET|
00000170: 41 4C 49 4E 47 53 50 52  4F 47 52 41 4D 22 00 86  |ALINGSPROGRAM"..|
00000180: 09 96 00 99 3A 99 00 AE  09 A0 00 99 A3 34 29 3B  |....:........4);|
00000190: 22 43 4F 50 59 52 49 47  48 54 3A 20 41 52 54 49  |"COPYRIGHT: ARTI|
000001A0: 53 41 4E 20 44 41 54 41  20 31 39 38 35 22 00 D1  |SAN DATA 1985"..|
000001B0: 09 AA 00 99 3A 99 A3 34  29 3B 22 49 44 45 3A 20  |....:..4);"IDE: |
000001C0: 43 41 52 53 54 45 4E 20  41 4E 44 45 52 53 45 4E  |CARSTEN ANDERSEN|
000001D0: 22 00 FE 09 B4 00 99 3A  99 A3 34 29 3B 22 50 52  |"......:..4);"PR|
000001E0: 4F 47 52 41 4D 4D 45 52  49 4E 47 3A 20 43 41 52  |OGRAMMERING: CAR|
000001F0: 53 54 45 4E 20 41 4E 44  45 52 53 45 4E 22 00 1B  |STEN ANDERSEN"..|
00000200: 0A BE 00 99 3A 99 A3 31  39 29 3B 22 4A 4F 48 4E  |....:..19);"JOHN|
00000210: 20 48 56 49 44 4C 59 4B  4B 45 22 00 2E 0A C8 00  | HVIDLYKKE".....|
00000220: A1 41 24 3A 8B 41 24 B2  22 22 A7 32 30 30 00 6B  |.A$:.A$."".200.k|
00000230: 0A D2 00 99 C7 28 31 34  37 29 3A 99 C7 28 31 38  |.....(147):..(18|
00000240: 29 3B 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |);"             |
00000250: 20 41 46 42 45 54 41 4C  49 4E 47 20 20 20 20 20  | AFBETALING     |
00000260: 20 20 20 20 20 20 20 20  20 20 22 00 85 0A DC 00  |          ".....|
00000270: 97 37 38 31 2C 33 3A 97  37 38 32 2C 31 30 3A 9E  |.781,3:.782,10:.|
00000280: 36 35 35 32 30 00 9F 0A  E6 00 99 22 41 52 54 49  |65520......"ARTI|
00000290: 53 41 4E 20 44 41 54 41  20 20 31 39 38 35 22 00  |SAN DATA  1985".|
000002A0: B8 0A F0 00 97 37 38 31  2C 39 3A 97 37 38 32 2C  |.....781,9:.782,|
000002B0: 30 3A 9E 36 35 35 32 30  00 CD 0A FA 00 99 22 49  |0:.65520......"I|
000002C0: 4E 44 54 41 53 54 20 47  41 45 4C 44 22 00 E8 0A  |NDTAST GAELD"...|
000002D0: 04 01 99 3A 99 22 49 4E  44 54 41 53 54 20 52 45  |...:."INDTAST RE|
000002E0: 4E 54 45 53 41 54 53 22  00 08 0B 0E 01 99 3A 99  |NTESATS"......:.|
000002F0: 22 49 4E 44 54 41 53 54  20 41 4E 54 41 4C 20 54  |"INDTAST ANTAL T|
00000300: 45 52 4D 49 4E 45 52 22  00 22 0B 18 01 97 37 38  |ERMINER"."....78|
00000310: 31 2C 39 3A 97 37 38 32  2C 31 35 3A 9E 36 35 35  |1,9:.782,15:.655|
00000320: 32 30 00 3F 0B 22 01 85  47 41 45 4C 44 24 3A 8B  |20.?."..GAELD$:.|
00000330: C5 28 47 41 45 4C 44 24  29 B2 30 A7 32 38 30 00  |.(GAELD$).0.280.|
00000340: 5A 0B 2C 01 97 37 38 31  2C 31 31 3A 97 37 38 32  |Z.,..781,11:.782|
00000350: 2C 31 39 3A 9E 36 35 35  32 30 00 77 0B 36 01 85  |,19:.65520.w.6..|
00000360: 50 43 54 24 3A 8B C5 28  50 43 54 24 29 B2 30 A7  |PCT$:..(PCT$).0.|
00000370: 31 31 37 4E 33 30 30 00  92 0B 40 01 97 37 38 31  |117N300...@..781|
00000380: 2C 31 33 3A 97 37 38 32  2C 32 34 3A 9E 36 35 35  |,13:.782,24:.655|
00000390: 32 30 00 A7 0B 4A 01 85  4E 24 3A 8B C5 28 4E 24  |20...J..N$:..(N$|
000003A0: 29 B2 30 A7 33 32 30 00  C1 0B 54 01 97 37 38 31  |).0.320...T..781|
000003B0: 2C 32 32 3A 97 37 38 32  2C 30 3A 9E 36 35 35 32  |,22:.782,0:.6552|
000003C0: 30 00 F7 0B 5E 01 99 C7  28 31 38 29 3B 22 20 20  |0...^...(18);"  |
000003D0: 20 20 20 20 20 20 20 20  20 20 20 20 44 41 54 41  |            DATA|
000003E0: 20 4F 4B 20 28 4A 2F 4E  29 20 20 20 20 20 20 20  | OK (J/N)       |
000003F0: 20 20 20 20 20 20 22 00  0B 0C 68 01 A1 41 24 3A  |      "...h..A$:|
00000400: 8B 41 24 B2 22 4E 22 A7  32 31 30 00 1C 0C 72 01  |.A$."N".210...r.|
00000410: 8B 41 24 B3 B1 22 4A 22  A7 33 36 30 00 44 0C 7C  |.A$.."J".360.D.||
00000420: 01 47 41 45 4C 44 B2 C5  28 47 41 45 4C 44 24 29  |.GAELD..(GAELD$)|
00000430: 3A 50 43 54 B2 C5 28 50  43 54 24 29 3A 4E B2 C5  |:PCT..(PCT$):N..|
00000440: 28 4E 24 29 00 72 0C 86  01 59 44 45 4C 53 45 B2  |(N$).r...YDELSE.|
00000450: 47 41 45 4C 44 AC 50 43  54 AD 28 31 30 30 AC 28  |GAELD.PCT.(100.(|
00000460: 31 AB 28 31 AA 50 43 54  AD 31 30 30 29 AE AB 4E  |1.(1.PCT.100)..N|
00000470: 29 29 00 7E 0C 90 01 99  C7 28 31 34 37 29 00 AF  |)).~.....(147)..|
00000480: 0C 9A 01 81 43 B2 31 A4  33 39 3A 99 C7 28 31 38  |....C.1.39:..(18|
00000490: 29 3B C7 28 33 32 29 3B  3A 82 3A 97 37 38 31 2C  |);.(32);:.:.781,|
000004A0: 31 3A 97 37 38 32 2C 30  3A 9E 36 35 35 32 30 00  |1:.782,0:.65520.|
000004B0: EE 0C A4 01 99 C7 28 31  38 29 3B 22 53 54 41 52  |......(18);"STAR|
000004C0: 54 47 41 45 4C 44 3A 22  A5 41 28 47 41 45 4C 44  |TGAELD:".A(GAELD|
000004D0: 29 22 50 43 54 3A 22 A5  41 28 50 43 54 29 22 54  |)"PCT:".A(PCT)"T|
000004E0: 45 52 4D 49 4E 45 52 3A  22 A5 41 28 4E 29 00 07  |ERMINER:".A(N)..|
000004F0: 0D AE 01 97 37 38 31 2C  33 3A 97 37 38 32 2C 30  |....781,3:.782,0|
00000500: 3A 9E 36 35 35 32 30 00  2D 0D B8 01 99 22 54 45  |:.65520.-...."TE|
00000510: 52 4D 49 4E 53 59 44 45  4C 53 45 20 28 4B 52 2E  |RMINSYDELSE (KR.|
00000520: 29 3A 22 A5 41 28 59 44  45 4C 53 45 29 00 33 0D  |):".A(YDELSE).3.|
00000530: C2 01 99 00 61 0D CC 01  99 22 54 45 52 4D 49 4E  |....a...."TERMIN|
00000540: 20 20 20 52 45 4E 54 45  20 20 20 20 20 41 46 44  |   RENTE     AFD|
00000550: 52 41 47 20 20 20 20 52  45 53 54 47 41 45 4C 44  |RAG    RESTGAELD|
00000560: 22 00 77 0D D6 01 81 41  B2 31 A4 33 39 3A 99 C7  |".w....A.1.39:..|
00000570: 28 39 39 29 3B 3A 82 00  7D 0D E0 01 99 00 88 0D  |(99);:..}.......|
00000580: EA 01 81 49 B2 31 A4 4E  00 C7 0D F4 01 52 45 4E  |...I.1.N.....REN|
00000590: 54 45 B2 47 41 45 4C 44  AC 50 43 54 AD 31 30 30  |TE.GAELD.PCT.100|
000005A0: 3A 41 46 44 52 41 47 B2  59 44 45 4C 53 45 AB 52  |:AFDRAG.YDELSE.R|
000005B0: 45 4E 54 45 3A 47 41 45  4C 44 B2 47 41 45 4C 44  |ENTE:GAELD.GAELD|
000005C0: AB 41 46 44 52 41 47 00  D6 0D FE 01 8B 49 B1 31  |.AFDRAG......I.1|
000005D0: 35 A7 8D 36 31 30 00 08  0E 08 02 99 A5 41 28 49  |5..610.......A(I|
000005E0: 29 A3 37 29 A5 41 28 52  45 4E 54 45 29 A3 31 38  |).7).A(RENTE).18|
000005F0: 29 A5 41 28 41 46 44 52  41 47 29 A3 32 38 29 A5  |).A(AFDRAG).28).|
00000600: 41 28 47 41 45 4C 44 29  00 27 0E 12 02 8B 49 B2  |A(GAELD).'....I.|
00000610: 4E A7 97 37 38 31 2C 32  32 3A 97 37 38 32 2C 30  |N..781,22:.782,0|
00000620: 3A 9E 36 35 35 32 30 00  34 0E 1C 02 82 3A 97 36  |:.65520.4....:.6|
00000630: 34 36 2C 31 00 4A 0E 26  02 81 41 B2 31 A4 33 39  |46,1.J.&..A.1.39|
00000640: 3A 99 C7 28 39 39 29 3B  3A 82 00 6A 0E 30 02 99  |:..(99);:..j.0..|
00000650: 22 20 30 4E 53 4B 45 53  20 47 45 4E 4B 30 52 53  |" 0NSKES GENK0RS|
00000660: 45 4C 20 28 4A 2F 4E 29  20 22 00 7D 0E 3A 02 A1  |EL (J/N) ".}.:..|
00000670: 41 24 3A 8B 41 24 B2 22  22 A7 35 37 30 00 8D 0E  |A$:.A$."".570...|
00000680: 44 02 8B 41 24 B2 22 4A  22 A7 32 31 30 00 9B 0E  |D..A$."J".210...|
00000690: 4E 02 8B 41 24 B2 22 4E  22 A7 8A 00 B4 0E 58 02  |N..A$."N".....X.|
000006A0: 8B 41 24 B3 B1 22 4A 22  AF 41 24 B3 B1 22 4E 22  |.A$.."J".A$.."N"|
000006B0: A7 35 37 30 00 BA 0E 62  02 8F 00 CE 0E 6C 02 8F  |.570...b.....l..|
000006C0: 20 53 43 52 4F 4C 4C 20  52 55 54 49 4E 45 00 D4  | SCROLL RUTINE..|
000006D0: 0E 76 02 8F 00 F4 0E 80  02 8B 49 B2 31 36 A7 97  |.v........I.16..|
000006E0: 37 38 31 2C 32 32 3A 97  37 38 32 2C 30 3A 9E 36  |781,22:.782,0:.6|
000006F0: 35 35 32 30 00 2B 0F 8A  02 8B 49 B2 31 36 A7 81  |5520.+....I.16..|
00000700: 45 B2 31 A4 34 30 3A 99  C7 28 39 39 29 3B 3A 82  |E.1.40:..(99);:.|
00000710: 3A 99 22 54 41 53 54 20  3C 53 50 41 43 45 3E 20  |:."TAST <SPACE> |
00000720: 46 4F 52 20 53 43 52 4F  4C 4C 22 00 45 0F 94 02  |FOR SCROLL".E...|
00000730: 97 37 38 31 2C 32 31 3A  97 37 38 32 2C 30 3A 9E  |.781,21:.782,0:.|
00000740: 36 35 35 32 30 00 58 0F  9E 02 A1 41 24 3A 8B 41  |65520.X....A$:.A|
00000750: 24 B2 22 22 A7 36 37 30  00 85 0F A8 02 97 37 38  |$."".670......78|
00000760: 31 2C 32 31 3A 97 37 38  32 2C 30 3A 9E 36 35 35  |1,21:.782,0:.655|
00000770: 32 30 3A 81 44 B2 31 A4  34 30 3A 99 C7 28 33 32  |20:.D.1.40:..(32|
00000780: 29 3B 3A 82 44 00 98 0F  B2 02 99 C7 28 31 34 35  |);:.D.......(145|
00000790: 29 3B C7 28 31 34 35 29  00 A3 0F BC 02 97 36 34  |);.(145)......64|
000007A0: 36 2C 37 00 A9 0F C6 02  8E 00 00 00              |6,7.........    |
........!.... -AFBETADYGSPROGRAM-.;.... 
 ARTISAN DATA  1985.T.(..   CARSTEN ANDE
RSEN.L.2..    JOHN HVIDLYKKE.R.<.....F..
.A(X)..((X.100)..5).100...P..53280,6:.53
281,6:.646,1...Z..G(147):.:.:....D...2):
.G(111);:.A.1.32:.G(183);:.:.G(112)...N.
.B.0.11:..2):.G(180);:..35);:.G(170):..C
.X...2):.G(108);:.A.1.32:.G(175);:.:.G(1
86).D....781,6:.782,10:.783,0:.65520.~..
.."AFBETALINGSPROGRAM"......:.... ...4);
"COPYRIGHT: ARTISAN DATA 1985".Q....:..4
);"IDE: CARSTEN ANDERSEN"......:..4);"PR
OGRAMMERING: CARSTEN ANDERSEN"......:..1
9);"JOHN HVIDLYKKE"...H..A$:.A$."".200.K
.R..G(147):.G(18);"              AFBETAL
ING               "......781,3:.782,10:.
65520......"ARTISAN DATA  1985"......781
,9:.782,0:.65520.M...."INDTAST GAELD"...
...:."INDTAST RENTESATS"......:."INDTAST
 ANTAL TERMINER"."....781,9:.782,15:.655
20.?."..GAELD$:.E(GAELD$).0.280.Z.,..781
,11:.782,19:.65520.W.6..PCT$:.E(PCT$).0.
117N300...@..781,13:.782,24:.65520...J..
N$:.E(N$).0.320.A.T..781,22:.782,0:.6552
0...^..G(18);"              DATA OK (J/N
)             "...H..A$:.A$."N".210...R.
.A$.."J".360.D.|.GAELD.E(GAELD$):PCT.E(P
CT$):N.E(N$).R...YDELSE.GAELD.PCT.(100.(
1.(1.PCT.100)..N)).~....G(147)......C.1.
39:.G(18);G(32);:.:.781,1:.782,0:.65520.
.....G(18);"STARTGAELD:".A(GAELD)"PCT:".
A(PCT)"TERMINER:".A(N)......781,3:.782,0
:.65520.-...."TERMINSYDELSE (KR.):".A(YD
ELSE).3.B...A.L.."TERMIN   RENTE     AFD
RAG    RESTGAELD".W.V..A.1.39:.G(99);:..
}..........I.1.N.G...RENTE.GAELD.PCT.100
:AFDRAG.YDELSE.RENTE:GAELD.GAELD.AFDRAG.
V....I.15..610.......A(I).7).A(RENTE).18
).A(AFDRAG).28).A(GAELD).'....I.N..781,2
2:.782,0:.65520.4....:.646,1.J.&..A.1.39
:.G(99);:..J.0.." 0NSKES GENK0RSEL (J/N)
 ".}.:..A$:.A$."".570...D..A$."J".210...
N..A$."N".....X..A$.."J".A$.."N".570...B
...N.L.. SCROLL RUTINE.T.V........I.16..
781,22:.782,0:.65520.+....I.16..E.1.40:.
G(99);:.:."TAST <SPACE> FOR SCROLL".E...
.781,21:.782,0:.65520.X....A$:.A$."".670
......781,21:.782,0:.65520:.D.1.40:.G(32
);:.D......G(145);G(145)......646,7...F.
....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL