þþi(dX;SAVE#D:BCALC.PT3nX;èïíå ðïó®x„HOME †CLRSCN‚ †RSTCRSŒƒHM2 …DRAWH– …DRCOL ƒHM3 †REFSCRª …SHWT2´ !…IVCRS¾X;òåóåô ãõòóïòȆRSTCRSQ>Ò P„FCOLÜ P„FROWæ P„SROWð P„SCOLú„CRS2P…CURRW P„CRSYQ> P„CRSX" %„FCOL,,6 O„COLW8@ P…CRSENJ:TX;óèï÷ óôáôó^†SHOWST †CLRTXTh%>r ƒSJAQƒSTT8|P†TXTWIN8†1IƒSJAš%> ¤ ƒSJNQƒSEG8®P†TXTWIN*8¸1ÂIƒSJNÌ X;æòåå íåíÖQ>à;ê S…ENDATôPƒFR0þQj S…ENDAT PƒFR0 ƒIFP& „FASC0%>:„FMLPQ@…INBUF7D5NM>X …AS2ICbP†TXTWIN8l3v7€ I„FMLPŠX;æéìå îáíå”%>ž„FSLPQ…FNAME8¨ R>ƒEOL² F„FSLL¼ …AS2ICÆP†TXTWIN8Ð3Ú)>ä H„FSLPî „FSLL ƒGCHø !†CLRTXTX;óåô ãòïóó òåæ †SETREF †ST2BF1 †FINARG EƒSO2* †GTCLRW4EƒSO2> †FINARGH$>R„S9LPQƒBF18\ PƒBF19f R>ƒEOLpFƒS8Pz3„2Ž H„S9LP˜ ƒS8P$>¢ ƒSFRQƒBF19¬ …AS2IC¶ P†REFTAB9À0ÊIƒSFRÔ Q…COLNUÞ P†SETCOLè Q…ROWNUò P†SETROWüƒSO2:X;óèï÷ òåæó†SHWREF †CLLIN3$>$ƒSWQQ†REFTAB9.P†TXTWIN98 Q†REFTAB9BP†TXTWINy9L0VIƒSWQ` Q„FROWj,t O…CURRW~ …STRADˆ ƒXRA%>’ Q@‚LL7œR>ÿ¦FƒNRF° R†SETCOLºFƒGRFÄDƒURF΃NRF!ƒSO7;;try col؃URF †UP1COLâ!ƒXRAì ƒGRF%>ö Q@‚LL7M> FƒTXT;;textR>HƒNRF( †LL2FR02 „FASC<%>FƒSO6Q@…INBUF7P5ZM>d …AS2ICnP†TXTWIN|8x7‚GƒSO7Œ3–)> HƒSO6ª ƒTXT%>´ Q@‚LL7¾ P„ASAVÈ …ADDDTÒ%>Ü ƒSO8Q@‚LL7æ …AS2ICðP†TXTWIN|8ú3 )„ASAVFƒSO7)>"HƒSO8,X;îï÷ óèï÷ ãïì6ƒSO7Q†SETROW@ …STRADJ Q„SCOLTP‚TM^ ƒXCL%>h Q@‚LL7rR>ÿ| F„NCOL†R‚TM F„GCOLš D„UCOL¤ „NCOL:®„UCOL †UP1COL¸!ƒXCL „GCOL%>Ì Q@‚LL7ÖM>àFƒTTX;;textêR>ô H„NCOLþ †LL2FR0 „FASC%>ƒSK2Q@…INBUF7&50M>: …AS2ICDP†TXTWIN8N7XGƒSK3b3l)>vHƒSK2€ ƒTTX%>Š Q@‚LL7” P„ASAVž …ADDDT¨%>² ƒSK4Q@‚LL7¼ …AS2ICÆP†TXTWIN8Ð3Ú )„ASAVäFƒSK3î)>øHƒSK4ƒSK3: X;óèï÷ äáôá ôùðå…SHWT2$„SCOL  Q„SROW* †LOCCEL4DƒSKB>Q>H P„DTYPR H†SHWTYP\ ƒSKB%>f Q@‚LL7pM>z P„DTYP„ !†SHWTYPŽX;ìì £ ² æò°˜†LL2FR0 …ADDDT¢$‚LL¬ %‚LL¶!…FLD0R;;auto retÀX;ãìåáò ìéîå³Ê†CLLIN3%>wÔQ>ÞƒLP3P†TXTWIN8è3ò)> üHƒLP3 : X;óèï÷ åîô® ôùðå X;0=t,1=#,2=f$ †SHWTYPQ„DTYP. T?8 T?B T?L >V %>` ƒSTGQ†TEXTYP9j P…SCMEM8t 2~ 3ˆ )>'’ HƒSTGœ :¦ X;äòãôòù° ƒDIR †CLRSCNº Q> 1Ä P†DIRTXTÎ †ST2BF1Ø †FINARGâ E…NDARGì P†DIRTXTö …NDARG†CLOSE  Q> P„VCNT Q> $> ( P…ICCOM92 Q>4†DIRTXT< P…ICBAL9F Q>5†DIRTXTP P…ICBAH9Z Q>d P„AUX19n Q>x P„AUX29‚ „CIOVŒ I…DIROK– …GENER †DSKERR;;åòòïò  !ƒHM3ª …DIROK$> ´ Q>¾ P…ICCOM9È Q>4„LBUFÒ P…ICBAL9Ü Q>5„LBUFæ P…ICBAH9ð Q>ú P…ICBLH9 Q> P…ICBLL9 „CIOV" I…PRDIR,  ƒGCH6 †CLOSE @ !ƒHM3J …PRDIR †SCNPOST $>^ %> h …DIRLPQ„LBUF9r R>ƒEOL| F„NXDR† …AS2IC P@L7š 3¤ 2® !…DIRLP¸ „NXDR#„VCNT Q„VCNTÌ R>Ö H…DIROKà  ƒGCHê †CLRSCNô Q>þ P„VCNT F…DIROK X;çåô óãòî ðïó †SCNPOS%„VCNT& Q„Y40L80 PL: Q„Y40H8D PLN :X X;óáöåb „SAVE †ST2BF1l †FINARGv †GTFILE€ †CHKDEVŠ D…FILE?” †DEVERR%>¥ž !…GENER¨ …FILE? ‡FILEXST² D…DEVOK¼ !„HOMEÆ …DEVOKQ>;;writeÐ %> ;;get recÚ H„DOITä „LOAD †ST2BF1î †FINARGø †GTFILE †CHKDEV E†DEVERR Q>;;read %>;;input* „DOITPƒDM6;;keep em4 'ƒDM7> †CLOSE H $> R QƒDM6\ P„AUX19f Q>p P…ICCOM9z Q>4…FNAME„ P…ICBAL9Ž Q>5…FNAME˜ P…ICBAH9¢ Q>¬ P„AUX29¶ „CIOVÀ I„RWOKÊ !…GENER;;åòòïòÔ „RWOK$> Þ QƒDM7è ?ò P…ICCOM9ü Q>4„COLW P…ICBAL9 Q>5„COLW P…ICBAH9$ )>;;inp?. H„RITE8Q>ÿB P…ICBLL9L P…ICBLH9V H„SINP`„RITEQ…ENDATj;t S>4„COLW~ P…ICBLL9ˆ Q…ENDAT’ S>5„COLWœ P…ICBLH9¦„SINP „CIOV° I„IOOKº )>ˆ;;EOF?Ä F„IOOKÎ!…GENER;; åòòïòØ„IOOK†CLOSE âQƒDM6ìR>öFƒWRF$>  Q>4„COLW, O…ICBLL9( P…ENDAT2 Q>5„COLW< O…ICBLH9F P…ENDATP ƒWRF!„HOMEZ X;çïôïd„GOTO †ST2BF1n †FINARGxEƒQAB‚ †GTCLRWŒEƒQAB– Q…ROWNU R>/ªEƒQAB´ Q…COLNU¾R>7ÈEƒQABÒ …IVCRSÜ †CLRSCNæ Q…COLNUð P„FCOLú P„SCOL Q…ROWNU P„FROW P„SROW"Q>;;4 crs2, „CRS26!ƒHM2@ƒQAB:J X;óôò²âæ±T†ST2BF1%>r^ƒSO1Q†STRING8h PƒBF18r1|IƒSO1†:X;òåãáìã îï÷š…ARECL †RECALC¤ !„HOME®X;æïòãå ôåøô¸ …FORCEQ> P†FRCTXTÌ:ÖX;ëéìì ãåììà†KILLCLQ„SCOLê>ô Q„FROWþ, O…CURRWP‚TM †LOCCEL& D…LCELL0 :;;îïîå: …LCELLQ‚TMD †DELTCLN …IVCRSXQ>bPƒSPXl Q…CURRWv P„VCNT€ Q„SROWŠ †REFROW” …IVCRSž:¨ X;æéîä áò粆FINARG%>¼„F8LPQƒBF18Æ R>ƒEOLÐ F…NOARGÚR> ä F…FSPCEî3ø)>  H„F8LP  …NOARG;:  …FSPCE3*„FARGQƒBF184 R>ƒEOL> F…NOARGH R> ;;spacR H…GTARG\3f)> p H„FARGz F…NOARG„ …GTARG,Ž:˜X;çåô æéìå îáí墆GTFILE$>¬„F9LPQƒBF18¶ P…FNAME9À R>ƒEOLÊFƒFGDÔ3Þ2è H„F9LPòƒFGD:üX;ãèîç ãïì ÷éäôè…WIDTH †ST2BF1 †FINARGEƒNOW$ †GTCLRW.EƒNOW8 #…ROWNUB Q…ROWNULR>VDƒNOW`R>!jEƒNOWt %…COLNU~ P„COLW8ˆ †CLRSCN’ …DRAWHœ †REFSCR¦ %„FCOL° '„SCOLºQ>Ä P„CRSXÎ,Ø O„COLW8â P…CRSENì …IVCRSöƒNOW:X;óèï÷ á ãåìì§ó ãïîôåîô †SHOCEL$„SCOL Q„SROW †LOCCEL(DƒUAA2 :;;none<ƒUAA%>;;formatF Q@‚LL7PPZ 3;;lengthd Q@‚LL7n P„LENGx3‚ Q@‚LL7ŒM>–HƒUAB ƒUAG …ADDDTª%„LENG;;text´1¾ ƒUAHQ@‚LL7È P†STRING8Ò1ÜIƒUAHæ ƒUAEQ>ÿð P„XPOSú …DRWIN :;;äïîå ƒUABR>FƒUAF" …ADDDT,$‚LL6 %‚LL@ …FLD0RJ „FASCT%>^ƒUADQ@…INBUF7h5rM>| P†STRING8†7GƒUAEš3¤HƒUAD® ƒUAFQ„LENG¸;ÂS>Ì P„LENGÖ!ƒUAGàX;åäéô íïäåê …EDITMQ>ô P„EDITþ †SHOCEL †INPUT26Q>& P„EDIT08: D„EOOKD:N „EOOK7X7bQl P†FORMATv !„GTIN€X;æïòíáô á ãåìì ïò ãïì튄FORM †CLRTXT” %„SCOLž Q…FMCOL8¨ P†FORMAT²$>¼ƒFPB0ÆGƒFPXЃFPAQ„FMES9ÚP†TXTWIN9ä(>îDƒFPBø QƒFMA9P†TXTWIN*9  QƒFMB9P†TXTWINR9  QƒFMC9*P†TXTWINz94!ƒFPB>ƒFPX!†SHOFRMHX;R ƒFPCQ‚CH\R>ÿfFƒFPCp$>ÿz&‚CH„R>ŽHƒFPD˜ :;;äïîå¢ ƒFPD$>¬ƒFPER…JSKEY9¶FƒFPFÀ0ÊIƒFPEÔGƒFPGÞƒFPFQ†FORMATèM>üò P„ASAVüA L„ASAV P†FORMAT !†SHOFRM$ƒFPGR>:;;D.HƒFPH8 Q†FORMATBN>L P†FORMATV !†SHOFRM`ƒFPHR> ;;,jHƒFPJt Q†FORMAT~N>ˆ P†FORMAT’ !†SHOFRMœ ƒFPJ$> ¦ƒFPKR„NKEY9;;dec places°FƒFQDº0ÄIƒFPKÎGƒFPC؃FQDAâ5ì Q†FORMATöM> P†FORMAT 7T?T?(T?2T?< L†FORMATF P†FORMATPX;Z†SHOFRMQ†FORMATdM>n>x QƒLCR9‚P†TXTWINŒ Q†FORMAT–M> V?ªV?´V?¾>ÈQ‚YN9ÒP†TXTWIN;Ü Q†FORMATæM>ðV?úV?>Q‚YN9P†TXTWINc" Q†FORMAT,M>ð6V?@V?JV?TV?^>h Q„SDEC9rP†TXTWIN‹|!ƒFPC†X;çìïâáì æïòíáô†GLOBAL „FORMš %„SCOL¤ Q†FORMAT® P…FMCOL8¸:ÂX;æïòíáô á ãåììÌ…FORMCQ„SROWÖ $„SCOLà †LOCCELêDƒECLô:þ ƒECL „FORM%> Q†FORMAT P@‚LL7& $…CURRW0 &„VCNT: Q„SROWD †REFROWN%„SCOL;;restoreXQ…FMCOL8;;glob. formtb P†FORMATl !…IVCRSvX;òåãáìã æìá瀅RONOFQƒONFŠN>”PƒONFž>¨%>²ƒRPPQ…ONOFM9¼ PƒSEG8Æ2Ð3Ú)>äHƒRPPî:øX;æìéð òï÷¯ãïì æìç…RCFLPQ…RCFLG N> P…RCFLG >*%>4ƒRHKQ…RCMES9> PƒSEG8H2R3\)>fHƒRHKp:zX;äéóë åòòïò„†DSKERR'„YSAVŽ †CLOSE ˜ %„YSAV¢'ƒFR0¬Q>¶ PƒFR0À ƒIFPÊ „FASCÔ%>ÿÞ …ERLPA3è Q@…INBUF7ò5üM> …AS2IC P„DERM87$ I…ERLPA. †CLLIN38%>B…ERLPBQ„DERM8LP†TXTWIN|8V1` I…ERLPBjQ>ÿtP‚CH~ …GAKEYˆ:’X;Number Format SubroutineœX;for B-CALC¦X;ÆÏÒÍÁÔ ÂÙÔÅ 1°"X;bit 4-7: Places after DecimalºX;bit 3: Dollar Sign FlagÄX;bit 2: Comma FlagÎX;bit 0-1: L/C/R JustifyØX;â†FRMNUM%>ÿì „:FM03ö Q@…INBUF7 P„NUMB8  I„:FM0%>Q> 0(„FN.1P†STRING821< I„FN.1FQ> $P P†STRINGZQ>4†STRING dP‚ILnQ>5†STRING x P‚IL‚X;ŒQ†FORMAT;;get FM byte–5 M>ðªV?´V?¾V?ÈV?Ò P†TORITEÜ7æX;ðM>;;commas?úH…FNCOM;;yes%>ÿ „:CPL3 Q@…INBUF7" P@‚IL7, I„:CPL6„:FM1!…:DSGN@X;éîóåòô §¬§óJ …FNCOM%>ÿT „FM:13^ Q„NUMB8h G„FM:DrR> .| H„FM:1†1 „FM:D'ƒSVYš$>¤ „:LP1Q>® P„FCNT¸„:LP2Q„NUMB8ÂM>Ì P„LBUF9Ö0à1êGƒ:LVô "„FCNTþ I„:LP2 Q> , P„LBUF9 0& I„:LP10 ƒ:LV2: %>D „:LP3Q„LBUF9N P†STRING8X 3b 2l (>v H„:LP3€ $ƒSVYŠ Q„NUMB9” I„:NNVž 1¨ Q†STRING8² L>€¼ P†STRING8Æ H…:DSGNÐ X;Ú „:NNV2ä Q„NUMB9î P†STRING8ø G…:DSGN!3 ! H„:NNV!X; !…:DSGNQ†FORMAT*!M>4! F†:AFTER>! Q>4†STRINGH!P‚ILR! Q>5†STRING\! P‚ILf! X;èáîäìå ðìáãåó áæôåò äåãéíáìp!X;óåáòãè æïò Åz!†:AFTERQ>„!PƒSCI;;flagŽ!%>ÿ˜!ƒHXA3¢! Q†STRING8¬!G„:AF2;;none¶!R> EÀ!HƒHXA;;kot yetÊ! X;got expÔ!#ƒSCI;;set flgÞ!1;;invs prev bytè! Q†STRING8ò!L>€ü! P†STRING8"$>ÿ;;bck to E"ƒHXB2"3$" Q†STRING8."58"M>B" P„SVEX9L"Q> 0V" P†STRING8`"7j"IƒHXBt" X;show end~"2ˆ"&ƒSCI’" Q>ƒEOLœ" P„SVEX9¦" „:AF2%>ÿ°"ƒ:AF3º" Q†STRING8Ä"Iƒ:TPÎ"M>Ø" P†STRING8â"3ì"Q> .ö" P†STRING8#'ƒSVY #!ƒ:JM# ƒ:TPR> .#Hƒ:AF(#'ƒSVY2#ƒ:A23<# Q†STRING8F#Iƒ:A2P#M>Z# P†STRING8d# ƒ:JMQƒSVYn#,x# O†TORITE‚#?Œ# Q†TORITE–#Hƒ:EL #1ª# ƒ:ELQ>ƒEOL´#P†STRING8¾#X;chk for EÈ#QƒSCIÒ# F…CKMINÜ#$>æ#ƒHXCQ„SVEX9ð#P†STRING8ú# R>ƒEOL$ F…CKMIN$2$3"$HƒHXC,$X;ãèë æïò ¤­¬6$…CKMINQ†STRING@$R> -J$ H†FRMTXTT$Q†STRING^$R> ,h$ H†FRMTXTr$%>|$„MILPQ†STRING8†$P†STRING8$ R>ƒEOLš$ F†FRMTXT¤$3®$ H„MILP¸$X;çåô ìåîçôè ïæ îõíâåòÂ$†FRMTXT%>ÿÌ$ƒ:L13Ö$ Q@‚IL7à$ R>ƒEOLê$Hƒ:L1ô$'ƒSVYþ$X;ìåæô¯ãåîôåò¯òéçèô êõóôéæù% „:LCR$>%Q> %ƒ:L2P„LBUF9&%00%Iƒ:L2:%X;D% Q†FORMATN%M>X%>b% F„:HAVl%X;òéçèô êõóôéæùv%0€% H„:CENŠ%%‚TM”% Q„COLW8ž%;¨%SƒSVY²%Iƒ:HV¼% ƒYUA$>Æ%Fƒ:LCÐ% X;ãåîôåòÚ% „:CEN%‚TMä% Q„COLW8î%;ø%SƒSVY&Iƒ:C1 &N>ÿ&V? &?*&!ƒYUA4& ƒ:C1V?>&ƒ:HV>H&X;ãïðù ôèå îõíâåòR& „:HAV%>ÿ\&ƒ:LC3f& Q@‚IL7p& R>ƒEOLz&Fƒ:LB„& P„LBUF9Ž&2˜&Hƒ:LC¢&ƒ:LBQ>4„LBUF¬&P‚IL¶& Q>5„LBUFÀ& P‚ILÊ&:Ô& ƒSCI Þ& „SVEXè& ƒEOLò&X;ãèåãë æïò Äºü&†CHKDEVQ…FNAME'R> D' H…WRDEV' Q…FNAME$' …DVNUMR> :.' F„AYOK8'R> 8B' F„MYOKL'R> 1V' D…WRDEV`'R> 4j' E…WRDEVt' D„MYOK~' „AYOK,ˆ':’' …WRDEV;œ':¦'„MYOKQ…FNAME°'R> :º' F„AYOKÄ' H…WRDEVÎ'X;ãèåãë éæ æéìå åøéóôØ'‡FILEXSTQ>â'P†TXTWINì' †CLOSE ö'Q>$;;unloc( P…ICCOM9 ( Q>5…FNAME( P…ICBAH9( Q>4…FNAME(( P…ICBAL92( „CIOV<(Q…ICCOM9;;stat?F(5P( †CLOSE Z(7d(R>n( F„FYESx( „OVWR,‚(:Œ(„FYESQ>5†REPMES–( $>4†REPMES (%>ª( †PRNTTW´( ƒYNKQ‚CH¾($>ÿÈ( R>+;;yesÒ( F„OVWRÜ(R>#æ(HƒYNKð(&‚CHú(;;;no):