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 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL