> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 0A 00 96 20 A5 41 28 58 29 B2 B5 28 |....... .A(X)..(|
00000010: 58 AC 31 30 30 29 AD 31 30 30 00 4B 08 14 00 99 |X.100).100.K....|
00000020: 22 93 22 3B A3 35 29 3B 22 12 20 46 52 41 4E 43 |".";.5);". FRANC|
00000030: 4B 27 53 20 50 41 4E 54 45 42 52 45 56 53 20 53 |K'S PANTEBREVS S|
00000040: 45 52 56 49 43 45 2E 20 92 11 22 00 90 08 1E 00 |ERVICE. ..".....|
00000050: 85 22 41 4E 54 41 4C 20 52 45 4E 54 45 44 41 47 |."ANTAL RENTEDAG|
00000060: 45 20 54 49 4C 20 31 2E 20 54 45 52 4D 49 4E 20 |E TIL 1. TERMIN |
00000070: 3A 22 3B 58 3A 58 B2 58 AD 31 38 30 3A 8B 20 58 |:";X:X.X.180:. X|
00000080: B1 31 20 A7 20 99 22 50 4A 41 54 22 3A 89 33 30 |.1 . ."PJAT":.30|
00000090: 00 A0 08 20 00 8B 20 58 B2 30 20 A7 20 58 B2 31 |... .. X.0 . X.1|
000000A0: 00 A6 08 23 00 99 00 CF 08 28 00 85 22 48 4F 56 |...#.....(.."HOV|
000000B0: 45 44 53 54 4F 4C 20 49 20 4B 52 20 20 20 20 20 |EDSTOL I KR |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 3A 22 3B 48 00 | :";H.|
000000D0: D5 08 2B 00 99 00 08 09 2D 00 85 22 41 41 52 4C |..+.....-.."AARL|
000000E0: 49 47 20 52 45 4E 54 45 20 49 20 25 20 20 20 20 |IG RENTE I % |
000000F0: 20 20 20 20 20 20 20 20 20 20 3A 22 3B 52 3A 52 | :";R:R|
00000100: B2 30 2E 30 30 35 AC 52 00 0E 09 30 00 99 00 4D |.0.005.R...0...M|
00000110: 09 32 00 85 22 31 2E 20 41 46 44 52 41 47 20 49 |.2.."1. AFDRAG I|
00000120: 20 25 2F 41 41 52 20 41 46 20 48 4F 56 45 44 53 | %/AAR AF HOVEDS|
00000130: 54 4F 4C 3A 22 3B 41 3A 41 B2 30 2E 30 30 35 AC |TOL:";A:A.0.005.|
00000140: 41 3A 8B 20 41 B3 B1 30 20 A7 20 36 30 00 7B 09 |A:. A..0 . 60.{.|
00000150: 37 00 99 22 53 41 41 20 42 4C 49 56 45 52 20 56 |7.."SAA BLIVER V|
00000160: 49 20 4A 4F 20 41 4C 44 52 49 47 20 46 41 45 52 |I JO ALDRIG FAER|
00000170: 44 49 47 45 20 21 22 3A 89 35 30 00 8F 09 3C 00 |DIGE !":.50...<.|
00000180: 59 B2 48 AC 28 52 AA 41 29 3A 46 B2 59 AC 58 00 |Y.H.(R.A):F.Y.X.|
00000190: BF 09 46 00 99 22 11 11 4E 4F 52 4D 41 4C 20 59 |..F.."..NORMAL Y|
000001A0: 44 45 4C 53 45 20 42 4C 49 56 45 52 3A 22 3B A5 |DELSE BLIVER:";.|
000001B0: 41 28 59 29 3B A3 33 30 29 3B 22 20 4B 52 22 00 |A(Y);.30);" KR".|
000001C0: EE 09 50 00 99 22 11 31 2E 20 59 44 45 4C 53 45 |..P..".1. YDELSE|
000001D0: 20 42 4C 49 56 45 52 20 20 20 20 3A 22 3B A5 41 | BLIVER :";.A|
000001E0: 28 46 29 3B A3 33 30 29 3B 22 20 4B 52 22 00 40 |(F);.30);" KR".@|
000001F0: 0A 52 00 99 22 11 12 44 45 52 20 45 52 20 49 4B |.R.."..DER ER IK|
00000200: 4B 45 20 54 41 47 45 54 20 53 41 45 52 4C 49 47 |KE TAGET SAERLIG|
00000210: 45 20 48 45 4E 53 59 4E 20 54 49 4C 20 20 20 42 |E HENSYN TIL B|
00000220: 45 54 49 4E 47 45 4C 53 45 52 20 4F 4D 20 49 4E |ETINGELSER OM IN|
00000230: 44 46 52 49 45 4C 53 45 20 41 46 20 52 45 22 3B |DFRIELSE AF RE";|
00000240: 00 7A 0A 53 00 99 22 53 54 47 41 45 4C 44 20 20 |.z.S.."STGAELD |
00000250: 45 46 54 45 52 20 45 54 20 47 49 56 45 54 20 41 |EFTER ET GIVET A|
00000260: 4E 54 41 4C 20 54 45 52 4D 49 4E 45 52 2E 20 20 |NTAL TERMINER. |
00000270: 20 20 20 20 20 20 20 20 92 22 00 86 0A 55 00 99 | ."...U..|
00000280: 22 11 11 11 11 22 00 B3 0A 5A 00 85 22 54 52 59 |"...."...Z.."TRY|
00000290: 4B 20 52 45 54 55 52 20 46 4F 52 20 4F 50 53 54 |K RETUR FOR OPST|
000002A0: 49 4C 4C 49 4E 47 20 41 46 20 54 41 42 45 4C 22 |ILLING AF TABEL"|
000002B0: 3B 5A 24 00 BC 0A 5F 00 99 22 93 22 00 C2 0A 6E |;Z$..._.."."...n|
000002C0: 00 99 00 F7 0A 78 00 8F 20 4E 55 20 4F 50 53 54 |.....x.. NU OPST|
000002D0: 49 4C 4C 45 53 20 54 41 42 45 4C 4C 45 4E 20 53 |ILLES TABELLEN S|
000002E0: 49 44 45 20 46 4F 52 20 53 49 44 45 20 28 53 49 |IDE FOR SIDE (SI|
000002F0: 44 45 4E 52 3D 50 29 00 2D 0B 82 00 8F 20 46 4F |DENR=P).-.... FO|
00000300: 45 52 53 54 45 20 4F 47 20 53 49 44 53 54 45 20 |ERSTE OG SIDSTE |
00000310: 54 45 52 4D 49 4E 20 50 52 20 53 49 44 45 20 4B |TERMIN PR SIDE K|
00000320: 41 4C 44 45 53 20 42 20 48 48 56 20 53 00 59 0B |ALDES B HHV S.Y.|
00000330: 8C 00 99 22 93 54 45 52 4D 49 4E 20 20 52 45 4E |...".TERMIN REN|
00000340: 54 45 20 20 20 41 46 44 52 41 47 20 20 20 20 52 |TE AFDRAG R|
00000350: 45 53 54 47 41 45 4C 44 22 00 5F 0B 8D 00 99 00 |ESTGAELD"._.....|
00000360: 84 0B 91 00 50 B2 50 AA 31 3A 42 B2 32 30 AC 28 |....P.P.1:B.20.(|
00000370: 50 AB 31 29 AA 31 3A 53 B2 32 30 AC 28 50 AB 31 |P.1).1:S.20.(P.1|
00000380: 29 AA 32 30 00 AF 0B 96 00 8F 20 4E 55 20 42 45 |).20...... NU BE|
00000390: 52 45 47 4E 45 53 20 32 30 20 54 45 52 4D 49 4E |REGNES 20 TERMIN|
000003A0: 45 52 20 28 54 29 41 44 20 47 41 4E 47 45 4E 00 |ER (T)AD GANGEN.|
000003B0: BD 0B A0 00 81 20 54 B2 42 20 A4 20 53 00 CE 0B |..... T.B . S...|
000003C0: AA 00 8B 20 54 B3 B1 31 20 A7 20 32 31 30 00 F3 |... T..1 . 210..|
000003D0: 0B AF 00 8F 20 52 45 4E 54 45 42 45 4C 4F 45 42 |.... RENTEBELOEB|
000003E0: 20 4D 2C 20 41 46 44 52 41 47 53 42 45 4C 4F 45 | M, AFDRAGSBELOE|
000003F0: 42 20 4E 00 16 0C B4 00 99 22 20 20 20 20 20 20 |B N......" |
00000400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000410: 20 20 20 22 3B 48 00 2E 0C BE 00 4D B2 48 AC 52 | ";H.....M.H.R|
00000420: AC 58 3A 4E B2 46 AB 4D 3A 47 B2 48 AB 4E 00 37 |.X:N.F.M:G.H.N.7|
00000430: 0C C8 00 89 32 31 39 00 41 0C D2 00 4D B2 47 AC |....219.A...M.G.|
00000440: 52 00 4B 0C D3 00 4E B2 59 AB 4D 00 57 0C D4 00 |R.K...N.Y.M.W...|
00000450: 4F B2 52 AC 47 AA 47 00 61 0C D5 00 47 B2 47 AB |O.R.G.G.a...G.G.|
00000460: 4E 00 71 0C D6 00 8B 20 4F B1 59 20 A7 20 32 31 |N.q.... O.Y . 21|
00000470: 39 00 B6 0C D7 00 55 B2 47 AA 4E 3A 8B 20 54 B1 |9.....U.G.N:. T.|
00000480: 31 35 AA 28 50 AB 31 29 AC 32 30 20 A7 20 85 22 |15.(P.1).20 . ."|
00000490: 11 54 41 53 54 20 52 45 54 55 52 20 46 4F 52 20 |.TAST RETUR FOR |
000004A0: 53 49 44 53 54 45 20 54 45 52 4D 49 4E 22 3B 5A |SIDSTE TERMIN";Z|
000004B0: 24 3A 99 22 93 22 00 E4 0C D8 00 99 22 11 53 49 |$:."."......".SI|
000004C0: 44 53 54 45 20 54 45 52 4D 49 4E 3A 22 3B A3 32 |DSTE TERMIN:";.2|
000004D0: 35 29 3B 22 53 49 44 53 54 45 20 59 44 45 4C 53 |5);"SIDSTE YDELS|
000004E0: 45 3A 11 22 00 12 0D D9 00 99 20 A5 41 28 54 29 |E:."...... .A(T)|
000004F0: 3B A3 35 29 3B A5 41 28 4D 29 3B A3 31 35 29 3B |;.5);.A(M);.15);|
00000500: A5 41 28 55 29 3B A3 32 35 29 3B A5 41 28 4D AA |.A(U);.25);.A(M.|
00000510: 55 29 00 47 0D DA 00 99 22 11 12 45 52 20 56 49 |U).G...."..ER VI|
00000520: 20 45 4E 49 47 45 20 3F 3F 20 48 56 49 53 20 45 | ENIGE ?? HVIS E|
00000530: 4A 2C 20 53 41 41 20 48 41 52 20 4A 45 47 20 52 |J, SAA HAR JEG R|
00000540: 45 54 21 92 22 3A 80 00 5B 0D DB 00 8B 20 54 B3 |ET!.":..[.... T.|
00000550: B2 39 20 A7 20 99 20 22 20 22 3B 00 87 0D DC 00 |.9 . . " ";.....|
00000560: 99 20 A5 41 28 54 29 3B A3 35 29 3B A5 41 28 4D |. .A(T);.5);.A(M|
00000570: 29 3B A3 31 35 29 3B A5 41 28 4E 29 3B A3 32 35 |);.15);.A(N);.25|
00000580: 29 3B A5 41 28 47 29 00 8F 0D E6 00 82 20 54 00 |);.A(G)...... T.|
00000590: BE 0D F0 00 99 3A 85 22 54 52 59 4B 20 52 45 54 |.....:."TRYK RET|
000005A0: 55 52 20 46 4F 52 20 46 4C 45 52 45 20 54 45 52 |UR FOR FLERE TER|
000005B0: 4D 49 4E 45 52 22 3B 5A 24 3A 89 31 34 30 00 00 |MINER";Z$:.140..|
000005C0: 00 34 |.4 |
....... .A(X)..(X.100).100.K....".";.5);
". FRANCK'S PANTEBREVS SERVICE. ..".....
."ANTAL RENTEDAGE TIL 1. TERMIN :";X:X.X
.180:. X.1 . ."PJAT":.30. . .. X.0 . X.1
...#...O.(.."HOVEDSTOL I KR
:";H.U.+.....-.."AARLIG RENTE I %
:";R:R.0.005.R...0...M.2.."1.
AFDRAG I %/AAR AF HOVEDSTOL:";A:A.0.005.
A:. A..0 . 60.{.7.."SAA BLIVER VI JO ALD
RIG FAERDIGE !":.50...<.Y.H.(R.A):F.Y.X.
..F.."..NORMAL YDELSE BLIVER:";.A(Y);.30
);" KR"...P..".1. YDELSE BLIVER :";.A
(F);.30);" KR".@.R.."..DER ER IKKE TAGET
SAERLIGE HENSYN TIL BETINGELSER OM IN
DFRIELSE AF RE";.Z.S.."STGAELD EFTER ET
GIVET ANTAL TERMINER. ."...U..
"...."...Z.."TRYK RETUR FOR OPSTILLING A
F TABEL";Z$..._..".".B.N.....X.. NU OPST
ILLES TABELLEN SIDE FOR SIDE (SIDENR=P).
-.... FOERSTE OG SIDSTE TERMIN PR SIDE K
ALDES B HHV S.Y....".TERMIN RENTE AFD
RAG RESTGAELD"._.........P.P.1:B.20.(
P.1).1:S.20.(P.1).20...... NU BEREGNES 2
0 TERMINER (T)AD GANGEN... .. T.B . S.N.
... T..1 . 210...... RENTEBELOEB M, AFDR
AGSBELOEB N......"
";H.....M.H.R.X:N.F.M:G.H.N.7.H..219.
A.R.M.G.R.K.S.N.Y.M.W.T.O.R.G.G.A.U.G.G.
N.Q.V.. O.Y . 219...W.U.G.N:. T.15.(P.1)
.20 . .".TAST RETUR FOR SIDSTE TERMIN";Z
$:."."...X..".SIDSTE TERMIN:";.25);"SIDS
TE YDELSE:."...Y.. .A(T);.5);.A(M);.15);
.A(U);.25);.A(M.U).G.Z.."..ER VI ENIGE ?
? HVIS EJ, SAA HAR JEG RET!.":..[.... T.
.9 . . " ";...... .A(T);.5);.A(M);.15);.
A(N);.25);.A(G)...... T......:."TRYK RET
UR FOR FLERE TERMINER";Z$:.140...4
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL