ër-READ ME pàE BZS,Ý#ECLIPSE BZS1,×This Library file contains two BASIC programs that will perdict the eclise of both the Moon and Sun. The file named E.BAS is the original program as presented in ASTRONOMY November 1986. The second file named ECLIPSE.BAS has been modified by Mark D. Broussard to run on IBM PC compatible BASIC. Both programs will run under CP/M-80 2.22 BASIC Version 5.20 or higher. Mike Owings  & +€#€" €!  ! €€"$! $!"vþE.BAS! Œ‘š $$R0’P)‘EÄ" N‚†0H<& H QÁˆÊ … „aÔÜa9 ÊfódÌ@E1› '™”@P9L†“ÐÞr D3yÀòr4™ÍIMʤ2ÑÄr8 G‘6fkÍ“¡”Úa7 ­•3¥ÀÜ 4Þ¢å2IF­ F•Ùd¸¬e9Í&ûÐÔ])cÄq@^MŽ Ã,�È@s<œîÛª@„áäT#©Šzs4Qow¨ÁP¤O'É¥š`€œo;\LX»ˆm¨ÁÉÆÚÙl“7ç¤Rq¾†V :M¦SžZˆ ¸œ6�ꟃ¹ÞðöC‘†�  ÎÙ¼@g2ÕÌfQ¹ïFƈtW¨eIÙÔ� “!Ž^”�€pUuÌgá¶´3s‚Àn~ÒpåQ „ä¼EÅ0 X CТ4 âÀ) Da$XŽc°¤) £´q)ŠD”(TBP¡… BÁTR YHS%`¦HGݧÀ=�¼1gWQÕ@€€ccÜAÉWQ�Dwæ·ÁF\Ç9!“„ô. Ü4 C0È9 ƒPŽHW!HI…@€:) J”¥©RHa É²€×ÈUW{F!Èo…—È$ ¢�aOÅQ ¤z¶"v†:„ œo‚äeNjj¢ª†UÖ¤‡Bq�o ä‡L ¬+*ÒŠk$ˆ,Y ƒÑd% Â�O c ÚW’"Š~»1Õ8\¬lLFq�{Çù`™&H 0GÄK�íеaAdT .ˆC€×GİÌ=D(ÌK�¤ K‘0&LI‹°ñ�/ÄÃÜL+ p*9ÚP¦ÂÔΩ&« nš‡QÁ”RÆ'ÅkeïTÊø°*{!1ÀÌ> ¥p€A„M8LÂ@ô" ¤ ɲ€ƒ½H*Äq;— Í¬§ó@ƒGNTÑ„dšƒ½¡Ýt™¬kÀ«”‡sò@ƒ6Ù¢¥{ŸË{ßom'µ4Ýg[„À‹aÉò›{RNµ‘d·°¾ Ácù İËiÚöÜ ë2¹’¶r°ôq†knÛ¾ñP]åÍ–†õÈlYÞѸ,â†ö?ÍLÆvR¼VñÖrï%ä…sš¸±±Ü<••g|&·íWžŸÃ{TNñ“ÄÐ÷pZÐ2º .A(`jsŒè� Ì‚¦2 D€p0@¼ ‘.€Ü"‚Ð`  p^nñG? z‹‘‚2É·E=ß�*OÎñ¸„׿WP0QPƒ6 �À1Àå2Áˆ Ù” ðÆ &Zd‘ Ö AÀ /¨µ„ÄbŒá|&Z‘N°‚ïXF~`È™ r �£úh c¦k#H6ˆµ@¨%Ð �ÄF¦~6D¸3âx4]qŽEh° #n5„BÆ8¾G«Û!Nýx/r‚—ƒë/Jùy,(Ù�6%2“Â|Pq�’)ô�† îC¸h&å7PÚqŠXp&e^OÉ’zñðy’,ÂW@zœƒÝ@HR^=@A/äÚ½WòEO ˆ ¸501³¨h˜À6³ƒ Èð7�P>Æ`j bX7‰ÒE¸Íp{5ç4è�¥ý¶%lr -Pðæy…HêAaìDˆÉ?H·BŠ m/k SÒ~P[©Kníä:ÌR—ë’iFH¹dXæã›s­Ž{Ï–¥$PXJ ð��™ðh M`2 ® ?°säZëWH àIy š“hr(ˆ@Ê¡0Þƒ a/Ž(0¡Ê-*$Àd#‡8ƒа�ßìD”"}ÍÈ‘gì$  ¦sC0bÚTˆ(v–®ú¾jüu0ÓŽ¸¶Èµ9¡Ýp­NÂ-UÃ'^+Ôv’Uúµ‚¸µB‚„±¯ÈØ` ”u‰  ‚Kì$U\šÓb|Õú¹=©¥3n¬MvÝ@5.Œi Úú¸µ* l@a¨2Ò’ WiÿWÅ-dÅ•WZÖVjÖ7ºxxkY•wGvt=�¶R”„01„S§äÅI@h²Å]T©zbÈG4Èb<à9x1¡ƒÐI$è`äè…óq�Èn-¨_�¸+Aa�è_‚Oa±`†¨G‚fë‡Bk‡xTJ–¨<`n\ÿ‡ÈG;RÞ†W@Q'$� €Hcˆ8…ƒh ‡yÀTp(ˆ€%tX‹„A)‹A‰‡28‘FˆÍ(âš)(´4ÀNU@"ÀCá�\puSÍÆ3Ò*‚tmŽ@Mçg ;@$‹Cq�6€R@(€C.0$‹³WŒç=‹B"4Ø÷ C9È=†èFÐ2Rp �€E�·ê†èÈ�ò �s™Ù68Ÿ�òë†Ù †èk¢ûFùu•ú_Ó!ö&ÈàQ@0c�'†ódaF†ÈœaÆ“¡“2€D“¨rb÷M•RÀ/4¶u¨¦ù:¨s¶6RÐnø{v‘.c¹^vñ[7Uc°My:�b,Œ8ŃÐNŒA�c¤—E“©m§é60T™@o”À gZ9ÈB”`BxpCxa€U5AH—ÇÇéP™ƒ9…†Ù‰“§œ&È£‡gÐ]7þj€aô½¹OIg[Ó½ÃClk±5Uk�(w€Y¦»2Ð)N�'S�ÖÍQqÒ3w¯?‰Œ—‘½è=™3\•š°/—ù�™€r|É­~b,m¨ œéЗÙÒ�IQ�™ÛT(8Ä9?ƒòƒ‰‘…uÐEBTéÀbæìŠ˜« _dÍ'ë 7b•^RÔ–ey–™­ °T1H¹ry·m©Êƒ",‹Ð15„‰4è¾ è<~¨‘7˜h�S‘†tŒ‹h€ê™)ã PKʘ'cž„’qiq)@Sž³ô¢˜Ï‰a`yñMòŸçMŠ��ŸÈ­×2Yã™0+9À(¤p)£yóŸPRŸzMŸ–š„¸M„úG'dŸ‚øy*Å9[‘!Ks‡Ðpvt¸•úVO£ØpM¹Œy)z"òƒQ͆³My( /—é€LÁ0)ÚŒhm.ˆpa—QÖÐ6: y!Í(葤:Ža™‡(8$©3q�1£:‡/iÚÒ"—S.©:cº—©5ʤð¨é"©æxkª0P¦öÆ :ˆ™‘×ú xQ×9u¢JšŸ Y¥²ƒ•YI!GàJ’Taà=ÓŠÆû(9ó s@(’6­bL‘u­‘×" FðR‹j:‰Ùpv9%¢N#`S›P(r"Nº<P)A ¹AŒ�QN·PX)2NyžnÆø­QÝ'jØÃÍÚÝ ¨k"Úï¯Н0% ¨Ê8ÄYûÖÕ2RN‹Û%#b›„è„%�(¯‚=³ 3Û5¯„è¡Îzö˜6,{%›Ð=³›4¯{´ž$ÒO´RásK0³$G³ËLÛI¯ûK›à³ò< ª¢´KFsÛH) (³;[³kL ªª°» ²+)¦‘ ,ÚçUGAöcB%¦táHÛˆšƒ¢jƒ6µ ª´2O¯ˆ gI’²ÊøÛO¶²=gB'§ò,¹Jø§«‹¹[“¹?°4"z�¶úñ"t­¬â'”� ²'­ hèÁWä�rÇ*•Dz"zà°�ºñ��)²™)r“)[É"w„¼“a1es#À"µëEEð4· r™è!�B“Týp"EGIûÕtô0#ûï¿ �D%� 2¿€D;që¾0  TšnLûì]`�xñ™2Hn;Æ)€"×Ôñ–p�Èñ{Ð;9ÁÂ')Û—·R€$À>€xš ‘“ÀÁGÖo¡#œ5¬ÀwÝqì~Ð~&$Â0�;ϾR‘¾|J‘iuS��#ëï�fÀâž¾;˼pT½)¥`P­AAK}±:¦l?€5(C^�i0š‹¤)Ü8;«*Õ’Õî»StªyR­9*¼`Àâ ÀCëçÁ1•R±à«Ä¶§—¾à#«ï¨Û»”rÀ,¹K`Ç;ЬŒiÆÙ¬™‡FX™FXkÈæÂì†È�÷\�0¾ü‘<“ÀË,%|•²Ç %Ü"ĸ*!ÉòÔ¢VFX“F\,Ä,¨�rñg"s­Ñ#¬±É)ôËRO�)Ë‚OƒnFZ™Ì§F\TÌœDÀ:†Ðt|‡AàÁŒÔË<ÖͲPrÌóLÞS›âÎ\ƒÊ‘zÂÅAàÊÖÆÊüðËLó|Ú¹@6Ï‚"Ê|æÈ\þÐvÈ·n�Ï+”sÜóp"]¦œrFX¡·Eï*X]¦l{±1ë%ÜϼEÒ|Ï|Ñ ÑŒ”Ém ²ÌšŒë™ËÛ Ì?Œì„8΢‚­Ê\¾L¨8¬•üF0Ó Ó\×%¼óË¢­…x>\ÍAÎ(jÔ€ È+çÔ¹ýLÍN£=ÎàÕ=Ó‚OÐÂ|ÎKÇÖÔÒ|ìÎà Ö½ÖÕsÍ⮬Ùö'Æ.Çeð „Ï'ã8µ…í\Õýs�ˆK|b½lÒ×›,†í{%|Š (…Ñ«Þ!<ÕéáIL"�ÊkÌ*Ù;ÐüüA´*IÇ¡•¿-µ¿Hò¿{ù¿»ý(ÛªØ «ºÐ�¢¶»©M5R9ý<¡°\b«¼ (ÛÀÍÃ#½H(Ó–�ˆÚ½L«±´Y,QKN€:�à(ÙݘÛÈqp°tÝì Þ)HñÛq+kŠe�%Ç, ߘdŒ=+lo*Ù®)ÙÞ­ÜÞáA¾‘g@­ä�-öœ+4àDß­üßîèE¢ ;Ò�2 ßP=Œ7áP%âˆáÒ/gJ}àWæÞœAù’©8�s!p ÀLìyR<8ß ]'ß0;9‚�)å)8ù�¸ý€SZ¡ÉÍâ…˜ÎOÂL&ƒX ƒƒ˜ÂS]€Žw\âEÞ“]Þ8ã F�ðrq3&®? >4Nm"jUM…àøñahôàRÔç¸ø�¨ü£À(ç¾Q+nS‘¢,çð"i"öŒ\Ã+Z8)ÛŠè°Bèà 铸�(©*â¯Ê.c$Š8×úZêT­À�Î¥ÜM2À,"Ä,mÌ»½ÎÀ ê]ÅêÒ­OÂà€î¥" A-âàõd³ÈÕrŠçîÇ.hHµ›gìˆHÍêsfÎÐì‘í0TŽÌ0®¥ßŽÆ€êè@2ÂXƒÞÁËâHUÞ3¦�ì—b¸ËÎô2Wê.HijsM¦„°/Í”|®ýßP+Í“¸VÞ" â©IŒïL¿6>û¶nÞïäMßWŒð?. � _ îäÅÒiMèҟ»%H&µÂ3Ñ9]±¢ëbÉ»Ô îæ.Ý>î-E³Mîîè� Mz‚�3O€W2Ò”[3îâë¥5[iÉ-8kdø”b­^aLŒE­€Z0„â„;"‹xÂ!Vtö0#Íæ5@=£-¿Yò­÷.Éö¹ÝZÁŸ(„=eaT«b …¾Yo7aADÙ£´F}àa..´0¤JdL« §·  '­�IU$"3äÓr«šù«¡± È IØ-bE¸äÕÜ´«š4_kinI™Ž#W¦˜Ì„vXÐ\½Zgý¤„VrÎâ=•NDË;Øúïm3~$Ô¸””,|Q+ê9ˆh®- ðR]@Hƒ7 ¨[²I¨í6ò/ÖNñž@ çüŽFvPâBFÄËk…@ž$kÌŸ¸L€Ò‚ßXw$�¤5†X‰©bÈbrÙ‹ÓU>NN&_!LƒÓ U§È5µ`ÒM„5±kÁM…±Y]-ب‘‰‘¦M¹6K*ðq_ò혱–®f¨-jlf&b�&ØZ¦ ³}°¶FDƒ<œa£5®°’^©Zì¿›L�µÙð�çð{ŸìÑÂÐàªÕIzOeó†|0ú??æÚ¦sÝŒÒZ‚ÄÛÌä³Cã«Ä‘u™•ÉŽ¡i—æ¡Püw[±Â$œ:§…œÉg/Þ£Ïùç,[ÝRå>NgIl#…—"oµ[ɤ÷͹¬³çR”Z`â>…UPAgÎwÍÙb$[€q—2Æ|F�7oîÚ-ksUžÑ ‚G õœv…\$/�Ë€Òªt(._ãbf„ #Œ‘cð P‘Á“„%Î�“Újüxx3©éqZxJÉhrá„}]ª€j«AÄdÞ;«T+ Ÿx‚^¡`ÕZ�ª¯yˆ1æj¤§ƒ›cÎ×1âJ¢:~»xb¶æ ÏžsXÕ»yÊ~O@öCÅ`mÐ8bƺ��WÌÃsûS(,ŸäpVe‰a(áŽQÐÎy .µEí°†ÑdÖ¹¼"¾B:_¡`ÑWóp[²�H/ Þ:Aý*\ˆ9_!B §†ïÓü?‰þ5š¢¯Ì<·VçÝÄs¿9Ê<ð9ßrÓV>µ36ø;s#¡±ïO;'µ' 5È�JÖ�ØÚ ‚öäÞ�S†i­éÞDîý»¿xáMäü×k~ŠME:ª¬{Öåƒkó-ç\ø)ÒßÈ=Œì X4kmp1ÇÝVÍËg|§ƒð[ó€ mx:‡Ób N "R—÷Ýu±!~1Leqk¥5}Ó”7 (TC½83y7°(yP>ÒdaÂú-…å"4}CÉBP}ÒJaá¼H“ÌBùbæ0ñz}Ò45a5b“i9q'×}Ó�8;ã„z77•4ƒ„|¸ /ÂÜb:ƒ¼1ám']N€r1@m‘g2´v¨A€Ñå^¨86!@�`ƒçr†eî-14BTl >xG†uO‚²ÝR½…P1…x.ˆCã†òž€·^L‡µ" l…“q‡€1À.z²�ðI'hbÕÃ-…–ɂۈBÿÔ]-h£‚Áã…˜0ö/È€…˜6oȉè‹{&º>°n]²)w˜Y=“‡·PQN'Ï%@(‡˜–y7�ƒsl <H΄øšWU‰Ø&*ø.Hh©…ybQ!‡‚±VŠÈâ+b¿,Hâ,fáI <0>2ÑPe?wp"¸ÆAÂä7ñqcàyB½9`d;ÿán‹Œc”C0H $€A0C0€$„ˆJŽ7MŒbJ7)8C;øOˆHXŽ%B . E“øˆAPŒb4’Ó¼Ù;8x€ðlL�ºSeŒcˆ5R !yˆ1ñ6p£)æa¶6æ Xï‘€c�NˆSˆF6*ˆ(¯c2–a‡4ÀD–dãzÖÓµjÀ/tÕr(Œp±y€”´ˆ�i�%$`=à/ˆçyP=˜·“”VNÐG–i,%HÖ�ˆOè×h%|×51y“fís‡@1;ÀTùxür#¿…IlÄJ‚äZabTnÓvT7�ù©;ÀAé|é°‰²ˆ9¶–g¬†á`‹pe5ˆ ‡Ap °aôíÙ{Kg#Óâ9C�là/0Q'æÌ‡ˆ�*lãR•ñôIttrÂ[w¾AɹÐUÉó8OœØœ9Ûù¬šéÆ'Ü�×ô› U�Ê )ª IÄÚ  ÂyD°C�p3–¸ßxç'—mPT'ÐNöBoØ»‹Øï˜À&N²—K²,‡)~òù™5‘™iÝ#@T3ˆÌsiènÙú„HÉŒ¸—ŒèI�˜Ñ£èNˆå91›8°! 䬌‚ú>£é¿¡@"ì£9¯†ZK!™Øœ©#¡ÚWŽHª*º"OÒÇç]‹¡ƒ¢Ø�¥rÆ 9À³¿Šušf¢J&*(Ô$…±@˜^Mha§R�KöG„*‰]1!Mcªðpwq¹˜Ê•‚1¦È¥zEUÙ§4Ò«QNWJYªˆ^š¹­N L9Š �˜ ¥C ‚厦ˆ×•]z9ªŠ®+h墿bÙ´*¸4Ú¾8Z_¦2«z¹¡�6$ªiš4]£†N¬zÑ^:p¬º®”êÎbrˆ¦ �m’,«ˆ@¡•þsNyRzi¥*Ê¢&' †¨‚«˜Cu× L‚1 µl" Õ†Ðm£Ö4}ðd€i%ë$Tç› 2J`O!Ï™ã…c � 6L(2v%éå'ç1'`+¦À)C9êC7ŠŽ²«#@NPX+Âv 9ÌoÛ;°¡�?ëF%[ ²(œ‹ &Ð8ðG8×ZÛ>µ1‡'Rwµ`%%âÀ…„4( (²¢e¶+eÛg²¥¡ã{æª8RvŒ«Wžà=¶»f²›`·:|·k_Aûa+»c;e³ }&À-·»‰¶‹`· r#3”µÛw0gM·«…¸‹n·â3­»;³Ð%#:—¢Ì r$W’ )òM‡TÿJÛN‰º³¥J³6Ü#:¦¹[*�ÅR›ûv² =»Û`IÐ4$ø�a{¶ ª·Rw¼;Åe¥R$÷%º "$ô̰O—A +$ûÀAEŽù~.AزíÒï½à$ú$;ß$òJŽ¢Á¿r½¿rOyBÃ+ÀT3 ( ƒXg0E{ç4Ö`ršz·¿ê§X G DV¿ÀYÓ°#0/Áì BÙ@1P;@2ÂpD;¢׫kù TšœM¼S1JyœpoPÁ"À"×ã�AŠ��É|Ð;;ñµ)š ÇT0$À>�h ЇÃ,E—åB ÄÃ~Äì7~°'!wî/WðcŒRéÁ0UÁY9Àa]av13ÆP#ì�i“ÃâÆ¿’ÂÄ*`~äÈB©"èÃ…qü� œGR!€cƒñ,áik ƒÕ<;·Ç(T88(‡ó-«¸‘Ã㦽²ÔFaÄŽé[„ è´+§—ñP#KùÇbºÁl`ðEŽñ€ °P®ä ÁÐ#¬<`TÃËvs°,¹RdÃꦯ¬ªŠ¨ã/šSc†ŽxÝÃuÇ|Äá¥^3À +[ò½î&=Î+S¹àP\ÒÌamÙY.±=P@:�c+Y@ᾓœêÑ©Øõ~½�`MÂâݪe˜P"Ňssã€=¤˜Jåp>+_4ÕRªÞH+mÅÁr#“^:±g#ð ÀLê¹6nz8ô—ײãiçŸ9 é �ð:9iH‘>1‘eR*òÅ,eD‘Ù’#�C~’s{’�*ÞV;¼W�nŸ7Ã~êc‚æÁZ�e gšÒ#éIQU"JËs�âYdç F�@rqòçð< >!ÀkìrÅl#JNR,P6PbnŠèÉ.ŽÔéþ·ëd7f*‘É’ "’Nâꎡ,Y@%Nâ8F”CMb¨ØÎܦrŪnî Bï ï3,–¸°+)4-Q”®°Ð$tëjg¯þ+$Ì¿0,' s a ‹é.bè.¢ìàëí-+ÞÏà-E `L0Z¤òRJ0P/W»bòýÛ+"ù/.0¸Z¸Ë…òøZÑÐ5#@Có�0_;@(ó3.ñ>;òØê€(ó|W�èOò‰¢' ¯7/BµøõWUõ|ûõÓIƒ �{bÀ$øi[`ýIÐ*ön8½=ÆZå²HÙîÒŸÏ]»Oc0«™ôgG8x¯löó÷!O÷@%÷oWN=bH¢àZÒñQæVž]Ãbåóo#ëîÀõvBàOW/•ÍOÏWîÀ OZ²�õNQ@W5"½\Ó,õs¥P] ù/ˆ�e—"Ô¯AÆÈ×\€(£,âEц+7Š$�5U/Ì=aQÆÐZ5 +Ã\ù!ü?0ýJZÈãz¸¨*pZ/‚Æ#95/м�À9Jû‚`#,Ž4!üã üÏÔ$ D?÷üÿÌg›`/‚ù_Ä3ÿPÖ°üà0Hñs²ø#@D*ùkÝ¥X* *[`\røªeÿãà3