INTEREST

FILE INFORMATION

FILENAME(S): INTEREST

FILE TYPE(S): PRG

FILE SIZE: 2K

FIRST SEEN: 2025-10-19 22:49:31

APPEARS ON: 1 disk(s)

FILE HASH

c9c012105e2348c95ca49c3f1fd0849fd693be01dee09c4552c4de3ca0733b42

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
GOLD DISK 8	INTEREST	PRG	Radd Maxx	33	6	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 18 08 01 00 8F 20  28 43 29 47 4F 4C 44 20  |....... (C)GOLD |
00000010: 44 49 53 4B 20 49 4E 43  00 3A 08 02 00 43 44 24  |DISK INC.:...CD$|
00000020: B2 22 13 11 11 11 11 11  11 11 11 11 11 11 11 11  |."..............|
00000030: 11 11 11 11 11 11 11 11  11 22 00 66 08 03 00 99  |.........".f....|
00000040: 22 93 05 11 11 11 20 20  20 20 20 D3 49 4D 50 4C  |".....     .IMPL|
00000050: 45 20 26 20 C3 4F 4D 50  4F 55 4E 44 20 49 4E 54  |E & .OMPOUND INT|
00000060: 45 52 45 53 54 22 00 8E  08 04 00 99 22 11 11 11  |EREST"......"...|
00000070: 20 20 20 20 20 20 20 20  20 31 2E 2E 2E 20 D3 49  |         1... .I|
00000080: 4D 50 4C 45 20 49 4E 54  45 52 45 53 54 22 00 B6  |MPLE INTEREST"..|
00000090: 08 05 00 99 22 11 20 20  20 20 20 20 20 20 20 32  |....".         2|
000000A0: 2E 2E 2E 20 C3 4F 4D 50  4F 55 4E 44 20 49 4E 54  |... .OMPOUND INT|
000000B0: 45 52 45 53 54 22 00 D5  08 06 00 99 22 11 11 C5  |EREST"......"...|
000000C0: 4E 54 45 52 20 46 55 4E  43 54 49 4F 4E 20 3A 20  |NTER FUNCTION : |
000000D0: 22 3A 8D 37 33 00 E6 08  07 00 A1 41 24 3A 8B 41  |":.73......A$:.A|
000000E0: 24 B2 22 22 89 37 00 F9  08 08 00 8B 41 24 B2 22  |$."".7......A$."|
000000F0: 31 22 A7 8D 31 32 3A 89  33 00 0C 09 09 00 8B 41  |1"..12:.3......A|
00000100: 24 B2 22 32 22 A7 8D 32  38 3A 89 33 00 24 09 0A  |$."2"..28:.3.$..|
00000110: 00 8B 41 24 B2 22 5F 22  A7 99 22 93 22 3A 9E 34  |..A$."_"..".":.4|
00000120: 39 31 35 32 00 2B 09 0B  00 89 33 00 52 09 0C 00  |9152.+....3.R...|
00000130: 99 22 93 11 11 11 20 20  20 20 20 20 20 20 20 20  |."....          |
00000140: 20 20 D3 49 4D 50 4C 45  20 C9 4E 54 45 52 45 53  |  .IMPLE .NTERES|
00000150: 54 22 00 75 09 0D 00 99  22 20 20 20 20 20 20 20  |T".u...."       |
00000160: 20 20 20 20 20 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |     ...........|
00000170: A3 A3 A3 A3 22 00 9C 09  0E 00 99 22 11 11 D0 52  |...."......"...R|
00000180: 49 4E 43 49 50 41 4C 20  20 20 20 20 3A 24 12 20  |INCIPAL     :$. |
00000190: 31 30 30 30 20 20 20 20  20 20 92 22 00 CE 09 0F  |1000      ."....|
000001A0: 00 99 22 11 C9 4E 54 45  52 45 53 54 20 52 41 54  |.."..NTEREST RAT|
000001B0: 45 20 3A 20 12 20 31 30  20 20 20 20 20 20 20 20  |E : . 10        |
000001C0: 92 20 25 20 50 45 52 20  41 4E 4E 55 4D 22 00 FA  |. % PER ANNUM"..|
000001D0: 09 10 00 99 22 11 D4 45  52 4D 20 20 20 20 20 20  |...."..ERM      |
000001E0: 20 20 20 20 3A 20 12 20  31 20 20 20 20 20 20 20  |    : . 1       |
000001F0: 20 20 92 20 59 45 41 52  53 22 00 20 0A 11 00 99  |  . YEARS". ....|
00000200: 22 11 C6 49 4E 41 4C 20  41 4D 4F 55 4E 54 20 20  |"..INAL AMOUNT  |
00000210: 3A 24 12 20 31 31 30 30  20 20 20 20 20 20 92 22  |:$. 1100      ."|
00000220: 00 28 0A 12 00 8D 37 32  00 54 0A 13 00 56 28 31  |.(....72.T...V(1|
00000230: 29 B2 31 30 30 30 3A 56  28 32 29 B2 31 30 3A 56  |).1000:V(2).10:V|
00000240: 28 33 29 B2 31 3A 56 28  34 29 B2 31 31 30 30 3A  |(3).1:V(4).1100:|
00000250: 4C B2 31 33 00 5C 0A 14  00 8D 34 38 00 72 0A 15  |L.13.\....48.r..|
00000260: 00 91 4B 89 32 32 2C 32  33 2C 32 34 2C 32 35 2C  |..K.22,23,24,25,|
00000270: 32 37 00 96 0A 16 00 56  28 31 29 B2 56 28 34 29  |27.....V(1).V(4)|
00000280: AD 28 31 AA 56 28 33 29  AC 56 28 32 29 AD 31 30  |.(1.V(3).V(2).10|
00000290: 30 29 3A 89 32 36 00 BA  0A 17 00 56 28 32 29 B2  |0):.26.....V(2).|
000002A0: 28 56 28 34 29 AD 56 28  31 29 AB 31 29 AD 56 28  |(V(4).V(1).1).V(|
000002B0: 33 29 AC 31 30 30 3A 89  32 36 00 DE 0A 18 00 56  |3).100:.26.....V|
000002C0: 28 33 29 B2 28 56 28 34  29 AD 56 28 31 29 AB 31  |(3).(V(4).V(1).1|
000002D0: 29 AD 56 28 32 29 AC 31  30 30 3A 89 32 36 00 FE  |).V(2).100:.26..|
000002E0: 0A 19 00 56 28 34 29 B2  56 28 31 29 AC 28 31 AA  |...V(4).V(1).(1.|
000002F0: 56 28 32 29 AC 56 28 33  29 AD 31 30 30 29 00 0A  |V(2).V(3).100)..|
00000300: 0B 1A 00 8D 35 37 3A 89  32 31 00 10 0B 1B 00 8E  |....57:.21......|
00000310: 00 38 0B 1C 00 99 22 93  11 11 11 20 20 20 20 20  |.8...."....     |
00000320: 20 20 20 20 20 20 C3 4F  4D 50 4F 55 4E 44 20 C9  |      .OMPOUND .|
00000330: 4E 54 45 52 45 53 54 22  00 5C 0B 1D 00 99 22 20  |NTEREST".\...." |
00000340: 20 20 20 20 20 20 20 20  20 20 A3 A3 A3 A3 A3 A3  |          ......|
00000350: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 22 00 83 0B 1E  |..........."....|
00000360: 00 99 22 11 11 D0 52 49  4E 43 49 50 41 4C 20 20  |.."...RINCIPAL  |
00000370: 20 20 20 3A 24 12 20 31  30 30 30 20 20 20 20 20  |   :$. 1000     |
00000380: 20 92 22 00 B5 0B 1F 00  99 22 11 C9 4E 54 45 52  | ."......"..NTER|
00000390: 45 53 54 20 52 41 54 45  20 3A 20 12 20 31 30 20  |EST RATE : . 10 |
000003A0: 20 20 20 20 20 20 20 92  20 25 20 50 45 52 20 41  |       . % PER A|
000003B0: 4E 4E 55 4D 22 00 E4 0B  20 00 99 22 11 C3 4F 4D  |NNUM"... .."..OM|
000003C0: 50 4F 55 4E 44 20 46 52  45 51 2E 3A 20 12 20 32  |POUND FREQ.: . 2|
000003D0: 20 20 20 20 20 20 20 20  20 92 20 54 49 4D 45 53  |         . TIMES|
000003E0: 2F 59 52 22 00 10 0C 21  00 99 22 11 D4 45 52 4D  |/YR"...!.."..ERM|
000003F0: 20 20 20 20 20 20 20 20  20 20 3A 20 12 20 31 20  |          : . 1 |
00000400: 20 20 20 20 20 20 20 20  92 20 59 45 41 52 53 22  |        . YEARS"|
00000410: 00 36 0C 22 00 99 22 11  C6 49 4E 41 4C 20 41 4D  |.6.".."..INAL AM|
00000420: 4F 55 4E 54 20 20 3A 24  12 20 31 31 30 32 2E 35  |OUNT  :$. 1102.5|
00000430: 30 20 20 20 92 22 00 3F  0C 23 00 8D 20 37 32 00  |0   .".?.#.. 72.|
00000440: 75 0C 24 00 56 28 31 29  B2 31 30 30 30 3A 56 28  |u.$.V(1).1000:V(|
00000450: 32 29 B2 31 30 3A 56 28  33 29 B2 32 3A 56 28 34  |2).10:V(3).2:V(4|
00000460: 29 B2 31 3A 56 28 35 29  B2 31 31 30 32 2E 35 30  |).1:V(5).1102.50|
00000470: 3A 4C B2 31 35 00 7D 0C  25 00 8D 34 38 00 96 0C  |:L.15.}.%..48...|
00000480: 26 00 91 4B 89 33 39 2C  34 30 2C 34 31 2C 34 32  |&..K.39,40,41,42|
00000490: 2C 34 33 2C 34 35 00 C8  0C 27 00 56 28 31 29 B2  |,43,45...'.V(1).|
000004A0: 56 28 35 29 AD 28 28 31  AA 56 28 32 29 AD 31 30  |V(5).((1.V(2).10|
000004B0: 30 AD 56 28 33 29 29 AE  28 56 28 34 29 AC 56 28  |0.V(3)).(V(4).V(|
000004C0: 33 29 29 29 3A 89 34 34  00 F8 0C 28 00 56 28 32  |3))):.44...(.V(2|
000004D0: 29 B2 56 28 33 29 AC 28  BD 28 BC 28 56 28 35 29  |).V(3).(.(.(V(5)|
000004E0: AD 56 28 31 29 29 AD 56  28 33 29 AC 56 28 34 29  |.V(1)).V(3).V(4)|
000004F0: 29 AB 31 29 AC 31 30 30  00 00 0D 29 00 89 34 34  |).1).100...)..44|
00000500: 00 34 0D 2A 00 56 28 34  29 B2 BC 28 56 28 35 29  |.4.*.V(4)..(V(5)|
00000510: AD 56 28 31 29 29 AD 28  56 28 33 29 AC BC 28 31  |.V(1)).(V(3)..(1|
00000520: AA 56 28 32 29 AD 31 30  30 AD 56 28 33 29 29 29  |.V(2).100.V(3)))|
00000530: 3A 89 34 34 00 60 0D 2B  00 56 28 35 29 B2 56 28  |:.44.`.+.V(5).V(|
00000540: 31 29 AC 28 31 AA 56 28  32 29 AD 31 30 30 AD 56  |1).(1.V(2).100.V|
00000550: 28 33 29 29 AE 28 56 28  34 29 AC 56 28 33 29 29  |(3)).(V(4).V(3))|
00000560: 00 6C 0D 2C 00 8D 35 37  3A 89 33 38 00 72 0D 2D  |.l.,..57:.38.r.-|
00000570: 00 8E 00 97 0D 2E 00 4B  B2 49 AC 34 30 AA 31 36  |.......K.I.40.16|
00000580: AA 35 35 32 39 36 3A 81  4A B2 4B A4 4B AA 31 30  |.55296:.J.K.K.10|
00000590: 3A 97 4A 2C 43 3A 82 00  9D 0D 2F 00 8E 00 A5 0D  |:.J,C:..../.....|
000005A0: 30 00 49 B2 35 00 B9 0D  31 00 49 B2 49 AA 32 3A  |0.I.5...1.I.I.2:|
000005B0: 8B 49 B1 4C 20 A7 49 B2  37 00 C5 0D 32 00 43 B2  |.I.L .I.7...2.C.|
000005C0: 32 3A 8D 34 36 00 FD 0D  33 00 99 C8 28 43 44 24  |2:.46...3...(CD$|
000005D0: 2C 32 30 29 3B 22 20 20  20 20 20 20 20 20 20 20  |,20);"          |
000005E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000005F0: 20 20 20 20 20 20 20 20  20 20 20 20 22 00 26 0E  |            ".&.|
00000600: 34 00 99 20 22 91 C5 4E  54 45 52 20 56 41 4C 55  |4.. "..NTER VALU|
00000610: 45 2D 45 4E 44 20 57 49  54 48 20 3C 43 52 3E 3A  |E-END WITH <CR>:|
00000620: 22 3B 3A 8D 36 30 00 32  0E 35 00 8B 41 B2 30 A7  |";:.60.2.5..A.0.|
00000630: 35 39 00 4B 0E 36 00 8B  41 B2 AB 31 30 A7 4B B2  |59.K.6..A..10.K.|
00000640: 28 4C AB 37 29 AD 32 AA  32 3A 8E 00 63 0E 37 00  |(L.7).2.2:..c.7.|
00000650: 8B 41 B2 AB 31 A7 4B B2  28 49 AB 37 29 AD 32 AA  |.A..1.K.(I.7).2.|
00000660: 31 3A 8E 00 76 0E 38 00  56 28 28 49 AB 37 29 AD  |1:..v.8.V((I.7).|
00000670: 32 AA 31 29 B2 41 00 9B  0E 39 00 99 C8 28 43 44  |2.1).A...9...(CD|
00000680: 24 2C 49 AA 31 29 3B A3  31 36 29 3B 22 12 20 20  |$,I.1);.16);".  |
00000690: 20 20 20 20 20 20 20 20  20 92 22 00 C1 0E 3A 00  |         ."...:.|
000006A0: 99 C8 28 43 44 24 2C 49  AA 31 29 3B A3 31 36 29  |..(CD$,I.1);.16)|
000006B0: 3B 22 12 22 3B 56 28 28  49 AB 37 29 AD 32 AA 31  |;".";V((I.7).2.1|
000006C0: 29 00 D1 0E 3B 00 43 B2  31 3A 8D 34 36 3A 89 34  |)...;.C.1:.46:.4|
000006D0: 39 00 F3 0E 3C 00 4C 46  B2 AB 31 3A 4C 4E B2 30  |9...<.LF..1:LN.0|
000006E0: 3A 97 31 39 38 2C 30 3A  4C 24 B2 22 22 3A 99 22  |:.198,0:L$."":."|
000006F0: AF 22 3B 00 05 0F 3D 00  A1 41 24 3A 8B 41 24 B2  |.";...=..A$:.A$.|
00000700: 22 22 89 36 31 00 1D 0F  3E 00 8B 41 24 B2 22 2E  |"".61...>..A$.".|
00000710: 22 AF 4C 46 A7 4C 46 B2  30 3A 89 36 39 00 35 0F  |".LF.LF.0:.69.5.|
00000720: 3F 00 8B 41 24 B2 B1 22  30 22 AF 41 24 B3 B2 22  |?..A$.."0".A$.."|
00000730: 39 22 A7 36 39 00 4D 0F  40 00 8B 41 24 B2 C7 28  |9".69.M.@..A$..(|
00000740: 31 33 29 A7 41 B2 C5 28  4C 24 29 3A 8E 00 65 0F  |13).A..(L$):..e.|
00000750: 41 00 8B 41 24 B2 22 5F  22 A7 99 22 93 22 3A 9E  |A..A$."_"..".":.|
00000760: 34 39 31 35 32 00 79 0F  42 00 8B 41 24 B2 22 5E  |49152.y.B..A$."^|
00000770: 22 A7 41 B2 AB 31 30 3A  8E 00 89 0F 43 00 8B 41  |".A..10:....C..A|
00000780: 24 B3 B1 22 88 22 89 36  31 00 94 0F 44 00 41 B2  |$..".".61...D.A.|
00000790: AB 31 3A 8E 00 A2 0F 45  00 8B 4C 4E B2 31 30 A7  |.1:....E..LN.10.|
000007A0: 36 31 00 C2 0F 46 00 4C  4E B2 4C 4E AA 31 3A 99  |61...F.LN.LN.1:.|
000007B0: 22 9D 22 41 24 22 AF 22  3B 3A 4C 24 B2 4C 24 AA  |"."A$".";:L$.L$.|
000007C0: 41 24 00 CA 0F 47 00 89  36 31 00 F6 0F 48 00 99  |A$...G..61...H..|
000007D0: 43 44 24 22 3C C6 37 3E  20 54 4F 20 43 41 4C 43  |CD$"<.7> TO CALC|
000007E0: 55 4C 41 54 45 20 48 49  4C 49 47 48 54 45 44 20  |ULATE HILIGHTED |
000007F0: 46 49 45 4C 44 22 00 2C  10 49 00 99 43 44 24 22  |FIELD".,.I..CD$"|
00000800: 11 11 3C 5F 3E 20 46 4F  52 20 47 4F 4C 44 20 44  |..<_> FOR GOLD D|
00000810: 49 53 4B 20 4F 52 20 3C  5E 3E 20 46 4F 52 20 4D  |ISK OR <^> FOR M|
00000820: 41 49 4E 20 4D 45 4E 55  22 3B 3A 8E 00 00 00     |AIN MENU";:.... |

....... (C)GOLD DISK INC.:...CD$."......
.................".F....".....     SIMPL
E & COMPOUND INTEREST"......"...        
 1... SIMPLE INTEREST"......".         2
... COMPOUND INTEREST".U...."..ENTER FUN
CTION : ":.73......A$:.A$."".7......A$."
1"..12:.3......A$."2"..28:.3.$....A$."_"
..".":.49152.+....3.R...."....          
  SIMPLE INTEREST".U...."            ...
............"......"..PRINCIPAL     :$. 
1000      .".N....".INTEREST RATE : . 10
        . % PER ANNUM"......".TERM      
    : . 1         . YEARS". ....".FINAL 
AMOUNT  :$. 1100      .".(....72.T...V(1
).1000:V(2).10:V(3).1:V(4).1100:L.13.\..
..48.R....K.22,23,24,25,27.....V(1).V(4)
.(1.V(3).V(2).100):.26.....V(2).(V(4).V(
1).1).V(3).100:.26.....V(3).(V(4).V(1).1
).V(2).100:.26.....V(4).V(1).(1.V(2).V(3
).100)......57:.21.......8...."....     
      COMPOUND INTEREST".\...."         
  ................."......"..PRINCIPAL  
   :$. 1000      ."......".INTEREST RATE
 : . 10        . % PER ANNUM"... ..".COM
POUND FREQ.: . 2         . TIMES/YR"...!
..".TERM          : . 1         . YEARS"
.6."..".FINAL AMOUNT  :$. 1102.50   .".?
.#.. 72.U.$.V(1).1000:V(2).10:V(3).2:V(4
).1:V(5).1102.50:L.15.}.%..48...&..K.39,
40,41,42,43,45.H.'.V(1).V(5).((1.V(2).10
0.V(3)).(V(4).V(3))):.44...(.V(2).V(3).(
.(.(V(5).V(1)).V(3).V(4)).1).100...)..44
.4.*.V(4)..(V(5).V(1)).(V(3)..(1.V(2).10
0.V(3))):.44.`.+.V(5).V(1).(1.V(2).100.V
(3)).(V(4).V(3)).L.,..57:.38.R.-.......K
.I.40.16.55296:.J.K.K.10:.J,C:..../.....
0.I.5...1.I.I.2:.I.L .I.7.E.2.C.2:.46...
3..H(CD$,20);"                          
            ".&.4.. ".ENTER VALUE-END WI
TH <CR>:";:.60.2.5..A.0.59.K.6..A..10.K.
(L.7).2.2:..C.7..A..1.K.(I.7).2.1:..V.8.
V((I.7).2.1).A...9..H(CD$,I.1);.16);".  
         .".A.:..H(CD$,I.1);.16);".";V((
I.7).2.1).Q.;.C.1:.46:.49...<.LF..1:LN.0
:.198,0:L$."":.".";...=..A$:.A$."".61...
>..A$.".".LF.LF.0:.69.5.?..A$.."0".A$.."
9".69.M.@..A$.G(13).A.E(L$):..E.A..A$."_
"..".":.49152.Y.B..A$."^".A..10:....C..A
$..".".61...D.A..1:....E..LN.10.61.B.F.L
N.LN.1:."."A$".";:L$.L$.A$.J.G..61...H..
CD$"<F7> TO CALCULATE HILIGHTED FIELD".,
.I..CD$"..<_> FOR GOLD DISK OR <^> FOR M
AIN MENU";:....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL