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

LOAN CALC

FILE INFORMATION

FILENAME(S): LOAN CALC

FILE TYPE(S): PRG

FILE SIZE: 6.4K

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

APPEARS ON: 1 disk(s)

FILE HASH

6e0c4c538a31d1fd762915e54927fff07c35fb4d19d1043c7f821d58228a1981

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOADSTAR 28 S 2 LOAN CALC PRG Sailor, Ganheden 25 9 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 16 08 01 00 8D 36  30 31 30 30 3A 9C 3A 86  |.......60100:.:.|
00000010: 47 24 28 37 35 29 00 43  08 05 00 96 20 A5 52 28  |G$(75).C.... .R(|
00000020: 58 29 B2 B5 28 31 30 30  AC 58 AA 2E 35 29 AD 31  |X)..(100.X..5).1|
00000030: 30 30 3A 42 4B 24 B2 22  A4 22 3A 99 C7 28 31 34  |00:BK$.".":..(14|
00000040: 32 29 3B 00 4C 08 07 00  8D 36 30 30 00 74 08 0A  |2);.L....600.t..|
00000050: 00 99 22 93 81 11 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |..".............|
00000060: 1D 12 20 4C 4F 41 4E 20  43 41 4C 43 55 4C 41 54  |.. LOAN CALCULAT|
00000070: 4F 52 20 22 00 B4 08 14  00 99 22 11 11 11 1F 4E  |OR "......"....N|
00000080: 4F 2E 20 4F 46 20 4D 4F  4E 54 48 53 3A 20 20 20  |O. OF MONTHS:   |
00000090: 20 9D 9D 9D 9D 22 3B 42  4B 24 3B 3A 4D 4F B2 32  | ....";BK$;:MO.2|
000000A0: 3A 4E 43 B2 34 3A 8D 36  30 35 30 30 3A 4E B2 C5  |:NC.4:.60500:N..|
000000B0: 28 41 24 29 00 CF 08 1E  00 8B C5 28 41 24 29 B2  |(A$).......(A$).|
000000C0: 2E A7 99 22 91 91 91 91  91 22 3B 3A 89 32 30 00  |...".....";:.20.|
000000D0: 13 09 3C 00 99 22 11 49  4E 54 45 52 45 53 54 20  |..<..".INTEREST |
000000E0: 52 41 54 45 20 25 3A 20  20 20 20 20 9D 9D 9D 9D  |RATE %:     ....|
000000F0: 9D 22 3B 42 4B 24 3B 3A  4D 4F B2 31 33 30 3A 4E  |.";BK$;:MO.130:N|
00000100: 43 B2 35 3A 8D 36 30 35  30 30 3A 41 52 B2 C5 28  |C.5:.60500:AR..(|
00000110: 41 24 29 00 2C 09 46 00  8B C5 28 41 24 29 B2 2E  |A$).,.F...(A$)..|
00000120: A7 99 22 91 91 91 22 3B  3A 89 36 30 00 3B 09 50  |.."...";:.60.;.P|
00000130: 00 4D 52 B2 41 52 AD 31  32 30 30 00 7E 09 5A 00  |.MR.AR.1200.~.Z.|
00000140: 99 22 11 50 52 49 4E 43  49 50 41 4C 3A 20 20 20  |.".PRINCIPAL:   |
00000150: 20 20 20 20 20 20 20 20  20 20 20 20 9D 9D 9D 9D  |            ....|
00000160: 9D 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 22 3B 42 4B 24  |...........";BK$|
00000170: 3B 3A 4E 43 B2 31 35 3A  8D 36 30 35 30 30 00 9F  |;:NC.15:.60500..|
00000180: 09 5F 00 50 B2 C5 28 41  24 29 3A 8B C5 28 41 24  |._.P..(A$):..(A$|
00000190: 29 B2 2E A7 99 22 91 91  91 22 3B 3A 89 39 30 00  |)...."...";:.90.|
000001A0: DF 09 60 00 99 22 11 4D  4F 4E 54 48 20 4F 46 20  |..`..".MONTH OF |
000001B0: 46 49 52 53 54 20 50 4D  54 20 28 31 20 54 4F 20  |FIRST PMT (1 TO |
000001C0: 31 32 29 3A 20 20 9D 9D  22 3B 42 4B 24 3B 3A 4D  |12):  ..";BK$;:M|
000001D0: 4F B2 32 3A 4E 43 B2 32  3A 8D 36 30 35 30 30 00  |O.2:NC.2:.60500.|
000001E0: 09 0A 61 00 4D 4F B2 C5  28 41 24 29 3A 8B C5 28  |..a.MO..(A$):..(|
000001F0: 41 24 29 B3 31 B0 C5 28  41 24 29 B1 31 32 A7 99  |A$).1..(A$).12..|
00000200: 22 91 91 22 3B 3A 89 39  36 00 4D 0A 62 00 99 22  |"..";:.96.M.b.."|
00000210: 11 59 45 41 52 20 4F 46  20 31 53 54 20 50 41 59  |.YEAR OF 1ST PAY|
00000220: 4D 45 4E 54 3A 20 20 20  20 9D 9D 9D 9D 22 3B 42  |MENT:    ....";B|
00000230: 4B 24 3B 3A 4D 4F B2 32  3A 4E 43 B2 34 3A 8D 36  |K$;:MO.2:NC.4:.6|
00000240: 30 35 30 30 3A 59 52 B2  C5 28 41 24 29 00 66 0A  |0500:YR..(A$).f.|
00000250: 63 00 8B C5 28 41 24 29  B2 2E A7 99 22 91 91 91  |c...(A$)...."...|
00000260: 22 3B 3A 89 39 38 00 85  0A 64 00 50 4D 54 B2 28  |";:.98...d.PMT.(|
00000270: 50 AC 4D 52 29 AD 28 31  AB 28 31 AA 4D 52 29 AE  |P.MR).(1.(1.MR).|
00000280: 28 AB 4E 29 29 00 95 0A  69 00 50 4D 54 B2 A5 52  |(.N))...i.PMT..R|
00000290: 28 50 4D 54 29 00 AF 0A  6E 00 99 22 11 11 50 41  |(PMT)...n.."..PA|
000002A0: 59 4D 45 4E 54 3D 22 2C  A5 52 28 50 4D 54 29 00  |YMENT=",.R(PMT).|
000002B0: CD 0A 6F 00 99 22 11 50  52 45 53 53 20 52 45 54  |..o..".PRESS RET|
000002C0: 55 52 4E 20 4B 45 59 20  4F 4E 43 45 22 00 F3 0A  |URN KEY ONCE"...|
000002D0: 70 00 99 22 54 4F 20 43  4F 4E 54 49 4E 55 45 20  |p.."TO CONTINUE |
000002E0: 41 4E 44 20 41 47 41 49  4E 20 54 4F 20 50 41 55  |AND AGAIN TO PAU|
000002F0: 53 45 22 00 0F 0B 71 00  A1 41 24 3A 8B 20 41 24  |SE"...q..A$:. A$|
00000300: B2 22 22 20 20 20 20 20  20 20 20 A7 31 31 33 00  |.""        .113.|
00000310: 41 0B 73 00 99 22 93 12  50 4D 54 20 23 20 20 20  |A.s.."..PMT #   |
00000320: 49 4E 54 20 41 4D 54 20  20 20 20 50 52 49 4E 20  |INT AMT    PRIN |
00000330: 41 4D 54 20 20 20 20 20  42 41 4C 20 44 55 45 20  |AMT     BAL DUE |
00000340: 22 00 5E 0B 78 00 54 41  B2 30 3A 54 42 B2 30 3A  |".^.x.TA.0:TB.0:|
00000350: 4B B2 30 3A 4E 50 B2 50  3A 4E 59 B2 59 52 00 6A  |K.0:NP.P:NY.YR.j|
00000360: 0B 7D 00 81 20 49 B2 31  A4 4E 00 7D 0B 84 00 A1  |.}.. I.1.N.}....|
00000370: 41 24 3A 8B 41 24 B2 22  22 A7 31 34 30 00 91 0B  |A$:.A$."".140...|
00000380: 86 00 A1 41 24 3A 8B 41  24 B3 B1 22 22 A7 31 33  |...A$:.A$.."".13|
00000390: 34 00 A4 0B 88 00 A1 41  24 3A 8B 41 24 B2 22 22  |4......A$:.A$.""|
000003A0: A7 31 33 36 00 B1 0B 8C  00 49 50 B2 4E 50 AC 4D  |.136.....IP.NP.M|
000003B0: 52 00 C3 0B 91 00 50 50  B2 50 4D 54 AB A5 52 28  |R.....PP.PMT..R(|
000003C0: 49 50 29 00 D0 0B 96 00  4E 50 B2 4E 50 AB 50 50  |IP).....NP.NP.PP|
000003D0: 00 DD 0B 9B 00 41 49 B2  41 49 AA 49 50 00 F7 0B  |.....AI.AI.IP...|
000003E0: A0 00 8B 49 B2 4E A7 50  50 B2 50 50 AA 4E 50 3A  |...I.N.PP.PP.NP:|
000003F0: 4E 50 B2 30 2E 30 30 00  04 0C A2 00 43 50 B2 43  |NP.0.00.....CP.C|
00000400: 50 AA 50 50 00 2F 0C A5  00 99 20 49 3B A3 38 29  |P.PP./.... I;.8)|
00000410: 3B A5 52 28 49 50 29 3B  A3 31 38 29 3B A5 52 28  |;.R(IP);.18);.R(|
00000420: 50 50 29 3B A3 32 39 29  3B A5 52 28 4E 50 29 00  |PP);.29);.R(NP).|
00000430: 54 0C A7 00 8B 49 B2 4E  A7 99 22 46 49 4E 41 4C  |T....I.N.."FINAL|
00000440: 20 50 41 59 4D 45 4E 54  3D 22 3B A5 52 28 50 50  | PAYMENT=";.R(PP|
00000450: AA 49 50 29 00 7B 0C AA  00 54 41 B2 54 41 AA A5  |.IP).{...TA.TA..|
00000460: 52 28 49 50 29 3A 8F 20  41 43 43 55 4D 55 4C 41  |R(IP):. ACCUMULA|
00000470: 54 45 53 20 49 4E 54 2E  50 44 2E 00 A4 0C AF 00  |TES INT.PD......|
00000480: 54 42 B2 54 42 AA A5 52  28 50 50 29 3A 8F 20 41  |TB.TB..R(PP):. A|
00000490: 43 43 55 4D 55 4C 41 54  45 53 20 50 52 49 4E 2E  |CCUMULATES PRIN.|
000004A0: 20 50 44 2E 00 B1 0C B1  00 8B 49 B2 4E A7 32 31  | PD.......I.N.21|
000004B0: 35 00 C8 0C B4 00 8B 49  B2 31 33 AB 4D 4F A7 8D  |5......I.13.MO..|
000004C0: 38 30 30 3A 89 32 31 30  00 DD 0C B9 00 4B B2 4B  |800:.210.....K.K|
000004D0: AA 31 3A 8B 4B B2 31 32  A7 8D 38 30 30 00 E4 0C  |.1:.K.12..800...|
000004E0: D2 00 82 49 00 ED 0C D7  00 8D 38 30 30 00 1C 0D  |...I......800...|
000004F0: DC 00 99 22 93 11 1D 12  20 46 31 20 92 20 54 4F  |...".... F1 . TO|
00000500: 20 53 45 45 20 41 47 41  49 4E 20 20 20 12 20 46  | SEE AGAIN   . F|
00000510: 35 20 92 20 54 4F 20 51  55 49 54 22 00 50 0D E6  |5 . TO QUIT".P..|
00000520: 00 99 22 11 1D 12 20 46  33 20 92 20 54 4F 20 44  |.."... F3 . TO D|
00000530: 4F 20 41 4E 4F 54 48 45  52 20 20 12 20 46 37 20  |O ANOTHER  . F7 |
00000540: 92 20 20 50 52 49 4E 54  45 44 20 43 4F 50 59 22  |.  PRINTED COPY"|
00000550: 00 63 0D EB 00 A1 42 24  3A 8B 42 24 B2 22 22 A7  |.c....B$:.B$."".|
00000560: 32 33 35 00 78 0D F0 00  8B 42 24 B2 22 85 22 A7  |235.x....B$.".".|
00000570: 33 30 30 3A 8F 20 46 31  00 8E 0D FA 00 8B 42 24  |300:. F1......B$|
00000580: B2 22 86 22 A7 9C 3A 89  35 3A 8F 20 46 33 00 A0  |."."..:.5:. F3..|
00000590: 0D 04 01 8B 42 24 B2 22  87 22 A7 36 30 30 30 30  |....B$.".".60000|
000005A0: 00 B0 0D 0E 01 8B 42 24  B2 22 88 22 A7 34 30 30  |......B$.".".400|
000005B0: 00 B9 0D 18 01 89 32 33  35 00 D7 0D 2C 01 4E 50  |......235...,.NP|
000005C0: B2 50 3A 41 49 B2 30 3A  4E 59 B2 59 52 3A 43 50  |.P:AI.0:NY.YR:CP|
000005D0: B2 30 3A 89 31 31 30 00  ED 0D 90 01 8F 20 44 41  |.0:.110...... DA|
000005E0: 54 41 20 54 4F 20 50 52  49 4E 54 45 52 00 13 0E  |TA TO PRINTER...|
000005F0: 95 01 99 22 93 11 1D 1D  1D 1D 1D 1D 1D 1D 1D 81  |..."............|
00000600: 12 20 53 45 4E 44 20 54  4F 20 50 52 49 4E 54 45  |. SEND TO PRINTE|
00000610: 52 20 22 00 38 0E 9A 01  99 22 11 11 1D 1D 1F 49  |R ".8....".....I|
00000620: 53 20 50 52 49 4E 54 45  52 20 4F 4E 20 41 4E 44  |S PRINTER ON AND|
00000630: 20 52 45 41 44 59 3F 22  00 6B 0E 9F 01 99 22 11  | READY?".k....".|
00000640: 11 1D 1D 4E 41 4D 45 20  4F 46 20 54 48 49 53 20  |...NAME OF THIS |
00000650: 44 4F 43 55 4D 45 4E 54  20 28 37 35 20 43 48 41  |DOCUMENT (75 CHA|
00000660: 52 20 4C 49 4D 49 54 29  22 3A 99 00 94 0E A4 01  |R LIMIT)":......|
00000670: 99 22 3D 3E 22 3B 42 4B  24 3B 3A 4E 43 B2 37 35  |."=>";BK$;:NC.75|
00000680: 3A 4D 4F B2 31 39 30 3A  8D 36 30 35 30 30 3A 46  |:MO.190:.60500:F|
00000690: 24 B2 41 24 00 C9 0E A9  01 8B C3 28 46 24 29 B1  |$.A$.......(F$).|
000006A0: 37 35 A7 99 22 90 11 1D  1D 4E 41 4D 45 20 54 4F  |75.."....NAME TO|
000006B0: 4F 20 4C 4F 4E 47 2C 20  54 52 59 20 41 47 41 49  |O LONG, TRY AGAI|
000006C0: 4E 9C 11 22 3A 89 34 32  30 00 E4 0E AE 01 9F 31  |N..":.420......1|
000006D0: 35 2C 34 2C 31 35 3A A0  31 35 3A 8B 53 54 B2 30  |5,4,15:.15:.ST.0|
000006E0: A7 34 33 39 00 10 0F B0  01 99 22 1C 48 4F 4C 44  |.439......".HOLD|
000006F0: 20 4F 4E 2C 20 59 4F 55  52 20 50 52 49 4E 54 45  | ON, YOUR PRINTE|
00000700: 52 20 49 53 4E 27 54 20  4F 4E 4C 49 4E 45 21 22  |R ISN'T ONLINE!"|
00000710: 00 3A 0F B2 01 99 22 43  48 45 43 4B 20 54 48 45  |.:...."CHECK THE|
00000720: 20 43 41 42 4C 45 53 20  41 4E 44 20 54 52 59 20  | CABLES AND TRY |
00000730: 49 54 20 41 47 41 49 4E  2E 22 00 52 0F B3 01 99  |IT AGAIN.".R....|
00000740: 22 11 1F 50 52 45 53 53  20 5B 52 45 54 55 52 4E  |"..PRESS [RETURN|
00000750: 5D 2E 00 69 0F B4 01 A1  41 24 3A 8B 41 24 B3 B1  |]..i....A$:.A$..|
00000760: C7 28 31 33 29 A7 34 33  36 00 72 0F B5 01 89 32  |.(13).436.r....2|
00000770: 32 30 00 A2 0F B7 01 99  22 11 1D 1D 1E 48 4F 4C  |20......"....HOL|
00000780: 44 20 4F 4E 20 57 48 49  4C 45 20 49 20 54 41 4C  |D ON WHILE I TAL|
00000790: 4B 20 54 4F 20 54 48 45  20 50 52 49 4E 54 45 52  |K TO THE PRINTER|
000007A0: 2E 22 00 AB 0F B8 01 9F  31 2C 34 00 B2 0F BD 01  |."......1,4.....|
000007B0: 9D 31 00 BC 0F C2 01 98  31 2C 46 24 00 F7 0F C7  |.1......1,F$....|
000007C0: 01 98 31 2C 22 4D 4F 4E  54 48 4C 59 20 50 41 59  |..1,"MONTHLY PAY|
000007D0: 4D 45 4E 54 3A 20 22 3B  50 4D 54 3B C7 28 31 36  |MENT: ";PMT;.(16|
000007E0: 29 22 33 30 41 4D 4F 55  4E 54 20 4F 46 20 4C 4F  |)"30AMOUNT OF LO|
000007F0: 41 4E 3A 20 22 3B 50 00  3D 10 CC 01 98 31 2C 22  |AN: ";P.=....1,"|
00000800: 12 20 50 4D 54 20 23 20  20 20 20 20 49 4E 54 45  |. PMT #     INTE|
00000810: 52 45 53 54 20 50 4D 54  20 20 20 20 20 20 50 52  |REST PMT      PR|
00000820: 49 4E 43 49 50 41 4C 20  50 4D 54 20 20 20 20 20  |INCIPAL PMT     |
00000830: 20 42 41 4C 41 4E 43 45  20 44 55 45 22 00 54 10  | BALANCE DUE".T.|
00000840: CE 01 54 41 B2 30 3A 54  42 B2 30 3A 4B B2 30 3A  |..TA.0:TB.0:K.0:|
00000850: 4E 50 B2 50 00 68 10 CF  01 43 50 B2 30 3A 41 49  |NP.P.h...CP.0:AI|
00000860: B2 30 3A 4E 59 B2 59 52  00 73 10 D1 01 81 49 B2  |.0:NY.YR.s....I.|
00000870: 31 A4 4E 00 80 10 D6 01  49 50 B2 4E 50 AC 4D 52  |1.N.....IP.NP.MR|
00000880: 00 92 10 DB 01 50 50 B2  50 4D 54 AB A5 52 28 49  |.....PP.PMT..R(I|
00000890: 50 29 00 9F 10 E0 01 4E  50 B2 4E 50 AB 50 50 00  |P).....NP.NP.PP.|
000008A0: AC 10 E5 01 41 49 B2 41  49 AA 49 50 00 C3 10 EA  |....AI.AI.IP....|
000008B0: 01 8B 49 B2 4E A7 50 50  B2 50 50 AA 4E 50 3A 4E  |..I.N.PP.PP.NP:N|
000008C0: 50 B2 30 00 D0 10 EC 01  43 50 B2 43 50 AA 50 50  |P.0.....CP.CP.PP|
000008D0: 00 F5 10 EF 01 98 31 2C  49 3B C7 28 31 36 29 22  |......1,I;.(16)"|
000008E0: 31 30 22 3B A5 52 28 49  50 29 3B C7 28 31 36 29  |10";.R(IP);.(16)|
000008F0: 22 33 30 22 3B 00 14 11  F0 01 98 31 2C A5 52 28  |"30";......1,.R(|
00000900: 50 50 29 3B C7 28 31 36  29 22 35 30 22 3B A5 52  |PP);.(16)"50";.R|
00000910: 28 4E 50 29 00 3B 11 F1  01 8B 49 B2 4E A7 98 31  |(NP).;....I.N..1|
00000920: 2C 22 46 49 4E 41 4C 20  50 41 59 4D 45 4E 54 3D  |,"FINAL PAYMENT=|
00000930: 22 3B A5 52 28 50 50 AA  49 50 29 00 62 11 F4 01  |";.R(PP.IP).b...|
00000940: 54 41 B2 54 41 AA A5 52  28 49 50 29 3A 8F 20 41  |TA.TA..R(IP):. A|
00000950: 43 43 55 4D 55 4C 41 54  45 53 20 49 4E 54 20 50  |CCUMULATES INT P|
00000960: 44 2E 00 8A 11 F9 01 54  42 B2 54 42 AA A5 52 28  |D......TB.TB..R(|
00000970: 50 50 29 3A 8F 20 41 43  43 55 4D 55 4C 41 54 45  |PP):. ACCUMULATE|
00000980: 53 20 50 52 49 4E 20 50  44 2E 00 97 11 FB 01 8B  |S PRIN PD.......|
00000990: 49 B2 4E A7 35 34 30 00  AE 11 FE 01 8B 49 B2 31  |I.N.540......I.1|
000009A0: 33 AB 4D 4F A7 8D 39 30  30 3A 89 35 33 30 00 C3  |3.MO..900:.530..|
000009B0: 11 08 02 4B B2 4B AA 31  3A 8B 4B B2 31 32 A7 8D  |...K.K.1:.K.12..|
000009C0: 39 30 30 00 CA 11 12 02  82 49 00 D3 11 1C 02 8D  |900......I......|
000009D0: 39 30 30 00 E9 11 26 02  A0 31 3A 4C B2 30 3A 99  |900...&..1:L.0:.|
000009E0: 22 93 1F 22 3A 89 32 32  30 00 F5 11 58 02 8F 20  |"..":.220...X.. |
000009F0: 54 49 54 4C 45 00 0D 12  5D 02 97 35 33 32 38 31  |TITLE...]..53281|
00000A00: 2C 31 35 3A 97 35 33 32  38 30 2C 31 31 00 3A 12  |,15:.53280,11.:.|
00000A10: 62 02 99 22 93 1F 11 1D  1D 1D 1D 1D 1D D6 D6 D6  |b.."............|
00000A20: D6 D6 D6 D6 D6 D6 D6 D6  D6 D6 D6 D6 D6 D6 D6 D6  |................|
00000A30: D6 D6 D6 D6 D6 D6 D6 D6  D6 22 00 66 12 67 02 99  |.........".f.g..|
00000A40: 22 1D 1D 1D 1D 1D 1D D6  D6 D6 D6 D6 12 20 4C 4F  |"............ LO|
00000A50: 41 4E 20 20 43 41 4C 43  55 4C 41 54 4F 52 20 92  |AN  CALCULATOR .|
00000A60: D6 D6 D6 D6 D6 22 00 90  12 6C 02 99 22 1D 1D 1D  |....."...l.."...|
00000A70: 1D 1D 1D D6 D6 D6 D6 D6  D6 D6 D6 D6 D6 D6 D6 D6  |................|
00000A80: D6 D6 D6 D6 D6 D6 D6 D6  D6 D6 D6 D6 D6 D6 D6 22  |..............."|
00000A90: 00 C2 12 71 02 99 22 11  1D 1D 1D 1C 54 48 49 53  |...q..".....THIS|
00000AA0: 20 50 52 4F 47 52 41 4D  20 57 49 4C 4C 20 43 41  | PROGRAM WILL CA|
00000AB0: 4C 43 55 4C 41 54 45 20  4C 4F 41 4E 53 20 41 4E  |LCULATE LOANS AN|
00000AC0: 44 22 00 F2 12 76 02 99  22 1D 4D 4F 52 54 47 41  |D"...v..".MORTGA|
00000AD0: 47 45 53 20 41 4E 44 20  4D 41 4B 45 20 41 20 50  |GES AND MAKE A P|
00000AE0: 52 49 4E 54 4F 55 54 20  4F 4E 20 50 41 50 45 52  |RINTOUT ON PAPER|
00000AF0: 2E 22 00 21 13 7B 02 99  22 1D 54 48 45 20 50 52  |.".!.{..".THE PR|
00000B00: 49 4E 54 45 52 20 50 52  4F 47 52 41 4D 20 49 53  |INTER PROGRAM IS|
00000B10: 20 57 52 49 54 54 45 4E  20 54 4F 20 53 4B 49 50  | WRITTEN TO SKIP|
00000B20: 22 00 52 13 80 02 99 22  11 1D 31 35 20 4C 49 4E  |".R...."..15 LIN|
00000B30: 45 53 20 46 52 4F 4D 20  4F 4E 45 20 53 48 45 45  |ES FROM ONE SHEE|
00000B40: 54 20 54 4F 20 41 4E 4F  54 48 45 52 20 57 48 45  |T TO ANOTHER WHE|
00000B50: 4E 22 00 80 13 85 02 99  22 1D 55 53 49 4E 47 20  |N"......".USING |
00000B60: 54 48 45 20 31 35 32 35  20 50 52 49 4E 54 45 52  |THE 1525 PRINTER|
00000B70: 2E 20 54 48 49 53 20 4D  41 59 20 48 41 56 45 22  |. THIS MAY HAVE"|
00000B80: 00 AF 13 8A 02 99 22 11  1D 54 4F 20 42 45 20 43  |......"..TO BE C|
00000B90: 48 41 4E 47 45 44 20 46  4F 52 20 4F 54 48 45 52  |HANGED FOR OTHER|
00000BA0: 20 50 52 49 4E 54 45 52  53 2E 20 53 45 45 22 00  | PRINTERS. SEE".|
00000BB0: CB 13 8F 02 99 22 11 1D  4C 49 4E 45 53 20 39 35  |....."..LINES 95|
00000BC0: 30 20 41 4E 44 20 39 38  30 2E 22 00 FA 13 91 02  |0 AND 980.".....|
00000BD0: 99 22 11 1D 1D 1D 4A 55  53 54 20 46 4F 4C 4C 4F  |."....JUST FOLLO|
00000BE0: 57 20 54 48 45 20 53 49  4D 50 4C 45 20 49 4E 53  |W THE SIMPLE INS|
00000BF0: 54 52 55 43 54 49 4F 4E  53 22 00 29 14 94 02 99  |TRUCTIONS".)....|
00000C00: 22 11 1D 47 49 56 45 4E  20 42 59 20 54 48 45 20  |"..GIVEN BY THE |
00000C10: 50 52 4F 4D 50 54 53 2E  90 20 20 28 48 49 54 20  |PROMPTS..  (HIT |
00000C20: 41 4E 59 20 4B 45 59 29  22 00 3C 14 B2 02 A1 41  |ANY KEY)".<....A|
00000C30: 24 3A 8B 41 24 B2 22 22  A7 36 39 30 00 42 14 B7  |$:.A$."".690.B..|
00000C40: 02 8E 00 72 14 20 03 99  22 A4 A4 A4 A4 A4 A4 A4  |...r. ..".......|
00000C50: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00000C60: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00000C70: A4 22 00 94 14 2A 03 99  22 91 12 54 4F 54 41 4C  |."...*.."..TOTAL|
00000C80: 53 92 22 3A 99 22 59 52  22 3B 4E 59 3A 4E 59 B2  |S.":."YR";NY:NY.|
00000C90: 4E 59 AA 31 00 AB 14 48  03 99 22 91 22 A3 38 29  |NY.1...H..".".8)|
00000CA0: 3B 54 41 3B A3 31 38 29  3B 54 42 00 CE 14 4D 03  |;TA;.18);TB...M.|
00000CB0: 99 22 41 43 43 55 4D 22  A3 38 29 3B A5 52 28 41  |."ACCUM".8);.R(A|
00000CC0: 49 29 3B A3 31 38 29 3B  A5 52 28 43 50 29 00 FE  |I);.18);.R(CP)..|
00000CD0: 14 52 03 99 22 11 20 12  50 52 45 53 53 20 5B 52  |.R..". .PRESS [R|
00000CE0: 45 54 55 52 4E 5D 20 54  4F 20 43 4F 4E 54 49 4E  |ETURN] TO CONTIN|
00000CF0: 55 45 2C 20 51 20 54 4F  20 51 55 49 54 22 00 14  |UE, Q TO QUIT"..|
00000D00: 15 57 03 A1 41 24 3A 8B  41 24 B2 C7 28 31 33 29  |.W..A$:.A$..(13)|
00000D10: A7 38 35 38 00 2B 15 58  03 8B 41 24 B2 22 51 22  |.858.+.X..A$."Q"|
00000D20: B0 41 24 B2 22 D1 22 A7  32 32 30 00 34 15 59 03  |.A$.".".220.4.Y.|
00000D30: 89 38 35 35 00 64 15 5A  03 99 22 91 20 20 20 20  |.855.d.Z..".    |
00000D40: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000D50: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000D60: 20 20 20 22 00 76 15 5C  03 54 41 B2 30 3A 54 42  |   ".v.\.TA.0:TB|
00000D70: B2 30 3A 4B B2 30 00 A7  15 66 03 99 22 12 50 4D  |.0:K.0...f..".PM|
00000D80: 54 20 23 20 20 20 49 4E  54 20 41 4D 54 20 20 20  |T #   INT AMT   |
00000D90: 50 52 49 4E 20 41 4D 54  20 20 20 20 20 42 41 4C  |PRIN AMT     BAL|
00000DA0: 20 44 55 45 20 20 22 00  AD 15 70 03 8E 00 D3 15  | DUE  "...p.....|
00000DB0: 84 03 98 31 2C 22 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |...1,"----------|
00000DC0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000DD0: 2D 22 3B 00 03 16 89 03  98 31 2C 22 2D 2D 2D 2D  |-";......1,"----|
00000DE0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000DF0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000E00: 2D 2D 22 00 17 16 8E 03  98 31 2C 22 12 20 54 4F  |--"......1,". TO|
00000E10: 54 41 4C 53 20 92 22 00  3B 16 98 03 98 31 2C 4E  |TALS .".;....1,N|
00000E20: 59 3B C7 28 31 36 29 22  31 30 22 3B 54 41 3B C7  |Y;.(16)"10";TA;.|
00000E30: 28 31 36 29 22 33 30 22  3B 54 42 00 6C 16 A2 03  |(16)"30";TB.l...|
00000E40: 98 31 2C 22 41 43 43 55  4D 22 3B C7 28 31 36 29  |.1,"ACCUM";.(16)|
00000E50: 22 31 30 22 3B A5 52 28  41 49 29 3B C7 28 31 36  |"10";.R(AI);.(16|
00000E60: 29 22 33 30 22 3B A5 52  28 43 50 29 00 92 16 A7  |)"30";.R(CP)....|
00000E70: 03 98 31 2C 22 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |..1,"-----------|
00000E80: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000E90: 22 3B 00 C2 16 A9 03 98  31 2C 22 2D 2D 2D 2D 2D  |";......1,"-----|
00000EA0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000EB0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000EC0: 2D 22 00 CE 16 AC 03 4E  59 B2 4E 59 AA 31 00 08  |-".....NY.NY.1..|
00000ED0: 17 B6 03 4C B2 4C AA 31  3A 8B 4C B2 33 B0 4C B2  |...L.L.1:.L.3.L.|
00000EE0: 36 B0 4C B2 39 B0 4C B2  31 32 B0 4C B2 31 35 B0  |6.L.9.L.12.L.15.|
00000EF0: 4C B2 31 38 B0 4C B2 32  31 B0 4C B2 32 34 B0 4C  |L.18.L.21.L.24.L|
00000F00: B2 32 37 A7 8D 39 38 30  00 1A 17 BB 03 54 41 B2  |.27..980.....TA.|
00000F10: 30 3A 54 42 B2 30 3A 4B  B2 30 00 20 17 C0 03 8E  |0:TB.0:K.0. ....|
00000F20: 00 31 17 D4 03 81 53 B2  31 A4 31 35 3A 98 31 3A  |.1....S.1.15:.1:|
00000F30: 82 00 77 17 DE 03 98 31  2C 22 12 20 50 4D 54 20  |..w....1,". PMT |
00000F40: 23 20 20 20 20 20 49 4E  54 45 52 45 53 54 20 50  |#     INTEREST P|
00000F50: 4D 54 20 20 20 20 20 20  50 52 49 4E 43 49 50 41  |MT      PRINCIPA|
00000F60: 4C 20 50 4D 54 20 20 20  20 20 20 42 41 4C 41 4E  |L PMT      BALAN|
00000F70: 43 45 20 44 55 45 22 00  7D 17 E3 03 8E 00 AB 17  |CE DUE".}.......|
00000F80: 60 EA 9F 31 35 2C 38 2C  31 35 2C 22 52 30 3A 48  |`..15,8,15,"R0:H|
00000F90: 45 4C 4C 4F 20 43 4F 4E  4E 45 43 54 3D 48 45 4C  |ELLO CONNECT=HEL|
00000FA0: 4C 4F 20 43 4F 4E 4E 45  43 54 22 00 C4 17 65 EA  |LO CONNECT"...e.|
00000FB0: 84 31 35 2C 45 52 3A A0  31 35 3A 8B 45 52 B3 B1  |.15,ER:.15:.ER..|
00000FC0: 36 33 A7 80 00 E1 17 6A  EA 99 22 93 22 3B 3A 93  |63.....j..".";:.|
00000FD0: 22 48 45 4C 4C 4F 20 43  4F 4E 4E 45 43 54 22 2C  |"HELLO CONNECT",|
00000FE0: 38 00 13 18 C4 EA 50 4E  24 B2 22 CC CF C1 CE 20  |8.....PN$.".... |
00000FF0: C3 C1 CC C3 D5 CC C1 D4  CF D2 22 3A 41 4E 24 B2  |..........":AN$.|
00001000: 22 C2 D9 3A 20 20 D7 2E  20 CF 2E 20 CE C5 CC D3  |"..:  .. .. ....|
00001010: CF CE 22 00 53 18 CE EA  42 4F B2 30 32 3A 53 43  |..".S...BO.02:SC|
00001020: B2 31 30 3A 43 4C B2 30  36 3A 43 31 B2 30 35 3A  |.10:CL.06:C1.05:|
00001030: 43 32 B2 30 32 3A 43 33  B2 30 35 3A 43 34 B2 30  |C2.02:C3.05:C4.0|
00001040: 32 3A 43 35 B2 30 30 3A  43 36 B2 30 30 3A 43 37  |2:C5.00:C6.00:C7|
00001050: B2 30 30 00 6B 18 D8 EA  8F 20 42 4F 20 2D 20 42  |.00.k.... BO - B|
00001060: 4F 52 44 45 52 20 43 4F  4C 4F 52 00 83 18 D9 EA  |ORDER COLOR.....|
00001070: 8F 20 53 43 20 2D 20 53  43 52 45 45 4E 20 43 4F  |. SC - SCREEN CO|
00001080: 4C 4F 52 00 A4 18 DA EA  8F 20 43 4C 20 2D 20 43  |LOR...... CL - C|
00001090: 4F 4C 4F 52 20 50 4F 4B  45 44 20 4F 4E 20 42 4F  |OLOR POKED ON BO|
000010A0: 52 44 45 52 00 C5 18 DB  EA 8F 20 43 31 20 2D 20  |RDER...... C1 - |
000010B0: 54 4F 50 20 42 4F 58 20  4F 55 54 53 49 44 45 20  |TOP BOX OUTSIDE |
000010C0: 43 4F 4C 4F 52 00 E5 18  DC EA 8F 20 43 32 20 2D  |COLOR...... C2 -|
000010D0: 20 54 4F 50 20 42 4F 58  20 49 4E 53 49 44 45 20  | TOP BOX INSIDE |
000010E0: 43 4F 4C 4F 52 00 09 19  DD EA 8F 20 43 33 20 2D  |COLOR...... C3 -|
000010F0: 20 42 4F 54 54 4F 4D 20  42 4F 58 20 4F 55 54 53  | BOTTOM BOX OUTS|
00001100: 49 44 45 20 43 4F 4C 4F  52 00 2C 19 DE EA 8F 20  |IDE COLOR.,.... |
00001110: 43 34 20 2D 20 42 4F 54  54 4F 4D 20 42 4F 58 20  |C4 - BOTTOM BOX |
00001120: 49 4E 53 49 44 45 20 43  4F 4C 4F 52 00 49 19 DF  |INSIDE COLOR.I..|
00001130: EA 8F 20 43 35 20 2D 20  27 43 4F 50 59 52 49 47  |.. C5 - 'COPYRIG|
00001140: 48 54 27 20 43 4F 4C 4F  52 00 69 19 E0 EA 8F 20  |HT' COLOR.i.... |
00001150: 43 36 20 2D 20 27 50 52  4F 47 52 41 4D 20 4E 41  |C6 - 'PROGRAM NA|
00001160: 4D 45 27 20 43 4F 4C 4F  52 00 89 19 E1 EA 8F 20  |ME' COLOR...... |
00001170: 43 37 20 2D 20 27 41 55  54 48 4F 52 53 20 4E 41  |C7 - 'AUTHORS NA|
00001180: 4D 45 27 20 43 4F 4C 4F  52 00 AA 19 E2 EA 97 35  |ME' COLOR......5|
00001190: 33 32 38 30 2C 42 4F 3A  97 35 33 32 38 31 2C 53  |3280,BO:.53281,S|
000011A0: 43 3A 99 22 93 08 0E 11  22 3B 00 E1 19 EC EA 97  |C:."....";......|
000011B0: 36 34 36 2C 43 31 3A 99  22 20 20 12 A4 A4 A4 A4  |646,C1:."  .....|
000011C0: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
000011D0: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
000011E0: 22 00 18 1A F6 EA 97 36  34 36 2C 43 32 3A 99 22  |"......646,C2:."|
000011F0: 20 20 12 A5 20 20 20 20  20 20 20 20 CC CF C1 C4  |  ..        ....|
00001200: D3 D4 C1 D2 20 D0 D2 C5  D3 C5 CE D4 D3 3A 20 20  |.... ........:  |
00001210: 20 20 20 20 20 20 A7 22  00 4F 1A 0A EB 97 36 34  |      .".O....64|
00001220: 36 2C 43 31 3A 99 22 20  20 12 A3 A3 A3 A3 A3 A3  |6,C1:."  .......|
00001230: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |................|
00001240: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 22 00  |..............".|
00001250: 73 1A 14 EB 97 36 34 36  2C 43 36 3A 99 22 11 11  |s....646,C6:."..|
00001260: 11 22 A3 32 30 AB C3 28  50 4E 24 29 AD 32 29 3B  |.".20..(PN$).2);|
00001270: 50 4E 24 00 97 1A 1E EB  97 36 34 36 2C 43 37 3A  |PN$......646,C7:|
00001280: 99 22 11 11 11 22 A3 32  30 AB C3 28 41 4E 24 29  |."...".20..(AN$)|
00001290: AD 32 29 3B 41 4E 24 00  BE 1A 28 EB 97 36 34 36  |.2);AN$...(..646|
000012A0: 2C 43 35 3A 99 22 11 11  11 22 A3 31 33 29 22 C3  |,C5:."...".13)".|
000012B0: CF D0 D9 D2 C9 C7 C8 D4  20 31 39 38 36 22 00 DF  |........ 1986"..|
000012C0: 1A 32 EB 99 A3 39 29 22  C3 CF CD CD CF C4 CF D2  |.2...9)"........|
000012D0: C5 20 D0 D5 C2 CC C9 C3  C1 D4 C9 CF CE D3 22 00  |. ............".|
000012E0: 1A 1B 3C EB 97 36 34 36  2C 43 33 3A 99 22 11 11  |..<..646,C3:."..|
000012F0: 11 11 20 20 12 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |..  ............|
00001300: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00001310: A4 A4 A4 A4 A4 A4 A4 A4  A4 22 00 51 1B 46 EB 97  |.........".Q.F..|
00001320: 36 34 36 2C 43 34 3A 99  22 20 20 12 A5 20 20 20  |646,C4:."  ..   |
00001330: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001340: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 A7  |               .|
00001350: 22 00 99 1B 50 EB 97 36  34 36 2C 43 33 3A 99 22  |"...P..646,C3:."|
00001360: 20 20 12 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |  ..............|
00001370: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |................|
00001380: A3 A3 A3 A3 A3 A3 A3 13  22 3A 4C 45 B2 31 30 34  |........":LE.104|
00001390: 34 3A 52 49 B2 31 30 34  33 00 BB 1B 5A EB 97 4C  |4:RI.1043...Z..L|
000013A0: 45 2C 39 38 3A 97 52 49  2C 39 38 3A 4C 45 B2 4C  |E,98:.RI,98:LE.L|
000013B0: 45 AB 31 3A 52 49 B2 52  49 AA 31 00 DC 1B 64 EB  |E.1:RI.RI.1...d.|
000013C0: 43 4F B2 35 34 32 37 32  3A 97 52 49 AA 43 4F 2C  |CO.54272:.RI.CO,|
000013D0: 43 4C 3A 97 4C 45 AA 43  4F 2C 43 4C 00 EF 1B 6E  |CL:.LE.CO,CL...n|
000013E0: EB 8B 4C 45 B2 31 30 32  35 A7 36 30 32 39 30 00  |..LE.1025.60290.|
000013F0: FA 1B 78 EB 89 36 30 32  35 30 00 2A 1C 82 EB 97  |..x..60250.*....|
00001400: 4C 45 2C 31 30 38 3A 97  52 49 2C 31 32 33 3A 97  |LE,108:.RI,123:.|
00001410: 4C 45 AA 43 4F 2C 43 4C  3A 97 52 49 AA 43 4F 2C  |LE.CO,CL:.RI.CO,|
00001420: 43 4C 3A 97 36 34 36 2C  43 4C 00 4F 1C 8C EB 4C  |CL:.646,CL.O...L|
00001430: 45 B2 4C 45 AA 34 30 3A  52 49 B2 52 49 AA 34 30  |E.LE.40:RI.RI.40|
00001440: 3A 8B 4C 45 B2 31 39 38  35 A7 36 30 33 33 30 00  |:.LE.1985.60330.|
00001450: 8B 1C 91 EB 8B 4C 45 B2  31 31 38 35 A7 99 22 13  |.....LE.1185..".|
00001460: 11 11 11 11 1D 1D B7 B7  B7 B7 B7 B7 B7 B7 B7 B7  |................|
00001470: B7 B7 B7 B7 B7 B7 B7 B7  B7 B7 B7 B7 B7 B7 B7 B7  |................|
00001480: B7 B7 B7 B7 B7 B7 B7 B7  B7 B7 22 00 D2 1C 92 EB  |..........".....|
00001490: 8B 4C 45 B2 31 38 32 35  A7 99 22 11 11 11 11 11  |.LE.1825..".....|
000014A0: 11 11 11 11 11 11 11 11  11 11 1D 1D AF AF AF AF  |................|
000014B0: AF AF AF AF AF AF AF AF  AF AF AF AF AF AF AF AF  |................|
000014C0: AF AF AF AF AF AF AF AF  AF AF AF AF AF AF AF AF  |................|
000014D0: AF 22 00 F9 1C 96 EB 97  4C 45 2C 32 32 35 3A 97  |."......LE,225:.|
000014E0: 52 49 2C 39 37 3A 97 4C  45 AA 43 4F 2C 43 4C 3A  |RI,97:.LE.CO,CL:|
000014F0: 97 52 49 AA 43 4F 2C 43  4C 00 04 1D A0 EB 89 36  |.RI.CO,CL......6|
00001500: 30 33 30 30 00 2C 1D AA  EB 97 4C 45 2C 31 32 34  |0300.,....LE,124|
00001510: 3A 97 52 49 2C 31 32 36  3A 97 4C 45 AA 43 4F 2C  |:.RI,126:.LE.CO,|
00001520: 43 4C 3A 97 52 49 AA 43  4F 2C 43 4C 00 57 1D B4  |CL:.RI.CO,CL.W..|
00001530: EB 4C 45 B2 4C 45 AA 31  3A 52 49 B2 52 49 AB 31  |.LE.LE.1:RI.RI.1|
00001540: 3A 8B 4C 45 B2 32 30 30  34 A7 97 31 39 38 2C 2E  |:.LE.2004..198,.|
00001550: 3A 89 36 30 33 36 30 00  86 1D BE EB 97 4C 45 2C  |:.60360......LE,|
00001560: 32 32 36 3A 97 52 49 2C  32 32 36 3A 97 4C 45 AA  |226:.RI,226:.LE.|
00001570: 43 4F 2C 43 4C 3A 97 52  49 AA 43 4F 2C 43 4C 3A  |CO,CL:.RI.CO,CL:|
00001580: 89 36 30 33 34 30 00 A8  1D C8 EB 99 22 13 11 11  |.60340......"...|
00001590: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000015A0: 11 11 11 11 1D 1D 22 3B  00 DD 1D D2 EB 97 36 34  |......";......64|
000015B0: 36 2C 43 32 3A 99 22 12  A5 D0 52 45 53 53 20 54  |6,C2:."...RESS T|
000015C0: 48 45 20 5B D3 D0 C1 C3  C5 20 C2 C1 D2 5D 20 54  |HE [..... ...] T|
000015D0: 4F 20 43 4F 4E 54 49 4E  55 45 2E A7 22 00 EA 1D  |O CONTINUE.."...|
000015E0: DC EB 81 41 B2 31 A4 31  30 30 00 03 1E E6 EB A1  |...A.1.100......|
000015F0: 41 24 3A 8B 41 24 B2 22  20 22 B0 41 24 B2 22 A0  |A$:.A$." ".A$.".|
00001600: 22 A7 8E 00 09 1E F0 EB  82 00 2B 1E FA EB 99 22  |".........+...."|
00001610: 13 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00001620: 11 11 11 11 11 11 11 1D  1D 22 3B 00 58 1E 04 EC  |.........";.X...|
00001630: 99 22 12 A5 20 20 20 20  20 20 20 20 20 20 20 20  |."..            |
00001640: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001650: 20 20 20 20 20 20 A7 22  00 65 1E 0E EC 81 41 B2  |      .".e....A.|
00001660: 31 A4 31 30 30 00 7E 1E  18 EC A1 41 24 3A 8B 41  |1.100.~....A$:.A|
00001670: 24 B2 22 20 22 B0 41 24  B2 22 A0 22 A7 8E 00 84  |$." ".A$."."....|
00001680: 1E 22 EC 82 00 8F 1E 2C  EC 89 36 30 33 36 30 00  |.".....,..60360.|
00001690: 9C 1E 54 EC 81 5A 38 B2  31 A4 4E 43 00 B1 1E 56  |..T..Z8.1.NC...V|
000016A0: EC A1 41 24 3A 8B 41 24  B2 22 22 A7 36 30 35 30  |..A$:.A$."".6050|
000016B0: 32 00 ED 1E 57 EC 8B 41  24 B2 22 93 22 B0 41 24  |2...W..A$.".".A$|
000016C0: B2 22 13 22 B0 41 24 B2  22 94 22 B0 41 24 B2 22  |.".".A$.".".A$."|
000016D0: 91 22 B0 41 24 B2 22 9D  22 B0 41 24 B2 22 11 22  |.".A$.".".A$."."|
000016E0: B0 41 24 B2 22 1D 22 A7  36 30 35 30 32 00 12 1F  |.A$.".".60502...|
000016F0: 58 EC 8B 41 24 B2 C7 28  31 33 29 B0 41 24 B2 C7  |X..A$..(13).A$..|
00001700: 28 31 34 31 29 A7 99 22  9D 20 22 3A 89 36 30 35  |(141)..". ":.605|
00001710: 34 34 00 2B 1F 5A EC 8B  41 24 B2 22 20 22 B0 41  |44.+.Z..A$." ".A|
00001720: 24 B2 22 A0 22 A7 36 30  35 34 30 00 44 1F 5C EC  |$.".".60540.D.\.|
00001730: 8B 41 24 B2 C7 28 32 30  29 AF 5A 38 B2 31 A7 36  |.A$..(20).Z8.1.6|
00001740: 30 35 30 32 00 70 1F 5E  EC 8B 41 24 B2 C7 28 32  |0502.p.^..A$..(2|
00001750: 30 29 A7 5A 38 B2 5A 38  AB 31 3A 99 22 9D 9D 20  |0).Z8.Z8.1:.".. |
00001760: 20 9D 9D 22 3B 42 4B 24  3B 3A 89 36 30 35 30 32  | ..";BK$;:.60502|
00001770: 00 98 1F 68 EC 8B 41 24  B1 22 2F 22 AF 41 24 B3  |...h..A$."/".A$.|
00001780: 22 3A 22 AF 28 4D 4F AF  32 29 A7 36 30 35 34 30  |":".(MO.2).60540|
00001790: 3A 4E 55 4D 42 45 52 53  00 C5 1F 6A EC 8B 41 24  |:NUMBERS...j..A$|
000017A0: B1 22 20 22 AF 41 24 B3  22 2A 22 AF 28 4D 4F AF  |." ".A$."*".(MO.|
000017B0: 34 29 A7 36 30 35 34 30  3A 53 48 8B 54 20 4E 55  |4).60540:SH.T NU|
000017C0: 4D 42 45 52 53 00 FA 1F  6C EC 8B 41 24 B1 22 C0  |MBERS...l..A$.".|
000017D0: 22 AF 41 24 B3 22 DB 22  AF 28 4D 4F AF 38 29 A7  |".A$.".".(MO.8).|
000017E0: 36 30 35 34 30 3A 55 50  50 45 52 43 41 53 45 20  |60540:UPPERCASE |
000017F0: 43 48 41 52 41 43 54 45  52 53 00 30 20 6E EC 8B  |CHARACTERS.0 n..|
00001800: 41 24 B1 22 40 22 AF 41  24 B3 22 5B 22 AF 28 4D  |A$."@".A$."[".(M|
00001810: 4F AF 31 36 29 A7 36 30  35 34 30 3A 4C 4F 57 45  |O.16).60540:LOWE|
00001820: 52 43 41 53 45 20 43 48  41 52 41 43 54 45 52 53  |RCASE CHARACTERS|
00001830: 00 6B 20 70 EC 8B 41 24  B1 C7 28 31 36 30 29 AF  |.k p..A$..(160).|
00001840: 41 24 B3 C7 28 31 39 32  29 AF 28 4D 4F AF 33 32  |A$..(192).(MO.32|
00001850: 29 A7 36 30 35 34 30 3A  43 4F 4D 4D 4F 44 B0 45  |).60540:COMMOD.E|
00001860: 20 43 48 41 52 41 43 54  45 52 53 00 9E 20 72 EC  | CHARACTERS.. r.|
00001870: 8B 41 24 B1 B2 C7 28 30  29 AF 41 24 B3 22 1D 22  |.A$...(0).A$."."|
00001880: AF 28 4D 4F AF 36 34 29  A7 36 30 35 34 30 3A 43  |.(MO.64).60540:C|
00001890: 54 52 4C 20 43 48 41 52  41 43 54 45 52 53 00 D8  |TRL CHARACTERS..|
000018A0: 20 74 EC 8B 41 24 B1 22  29 22 AF 41 24 B3 22 30  | t..A$.")".A$."0|
000018B0: 22 AF 28 4D 4F AF 31 32  38 29 A7 36 30 35 34 30  |".(MO.128).60540|
000018C0: 3A 4D 49 53 43 20 43 48  41 52 41 43 54 45 52 53  |:MISC CHARACTERS|
000018D0: 20 47 52 4F 55 50 20 31  00 12 21 76 EC 8B 41 24  | GROUP 1..!v..A$|
000018E0: B1 22 39 22 AF 41 24 B3  22 41 22 AF 28 4D 4F AF  |."9".A$."A".(MO.|
000018F0: 31 32 38 29 A7 36 30 35  34 30 3A 4D 49 53 43 20  |128).60540:MISC |
00001900: 43 48 41 52 41 43 54 45  52 53 20 47 52 4F 55 50  |CHARACTERS GROUP|
00001910: 20 32 00 4C 21 78 EC 8B  41 24 B1 22 5A 22 AF 41  | 2.L!x..A$."Z".A|
00001920: 24 B3 22 81 22 AF 28 4D  4F AF 31 32 38 29 A7 36  |$.".".(MO.128).6|
00001930: 30 35 34 30 3A 4D 49 53  43 20 43 48 41 52 41 43  |0540:MISC CHARAC|
00001940: 54 45 52 53 20 47 52 4F  55 50 20 33 00 57 21 7A  |TERS GROUP 3.W!z|
00001950: EC 89 36 30 35 30 32 00  71 21 7C EC 99 22 9D 22  |..60502.q!|.."."|
00001960: 3B 41 24 3B 3A 97 32 31  32 2C 2E 3A 99 42 4B 24  |;A$;:.212,.:.BK$|
00001970: 3B 00 81 21 7E EC 47 24  28 5A 38 29 B2 41 24 3A  |;..!~.G$(Z8).A$:|
00001980: 82 00 8C 21 80 EC 99 22  9D 92 20 22 00 BA 21 82  |...!...".. "..!.|
00001990: EC 41 24 B2 22 22 3A 81  41 B2 31 A4 5A 38 AB 31  |.A$."":.A.1.Z8.1|
000019A0: 3A 41 24 B2 41 24 AA 47  24 28 41 29 3A 82 3A 8B  |:A$.A$.G$(A):.:.|
000019B0: 5A 38 B2 31 A7 41 24 B2  22 22 00 C0 21 84 EC 8E  |Z8.1.A$.""..!...|
000019C0: 00 00 00                                          |...             |
.......60100:.:.G$(75).C.... .R(X)..(100
.X..5).100:BK$.".":.G(142);.L....600.T..
.."............... LOAN CALCULATOR "....
.."....NO. OF MONTHS:    ....";BK$;:MO.2
:NC.4:.60500:N.E(A$).O....E(A$)...."....
.";:.20...<..".INTEREST RATE %:     ....
.";BK$;:MO.130:NC.5:.60500:AR.E(A$).,.F.
.E(A$)...."...";:.60.;.P.MR.AR.1200.~.Z.
.".PRINCIPAL:               ............
...";BK$;:NC.15:.60500..._.P.E(A$):.E(A$
)...."...";:.90...`..".MONTH OF FIRST PM
T (1 TO 12):  ..";BK$;:MO.2:NC.2:.60500.
..A.MO.E(A$):.E(A$).1.E(A$).12.."..";:.9
6.M.B..".YEAR OF 1ST PAYMENT:    ....";B
K$;:MO.2:NC.4:.60500:YR.E(A$).F.C..E(A$)
...."...";:.98...D.PMT.(P.MR).(1.(1.MR).
(.N))...I.PMT..R(PMT)...N.."..PAYMENT=",
.R(PMT).M.O..".PRESS RETURN KEY ONCE"...
P.."TO CONTINUE AND AGAIN TO PAUSE"...Q.
.A$:. A$.""        .113.A.S.."..PMT #   
INT AMT    PRIN AMT     BAL DUE ".^.X.TA
.0:TB.0:K.0:NP.P:NY.YR.J.}.. I.1.N.}....
A$:.A$."".140......A$:.A$.."".134......A
$:.A$."".136.....IP.NP.MR.C...PP.PMT..R(
IP).P...NP.NP.PP.....AI.AI.IP... ..I.N.P
P.PP.NP:NP.0.00.....CP.CP.PP./.... I;.8)
;.R(IP);.18);.R(PP);.29);.R(NP).T....I.N
.."FINAL PAYMENT=";.R(PP.IP).{...TA.TA..
R(IP):. ACCUMULATES INT.PD......TB.TB..R
(PP):. ACCUMULATES PRIN. PD.......I.N.21
5.H....I.13.MO..800:.210.....K.K.1:.K.12
..800...R..I...W..800......".... F1 . TO
 SEE AGAIN   . F5 . TO QUIT".P...."... F
3 . TO DO ANOTHER  . F7 .  PRINTED COPY"
.C....B$:.B$."".235.X....B$.".".300:. F1
......B$."."..:.5:. F3. ....B$.".".60000
......B$.".".400......235.W.,.NP.P:AI.0:
NY.YR:CP.0:.110...... DATA TO PRINTER...
..."............. SEND TO PRINTER ".8...
.".....IS PRINTER ON AND READY?".K....".
...NAME OF THIS DOCUMENT (75 CHAR LIMIT)
":......."=>";BK$;:NC.75:MO.190:.60500:F
$.A$.I....C(F$).75.."....NAME TOO LONG, 
TRY AGAIN..":.420......15,4,15: 15:.ST.0
.439......".HOLD ON, YOUR PRINTER ISN'T 
ONLINE!".:...."CHECK THE CABLES AND TRY 
IT AGAIN.".R...."..PRESS [RETURN]..I....
A$:.A$..G(13).436.R....220......"....HOL
D ON WHILE I TALK TO THE PRINTER."......
1,4......1...B..1,F$...G..1,"MONTHLY PAY
MENT: ";PMT;G(16)"30AMOUNT OF LOAN: ";P.
=.L..1,". PMT #     INTEREST PMT      PR
INCIPAL PMT      BALANCE DUE".T.N.TA.0:T
B.0:K.0:NP.P.H.O.CP.0:AI.0:NY.YR.S.Q..I.
1.N...V.IP.NP.MR.....PP.PMT..R(IP).....N
P.NP.PP.....AI.AI.IP.C....I.N.PP.PP.NP:N
P.0.P...CP.CP.PP......1,I;G(16)"10";.R(I
P);G(16)"30";......1,.R(PP);G(16)"50";.R
(NP).;....I.N..1,"FINAL PAYMENT=";.R(PP.
IP).B...TA.TA..R(IP):. ACCUMULATES INT P
D......TB.TB..R(PP):. ACCUMULATES PRIN P
D.......I.N.540......I.13.MO..900:.530.C
...K.K.1:.K.12..900.J....I.S....900...&.
 1:L.0:."..":.220...X.. TITLE...]..53281
,15:.53280,11.:.B..".........VVVVVVVVVVV
VVVVVVVVVVVVVVVVV".F.G.."......VVVVV. LO
AN  CALCULATOR .VVVVV"...L.."......VVVVV
VVVVVVVVVVVVVVVVVVVVVVV".B.Q..".....THIS
 PROGRAM WILL CALCULATE LOANS AND"...V..
".MORTGAGES AND MAKE A PRINTOUT ON PAPER
.".!.{..".THE PRINTER PROGRAM IS WRITTEN
 TO SKIP".R...."..15 LINES FROM ONE SHEE
T TO ANOTHER WHEN"......".USING THE 1525
 PRINTER. THIS MAY HAVE"......"..TO BE C
HANGED FOR OTHER PRINTERS. SEE".K...."..
LINES 950 AND 980."......"....JUST FOLLO
W THE SIMPLE INSTRUCTIONS".)...."..GIVEN
 BY THE PROMPTS..  (HIT ANY KEY)".<....A
$:.A$."".690.B.....R. .."...............
........................."...*.."..TOTAL
S.":."YR";NY:NY.NY.1...H..".".8);TA;.18)
;TB.N.M.."ACCUM".8);.R(AI);.18);.R(CP)..
.R..". .PRESS [RETURN] TO CONTINUE, Q TO
 QUIT"...W..A$:.A$.G(13).858.+.X..A$."Q"
.A$."Q".220.4.Y..855.D.Z..".            
                           ".V.\.TA.0:TB
.0:K.0...F..".PMT #   INT AMT   PRIN AMT
     BAL DUE  "...P...S....1,"----------
-----------------";......1,"------------
--------------------------"......1,". TO
TALS .".;....1,NY;G(16)"10";TA;G(16)"30"
;TB.L....1,"ACCUM";G(16)"10";.R(AI);G(16
)"30";.R(CP)......1,"-------------------
--------";.B....1,"---------------------
-----------------".N...NY.NY.1.....L.L.1
:.L.3.L.6.L.9.L.12.L.15.L.18.L.21.L.24.L
.27..980.....TA.0:TB.0:K.0. .....1.T..S.
1.15:.1:..W....1,". PMT #     INTEREST P
MT      PRINCIPAL PMT      BALANCE DUE".
}.......`..15,8,15,"R0:HELLO CONNECT=HEL
LO CONNECT".D.E..15,ER: 15:.ER..63.....J
..".";:."HELLO CONNECT",8...D.PN$."LOAN 
CALCULATOR":AN$."BY:  W. O. NELSON".S.N.
BO.02:SC.10:CL.06:C1.05:C2.02:C3.05:C4.0
2:C5.00:C6.00:C7.00.K.X.. BO - BORDER CO
LOR...Y.. SC - SCREEN COLOR...Z.. CL - C
OLOR POKED ON BORDER.E.... C1 - TOP BOX 
OUTSIDE COLOR...... C2 - TOP BOX INSIDE 
COLOR...... C3 - BOTTOM BOX OUTSIDE COLO
R.,.... C4 - BOTTOM BOX INSIDE COLOR.I..
.. C5 - 'COPYRIGHT' COLOR.I.... C6 - 'PR
OGRAM NAME' COLOR...... C7 - 'AUTHORS NA
ME' COLOR......53280,BO:.53281,SC:."....
";......646,C1:."  .....................
................"......646,C2:."  ..    
    LOADSTAR PRESENTS:        .".O....64
6,C1:."  ...............................
......".S....646,C6:."...".20.C(PN$).2);
PN$......646,C7:."...".20.C(AN$).2);AN$.
..(..646,C5:."...".13)"COPYRIGHT 1986"..
.2...9)"COMMODORE PUBLICATIONS"...<..646
,C3:."....  ............................
.........".Q.F..646,C4:."  ..           
                       ."...P..646,C3:."
  ......................................
":LE.1044:RI.1043...Z..LE,98:.RI,98:LE.L
E.1:RI.RI.1...D.CO.54272:.RI.CO,CL:.LE.C
O,CL...N..LE.1025.60290...X..60250.*....
LE,108:.RI,123:.LE.CO,CL:.RI.CO,CL:.646,
CL.O...LE.LE.40:RI.RI.40:.LE.1985.60330.
.....LE.1185..".........................
..................".R....LE.1825..".....
........................................
........."......LE,225:.RI,97:.LE.CO,CL:
.RI.CO,CL... ..60300.,....LE,124:.RI,126
:.LE.CO,CL:.RI.CO,CL.W...LE.LE.1:RI.RI.1
:.LE.2004..198,.:.60360......LE,226:.RI,
226:.LE.CO,CL:.RI.CO,CL:.60340...H.."...
......................";...R..646,C2:.".
.PRESS THE [SPACE BAR] TO CONTINUE.."...
...A.1.100......A$:.A$." ".A$." ".......
..+....".........................";.X...
."..                                  ."
.E....A.1.100.~....A$:.A$." ".A$." "....
.".....,..60360...T..Z8.1.NC...V..A$:.A$
."".60502...W..A$.".".A$.".".A$.".".A$."
.".A$.".".A$.".".A$.".".60502...X..A$.G(
13).A$.G(141)..". ":.60544.+.Z..A$." ".A
$." ".60540.D.\..A$.G(20).Z8.1.60502.P.^
..A$.G(20).Z8.Z8.1:."..  ..";BK$;:.60502
...H..A$."/".A$.":".(MO.2).60540:NUMBERS
.E.J..A$." ".A$."*".(MO.4).60540:SH.T NU
MBERS...L..A$.".".A$.".".(MO.8).60540:UP
PERCASE CHARACTERS.0 N..A$."@".A$."[".(M
O.16).60540:LOWERCASE CHARACTERS.K P..A$
.G(160).A$.G(192).(MO.32).60540:COMMOD.E
 CHARACTERS.. R..A$..G(0).A$.".".(MO.64)
.60540:CTRL CHARACTERS.X T..A$.")".A$."0
".(MO.128).60540:MISC CHARACTERS GROUP 1
..!V..A$."9".A$."A".(MO.128).60540:MISC 
CHARACTERS GROUP 2.L!X..A$."Z".A$.".".(M
O.128).60540:MISC CHARACTERS GROUP 3.W!Z
..60502.Q!|..".";A$;:.212,.:.BK$;..!~.G$
(Z8).A$:...!...".. "..!..A$."":.A.1.Z8.1
:A$.A$.G$(A):.:.Z8.1.A$.""..!......
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL