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

FINANCIAL CALC.1

FILE INFORMATION

FILENAME(S): FINANCIAL CALC.1

FILE TYPE(S): PRG

FILE SIZE: 4.8K

FIRST SEEN: 2025-11-30 18:12:16

APPEARS ON: 1 disk(s)

FILE HASH

34d9866eb137cf9858e0c2b4b276f4d154e0cfed84e9d13609b1d898182baa66

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOADSTAR 36 S 1 FINANCIAL CALC.1 PRG Sailor, Ganheden 29 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 1C 23 1C 05 00 E7 20  30 2C 34 3A E7 20 34 2C  |..#.... 0,4:. 4,|
00000010: 37 3A 8D 36 30 31 30 30  3A 99 22 93 22 3A E7 20  |7:.60100:.".":. |
00000020: 30 2C 31 00 2E 1C 0A 00  89 20 31 30 38 30 00 58  |0,1...... 1080.X|
00000030: 1C 14 00 55 51 B2 CE 09  28 32 29 3A 55 50 B2 CD  |...UQ...(2):UP..|
00000040: 28 35 29 3A 55 4F B2 CD  28 30 29 3A E7 30 2C 31  |(5):UO..(0):.0,1|
00000050: 3A 99 C7 28 31 34 29 3B  00 79 1C 1E 00 8D 35 30  |:..(14);.y....50|
00000060: 3A E7 35 2C 55 50 3A E7  30 2C 55 4F 3A 99 22 13  |:.5,UP:.0,UO:.".|
00000070: 13 22 55 45 24 22 4C 22  3B 00 81 1C 28 00 D7 3A  |."UE$"L";...(..:|
00000080: 8E 00 A7 1C 32 00 55 45  24 B2 C7 28 32 37 29 3A  |....2.UE$..(27):|
00000090: 55 46 24 B2 55 45 24 AA  22 4D 22 3A 55 47 24 B2  |UF$.UE$."M":UG$.|
000000A0: 55 45 24 AA 22 4A 22 00  DA 1C 3C 00 55 44 24 B2  |UE$."J"...<.UD$.|
000000B0: 22 31 32 33 34 35 36 37  38 39 30 2E 2B 2D 2A 2F  |"1234567890.+-*/|
000000C0: 43 58 22 AA C7 28 31 33  29 AA 22 42 49 4E 50 C2  |CX"..(13)."BINP.|
000000D0: C9 CE D0 22 AA C7 28 32  37 29 00 14 1D 46 00 55  |..."..(27)...F.U|
000000E0: 50 24 B2 22 20 20 20 20  20 20 20 20 20 20 20 22  |P$."           "|
000000F0: 3A 55 42 24 B2 22 12 1C  20 20 20 20 20 20 20 20  |:UB$."..        |
00000100: 20 20 22 3A 55 4C 24 B2  22 1C 12 22 AA 55 50 24  |  ":UL$."..".UP$|
00000110: AA 55 47 24 00 23 1D 50  00 55 43 24 28 30 29 B2  |.UG$.#.P.UC$(0).|
00000120: 55 50 24 00 78 1D 5A 00  8B 20 55 51 B2 34 30 20  |UP$.x.Z.. UQ.40 |
00000130: A7 20 8C 20 31 34 30 3A  55 53 B2 32 39 33 31 3A  |. . 140:US.2931:|
00000140: 55 44 B2 32 38 33 38 3A  55 54 B2 31 35 3A 55 55  |UD.2838:UT.15:UU|
00000150: B2 36 3A 55 56 B2 32 35  3A 55 58 B2 31 39 3A 55  |.6:UV.25:UX.19:U|
00000160: 4D 24 B2 55 4C 24 3A 55  4E 24 B2 55 50 24 3A 55  |M$.UL$:UN$.UP$:U|
00000170: 45 B2 32 35 33 3A FE 26  00 D2 1D 64 00 8B 20 55  |E.253:.&...d.. U|
00000180: 51 B2 38 30 20 A7 20 8C  20 32 33 30 3A 55 53 B2  |Q.80 . . 230:US.|
00000190: 32 39 37 35 3A 55 44 B2  32 38 36 36 3A 55 54 B2  |2975:UD.2866:UT.|
000001A0: 33 35 3A 55 55 B2 36 3A  55 56 B2 34 35 3A 55 58  |35:UU.6:UV.45:UX|
000001B0: B2 31 35 3A 55 4D 24 B2  22 22 3A 55 4E 24 B2 22  |.15:UM$."":UN$."|
000001C0: 22 3A 55 4F 24 B2 55 4C  24 3A 55 45 B2 31 32 3A  |":UO$.UL$:UE.12:|
000001D0: FE 25 00 F1 1D 6E 00 8B  20 C2 28 32 38 31 36 29  |.%...n.. .(2816)|
000001E0: B2 31 36 30 20 A7 20 8C  20 33 37 30 3A 89 33 34  |.160 . . 370:.34|
000001F0: 30 00 24 1E 78 00 81 20  55 52 B2 32 38 31 36 20  |0.$.x.. UR.2816 |
00000200: A4 20 55 53 3A 87 20 55  41 24 3A 55 41 B2 D1 28  |. US:. UA$:UA..(|
00000210: 55 41 24 29 3A 97 20 55  52 2C 55 41 3A 82 3A 8C  |UA$):. UR,UA:.:.|
00000220: 20 33 37 30 00 40 1E 82  00 3A 8F 20 34 30 20 43  | 370.@...:. 40 C|
00000230: 4F 4C 55 4D 4E 20 4D 4C  20 52 4F 55 54 49 4E 45  |OLUMN ML ROUTINE|
00000240: 00 76 1E 8C 00 83 20 41  30 2C 30 30 2C 42 39 2C  |.v.... A0,00,B9,|
00000250: 30 30 2C 31 30 2C 38 35  2C 46 41 2C 42 39 2C 30  |00,10,85,FA,B9,0|
00000260: 30 2C 30 44 2C 39 39 2C  30 30 2C 31 30 2C 41 35  |0,0D,99,00,10,A5|
00000270: 2C 46 41 2C 39 39 00 AC  1E 96 00 83 20 30 30 2C  |,FA,99...... 00,|
00000280: 30 44 2C 43 38 2C 44 30  2C 45 44 2C 36 30 2C 41  |0D,C8,D0,ED,60,A|
00000290: 39 2C 30 30 2C 41 38 2C  41 41 2C 38 35 2C 46 43  |9,00,A8,AA,85,FC|
000002A0: 2C 41 39 2C 46 46 2C 38  35 2C 46 41 00 E2 1E A0  |,A9,FF,85,FA....|
000002B0: 00 83 20 41 39 2C 30 34  2C 38 35 2C 46 42 2C 32  |.. A9,04,85,FB,2|
000002C0: 30 2C 33 46 2C 30 42 2C  45 38 2C 43 38 2C 43 30  |0,3F,0B,E8,C8,C0|
000002D0: 2C 30 42 2C 44 30 2C 46  37 2C 41 30 2C 30 30 2C  |,0B,D0,F7,A0,00,|
000002E0: 31 38 00 18 1F AA 00 83  20 41 35 2C 46 41 2C 36  |18...... A5,FA,6|
000002F0: 39 2C 32 38 2C 38 35 2C  46 41 2C 39 30 2C 30 32  |9,28,85,FA,90,02|
00000300: 2C 45 36 2C 46 42 2C 45  30 2C 39 41 2C 44 30 2C  |,E6,FB,E0,9A,D0,|
00000310: 45 36 2C 36 30 2C 41 35  00 4E 1F B4 00 83 20 46  |E6,60,A5.N.... F|
00000320: 44 2C 44 30 2C 31 31 2C  42 31 2C 46 41 2C 39 44  |D,D0,11,B1,FA,9D|
00000330: 2C 38 30 2C 30 42 2C 32  30 2C 36 34 2C 30 42 2C  |,80,0B,20,64,0B,|
00000340: 42 31 2C 46 41 2C 39 44  2C 32 30 2C 30 43 00 84  |B1,FA,9D,20,0C..|
00000350: 1F BE 00 83 20 32 30 2C  36 43 2C 30 42 2C 36 30  |.... 20,6C,0B,60|
00000360: 2C 42 44 2C 38 30 2C 30  42 2C 39 31 2C 46 41 2C  |,BD,80,0B,91,FA,|
00000370: 32 30 2C 36 34 2C 30 42  2C 42 44 2C 32 30 2C 30  |20,64,0B,BD,20,0|
00000380: 43 2C 39 31 00 BA 1F C8  00 83 20 46 41 2C 34 43  |C,91...... FA,4C|
00000390: 2C 35 30 2C 30 42 2C 31  38 2C 41 35 2C 46 42 2C  |,50,0B,18,A5,FB,|
000003A0: 36 39 2C 44 34 2C 38 35  2C 46 42 2C 36 30 2C 33  |69,D4,85,FB,60,3|
000003B0: 38 2C 41 35 2C 46 42 2C  45 39 00 CC 1F D2 00 83  |8,A5,FB,E9......|
000003C0: 20 44 34 2C 38 35 2C 46  42 2C 36 30 00 E8 1F DC  | D4,85,FB,60....|
000003D0: 00 3A 8F 20 38 30 20 43  4F 4C 55 4D 4E 20 4D 4C  |.:. 80 COLUMN ML|
000003E0: 20 52 4F 55 54 49 4E 45  00 1E 20 E6 00 83 20 41  | ROUTINE.. ... A|
000003F0: 30 2C 30 30 2C 42 39 2C  30 30 2C 31 30 2C 38 35  |0,00,B9,00,10,85|
00000400: 2C 46 41 2C 42 39 2C 30  30 2C 30 44 2C 39 39 2C  |,FA,B9,00,0D,99,|
00000410: 30 30 2C 31 30 2C 41 35  2C 46 41 2C 39 39 00 54  |00,10,A5,FA,99.T|
00000420: 20 F0 00 83 20 30 30 2C  30 44 2C 43 38 2C 44 30  | ... 00,0D,C8,D0|
00000430: 2C 45 44 2C 36 30 2C 41  32 2C 31 46 2C 38 45 2C  |,ED,60,A2,1F,8E,|
00000440: 30 30 2C 44 36 2C 32 43  2C 30 30 2C 44 36 2C 31  |00,D6,2C,00,D6,1|
00000450: 30 2C 46 42 00 8A 20 FA  00 83 20 38 44 2C 30 31  |0,FB.. ... 8D,01|
00000460: 2C 44 36 2C 36 30 2C 41  32 2C 31 46 2C 38 45 2C  |,D6,60,A2,1F,8E,|
00000470: 30 30 2C 44 36 2C 32 43  2C 30 30 2C 44 36 2C 31  |00,D6,2C,00,D6,1|
00000480: 30 2C 46 42 2C 41 44 2C  30 31 00 C0 20 04 01 83  |0,FB,AD,01.. ...|
00000490: 20 44 36 2C 36 30 2C 41  39 2C 30 30 2C 38 35 2C  | D6,60,A9,00,85,|
000004A0: 46 45 2C 38 35 2C 46 41  2C 41 39 2C 30 43 2C 38  |FE,85,FA,A9,0C,8|
000004B0: 35 2C 46 42 2C 41 39 2C  30 33 2C 38 35 2C 46 44  |5,FB,A9,03,85,FD|
000004C0: 00 F6 20 0E 01 83 20 41  39 2C 30 32 2C 38 35 2C  |.. ... A9,02,85,|
000004D0: 46 43 2C 32 30 2C 35 37  2C 30 42 2C 41 39 2C 38  |FC,20,57,0B,A9,8|
000004E0: 30 2C 38 35 2C 46 41 2C  41 39 2C 30 41 2C 38 35  |0,85,FA,A9,0A,85|
000004F0: 2C 46 43 2C 41 39 00 2C  21 18 01 83 20 30 33 2C  |,FC,A9.,!... 03,|
00000500: 38 35 2C 46 44 2C 41 39  2C 30 30 2C 38 35 2C 46  |85,FD,A9,00,85,F|
00000510: 45 2C 32 30 2C 39 32 2C  30 42 2C 41 30 2C 30 30  |E,20,92,0B,A0,00|
00000520: 2C 32 30 2C 38 32 2C 30  42 2C 43 38 00 62 21 22  |,20,82,0B,C8.b!"|
00000530: 01 83 20 43 30 2C 30 42  2C 44 30 2C 46 38 2C 31  |.. C0,0B,D0,F8,1|
00000540: 38 2C 41 35 2C 46 41 2C  36 39 2C 30 42 2C 38 35  |8,A5,FA,69,0B,85|
00000550: 2C 46 41 2C 31 38 2C 41  35 2C 46 44 2C 36 39 2C  |,FA,18,A5,FD,69,|
00000560: 35 30 00 98 21 2C 01 83  20 38 35 2C 46 44 2C 39  |50..!,.. 85,FD,9|
00000570: 30 2C 30 32 2C 45 36 2C  46 43 2C 32 30 2C 39 32  |0,02,E6,FC,20,92|
00000580: 2C 30 42 2C 45 36 2C 46  45 2C 41 35 2C 46 45 2C  |,0B,E6,FE,A5,FE,|
00000590: 43 39 2C 30 41 2C 44 30  00 CE 21 36 01 83 20 44  |C9,0A,D0..!6.. D|
000005A0: 39 2C 36 30 2C 41 35 2C  30 43 2C 46 30 2C 30 36  |9,60,A5,0C,F0,06|
000005B0: 2C 42 31 2C 46 41 2C 32  30 2C 31 36 2C 30 42 2C  |,B1,FA,20,16,0B,|
000005C0: 36 30 2C 32 30 2C 32 34  2C 30 42 2C 39 31 00 04  |60,20,24,0B,91..|
000005D0: 22 40 01 83 20 46 41 2C  36 30 2C 41 35 2C 46 43  |"@.. FA,60,A5,FC|
000005E0: 2C 41 32 2C 31 32 2C 32  30 2C 31 38 2C 30 42 2C  |,A2,12,20,18,0B,|
000005F0: 45 38 2C 41 35 2C 46 44  2C 32 30 2C 31 38 2C 30  |E8,A5,FD,20,18,0|
00000600: 42 2C 36 30 00 0A 22 4A  01 3A 00 21 22 54 01 9E  |B,60.."J.:.!"T..|
00000610: 20 32 38 31 36 3A 97 20  55 45 2C 30 3A 9E 20 55  | 2816:. UE,0:. U|
00000620: 44 00 38 22 5E 01 81 20  55 52 B2 31 A4 38 3A F9  |D.8"^.. UR.1.8:.|
00000630: 20 55 52 2C 22 22 3A 82  00 56 22 68 01 81 20 55  | UR,"":..V"h.. U|
00000640: 52 B2 31 A4 38 3A 87 20  55 41 24 3A F9 20 55 52  |R.1.8:. UA$:. UR|
00000650: 2C 55 41 24 3A 82 00 68  22 72 01 83 20 58 2C 2C  |,UA$:..h"r.. X,,|
00000660: 43 2C 2C 2A 2C 2C 2F 2C  00 7C 22 7C 01 8B 20 55  |C,,*,,/,.|"|.. U|
00000670: 51 B2 38 30 20 A7 20 8C  20 34 31 30 00 B2 22 86  |Q.80 . . 410..".|
00000680: 01 81 20 55 52 B2 31 20  A4 20 35 3A 87 20 55 41  |.. UR.1 . 5:. UA|
00000690: 24 3A 55 41 24 28 55 52  29 B2 55 4C 24 AA 55 41  |$:UA$(UR).UL$.UA|
000006A0: 24 AA 55 4D 24 3A 82 3A  55 41 24 28 36 29 B2 55  |$.UM$:.:UA$(6).U|
000006B0: 4F 24 00 08 23 90 01 83  20 22 9B 92 1D 1D 58 1D  |O$..#... "....X.|
000006C0: 43 1D 2A 1D 2F 1D 1D 22  2C 22 9B 92 1D 1D 37 1D  |C.*./..","....7.|
000006D0: 38 1D 39 1D 2B 1D 1D 22  2C 22 9B 92 1D 1D 34 1D  |8.9.+..","....4.|
000006E0: 35 1D 36 1D 2D 1D 1D 22  2C 22 9B 92 1D 1D 31 1D  |5.6.-..","....1.|
000006F0: 32 1D 33 1D 1D 1D 1D 22  2C 22 9B 92 1D 1D 20 30  |2.3....",".... 0|
00000700: 20 1D 2E 1D 3D 1D 1D 22  00 52 23 9A 01 83 20 22  | ...=..".R#... "|
00000710: 92 9B 1D 1D 58 1D 43 1D  2A 1D 2F 22 2C 22 92 9B  |....X.C.*./","..|
00000720: 1D 1D 37 1D 38 1D 39 1D  2B 22 2C 22 92 9B 1D 1D  |..7.8.9.+","....|
00000730: 34 1D 35 1D 36 1D 2D 22  2C 22 92 9B 1D 1D 31 1D  |4.5.6.-","....1.|
00000740: 32 1D 33 22 2C 22 92 9B  1D 1D 30 1D 30 1D 2E 1D  |2.3","....0.0...|
00000750: 3D 22 00 7C 23 9C 01 99  22 13 13 9E 20 20 20 20  |=".|#..."...    |
00000760: 20 20 20 20 20 20 20 C6  49 4E 41 4E 43 49 41 4C  |       .INANCIAL|
00000770: 20 C3 41 4C 43 55 4C 41  54 4F 52 22 00 A0 23 9D  | .ALCULATOR"..#.|
00000780: 01 99 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |.."             |
00000790: 20 42 59 20 CD 41 52 4B  20 CA 4F 52 44 41 4E 22  | BY .ARK .ORDAN"|
000007A0: 00 C6 23 9E 01 99 22 11  20 20 20 20 20 20 20 20  |..#...".        |
000007B0: 20 20 20 20 D0 52 45 53  53 20 D8 20 46 4F 52 20  |    .RESS . FOR |
000007C0: 48 45 4C 50 2E 22 00 09  24 9F 01 99 22 13 13 13  |HELP."..$..."...|
000007D0: 13 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000007E0: 11 11 11 11 11 11 11 11  9A 20 20 20 20 20 20 20  |.........       |
000007F0: 20 20 20 20 20 20 D0 52  45 53 53 20 05 D1 20 9A  |      .RESS .. .|
00000800: 54 4F 20 51 55 49 54 2E  22 00 24 24 A4 01 FE 1A  |TO QUIT.".$$....|
00000810: 20 55 54 2C 55 55 2C 55  56 2C 55 58 2C 31 3A 99  | UT,UU,UV,UX,1:.|
00000820: 55 46 24 3B 00 34 24 AE  01 8D 37 34 30 3A D7 20  |UF$;.4$...740:. |
00000830: 31 30 35 30 00 3A 24 B8  01 3A 00 47 24 C2 01 EB  |1050.:$..:.G$...|
00000840: 3A A1 F9 20 55 41 24 00  68 24 C7 01 8B 55 41 24  |:.. UA$.h$...UA$|
00000850: B2 22 51 22 B0 55 41 24  B2 22 D1 22 A7 8D 36 30  |."Q".UA$."."..60|
00000860: 30 30 30 3A 89 35 32 30  00 7D 24 C8 01 8B 55 41  |000:.520.}$...UA|
00000870: 24 B2 22 C3 22 A7 55 41  24 B2 22 43 22 00 92 24  |$.".".UA$."C"..$|
00000880: C9 01 8B 55 41 24 B2 22  D8 22 A7 55 41 24 B2 22  |...UA$.".".UA$."|
00000890: 58 22 00 C3 24 CC 01 55  48 B2 D4 28 55 44 24 2C  |X"..$..UH..(UD$,|
000008A0: 55 41 24 29 3A 55 4C B2  55 48 AB 31 31 3A 8B 20  |UA$):UL.UH.11:. |
000008B0: 55 48 B2 30 20 A7 20 FE  04 22 4F 32 43 22 3A 89  |UH.0 . .."O2C":.|
000008C0: 35 32 30 00 D5 24 D6 01  8B 20 55 48 B2 32 37 20  |520..$... UH.27 |
000008D0: A7 20 35 34 30 00 30 25  E0 01 8B 20 55 48 B1 31  |. 540.0%... UH.1|
000008E0: 31 20 A7 20 91 20 55 4C  20 8D 20 35 36 30 2C 35  |1 . . UL . 560,5|
000008F0: 36 30 2C 35 36 30 2C 35  36 30 2C 37 31 30 2C 37  |60,560,560,710,7|
00000900: 34 30 2C 35 36 30 2C 39  30 30 2C 39 31 30 2C 39  |40,560,900,910,9|
00000910: 32 30 2C 39 33 30 2C 39  35 30 2C 39 31 30 2C 39  |20,930,950,910,9|
00000920: 38 30 2C 31 30 30 30 2C  35 34 30 3A 89 35 32 30  |80,1000,540:.520|
00000930: 00 59 25 EA 01 8B 20 55  42 B2 31 20 A7 20 99 22  |.Y%... UB.1 . ."|
00000940: 13 11 1D 20 20 20 20 20  20 20 20 30 22 3A 55 49  |...        0":UI|
00000950: 24 B2 22 22 3A 55 42 B2  30 00 84 25 F4 01 55 49  |$."":UB.0..%..UI|
00000960: 24 B2 55 49 24 AA 55 41  24 3A 55 4A 24 B2 C9 28  |$.UI$.UA$:UJ$..(|
00000970: 55 50 24 AA 55 49 24 2C  39 29 3A 55 46 B2 C5 28  |UP$.UI$,9):UF..(|
00000980: 55 49 24 29 00 9C 25 FE  01 99 22 07 13 11 1D 9B  |UI$)..%...".....|
00000990: 22 55 4A 24 22 13 11 11  22 55 42 24 00 A2 25 08  |"UJ$"..."UB$..%.|
000009A0: 02 EC 00 A8 25 12 02 3A  00 C0 25 1C 02 9E 32 38  |....%..:..%...28|
000009B0: 31 36 3A 97 20 55 45 2C  31 3A 9E 20 55 44 3A 8E  |16:. UE,1:. UD:.|
000009C0: 00 C6 25 26 02 3A 00 E0  25 30 02 99 22 13 11 1D  |..%&.:..%0.."...|
000009D0: 20 20 20 20 20 20 20 20  20 22 3A 55 4A B2 55 49  |         ":UJ.UI|
000009E0: 00 F4 25 3A 02 55 46 B2  C5 28 55 49 24 29 3A 55  |..%:.UF..(UI$):U|
000009F0: 49 B2 55 4C 00 0F 26 44  02 91 20 55 4A 20 8D 20  |I.UL..&D.. UJ . |
00000A00: 36 35 30 2C 36 36 30 2C  36 37 30 2C 36 38 30 00  |650,660,670,680.|
00000A10: 35 26 4E 02 55 48 24 B2  C4 28 55 46 29 3A 8B C3  |5&N.UH$..(UF):..|
00000A20: 28 55 48 24 29 B1 39 A7  20 55 48 24 B2 C8 28 55  |(UH$).9. UH$..(U|
00000A30: 48 24 2C 39 29 00 5B 26  58 02 55 4A 24 B2 C9 28  |H$,9).[&X.UJ$..(|
00000A40: 55 50 24 AA 55 48 24 2C  39 29 3A 99 22 13 11 1D  |UP$.UH$,9):."...|
00000A50: 9B 22 55 4A 24 3A 55 4B  B2 55 46 00 7D 26 62 02  |."UJ$:UK.UF.}&b.|
00000A60: 8B 20 55 4C B2 37 20 A7  20 55 49 B2 30 3A 55 49  |. UL.7 . UI.0:UI|
00000A70: 24 B2 55 4A 24 3A 55 41  24 B2 22 20 22 00 98 26  |$.UJ$:UA$." "..&|
00000A80: 6C 02 99 22 13 11 11 1C  12 20 20 20 20 20 22 55  |l..".....     "U|
00000A90: 41 24 22 20 20 20 20 22  00 A3 26 76 02 55 42 B2  |A$"    "..&v.UB.|
00000AA0: 31 3A 8E 00 A9 26 80 02  3A 00 B8 26 8A 02 55 46  |1:...&..:..&..UF|
00000AB0: B2 55 4B AA 55 46 3A 8E  00 C7 26 94 02 55 46 B2  |.UK.UF:...&..UF.|
00000AC0: 55 4B AB 55 46 3A 8E 00  D6 26 9E 02 55 46 B2 55  |UK.UF:...&..UF.U|
00000AD0: 4B AC 55 46 3A 8E 00 E7  26 A8 02 8B 55 46 B2 30  |K.UF:...&...UF.0|
00000AE0: 20 A7 20 55 46 B2 31 00  F8 26 B2 02 3A 20 55 46  | . UF.1..&..: UF|
00000AF0: B2 55 4B AD 55 46 3A 8E  00 FE 26 BC 02 3A 00 2D  |.UK.UF:...&..:.-|
00000B00: 27 C6 02 99 22 13 11 9B  1D 20 20 20 20 20 20 20  |'..."....       |
00000B10: 20 30 22 3A 55 4A 24 B2  22 22 3A 55 49 24 B2 22  | 0":UJ$."":UI$."|
00000B20: 22 3A 55 46 B2 30 3A 55  4B B2 30 3A 8E 00 33 27  |":UF.0:UK.0:..3'|
00000B30: D0 02 3A 00 48 27 DA 02  8F 20 2D 2D 20 48 45 4C  |..:.H'... -- HEL|
00000B40: 50 20 57 49 4E 44 4F 57  00 5D 27 E4 02 FE 1A 20  |P WINDOW.]'.... |
00000B50: 55 54 2C 55 55 2C 55 56  2C 55 58 2C 31 00 7C 27  |UT,UU,UV,UX,1.|'|
00000B60: EE 02 99 22 12 1C 22 55  50 24 22 20 92 20 20 20  |...".."UP$" .   |
00000B70: 20 20 20 20 20 20 12 20  22 55 50 24 00 96 27 F8  |      . "UP$..'.|
00000B80: 02 55 59 B2 28 55 59 AA  31 29 AF 31 3A 91 20 55  |.UY.(UY.1).1:. U|
00000B90: 59 20 89 38 37 30 00 B0  27 02 03 99 22 12 22 55  |Y .870..'..."."U|
00000BA0: 4E 24 22 20 42 3D 42 41  4C 41 4E 43 45 20 22 3B  |N$" B=BALANCE ";|
00000BB0: 00 C4 27 0C 03 99 22 20  50 3D 50 41 59 4D 45 4E  |..'..." P=PAYMEN|
00000BC0: 54 20 22 3B 00 D8 27 16  03 99 22 20 4E 3D 20 23  |T ";..'..." N= #|
00000BD0: 20 50 4D 54 53 20 22 3B  00 EC 27 20 03 99 22 20  | PMTS ";..' .." |
00000BE0: 49 3D 49 4E 54 45 52 45  53 54 22 3B 00 00 28 2A  |I=INTEREST";..(*|
00000BF0: 03 99 22 28 45 58 20 31  32 3D 31 32 25 29 22 3B  |.."(EX 12=12%)";|
00000C00: 00 17 28 34 03 99 55 4E  24 22 D3 48 49 46 54 20  |..(4..UN$".HIFT |
00000C10: C2 2C CE 2C D0 22 3B 00  34 28 3E 03 8B 55 51 B2  |.,.,.";.4(>..UQ.|
00000C20: 34 30 20 A7 20 99 22 43  41 4C 43 55 4C 41 54 45  |40 . ."CALCULATE|
00000C30: 53 20 22 3B 00 4B 28 48  03 99 55 4E 24 22 9B C5  |S ";.K(H..UN$"..|
00000C40: D3 C3 20 54 4F 20 45 58  49 54 22 00 54 28 52 03  |.. TO EXIT".T(R.|
00000C50: 89 38 38 30 00 5A 28 5C  03 3A 00 7B 28 66 03 99  |.880.Z(\.:.{(f..|
00000C60: 20 55 4C 24 3A 81 20 55  52 B2 31 20 A4 20 36 3A  | UL$:. UR.1 . 6:|
00000C70: 99 20 55 41 24 28 55 52  29 3A 82 00 8C 28 70 03  |. UA$(UR):...(p.|
00000C80: 99 22 13 9B 11 1D 22 55  4A 24 3A 8E 00 92 28 7A  |."...."UJ$:...(z|
00000C90: 03 3A 00 A1 28 84 03 55  4D B2 55 46 3A 89 39 36  |.:..(..UM.UF:.96|
00000CA0: 30 00 B7 28 8E 03 55 43  B2 55 46 AC 2E 30 31 AD  |0..(..UC.UF..01.|
00000CB0: 31 32 3A 89 39 37 30 00  C6 28 98 03 55 47 B2 55  |12:.970..(..UG.U|
00000CC0: 46 3A 89 39 39 30 00 D6  28 A2 03 55 4E B2 55 46  |F:.990..(..UN.UF|
00000CD0: 3A 89 31 30 31 30 00 DC  28 AC 03 3A 00 02 29 B6  |:.1010..(..:..).|
00000CE0: 03 55 4D B2 55 4E AC 28  28 31 AB 28 28 31 AA 55  |.UM.UN.((1.((1.U|
00000CF0: 43 29 AE AB 55 47 29 29  AD 55 43 29 3A 55 46 B2  |C)..UG)).UC):UF.|
00000D00: 55 4D 00 1D 29 C0 03 55  4B 24 B2 22 20 20 C2 41  |UM..)..UK$."  .A|
00000D10: 4C 41 4E 43 45 20 22 3A  89 31 30 32 30 00 38 29  |LANCE ":.1020.8)|
00000D20: CA 03 55 4B 24 B2 22 20  C9 4E 54 45 52 45 53 54  |..UK$." .NTEREST|
00000D30: 20 22 3A 89 31 30 32 30  00 61 29 D4 03 55 47 B2  | ":.1020.a)..UG.|
00000D40: 28 BC 28 55 4E 29 AB BC  28 55 4E AB 55 4D AC 55  |(.(UN)..(UN.UM.U|
00000D50: 43 29 29 AD BC 28 31 AA  55 43 29 3A 55 46 B2 55  |C))..(1.UC):UF.U|
00000D60: 47 00 7C 29 DE 03 55 4B  24 B2 22 20 23 20 4F 46  |G.|)..UK$." # OF|
00000D70: 20 50 4D 54 53 22 3A 89  31 30 32 30 00 A2 29 E8  | PMTS":.1020..).|
00000D80: 03 55 4E B2 55 4D AD 28  28 31 AB 28 28 31 AA 55  |.UN.UM.((1.((1.U|
00000D90: 43 29 AE AB 55 47 29 29  AD 55 43 29 3A 55 46 B2  |C)..UG)).UC):UF.|
00000DA0: 55 4E 00 B7 29 F2 03 55  4B 24 B2 22 20 20 D0 41  |UN..)..UK$."  .A|
00000DB0: 59 4D 45 4E 54 20 22 00  EF 29 FC 03 55 49 24 B2  |YMENT "..)..UI$.|
00000DC0: C8 28 C4 28 55 46 29 2C  39 29 3A 55 41 B2 D4 28  |.(.(UF),9):UA..(|
00000DD0: 55 49 24 2C 22 2E 22 29  3A 8B 55 41 B1 30 A7 20  |UI$,"."):.UA.0. |
00000DE0: 55 49 24 B2 C8 28 55 49  24 2C 55 41 AA 32 29 00  |UI$..(UI$,UA.2).|
00000DF0: 04 2A 06 04 55 4A 24 B2  C9 28 55 50 24 AA 55 49  |.*..UJ$..(UP$.UI|
00000E00: 24 2C 39 29 00 25 2A 10  04 99 22 07 13 9B 11 1D  |$,9).%*...".....|
00000E10: 22 55 4A 24 22 13 11 11  1C 12 22 55 4B 24 3A 55  |"UJ$"....."UK$:U|
00000E20: 42 B2 31 3A 8E 00 38 2A  1A 04 99 C7 28 32 37 29  |B.1:..8*....(27)|
00000E30: 22 4C 13 13 93 22 3A 80  00 3E 2A 24 04 3A 00 5D  |"L...":..>*$.:.]|
00000E40: 2A 2E 04 8F 20 59 4F 55  52 20 50 52 4F 47 52 41  |*... YOUR PROGRA|
00000E50: 4D 20 53 54 41 52 54 53  20 48 45 52 45 00 66 2A  |M STARTS HERE.f*|
00000E60: 38 04 8D 20 32 30 00 6C  2A 40 04 3A 00 72 2A 41  |8.. 20.l*@.:.r*A|
00000E70: 04 3A 00 B6 2A 42 04 8F  20 20 20 44 45 4C 45 54  |.:..*B..   DELET|
00000E80: 45 20 34 31 35 3A 44 45  4C 45 54 45 20 34 35 35  |E 415:DELETE 455|
00000E90: 3A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |:               |
00000EA0: 20 20 20 44 45 4C 45 54  45 20 31 30 38 38 20 2D  |   DELETE 1088 -|
00000EB0: 20 36 30 32 35 30 00 BC  2A 43 04 3A 00 59 2B 44  | 60250..*C.:.Y+D|
00000EC0: 04 8F 20 20 22 C4 45 4C  45 54 45 20 54 48 45 20  |..  ".ELETE THE |
00000ED0: 4C 49 4E 45 53 20 41 53  20 53 48 4F 57 4E 20 49  |LINES AS SHOWN I|
00000EE0: 4E 20 20 20 20 20 20 20  20 20 20 20 20 54 48 45  |N            THE|
00000EF0: 20 D2 C5 CD 20 41 42 4F  56 45 20 42 45 46 4F 52  | ... ABOVE BEFOR|
00000F00: 45 20 41 44 44 49 4E 47  20 20 20 20 20 20 20 20  |E ADDING        |
00000F10: 20 20 20 20 20 54 48 45  20 C3 C1 CC C3 20 52 4F  |     THE .... RO|
00000F20: 55 54 49 4E 45 53 20 54  4F 20 59 4F 55 52 20 20  |UTINES TO YOUR  |
00000F30: 20 20 20 20 20 20 20 20  20 20 20 20 20 50 52 4F  |             PRO|
00000F40: 47 52 41 4D 2E 20 20 20  20 20 20 20 20 20 20 2D  |GRAM.          -|
00000F50: 20 CD 49 4B 45 20 CD 2E  22 00 5F 2B 45 04 3A 00  | .IKE .."._+E.:.|
00000F60: 65 2B 46 04 3A 00 7B 2B  D0 07 8D 36 30 30 30 30  |e+F.:.{+...60000|
00000F70: 3A 55 59 B2 30 3A 89 31  30 38 30 00 C9 2B 60 EA  |:UY.0:.1080..+`.|
00000F80: 99 22 13 13 13 13 11 11  11 11 11 11 11 11 11 11  |."..............|
00000F90: 11 11 11 11 11 11 11 11  11 11 11 11 11 20 20 9A  |.............  .|
00000FA0: C1 52 45 20 59 4F 55 20  53 55 52 45 20 59 4F 55  |.RE YOU SURE YOU|
00000FB0: 20 57 41 4E 54 20 54 4F  20 51 55 49 54 3F 20 28  | WANT TO QUIT? (|
00000FC0: 05 D9 9A 2F 05 CE 9A 29  22 00 E9 2B 6A EA 41 B2  |.../...)"..+j.A.|
00000FD0: C2 28 32 31 32 29 3A 8B  41 B3 B1 32 35 AF 41 B3  |.(212):.A..25.A.|
00000FE0: B1 33 39 A7 36 30 30 31  30 00 F1 2B 6F EA A1 41  |.39.60010..+o..A|
00000FF0: 24 00 5A 2C 74 EA 8B 41  B2 33 39 A7 99 22 13 13  |$.Z,t..A.39.."..|
00001000: 13 13 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00001010: 11 11 11 11 11 11 11 11  11 20 20 20 20 20 20 20  |.........       |
00001020: 20 20 20 20 20 20 9A D0  52 45 53 53 20 05 D1 20  |      ..RESS .. |
00001030: 9A 54 4F 20 51 55 49 54  2E 20 20 20 20 20 20 20  |.TO QUIT.       |
00001040: 20 20 22 3A FE 1A 20 55  54 2C 55 55 2C 55 56 2C  |  ":.. UT,UU,UV,|
00001050: 55 58 3A 99 55 46 24 3B  3A 8E 00 8A 2C 7E EA 99  |UX:.UF$;:...,~..|
00001060: 22 13 13 93 22 3B 3A F5  20 22 31 32 38 20 4D 45  |"...";:. "128 ME|
00001070: 4E 55 22 20 A4 20 22 31  32 38 20 4D 45 4E 55 22  |NU" . "128 MENU"|
00001080: 3A 8B 44 53 B3 B1 36 33  A7 80 00 9B 2C 88 EA 8A  |:.DS..63....,...|
00001090: 20 22 31 32 38 20 4D 45  4E 55 22 00 D2 2C C4 EA  | "128 MENU"..,..|
000010A0: 99 22 13 13 93 90 0B 0E  B0 C0 C0 C0 C0 C0 C0 C0  |."..............|
000010B0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
000010C0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 AE  |................|
000010D0: 22 3B 00 ED 2C CE EA 81  41 B2 31 A4 32 33 3A 99  |";..,...A.1.23:.|
000010E0: 22 DD 22 A6 33 38 29 22  DD 22 3B 3A 82 00 22 2D  |".".38)".";:.."-|
000010F0: D8 EA 99 22 AD C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |..."............|
00001100: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00001110: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 BD 9D 94 C0 13 13  |................|
00001120: 22 3B 00 4B 2D E2 EA 99  22 13 11 11 1D 95 20 20  |";.K-...".....  |
00001130: 20 20 20 20 20 20 20 20  CC CF C1 C4 D3 D4 C1 D2  |        ........|
00001140: 20 D0 52 45 53 45 4E 54  53 3A 22 00 5A 2D EC EA  | .RESENTS:".Z-..|
00001150: 99 22 11 11 11 11 11 11  22 3B 00 84 2D F6 EA 99  |."......";..-...|
00001160: 22 1D 20 20 20 20 20 20  20 20 05 12 20 20 20 20  |".        ..    |
00001170: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001180: 20 20 92 22 00 B0 2D 00  EB 99 22 1D 20 20 20 20  |  ."..-...".    |
00001190: 20 20 20 20 05 12 20 C6  49 4E 41 4E 43 49 41 4C  |    .. .INANCIAL|
000011A0: 20 C3 41 4C 43 55 4C 41  54 4F 52 20 9A 20 92 22  | .ALCULATOR . ."|
000011B0: 00 DC 2D 0A EB 99 22 1D  20 20 20 20 20 20 20 20  |..-...".        |
000011C0: 05 12 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |..              |
000011D0: 20 20 20 20 20 20 20 20  9A 20 92 22 00 08 2E 14  |        . ."....|
000011E0: EB 99 22 1D 20 20 20 20  20 20 20 20 05 12 20 20  |..".        ..  |
000011F0: 20 20 42 59 20 CD 41 52  4B 20 CA 4F 52 44 41 4E  |  BY .ARK .ORDAN|
00001200: 20 20 20 20 9A 20 92 22  00 34 2E 1E EB 99 22 1D  |    . .".4....".|
00001210: 20 20 20 20 20 20 20 20  05 12 20 20 20 20 20 20  |        ..      |
00001220: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001230: 9A 20 92 22 00 60 2E 28  EB 99 22 1D 20 20 20 20  |. .".`.(..".    |
00001240: 20 20 20 20 05 12 20 20  20 28 C3 29 4F 50 59 52  |    ..   (.)OPYR|
00001250: 49 47 48 54 20 31 39 38  37 20 20 20 9A 20 92 22  |IGHT 1987   . ."|
00001260: 00 8C 2E 32 EB 99 22 1D  20 20 20 20 20 20 20 20  |...2..".        |
00001270: 05 12 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |..              |
00001280: 20 20 20 20 20 20 20 20  9A 20 92 22 00 B6 2E 3C  |        . ."...<|
00001290: EB 99 22 1D 20 20 20 20  20 20 20 20 20 12 20 20  |..".         .  |
000012A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000012B0: 20 20 20 20 92 22 00 EC  2E 46 EB 99 22 11 11 11  |    ."...F.."...|
000012C0: 11 11 1D 20 20 20 20 20  20 20 20 95 D0 52 45 53  |...        ..RES|
000012D0: 53 20 D3 D0 C1 C3 C5 20  54 4F 20 43 4F 4E 54 49  |S ..... TO CONTI|
000012E0: 4E 55 45 2E 22 3A 97 32  30 38 2C 2E 00 03 2F 50  |NUE.":.208,.../P|
000012F0: EB A1 41 24 3A 8B 41 24  B3 B1 22 20 22 A7 36 30  |..A$:.A$.." ".60|
00001300: 32 34 30 00 09 2F 5A EB  8E 00 00 00              |240../Z.....    |
..#.... 0,4:. 4,7:.60100:.".":. 0,1.....
. 1080.X...UQ.N.(2):UP.M(5):UO.M(0):.0,1
:.G(14);.Y....50:.5,UP:.0,UO:.".."UE$"L"
;...(.W:....2.UE$.G(27):UF$.UE$."M":UG$.
UE$."J".Z.<.UD$."1234567890.+-*/CX".G(13
)."BINPBINP".G(27)...F.UP$."           "
:UB$."..          ":UL$."..".UP$.UG$.#.P
.UC$(0).UP$.X.Z.. UQ.40 . . 140:US.2931:
UD.2838:UT.15:UU.6:UV.25:UX.19:UM$.UL$:U
N$.UP$:UE.253:.&.R.D.. UQ.80 . . 230:US.
2975:UD.2866:UT.35:UU.6:UV.45:UX.15:UM$.
"":UN$."":UO$.UL$:UE.12:.%...N.. B(2816)
.160 . . 370:.340.$.X.. UR.2816 . US:. U
A$:UA.Q(UA$):. UR,UA:.:. 370.@...:. 40 C
OLUMN ML ROUTINE.V.... A0,00,B9,00,10,85
,FA,B9,00,0D,99,00,10,A5,FA,99...... 00,
0D,C8,D0,ED,60,A9,00,A8,AA,85,FC,A9,FF,8
5,FA... .. A9,04,85,FB,20,3F,0B,E8,C8,C0
,0B,D0,F7,A0,00,18...... A5,FA,69,28,85,
FA,90,02,E6,FB,E0,9A,D0,E6,60,A5.N.... F
D,D0,11,B1,FA,9D,80,0B,20,64,0B,B1,FA,9D
,20,0C...... 20,6C,0B,60,BD,80,0B,91,FA,
20,64,0B,BD,20,0C,91...H.. FA,4C,50,0B,1
8,A5,FB,69,D4,85,FB,60,38,A5,FB,E9.L.R..
 D4,85,FB,60.....:. 80 COLUMN ML ROUTINE
.. ... A0,00,B9,00,10,85,FA,B9,00,0D,99,
00,10,A5,FA,99.T ... 00,0D,C8,D0,ED,60,A
2,1F,8E,00,D6,2C,00,D6,10,FB.. ... 8D,01
,D6,60,A2,1F,8E,00,D6,2C,00,D6,10,FB,AD,
01.. ... D6,60,A9,00,85,FE,85,FA,A9,0C,8
5,FB,A9,03,85,FD.. ... A9,02,85,FC,20,57
,0B,A9,80,85,FA,A9,0A,85,FC,A9.,!... 03,
85,FD,A9,00,85,FE,20,92,0B,A0,00,20,82,0
B,C8.B!".. C0,0B,D0,F8,18,A5,FA,69,0B,85
,FA,18,A5,FD,69,50..!,.. 85,FD,90,02,E6,
FC,20,92,0B,E6,FE,A5,FE,C9,0A,D0.N!6.. D
9,60,A5,0C,F0,06,B1,FA,20,16,0B,60,20,24
,0B,91.."@.. FA,60,A5,FC,A2,12,20,18,0B,
E8,A5,FD,20,18,0B,60.."J.:.!"T.. 2816:. 
UE,0:. UD.8"^.. UR.1.8:. UR,"":..V"H.. U
R.1.8:. UA$:. UR,UA$:..H"R.. X,,C,,*,,/,
.|"|.. UQ.80 . . 410.."... UR.1 . 5:. UA
$:UA$(UR).UL$.UA$.UM$:.:UA$(6).UO$..#...
 "....X.C.*./..","....7.8.9.+..","....4.
5.6.-..","....1.2.3....",".... 0 ...=.."
.R#... "....X.C.*./","....7.8.9.+","....
4.5.6.-","....1.2.3","....0.0...=".|#...
"...           FINANCIAL CALCULATOR". #.
.."              BY MARK JORDAN".F#...".
            PRESS X FOR HELP."..$..."...
.........................             PR
ESS .Q .TO QUIT.".$$.... UT,UU,UV,UX,1:.
UF$;.4$...740:W 1050.:$..:.G$B..:.. UA$.
H$G..UA$."Q".UA$."Q"..60000:.520.}$H..UA
$."C".UA$."C"..$I..UA$."X".UA$."X".C$L.U
H.T(UD$,UA$):UL.UH.11:. UH.0 . .."O2C":.
520.U$V.. UH.27 . 540.0%... UH.11 . . UL
 . 560,560,560,560,710,740,560,900,910,9
20,930,950,910,980,1000,540:.520.Y%... U
B.1 . ."...        0":UI$."":UB.0..%..UI
$.UI$.UA$:UJ$.I(UP$.UI$,9):UF.E(UI$)..%.
.."....."UJ$"..."UB$..%.....%..:..%...28
16:. UE,1:. UD:..F%&.:..%0.."...        
 ":UJ.UI..%:.UF.E(UI$):UI.UL..&D.. UJ . 
650,660,670,680.5&N.UH$.D(UF):.C(UH$).9.
 UH$.H(UH$,9).[&X.UJ$.I(UP$.UH$,9):."...
."UJ$:UK.UF.}&B.. UL.7 . UI.0:UI$.UJ$:UA
$." "..&L..".....     "UA$"    "..&V.UB.
1:...&..:..&..UF.UK.UF:..G&..UF.UK.UF:..
V&..UF.UK.UF:...&...UF.0 . UF.1..&..: UF
.UK.UF:...&..:.-'F.."....        0":UJ$.
"":UI$."":UF.0:UK.0:..3'P.:.H'Z.. -- HEL
P WINDOW.]'.... UT,UU,UV,UX,1.|'...".."U
P$" .         . "UP$..'..UY.(UY.1).1:. U
Y .870..'..."."UN$" B=BALANCE ";.D'..." 
P=PAYMENT ";.X'..." N= # PMTS ";..' .." 
I=INTEREST";..(*.."(EX 12=12%)";..(4..UN
$"SHIFT B,N,P";.4(>..UQ.40 . ."CALCULATE
S ";.K(H..UN$".ESC TO EXIT".T(R..880.Z(\
.:.{(F.. UL$:. UR.1 . 6:. UA$(UR):...(P.
."...."UJ$:...(Z.:..(..UM.UF:.960..(..UC
.UF..01.12:.970.F(..UG.UF:.990.V(..UN.UF
:.1010..(..:..)..UM.UN.((1.((1.UC)..UG))
.UC):UF.UM..)..UK$."  BALANCE ":.1020.8)
J.UK$." INTEREST ":.1020.A)T.UG.(.(UN)..
(UN.UM.UC))..(1.UC):UF.UG.|)..UK$." # OF
 PMTS":.1020..)..UN.UM.((1.((1.UC)..UG))
.UC):UF.UN..)..UK$."  PAYMENT "..)..UI$.
H(D(UF),9):UA.T(UI$,"."):.UA.0. UI$.H(UI
$,UA.2)..*..UJ$.I(UP$.UI$,9).%*...".....
"UJ$"....."UK$:UB.1:..8*...G(27)"L...":.
.>*$.:.]*... YOUR PROGRAM STARTS HERE.F*
8.. 20.L*@.:.R*A.:..*B..   DELETE 415:DE
LETE 455:                  DELETE 1088 -
 60250..*C.:.Y+D..  "DELETE THE LINES AS
 SHOWN IN            THE REM ABOVE BEFOR
E ADDING             THE CALC ROUTINES T
O YOUR               PROGRAM.          -
 MIKE M."._+E.:.E+F.:.{+P..60000:UY.0:.1
080.I+`.."...........................  .
ARE YOU SURE YOU WANT TO QUIT? (.Y./.N.)
"..+J.A.B(212):.A..25.A..39.60010..+O..A
$.Z,T..A.39.."..........................
.             .PRESS .Q .TO QUIT.       
  ":.. UT,UU,UV,UX:.UF$;:...,~.."...";:.
 "128 MENU" . "128 MENU":.DS..63....,...
 "128 MENU".R,D.."......................
........................";..,N..A.1.23:.
".".38)".";:.."-X.."....................
........................";.K-...".....  
        LOADSTAR PRESENTS:".Z-..."......
";..-...".        ..                    
  ."..-...".        .. FINANCIAL CALCULA
TOR . ."..-...".        ..              
        . ."......".        ..    BY MAR
K JORDAN    . .".4....".        ..      
                . .".`.(..".        ..  
 (C)OPYRIGHT 1987   . ."...2..".        
..                      . ."...<..".    
     .                      ."...F.."...
...        .PRESS SPACE TO CONTINUE.":.2
08,.../P..A$:.A$.." ".60240../Z.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL