C64S tape image fileSTARTER PROD PAC à,STARTERSCRIPT m/ßMORTGAGE CALC ø?÷1R2 -’ÂÿÿUNIT3QUIZ A’ÂÿÿUNIT4DRILL 4’ÂÿÿUNIT5QUIZ ,’ÂÿÿSENTENCES G’ÂÿÿUNIT7QUIZ '�I²1¤8:ùI,Ç(1):‚:TC$²Ç(1):†B$(20)A †A$(99):™Ç(14):ç4,2,7Ž VL$²"1234567890+-=QWERTYUIOP@\*ASDFGHJKL:;ZXCVBNM,./!#$%&'()^Ñ×ÅÒÔÙÕÉÏÐ"ËVL$²VL$ª"ÁÓÄÆÇÈÊËÌ[]ÚØÃÖÂÎÍ<>?"ªÇ(27)ªÇ(157)ªÇ(29)ªÇ(20)ç VL$²VL$ªÇ(13)ª" "ª"<’"6 C$(1)²"1. ÅNTER ÔEXT ":C$(2)²"2. ÅDIT ÔEXT ":C$(3)²"3. ÉNSERT ÌINES"… C$(4)²"4. ÄELETE ÌINES":C$(5)²"5. ÌIST ":C$(6)²"6. ÐRINT "ÔC$(7)²"7. ÓAVE ÔEXT ":C$(8)²"8. ÌOAD ÔEXT ":C$(9)²"9. ÅXIT ÐROGRAM"™"“¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯":BF²0:EF²0F2™"“¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯"R7ç1,13,3„<™" ÓTARTER ÓCRIPT ’"·F™"········································�";ÏP�I²1¤9:™¦10)C$(I):‚U™"¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤"; Wç1,10,3@Z™:™"ÕSE THE ÃURSOR ËEYS TO ÓELECT AN ÏPTION ";wd™"ÐRESS ÒETURN TO ÅXECUTE THE ÏPTION ’�":A²1©f™"�££££££££££££££££££££££££££££££££££££££££";Åià1,10,Aª2,""ªC$(A)ª"’"În¡ùA$êp‹Ô("‘"ªÇ(13),A$)²0§110üq‹Æ(A$)²13§140sà1,10,Aª2,C$(A)"u‹A$²""§A²Aª14x‹A$²"‘"§A²A«1K}‹A±9§A²1:Õ‹A³1§A²9T‚‰105„Œ‘A‰200,400,600,800,1000,1200,2000,2200,2400�–‰120¥È� ******** ADD TEXT´Ò‹HL²0§HL²1ÉÔ‹HL±99§�4300:‰18ÿ×™"“ÅNTER ÔEXT - ÐRESS ÅSC TO ÒETURN TO ÍENU’�";Ú™Ç(27)"T";:™£39);IÛ™""Ç(27)"B";:™"�";:L$²""sÜCA²0:‹HL³10§™HL"�>";:Õ™Ê(Ä(HL),2)">";�á‹BF³±1¯CA³37§™" ’�";®æ‹EF²1§Ž:Õ¡ùA$:KV²Ô(VL$,A$,1)¼ë‹KV²0§230Òì‹KV²89§�3300:‰225ûí‹KV²90§�3500:‰225:Õ‹KV²91§�3600:‰230ð‹KV²88¯Ã(L$)²0§18:Õ‹KV²88§230]õ‹EF²1¯KV²92¯CAª1²Ã(L$)§™"<’":L$²È(L$,CA):A$²Ç(1):BF²0:‰310’ú‹CA±²Ã(L$)¯KV²92§™"<’":A$²Ç(1):‰310:Õ‹KV²92§230›,™A$;«1‹BF²1§‰3400À6L$²L$ªA$:CA²CAª1è@‹KV²92§A$(HL)²L$:L$²"":HL²HLª1:‰360J‹Ã(L$)±36§A$(HL)²L$:HL²HLª1:L$²"":‰360T‰225(h‹EF²1§ŽCr‹HL±99§�4300:‰18:Õ‰220S��******EDITqšà1,0,18,"ÅDIT ÌINE #":…LN�¤‹LN³1°LN±HL«1§�4000:‰18—®TN²LN˳™"“ÅDIT ÔEXT - ÐRESS _ FOR ÎEXT ÌINE ";ýµ™" ÐRESS ÅSC FOR ÍENU ’�"¸™Ç(27)"T";:™£39);J™""Ç(27)"B";:™"�";:EF²1:BF²1cÇ�1070:CA²0:L$²A$(LN)}ê™"";:THL²HL:HL²LN�ï‹L$²TC$§™"";¦ô™""Ê(L$,1,1)"’�";¾þ¡ùA$:KV²Ô(VL$,A$,1)׋Æ(A$)²95§�4100:‰510‹KV²88§A$(HL)²L$:‹AF³±1¯KV²88§HL²THL:‰18:Õ‹KV²88§AF²0:‰18)�235:‹HL²LN§510>‹HL±99§�4300:‰18U!‹HL³THL§BF²1:ÕBF²0p&LN²HL:TN²LN:�1070:CA²0¨0‹HL²THL§THL²HLª1:AF²1:™"‘ ’�";:‰510:Õ�4500:‰500·X�***INSERTÝbà1,0,18,"ÉNSERT AFTER LINE #":…ALÿl‹AL³0°AL±99°AL±HL«1§�4000:‰18q‹HL±99§�4300:‰18Yv™"“•ÅNTER ÔEXT - ÐRESS ÅSC TO ÒETURN TO ÍENU’�";:THL²HL:HL²ALª1t€™Ç(27)"T";:™£39);:IL²1¨Š™""Ç(27)"B";:™"�";:L$²""Ò”CA²0:‹HL³10§™HL"�>";:Õ™Ê(Ä(HL),2)">";ìž‹BF³±1¯CA³37§™" ’�";¨¡ùA$:KV²Ô(VL$,A$,1)­‹KV²0§680>²‹KV²88¯Ã(L$)²0§IL²IL«1:‰790:Õ‹KV²88§680r·‹EF²1¯KV²92¯CAª1²Ã(L$)§™"<’":A$²Ç(1):BF²0:‰740§¼‹CA±²Ã(L$)¯KV²92§™"<’":A$²Ç(1):‰740:Õ‹KV²92§680½Á‹KV²89§�3300:‰670æÆ‹KV²90§�3500:‰670:Õ‹KV²91§�3600:‰680ïЙA$;ÿÚ‹BF²1§‰3400äL$²L$ªA$:CA²CAª1Dî‹KV²92§B$(IL)²L$:L$²"":HL²HLª1:IL²ILª1:‰780wø‹Ã(L$)±36§B$(IL)²L$:HL²HLª1:L$²"":IL²ILª1:‰780€‰670¯ ‹IL±20°ILªTHL±101§�4300:IL²IL«1:‰790:Õ‰660æHL²THL«1:‹IL²0§797:Õ�I²HL¤ALª1©«1:A$(IªIL)²A$(I):‚ �I²1¤IL:A$(ALªI)²B$(I):B$(I)²"":‚HL²HLªILª1:‰182 �*******DELETE@%LN²0:TN²0e*à1,0,18,"ÄELETE FROM LINE #":…LN�4‹LN³1°LN±HL«1§�4000:‰18 >™:™"ÄELETE TO LINE #";:…TNÂH‹TN³1°TN³LN°TN±HL«1§�4000:‰18ÛR™:…"ÁRE YOU SURE";S$\‹S$³±"Y"¯S$³±"YES"§™"ÎOT ÄELETED’":�J²1¤500:‚:‰184fNL²TN«LNª1:‹HL²100§HL²99:HF²1Ip‹TN²HL§J²LN:‰900zzLN²LN«1:J²LN:�I²TNª1¤HL:J²Jª1:A$(J)²A$(I):‚Iš„‹J³99§�I²Jª1¤99:A$(I)²"":‚I­ŽHL²HL«NL:S$²""Ä“‹HF²1§HL²HLª1:HF²0昙:™"ÄELETED’":�I²1¤500:‚:‰18óè�***LIST&í™"“ÓTART LIST AT LINE #1���";:TN²0:LN²0:CN²0.ò…LNCü‹LN³1°LN±HL§LN²1e™"ÌIST TO LINE #"HL«1"����";w ‹HL«1±9§™"�";…TN¡‹TN³1°(TN±HL«1)°TN³LN§TN²HL«1«$™"“";Ü.�I²LN¤TN:CN²CNª1:L$²A$(I):‹EF²1¯L$²""§L$²" "ý3‹CN±22¯EF³±1§…"ÓTOP";S$:CN²1 5‹S$²"Y"°S$²"YES"§S$²"":‰18> 8‹I³10§™I"�>";:Õ™Ê(Ä(I),2)">";l =TV²Ô(L$,TC$,1):‹TV±0§L$²È(L$,TV«1)ª"<’ "„ B™L$:L$²A$(LN):‰1130“ j‚I:‹EF²1§Žº t™:™"ÐRESS ÅSC TO ÒETURN TO ÍENU’"Ó y¡ùA$:‹Æ(A$)³±27§1145Û ~‰18ñ °�***PRINT ROUTINE!±™"“":LM²0:RM²0:LN²0:TN²0:PC²15!µ™"ÅNTER THE LEFT MARGIN";:…LMB!·‹LM²0§18l!º‹LM³1°LM±80§™"ÉNVALID ÍARGIN’":‰1200�!Ä™:…"ÅNTER THE RIGHT MARGIN";RMœ!É‹RM²0§18Ç!΋RM³²LM°RM±80§™"ÉNVALID ÍARGIN":‰1220é!Ø™:…"ÓTART AT LINE #1���";LN"â‹LN³1°LN±HL«1§LN²1%"ì™:™"ÐRINT TO LINE #"HL«1"����";7"ñ‹HL«1±9§™"�";?"ó…TNZ"ö‹TN³LN°TN±HL«1§TN²HL«1‰"™:™"ÒEADY ÐRINTER AND ÐRESS ÒETURN’";:…PR£" PW²RM«LM:Ÿ4,4:CL²LN«1Á"‹Ã(TL$)³PW§CL²CLª1:Õ‰1400Þ"‹CL±99°CL±TN§�1500:‰1600ù"‹A$(CL)²""§�1500:‰1600*#‹Ô(TL$,TC$)±0§�1500:TL$²A$(CL):CL²CLª1:‰1302\#‹CL±99°CL±TN§EF²1:�1500:‰1600:ÕTL$²TL$ªA$(CL)p##‹Ã(TL$)±PW§1400�#(TP²Ô(TL$,TC$):‹TP²0§1300­#2TL$²È(TL$,TP«1)ªÊ(TL$,TPª1)É#<�1500:‹EF³1§1300:Õ‰1600ó#xTA$²TL$:TA$²È(TL$,PW):T2$²Ê(TL$,PWª1)'$‚‹È(T2$,1)²" "§TL$²TA$:�1500:TL$²T2$:�1700:‰13006$Œ�I²PW¤1©«1P$–‹Ê(TA$,I,1)³±" "§1490|$ T2$²Ê(TA$,Iª1)ªT2$:TA$²È(TA$,I):TL$²TA$š$ª�1500:TL$²T2$:�1700:‰1300¡$Ò‚I³$ÔTL$²TA$:‰1450É$×�1500:�1700:‰1300ê$ܘ4,""¦LM)TL$:TL$²"":PC²PCª1%á‹PC±55§�I²1¤11:˜4:‚:PC²1 %æŽ%%@˜4: 4:EF²0:CL²0:‰185%¤�I²1¤Ã(TL$)L%®‹Ê(TL$,I,1)²" "§‚I_%¸TL$²Ê(TL$,I):Žn%Ð�*****SAVE�%Õà1,0,16,"ÄOCUMENT ÎAME:":…DN$¯%Ú™"Ô’APE OR Ä’ISK?  �";Õ%Ü¡ùA$:‹A$³±"D"¯A$³±"T"§�4005:‰2012Þ%Ý™A$; &Þ‹A$²"T"§Ÿ1,1,1,DN$:ÕŸ1,8,8,"0:"ªDN$ª",S,W"&î˜1,HL«1Ç(13);>&ø�I²1¤HL«1:˜1,A$(I)Ç(13);:‚E& 1o& ™:™"ÄOCUMENT ÓAVED":�I²1¤1000:‚:�4005w&‰18…&˜�****LOAD§&�à1,0,16,"ÄOCUMENT ÎAME:":…DN$Æ&¢™"Ô’APE OR Ä’ISK?  ’�";ì&¤¡ùA$:‹A$³±"D"¯A$³±"T"§�4005:‰2212õ&¥™A$;$'¦‹A$²"T"§Ÿ1,1,0,DN$:ÕŸ1,8,8,"0:"ªDN$ª",S,R";'±�I²1¤99:A$(I)²"":‚E'¶„1,HL_'ÀI²1:A$²"":™HL"LINES";j'ÊëüI±HLy'ÔëüA$²Ç(13)›'Þ¡#1,A$:A$(I)²A$(I)ªA$:ì:A$²""¹'ãA$(I)²È(A$(I),Ã(A$(I))«1)Å'èI²Iª1:ìÌ'ò 1ë'ü™:™"ÄOCUMENT ÌOADED":�4005û' ‹HL²99§2320( �I²HLª1¤99:A$(I)²"":‚1( �I²1¤1000:‚:HL²HLª1:‰18>(` ™"“":¢:€S(ä �****CURSOR BACK_(å ‹CA³1§ŽŽ(é ‹Ê(L$,CAª2,1)³±""§™Ê(L$,CAª1,1)"�";:Õ�4600§(î ™"�"Ê(L$,CA,1)"’�";º(ø CA²CA«1:BF²1:ŽÚ(H �****TEXT AFTER CURSOR BACKî(R Ê(L$,CAª1,1)²A$ý(W ‹CA²36§330 )\ CA²CAª10)a ‹EF³±1§™""Ê(L$,CAª1,1)"’�";:‰3450])f ‹CAª1³Ã(L$)§™""Ê(L$,CAª1,1)"’�";:Õ‰3470{)z ‹CA²Ã(L$)§BF²0:™"";:‰225„)„ ‰230�)Ž ™" ’�";:L$²È(L$,CA)«)˜ BF²0:‰225Â)¬ �****CURSORFORWARDÑ)± ‹EF²1§3700â)Ê ‹CA²±Ã(L$)§Ž*Ô ™Ê(L$,CAª1,1)""Ê(L$,CAª2,1)"�’";:CA²CAª1.*Þ ‹BF²1¯CA²Ã(L$)§BF²0:™"";4*è ŽD*�****DELETEP*‹CA³1§Ž~*‹CA²Ã(L$)§™" �� �";:L$²Ê(L$,1,CA«1):‰3650Ž*LS²Ã(L$)«CA±*$™Ç(20);:L$²È(L$,CA«1)ªÉ(L$,LS)»*.‰3660È*B™" ’�";Ö*LCA²CA«1:Žó*t�******EDITCURSORFORWARD+ˆ‹Ê(L$,CAª2,1)²TC$§3770!+’‹CAª1²±Ã(L$)§ŽO+œ™Ê(L$,CAª1,1)""Ê(L$,CAª2,1)"�’";:CA²CAª1w+¦‹BF²1¯CAª1±Ã(L$)¯CA³36§™"";:BF²0:�}+°Ž +º™Ê(L$,CAª1,1)"<’�";:CA²CAª1:޽+ ™"ÉNVALID ÌINE ÎUMBER’"Û+¥Û7:Ú1,800,3:�KK²1¤500:‚:Žî+‹(HLª1)²±THL§Ž ,™Ê(L$,CAª1,1):A$(HL)²L$1,LN²HLª1:TN²LN:HL²LN:�1070:™"‘";M,"™""Ê(L$,1,1)"’�";:CA²0S,,ŽŽ,Ì™" ÏUT OF ÒOOM ’";:IL²IL«1:�4005:�I²1¤1000:‚:Ž©,”™"‘";:‹L$²TC$§™"";¯,™ŽØ,ø‹Ê(L$,CAª1,1)³±TC$§™Ê(L$,CAª1,1)"�";Þ,Ž#�I²1¤8:ùI,Ç(Iª132):‚:ù8,Ç(63)8 —2025,64:—281,38Cn™"“Ž"fPD²4 :� PRINTER DEVICE NUMBERŠ,LP²66 :� LINES PER PRINTER PAGE�6:Ü@ƒ""," "÷J‡FR$,FS$:ç1,2,7:ç4,2,77T™"“";:F$²"�":F1²5:�1380:F$²"š":F0²6:F1²4:�1370:F0²11:�1370o^F0²16:F1²5:�1370:F$²"’�":F0²22:F1²3:�1370:™"Ë�”À";²hF0²1:F1²1:�1420:F$²" EQUITY":F0$²" INTEREST":F1$²"PAYMENT"Þr™È(FR$,2)¦9)"�’ MORTGAGE CALC ";ú|™È(FR$,3)¦15)"(C)1984";)†™È(FR$,4)¦7)"COMMODORE BUSINESS MACHINES";l�™È(FR$,6)"šDATA":™" PRINCIPAL ANNUAL TERM TO BE START"¤š™£14)"RATE YR MO PAID MM/YY":™£18)"%"£35)"/":™ä¤™"NEXT "F1$:™"DATE AMOUNT"F$F0$:™"MM/YY���/"&®™"STATUS AT /":™"AMOUNT NUMBER OF TOTAL TOTAL"S¸™¦9)"‘"F1$"S"F$F0$:™:™"PAID����DUE"›Âƒ24, 9,3,9,83, 9,14,5,83, 9,21,2,11, 9,24,2,11, 9,29,1,0, 9,34,2,11ã̃9,37,2,11, 14,3,2,11, 14,6,2,11, 14,9,9,83, 14,19,9,83, 14,29,9,83.Öƒ16,13,2,27, 16,16,2,27, 19,12,4,27, 19,19,9,83, 19,29,9,83, 20,3,2,27vàƒ20,6,2,27, 20,12,4,27, 20,19,9,83, 20,29,9,83, 24,2,38,0,23,2,38,0¶ê‡FT:†FC%(FT,4):�I²1¤FT:‡FC%(I,1),FC%(I,2),FC%(I,3),FC%(I,4)Áô‚:Ÿ1,3ÕþFS²1:FT²9:�1730ƒ"PAYMENT PERIODS ARE M, B, Q, S, OR A�"0ƒ"NEXT PAYMENT DATE BEYOND LOAN TERM!�"{ƒ"MONTHS MUST BE BETWEEN 1 AND 12�","ALL BLANKS MUST BE FILLED IN!�"Ã&ƒ"TERM DOESN'T MATCH PAYMENT PERIOD�","ENTER FACE VALUE OF LOAN�"ï0ƒ"ENTER INTEREST RATE AS % PER ANNUM�":ƒ"ENTER PERIOD ALLOWED FOR REPAYMENT�"GDƒ"PAYMENT PERIOD, E.G. M FOR MONTHLY�"…Nƒ"ENTER DATE LOAN ISSUED�","ENTER DATE TO BE EXAMINED�"®Xƒ"TERM INCONSISTENT WITH ACCURACY�"Ýbƒ"SHALL I PRINT AN AMORTIZATION SHEET? "ül†FE$(13):�I²1¤13:‡FE$(I):‚v–¥A(X)²0.01¬µ((Xª0.005)¬100);€–¥A(X)²µ((X¬100.)ª.5)¬.01NŠFP²1:SS²1:FK²1‹”™È(FR$,23)"�’PRESS F1’ TO CALCULATE, HELP’ FOR HELP"; ž�1440:‹F²63§1320¯¨FK²1:�1920ݲF$²FS$:FK²23:�1950:F$²FE$(13):FK²24:�1950ò»� X²1¤10:¡ A$:‚Xû¼¡ùA$Æ‹A$³±"Y"¯A$³±"N"§690CË‹PO²1¯(A$²"N")§PF²0:PO²0:LN²0:PG²0: 7:‰650XÐPO²0:‹A$²"N"§760gÚPO²1:�3000zø™"":‹PO²0§780·F$²" ":FK²23:�1950ö F$²È(FS$,10)ª"‚** CALCULATING **„"ªÈ(FS$,10):FK²24:�1950™"š":FK²1:�1920:‹P³±F§P²F:SS²1Q ‹SS²1¯P±²500000§�I²10¤22:FC%(I,4)²FC%(I,4)¯(¨224):‚„*‹SS²1¯P³500000§�I²10¤22:FC%(I,4)²FC%(I,4)°64:‚¬4FK²2:�1920:‹IR³±.01¬F§IR².01¬F:SS²1ç>FK²3:�1920:Y0²F:FK²4:�1920:Y0²Y0ªF­12:‹Y³±Y0§Y²Y0:SS²1HFK²5:�1920:�I²1¤5:‹F$²Ê("ASQBM",I,1)§860DR‚:F$²FE$(1):FK²23:�1950:SS²1:FK²5:FP²1:‰660Y\‹I±3§I²3ª3®(I«3)ff‹I²3§I²4yp‹N³±I§N²I:SS²1žz‹¶(µ(Y¬Nª0.0001)«(Y¬N))³1E«4§910Ì„FK²23:F$²FE$(5):�1950:FK²3:FP²1:SS²1:‰660ŽFK²6:�1920:DM²F:FK²7:�1920:DY²F:�1000:‹D²0§FX²6:‰990˜‹SD³±D§SD²D:SS²1S¢FK²8:�1920:DM²F:FK²9:�1920:DY²F:�1000:‹D²0§FX²8:‰990f¬‹D³SD§D²Dª1200{¶‹DL³±D§DL²D:SS²1¼À‹(SDªY¬12³DL)¯PO²0§FK²23:F$²FE$(2):�1950:SS²1:FK²3:FP²1:‰660ÞÊ‹(SDªY¬12³DL)¯PO²1§PG²0:‰2400èÔ‰1020ÞFK²23:F$²FE$(3):�1950::FK²FX:FP²1:SS²1:‰6602è‹DM³1°12³DM§DM²0:DY²0CòD²DY¬12ªDM:ŽRü‹SS²1§1050ŒFK²10:�1920:R²F:FK²11:�1920:E²EªF:FK²12:�1920:IP²IPªF«N0²N0ª1:DL²DLª(12­N):‰1160â‹P²0°IR²0°Y²0°SD²0°DL²0§F$²FE$(4):FK²23:�1950:‰650$N0²µ(N¬(DL«SD«1)­12)ª1:‹N0³1§N0²1..DL²SDª(12­N)¬N0:EE²P:II²IR­N:IP²0[8R²¥A((II¬P)­(1«(IIª1)®(«N¬Y))):N1²µ(N¬Y)”B‹¶(II¬P«R)³.05§F$²FE$(12):FK²23:�1950:FK²1:FP²1:‰660ÇL‹N0±1§�NP²1¤N0«1:RI²¥A(II¬EE):EE²¥A(EE«RªRI):‚äVE²P«EE:IP²¥A((N0«1)¬R«E)`‹(N1«N0)±0§�PP²N0¤(N1«1):RI²¥A(II¬EE):EE²¥A(EE«RªRI):‚QjRI²¥A(II¬EE):TX²¥A((N1«1)¬R«PªEEªRI):LR²RIªEE†t‹TX±²1000000§�I²14¤22:FC%(I,4)²FC%(I,4)¯(¨224):‚¶~‹TX³1000000§�I²14¤22:FC%(I,4)²FC%(I,4)°64:‚âˆF²N1«N0ª1:FK²20:�1950:F²P«E:FK²21:�1950ú’F²TX«IP:FK²22:�1950œDD²DL«12­N:‹DD±1200§DD²DD«1200W¦X²µ(DD­12«.001):F²X:FK²14:�1950:F²DD«12¬X:FK²13:�1950�°FK²15:F²N0«1:�1950:FK²16:F²E:�1950:FK²17:F²IP:�1950®º‹N0²N1§R²LR:RI²TX«IP:‰1240ÂÄRI²¥A(II¬(P«E))Ö΋N0±N1§R²0:RI²0ôØDD²DL:‹DD±1200§DD²DD«12001 âX²µ(DD­12«.001):F²X:FK²9:™"�":�1950:F²DD«12¬X:FK²8:�1950n ì™"š":FK²10:F²R:�1950:FK²11:F²R«RI:�1950:FK²12:F²RI:�1950— ö™"�":‹PO²1§�2280:SS²0:FP²1:FK²1:‰680Ò FK²24:F$²"TYPE IN ANY CHANGES & PRESS F1’ OR ":�1950 ! FK²23:F$²"JUST HIT F1’ TO ADVANCE 1 PAYMENT ":�1950!!¡F$:‹F$³±""§1300>!™"�":SS²0:FP²1:FK²1:‰670\!(FX²FK:FY²FK:‹FX±3§FY²FY«1n!2‹FX±6§FY²FY«1€!<‹FX±8§FY²FY«1¹!F™È(FR$,24)" ";æ!PF$²FE$(FYª5):FK²23:�1950:FK²FX:FP²1:‰660"Z™È(FR$,F0)F$"Õ";:�1410:™"É";+"d�F²1¤F1«1:™F$"Ý"È(FS$,38)"Ý";:‚O"n™F$"Ê";:�1410:‹F0ªF1³25§™"Ë";:Žg"xŽ:—2023,75:—56295,0}"‚�F²1¤38:™"À";:‚:ŽÀ"Œ™È(FR$,F0)¦F1)"©££��� ’  ’©����� ’  ß�����’ߤ¤";Æ"–Žá" � SCREEN INPUT CONTROL!#ªFL²FC%(FK,3):FZ²FC%(FK,4):™È(FR$,FC%(FK,1))¦FC%(FK,2)ªFP«2)@#´¡#1,F0$:‹Æ(F0$)²13§F0$²" "R#¾™"�";:F1$²"Ò"u#È�F²1¤50:¡F$:‹F$³±""§F²50:‰1500 #Ò‚:F$²F1$:F1$²F0$:F0$²F$:™F0$"�";:‰1480Ø#Ü‚:F²Æ(F$):F0²F¯127:‹F0$²"Ò"§F2$²F1$:F1$²F0$:F0$²F2$ó#æ™F0$"�";:‹F²133°F²63§Ž$ð‹F0²13§1640$ú‹F0²17§1640/$‹F0²19§�1710:PG²0:‰1450?$‹F0²20§1800O$‹F0²29§1870h$"‹F²27§—2025,0:™"“":€…$,‹F$²" "°(47³F¯F³58)§1610¨$6‹(FZ¯8)²0¯(F$²"."°F$²"E")§1610Â$@‹FZ¯1°F0²18°F²34§1460Ë$J™F$;ã$TFP²FPª1:‹FP±FL§1660í$^‰1460%h� FORWARD & BACK TAB%r‹F¯128§16804%|FP²1:FK²FKª1:‹FK±FT§FK²FS>%†‰1450T%�‹ FP±1§FP²1:‰1450m%šFK²FK«1:‹FK³FS§FK²FTw%¤‰1450Š%®� HOME & CLEARž%¸‹(F¯128)²0§1790©%Â�F²1¤9Ü%Ì™È(FR$,FC%(F,1))¦FC%(F,2)«1)È(FS$,FC%(F,3));:‚ö%Ö�F²10¤22:‹F²18°F²19§‚0&à™È(FR$,FC%(F,1))"š"¦FC%(F,2)«1)È(FS$,FC%(F,3))"’";:‚m&ê™È(FR$,23)"�’PRESS F1’ TO CALCULATE, HELP’ FOR HELP";¦&ô™È(FR$,24)" ";·&þFP²1:FK²FS:ŽÍ&� INSERT & DELETEÝ&‹F¯128§1840'‹FP±1§™"�";:FP²FP«1:F0$²" ":F1$²"Ò"'&‰1480?'0F$²"":‹FP³FL§�F²FP¤FL«1:¡#1,F2$:F$²F$ªF2$:‚l':™È(FR$,FC%(FK,1))¦FC%(FK,2)ªFP«2)" "F$;:v'D‰1450Ž'N� CURSOR FWD & BACK¢'X‹(F¯128)²0§1610º'bFP²FP«2:‹FP±«1§1610Ó'lFK²FK«1:‹FK³FS§FK²FTê'vFP²FC%(FK,3):‰1450û'€� READ FIELD%(Š™È(FR$,FC%(FK,1))¦FC%(FK,2)«1);:F$²""V(”�F²1¤FC%(FK,3):¡#1,F0$:F$²F$ªF0$:‚:F²Å(F$):Žj(ž� DISPLAY FIELD—(¨FL²FC%(FK,3):FZ²FC%(FK,4):‹(FZ¯1)²0§2110º(²F$²Ä(F):‹0³²F§F$²É(F$,Ã(F$)«1)à(¼�F0²1¤Ã(F$):‹Ê(F$,F0,1)³±"E"§2020 )ÆF0$²É(F$,4):F$²È(F$,Ã(F$)«4):‹FZ¯4§20305)Ћ¶(F)³1®(«((FZ¯224)­32))§F²0.0:‰1970Z)ÚF$²"*":�F²2¤FL:F$²F$ª"*":‚:‰2110g)ä‚:F0$²""Š)î�F²1¤Ã(F$):‹Ê(F$,F,1)²"."§2050š)ø‚:F$²F$ª"."Â)F1²(FZ¯224)­32:�F2²1¤F1:F$²F$ª"0":‚à) ‹Å(Ê(F$,FªF1ª1,1))³5§2080*F²(Å(È(F$,FªF1))ªÅ("1E-"ªÄ(F1)))¬Å("1"ªF0$):‰1970&* ‹FZ¯8§F1²«1<**F$²È(F$,FªF1)ªF0$d*4‹Ã(F$)±FL§F$²"":�F²1¤FL:F$²F$ª"*":‚”*>‹Ã(F$)±1¯É(F$,1)²" "§F$²È(F$,Ã(F$)«1):‰2110µ*H‹Ã(F$)±²FL§F$²È(F$,FL):‰2150Û*R‹FZ¯2§F$²È(FS$,FL«Ã(F$))ªF$:‰2150õ*\F$²F$ªÈ(FS$,FL«Ã(F$))+fF0$²"’":‹FZ¯16§F0$²""#+p‹PF²1§˜7,F$;:ŽQ+z™È(FR$,FC%(FK,1))¦FC%(FK,2)«1)F0$F$"’";:Žl+„� PRINTER PAGE HEADING¨+ŽŸ7,PD,7:˜7,""¦26)"ÍORTGAGE ÌOAN ÃALCULATOR"¦20)"PAGE"PGÝ+˜˜7:˜7:˜7,""¦13)"ÐRINCIPAL"¦10)"ÁNNUAL ÒATE"¦11); ,¢˜7,"ÔERM":PF²1:˜7,""¦12)"$";:FK²1:F²P:�1950<,¬˜7,""¦12);:FK²2:F²IR¬100:�1950:˜7,"%"¦14);m,¶FK²3:�1920:�1950:˜7,"/";:FK²4:�1920:�1950:˜7¬,À˜7:˜7:˜7,"ÐAYMENT ÄATE ÁMOUNT ÅQUITY ÉNT";ð,ʘ7,"EREST ÔOTAL ÔOTAL":˜7,"ÎUMBER ÄUE ÄUE";1-Ô˜7," ÄUE ÄUE ÅQUITY ÉNTEREST"_-Þ�A²1¤78:˜7,"=";:‚:˜7:LN²10:PG²PGª1:PF²0:Ž}-è� PRINT TO PRINTER FORMAT•-ò‹PG²0§PG²PGª1:�2180Ô-üPF²1:YY²µ(DD­12«.001):MM²DD«12¬YY:PE²R«RI:¡A$:‹A$²"†"§2400ð- ˜7,"";:FK²15:F²N0:�1950'. ˜7," ";:FK²8:F²MM:�1950:˜7,"/";:FK²9:F²YY:�1950E. ˜7," ";:FK²10:F²R:�1950e.$ ˜7," ";:FK²11:F²PE:�1950….. ˜7," ";:FK²12:F²RI:�1950¤.8 ˜7," ";:FK²16:F²E:�1950Ç.B ˜7," ";:FK²17:F²IP:�1950:˜7å.L LN²LNª1:‹LN³(LP«5)§PF²0:Ž/V �A²1¤5:˜7:‚: 7:�2180:Ž*/` �A²LN¤LP:˜7:‚: 7:PF²0:PO²0:�1730:‰6506/¸ ‹LN±0§Žk/ ™:™"READY PRINTER AND PRESS RETURN‘":¡ùA1$:Ž)¯CA³36§™"";:BF²0:�}+°Ž +º™Ê(L$,CAª1,1)"<’�";:CA²CAª1:޽+ ™"ÉNVALID ÌINE ÎUMBER’"Û+¥Û7:Ú1,800,3:�KK²1¤500:‚:Žî+‹(HLª1)²±THL§Ž ,™Ê(L$,CAª1,1):A$(HL)²L$1,LN²HLª1:T