@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `8  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED697 FREE SECTORS COPYING---D8:COPY32.COMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 128ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8u05  15 2 2151^116115ύ011$r2ԭ5 3)5)5ԭx GT}@@L00)+& 2 L0=ɛ -L!1LV1L1 /3 3ȹ441L-4 v3 25 2H 2h͔5U}L3L3 2 k3U hh`DOC`QL3P1Lk0S1H /3h0B k3@ VL0LU!#$53 1181118V}1111Ε5 1Lk0552 1Ȍ1i111i11115Lk0pppB4f5&&&&&&&&^6f^6&&&&&W}&&A1@BJ D2ELVK@BHILV^Щ6 2BD2EJ VBD5EHI0 V0%5X}5 2iХiL[2 25 25`D:*.*` i@`8 ``@i `8@`0 BLV525<4Y}5`HH i ԍΗ552 ԍhh@ Lح1Э1Ѣ 24.4 24Z}4`D4E` 2BJ k3LVRH` 2BD4EhK)I JLV333 BASIC LANGUAGE OBJ > i}MACHINE LANGUAGE DOC > DOCUMENTATION PIC/MIC/FNT/MVM > GRAPHICS AMS/MUS/MBD > MUSIC LST > BASIC LISTING j}-SOME MACHINE LANGUAGE PROGRAMS CAN ONLY BE RUN BY BOOTING THE DISK MENU "WITHOUT" BASIC.-FOR SOME PROGRAMS, XL OR XE MOD k}ELS MAY REQUIRE A "TRANSLATOR" PROGRAM TO BE BOOTED FIRST. [AVAILABLE SEPARATELY FROM B E L L C O M.]-MOST PROGRAMS ARE l} RELATIVELY SELF-EXPLANATORY; HOWEVER, SOME HAVE SEPARATE DOCUMENTATION FILES AVAILABLE. BASIC PROGRAMS MAY CONTAIN INSTR m}UCTIONS IN THEIR PROGRAM LISTINGS.-TO WRITE THIS GREAT MENU PROGRAM ONTO ANOTHER DISK, (Q)UIT MENU, BOOT DOS, AND USE TH n}E "O" COMMAND TO COPY THE MENU FILE "AUTORUN.SYS" ONTO YOUR DISK. < MENU by DAVID CASTELL >U, BOOT DOS, AND USE TH e PCOPPAPSEIDYTANVFFPRTRUUQQQQQLEMYBHIJNKWGDDRKp}MMINKEYAMDATPRINTPRNTPR@ AAp@XS@v@5?rgAb# q} @r} !"#$%&'()*s}+,-./0123456789:t};<=>?@ABCDEFGHIu}JK##@@K: ((-------- COMET EPHEMERIS ---------;@,-@v}. COMET HALLEY(-A2-Ap<-@XSF-@vP-@5Z-?rgd-Ab#w}i +n''---------------------------------x } .. &- - - - - - - - - - - - - - - - - - - %x}%  EPHEMERIS FOR DATES&&  BETWEEN 1946 AND 2026&#  by Roger Browne& ''----------y}-----------------------Input the Date&&--------------------------------6-  INPUT YEAR#z} AF)!A &# A  INPUT MONTH # @)!@# A0  INPUT DAY + {} }-@@+  "&&--------------------------------, Calculations for the Comet6&&-----------|}---------------------@ -JA-AT A-A^A-h A}}-@r A| --+A`',$+'Ae%, - A0-+$,'A - ~}--&+$G:,,&O:,= A-'+@&+$E:,,, -& AP@@-+M:+@%,'}+@&,,$+G:'@,'E:'@,,,-@$D:,-+$A,' -%**-$+@&+$,,'+@}%$E:,,& -&0 -:-+$,'AD-+$,'AN-+G:,$G:,,X-D:'M:6$%@,,b}-D:+G:,'E:,,$E:,,l-+$A,'%v'@*Ap'6-%A -%A`-+$,}'A-$E:,&&-------------------------------- Calculations for the Earth&&---------------------------}------Au -Ar  -Av -  -@ A%%-}+A`'Ae%,$+'@@, -  A0 - -+$,'A*-?g 4$$-%+A`',$$G:&}?C,>-%@SCH!A`-&A`R -%A`\-++&AQ@,$,'Af&&-+@}&$,'+@%$E:,,p''---------------------------------z""Compute Ecliptic Coordinates''--------------------}--------------++&,$,'A-++&,$,'A   A -+$G:,,-'+&+$E:,,, }-D:,-+$A,'% A0-+$G:,,-'+&+$E:,,, -D:,-+$A,'%%A}!A`-&A` -%A`-+$,'A$-+$+G:,'E:,,$G:&,,.-'+$G:,},8 -D:,B&&--------------------------------L""Convert To Equatorial CoordsV&&--------------------------------`}-?@0dj-+G:,$E:,,t-%+E:,$G:,$G:,,~-D:'M:6$%@,,-+$A,'-++G:,'E:},,$E:,,##-&+++G:,'E:,,$G:,,'E:,, -D:,-+$A,'-P:'@,-P:'@,+&}"@)&"@+6-%A`+&"@)&"@+6-%A &"6@ -%A` &"6@} -&A-'@##-P:+&P:,,$@`%?P, "@`-%@"@`-} -O:,(##-P:+&P:,,$@`%?P,2"@`-%@<"@`-F -P:,P  }* @ -6Z-$%$d-&+@$$$E:,,n -M:,x-'E:, - A @ -}-'@ A @-$@-@-@' 6-@'6-@D-%@}$?CC$K:, -%$@P$?CC$K:,-+P:@$,,'@ -6%%---------------------}----------Print Ephemeris For Date%%-------------------------------// '}--------------------------------------}:"@:3&--------------------------------------"   DATA FOR  ',"@)3 DATA F}OR ,3,""  DATE: M/D/Y=//1."@.3 DATE: M/D/Y=//6$$ DAYS TO PERIHELION.....P:,};3"@03DAYS TO PERIHELION.....P:,33@ J COORDINATES: epoch 1950O+"@+3COORDINATES: epoch} 1950T44 RA :...................P:,HRS MINY@"@@3RA :...................P:,HRS MIN^0}0 DEC:...................DEG MINc?"@<3DEC:...................DEG MIN?3h r  DIST}ANCES:w"@3 DISTANCES:|)) COMET TO SUN........... AU5"@53COMET TO SUN...........} AU** COMET TO EARTH......... AU9"@63COMET TO EARTH......... AU93 !! PREDICT}ED MAG..........-"@-3PREDICTED MAG..........-- %-------------------------------------9"@9}3%-------------------------------------''  PRESS 0 FOR ANOTHER DATE$$  PRESS FOR PRINT OUT)@}"@:0, } A@$"@:P,6-@$ A`  A  A%%---------------}----------------$$Subroutine: DAYS TO PERIHELION-+&,'@-P:%,-Ae$+&%,% P:,} A03%+"@* @),)"@36-&@&!@ Ap0-&@:-@1$D }AN-%@X-P:@0`$,&@cb-%%&Ae$l$v%%-------------------------------##:} PLACE BETWEEN 0 AND 360 DEG  AP!A` A-%A` A  } AP-&A`A` A  A$%%-------------------------------: ROUND OFF S}UBROUTINE-$A-P:%?P, -'A$D:HALLEYCOMET HALLEYD OFF Sv23FFTIMEWNTYPENAMEZTFLAWHICDMYMMTHETLONLLALPHDELTSTSSTSTRSTTTGSLSJCON}TGMTEOMEGEANMLVRPHLRRRSSLAEAMMAALLPNLALBALPHADELTADLDLALPHADELTAPPPDELTADHALPH}A1DELTA1ALPHA2DELTA2ST1ST1ST2ST2DHMDDMMYYDDMMYYBB} } !"#$%}&'()*+,-./012345}6789:;<=>?@ABCDE}FGHIJKLMNOPQRST}UVWXYZ[\]^_`abcd}efghijklmnopqOBSERVATIONA}L ASTRONOMYBY JOHN GODBEYBASED ON FORMULAS INPRACTICAL ASTRONOMYBY PETER DUFFETT-SMITH`<;@},;@,;@,;@,;@,H6-T6-`6-$L+@%@ Ap1-@@}L @ OBSERVATIONAL.,-@@, @ ASTRONOMY8w-@@*(@PROGRAM<-@}@L(@BY^-@@w(@ JOHN GODBEYB/-@A% %+/ ApL[0@}@@70@@Q0@@@[ A V7(}ҠҠҠ3-@}A 7 ` Aj# (}WHAT DO YOU WANT TO DO?#(tA>(6 GET INFORMATION ON OBJECTS IN THE SOLAR SYSTEM?A}(~HE(= GET INFORMATION ON APPROXIMATELY 60 DEEP SKY OBJECTS?H(JG(? GET INFORMATION ON ONE SOLAR OBJECT OVE}R A PERIOD OF TIME?J(HE(= PRINT LOCATIONS OF APPROXIMATELY 60 DEEP SKY OBJECTS?H(8( Ҡ 8 }@)!@A''AI@AS ATPB A 6 A(}6(ENTER THE DAY, MONTH, AN}D YEAR>* "FOR WHICH YOU WANT DATA (Ĭͬ)-(58(>-r7!@1) @) @)!@) P}(}ĠŮ٠d-@Ah r A  -- AP- WHAT WILL BE THE OBSERVER'SJ }GEOGRAPHICAL LATITUDE?@((eg. PETERBOROUGH=44.34 DEG.)C(GJ e 6@)!@C($}ŠźĠ}W-@A[ e AP A & & WHAT WILL BE THE OBSERVER'S:  LONGITUDE?:(#(IF THE L}ONGITUDE IS EAST, ENTER ITM AS A NEGATIVE NUMBER)F($(eg. PETERBOROUGH= +78.22 DEG. WEST)I(M(l 6A)!A}J(+}ŠԠŠΠĠ ^-@Ab l A2E A0 E 0IN WHAT TIME SHOUL}D THE DATA BE EXPRESSED?<<< 4(eg. , , , , , , , , )F ( P$ZDISABLE BRK K}EYdG6-F:@,!A',6-&A(8@DB7tG$nxGGSUBROUTINE DETERMINES NUMBER OF DAYS IN }YEAR TO THE SELECTED DATE4+'@,"P:'@,*6-@b4 A06-@c!@ A`$$6-}P:++&@,$,'@,% Ap""6-P:+%@,$@0`,&%$77SUBROUTINE DETERMINES ECLIPTIC COORDIN}ATES OF SUNK @A6-6Ae$+@&,&P:+@&,'@,%K A<<6-Ae$+&@,%P:+&@},'@,%%@6-+A`'Ae$",$  AA` A !A` A`} A 6-&A`"A` A , A`66-%A`@ A J AT}6-%Ax5@&AYd^ 6-%A`hr&&6-+A`'@p,$?g$G:,|6-%%Ax5@6-}!A`6-&A`$RRSUBROUTINE CHANGES ECLIPTICAL COORDINATES TO RIGHT ASCENSION AND DECLINATION}6-@#D 6-E:,""6-G:,$E:,&+G:,'E:,$G:,,6-D:', 6-G:,$E:,%E:,$G:,$G:,6-D:'M:6$%}@,,#*# A0#* # A`# *# A'!}* @'6-%A) 6Ap*!6A`)6-&A A&) 6@*!6A)6-%A0}'!A* Ap'6-&A: AD'!@* A'6-&AN) 6A*!6Ap)6-%A}X Ab( *!6@(6-%Al'!Ap* A`'6-&Av 6-%A`}6-'@$22CONVERTS DECIMALS TO HOURS, MINUTES, SECONDS 6-P:,6-P:+&P:,,$@`,666-@`}$++&P:,,$@`&P:+&P:,,$@`,, 6-P:,$::SUBROUTINE CALCULATES RISING AND SETTING TIME OF SUN6-}@ A!@ 6-6-6-%?VG A A!@ +!@$6-&@$+6-&@$+}!@$6-&@$+6-&@$ !!6-+@$$,'+@$%&,*!!6-+@$$,'+@$%&,4!@$6-&}@$>!@$6-&@$H6-R$\33SUBROUTINE CALCULATES RISING AND SETTING TIMEfp A"}z 6-+6G:,'E:,,$+G:,'E:,,2@(+!@) 6@,2 A"2!@%  DOESN'T RISE.('2} AT 4 6@'( IS CIRCUMPOLAR*'4 AT //6-+6D:'M:6$%@,,%@,'@6-@$%&} 6-%"@$!@$6-&@$!@$6-&@$$I'(ŠҠԠ}͠I(ӠȠŠL)(!ԠӠΠή٠ΠL(ŠҠŠҮ(}-@A '( A  GGSUBROUTINE CONVERTS LST TO GST, GST TO GMT, AND GMT TO LOCAL TIME 6-'@%}  6-%@$$ !@$6-&@$. 6-@&P:+A%,'A,%P:+P:+A%,'A,'@},,%P:Ae%$+A%,,%P:@0`$+@%@,,%Cr P8 6-+&CAP ,'Be%B ))6-@d`e`%+A$`$,%+=%}$$,L 6-@$&%+@$$,V 6-?W $&`  6-@$%j 6-&t  6-@$%}~ 6-?rp$  4EST6-6@  4CST6-6@  4MST6-6@  4PST6-6@ } 4EDT6-6@  4CDT6-6@  4MDT6-6@  4PDT6-6@  4GMT6-} % -% %6-%@$ A@ $ QQSUBROUTINE CALCULATES RISING AND SETTING TIMES OF PLANETS, AND }THEIR PHASES  "4END' AQ " """"""( 6-+A`'Ae$",$'2 '!A`}6-&A`' A&< 6-%&F $$6-%+A`'@p,$$G:,%P '!A`6-&A`' A&@Z ' }6-%A`' A&Pd 6-&n **6-+,$+@&$,'+@%$E:,,x %%6-+A`'Ae$",$+'@@, 6-%}@5@&AYd 006-%+A`'@p,$?g$G:,%@5@ !A`6-&A`  6-%A` }6-&AYd 886-+@&?g$?g,'+@%?g$E:,, 6-G:&,$G:, 6-D:'M:6$%@,, 6-+G}:&,,$E:, 6-E:&, 6-D:', #*# A(` #* # A( # *}# A)  '!* @'6-%A ) 6Ap*!6A`)6-&A" A)@, ) 6@}*!6A)6-%A6 '!A* Ap'6-&A@ A)@J '!@* A'6-&AT )} 6A*!6Ap)6-%A^ A)@h ( *!6@(6-%Ar '!Ap* A`'6-&A}|  6-%A`  6-%6-$E:, %4MERCURY)4VENUS% A) ,"6-D:$G:&,'+&$E:&,,,%}, A0 6-$G:&,'+&$E:&,, 6-D:, 6-A%% ' 6-%A`' A0 '!A`}6-&A`' A0  ++6-P:A$+@%E:&,,'@, ,,6-D:++$G:,'E:,,$G:&,,'+$G:&,,, A } A!@ %"@6-% AR`  - A#  --  - A#&  --0 $: !}! HMHMD A%N PPMERCURY,0.24085,231.2973,77.1442128,.2056306,.3870986,7.0043579,48.0941733X }NNVENUS,.61521,355.73352,131.2895792,.0067826,.7233316,3.394435,76.4997524b PPMARS,1.88089,126.30783,335.6908166,.0933865,}1.5236883,1.8498011,49.4032001l TTJUPITER,11.86224,146.966365,14.0095493,.0484658,5.202561,1.3041819,100.2520175v SSSATUR}N,29.45771,165.322242,92.6653974,.0556155,9.554747,2.4893741,113.4888341 RRURANUS,84.01247,228.0708551,1727363288,.0463232},19.21814,.7729895,73.8768642 XXNEPTUNE, 164.79558,260.3578998,47.8672148,0.0090021,30.10957,1.7716017,131.5606494 @@PL}UTO,250.9,209.439,222.972,.25387,39.78459,17.137,109.941 END MOON 6-@ A" - 6-@c}`$%@dTd '!A`6-&A`' A2 ' 6-%A`' A2 6-&?$&AI80c '!}A`6-&A`' A3 ' 6-%A`' A3  6-AQ)&?)S$ ((6-@'9$G:@$&@}$&, 6-?X$G:, 6-%&&* 6-@($G:,4 6-?!@$G:@$,> 6-%%&%H 6-?e}$G:@$+&,,R 6-%\ ++6-P:A$+@&E:&,,'@,f 6-&?$G:,p 6-G:&,$E:@S,z 6}-E:&, 6-D:', #*# A50 #* # A5` # *# A5} '!* @'6-%A ) 6Ap*!6A`)6-&A A6 ) 6@*!6A)6}-%A '!A* Ap'6-&A A6 '!@* A'6-&A ) 6A*!6Ap})6-%A A6( *!6@(6-%A'!Ap* A`'6-&A 6-%$}6-G:&,$G:@S,.6-D:'M:6$%@,,8 -- AB --L6-?$E:&,V6-?U}%?$E:,`6-%$@j6-%$@t A~ --6-D:?fG$G:,'E:,,6-?fG$G:}, 6-E:,::6-+@&?I$?I,'+@%?I$E:%,,6-@`&"$6-+%,'@ 6-6+G:,'}E:,,$+G:,'E:,,%%6-6D:'M:6$%@,,%@##6-D:+$G:,,'+$E:,&$E:,,, 6-%6-'@ 6-}&6-$G:,& 6-'+$E:,$E:,&,6-$E:, 6-D:,( 6-&26-$G:,&<6-'+$E:,$E:,&,F}6-$E:,P 6-D:,Z -- A!@d --n -- A!@x --+!@$6-&}@$+6-&@$+!@$6-&@$+6-&@$!!6-+@$,'+@%&,!!6-+@$,'+@}%&,!@$6-&@$!@$6-&@$6- - A# -- - }A# --$EECALCULATES RISING AND SETTING TIME OF SELECTED DEEP SKY OBJECTS 6-"4END }AH " """''6-P:,%+A,$+&P:,,'@`,''6-P:,%+A,$+&P:,,'@`6 A!@@ - }A#J --T - A#^ --h$rM31,SP. GAL.,0.40,41.00|!!NGC253,SP. GAL.,0.45,-25.34}M33,SP. GAL.,1.31,30.24M76,PLAN NEB,1.39,51.19NGC752,OP CLUS,1.35,37.25M34,OP CLUS,2.39,42.34M45},OP CLUS,3.44,23.58HYADES,OP CLUS,4.17,15.31M38,OP CLUS,5.26,35.48IC434,DIF NEB,5.39,-2.26M1,NOVA,5.3}2,21.59M42/43,DIF NEB,5.33,-5.22M37,OP CLUS,5.49,32.33M35,OP CLUS,6.06,24.20NGC2237,DIF NEB,6.30,4.54}M50,OP CLUS,7.01,-8.16!!NGC 2392,PLN NEB,7.26,21.01M46,OP CLUS,7.40,-14.42&M47,OP CLUS,7.34,-14.210!!}NGC2438,PLN NEB,7.40,-14.36:!!NGC2440,PLN NEB,7.40,-18.05DM44,OP CLUS,8.38,19.52NM81,SP GAL,9.52,69.18XM82,}GAL,9.52,69.56b NGC3227,SP GAL,10.21,20.07l""NGC3242,PLN NEB,10.22,-18.23vM97,PLN NEB,11.12,55.18M106,SP GA}L,12.17,47.35 NGC4565,SP GAL,12.34,26.16M104,SP GAL,12.37,-11.21M64,SP GAL,12.54,21.57""NGC5139,GL CLUS,}13.24,-47.13M51,SP GAL,13.28,47.27M3,GL CLUS,13.40,28.38M5,GL CLUS, 15.16,2.16 NGC5907,SP GAL,15.15,56 }.31M4,GL CLUS,16.21,-26.24M13,GL CLUS,16.40,36.33M12,GL CLUS,16.45,-1.52M10,GL CLUS,16.55,-4.02 }M92,GL CLUS,43.12,6.1 M8,DIF NEB,18.02,-24.20M9,GL CLUS,17.16,-18.28  NGC6543,PL NEB,17.59,66.38*M20,NEB, }17.59,-23.024NGC6572,PL NEB,18.10,6.50>M17,DIF NEB,18.18,-16.12HM25,OP CLUS,18.29,-19.17RM22,GL CLUS,18.3 }4,-23.57\M11,OP CLUS,18.48,-6.20fM57,PL NEB,18.51,32.58p COL399,OP CLUS,19.23,20.05zM55,GL CLUS,19.37,-31. }03!!NGC6818,PL NEB,19.41,-14.17!!NGC6822,IR GAL,19.42,-14.53M27,PL NEB,19.57,22.35NGC6960,NOVA,20.49,31.0}0!!NGC7009,PL NEB,21.01,-11.34M15,GL CLUS,21.28,11.57M2,GL CLUS,21.31,-1.03 END,("(HIT WHE}N THROUGH&,(}4 AH0(4(DO YOU WANT THE LOCATION OF ANY@'(OF THE DEEP SKY OBJECTS (/) +34N6'}@ AT@' AHP(#( WHICH OBJECT ' #AB": 4END0(THAT OBJECT IS NOT IN THE LIST: AH0}" ""$ 0 AHp. P:,  6-%@3,, $____________________________________8KK(P:,}HA$+&P:,,MP:,DEGA$+O:,&P:O:,,,'=,, $____________________________________B AH0L}PRINTS SOLAR SYSTEM INFOV THE SUN`5 A A! A+ A5 A j - A#t --}- A#~ -- (}##( //( %% OBJECTRISESE}T% ILLUM,, $____________________________________F:B2y,"@$(( SUNHMHM--}THE MOON A2@F:B2y,"@$&& MOONHMHM 6-THE PLANETS  #A1P} A%`F:B2y,"@$(!! HMHM2 AQ@<4 AQ(4(DO YOU WANT THE} LOCATION OF ANYF,(OF THE PLANETS (/)!)4N,$P' AR(#( WHICH PLANET 'Z #A1Pd>"4}END4(THAT OBJECT IS NOT ON THE LIST> AQn"x 0 AR 6-@ A& 6- }A@6-6- 6- A@,, $____________________________________((//F($( RT.ASCENS}ION=HM'(F( DECLINATION=DEG',, $____________________________________ AQ$PRINT }DEEP SKY INFO6- #AB A A) (})( //  }  NAMETYPERISESET ,, $____________________________________ A@F:B2y,"@$"!}! HMHM,j6-%@"@ 4 THERE'S MORE...P(HIT TO CONTINUET`6-}j AS6 AS@ AJ11PRINTS DATA ON ONE OBJECT OVER SEVERAL DAYST^_ ATp5(#}FOR WHICH OBJEC }T DO YOU WANT DATA?8(X((TO RETURN TO MENUE TYPE )[(_c 4Y$hZ AT(O(:ENTER THE FIRST DATE FOR WHIC!}H YOU WANT DATA (Ĭͬ)R(Zro7!@1) @) @)!@) M(}ԠԮa-@"}Ae o AT|Z AU(O(:ENTER THE LAST DATE FOR WHICH YOU WANT DATA (Ĭͬ)R(Zo7!#}@1) @) @)!@) M(}ԠԮa-@Ae o AU " AU@u$}S(K}ȠӠԠŠΠŠŠ ҠҡŠҠg-@Ak u AT( A%}P 6-6-6- A 6- 6-6-6- A 6-d !B(4}ŠԠŠԠŠ&}Ҡ ŠԠV-@AZ d AT6-@K @A6-6Ae$+@&,&P:+@'}&,'@,%K AV0<<6-Ae$+&@,%P:+&@,'@,%%@ 4SUN AV`4MOON (}AW AX. (}.(//TO//&(DAY #RISESET0 -:! A A)}! A D - A#N --- A#X --bF:B2y,"@$l HM*}HMv6-%@ *(#(HIT WHEN THROUGH'*$. (}.(//TO//$$+}(DAY #RISESET% ILLUM,, $____________________________________ - A A2@F:B2y,},"@$!! HMHM6-%@  6-*(#(HIT WHEN THROUGH'*$-} . (}.(//TO//'('(DAY #RISESET% ILLUM  #A1P*P"4END(.(.} IS NOT IN THE LISTB-@APF P ATp4"> 0 AY0H - AR A&/}\F:B2y,"@$f!!(HMHMp6-%@z *(#(HIT WHEN THROUGH'0}*$'Ԡ'-3DEEP SKY OBJECTS-3----------------L'F3&3OBJECTTYPER.A.DEC.F3----------1}--------Q' #AB`'"4END$j'" ""t' P:,  6-%@~'YO3P:,H A$+&P2}:,,MP:,DEG A$+O:,&P:O:,,,'Y BD:ASTRNOMY.BAS 6-%@~'YO3P:,H A$+&PP . . . . . . . . . . . . 4} HORIZON ================================= HORIZON coordinates calculator is a program5} designed for astron- omers and photographers alike. One of the more vexing practical problems in observing a celestia6}l object is knowing beforehand how high and in what direction to look at any given time and date. Suppose there's to7} be a lunar eclipse and you'd like to take a series of pretty pictures of it, neatly framed by the church steeple and8} the old oak tree. Can you do it? How high will Venus be on the date of maximum bright- ness? Will the date of greatest9} elongation of Mercury coincide with its maximum elevation over your horizon? By using this program in conjuction :}with an almanac or a star atlas, you can find the azimuth and altitude of any object at any time; rising, setting, or;} high in the sky. Then, by using a compass, you can position your camera (or telescope) in just the right place. H<}ORIZON has the ability to calculate the following: 1) Altitude and azimuth of any object at any time. 2) Az=}imuth angle of a rising object. 3) Azimuth angle of a setting object. Information required by each of >}the above is as follows: 1) Altitude and Azimuth: A) Date (Month,Day,Year) and time (Universal GMT or UT ?} Time) of event. B) Your latitude and longitude in degrees and minutes of arc. C) The Right Asc@}ension (RA) in hours and minutes, and Declination (Dec) in degrees and minutes, of the objectA}. Output is the altitude and azimuth of the object in degrees. 2) Angle of Rising or Setting: A) YouB}r Latitude in degrees and minutes. B) The objects Declination in degrees and minutes. Output is AzC}imuth angle in degrees. The program is self-prompting for all of the above information. Happy Star GazinD}g! ****************** The program is self-prompting for all of the above information. Happy Star Gazin \] NSELLDDDERADDEGRADIADEGREAMDYTTLSRRRHALAMJJJJJJJYEA@F} @ @ G} !H}"#$%&'(** HORIZON CALCULATOR** COPYRIGHT (C) 12/78 ** R.I}Grokett,Jr."(9@,*-?tS ,-@W)Wx.##@@K:2(-@@"J}$68,-( <000,31,59,90,120,151,181,212,243,273,304,334\ Ad** CALCULATE LST **h0@@@K}jARn2*("}Input Month,Day,Year(ie.12,7,78)2x6-%A} A06-8,%00(L}(UNIVERSAL TIME (UT) of Event (Hr.,Min) 6-%+'@`,))(!Input your Longitude (Deg,Min.)(JAX,M} FL = 81, 39.74 ( 6-%+'@`,--6-%+?W$,%+@'$,&+'@,!@$6-&@$,N}** CAL. ALT & AZIM **6-'(Input R.A. of Object (Hr,Min)-;6-%+'@`,@ 6-&J6-$@T(((O} }Input your Latitude (Deg,Min)^(JAX, FL = 30, 19.75` c6-%+'@`,h/)(!Declination of Object (DP}eg,Min)/m6-%+'@`,""** CONVERT ALL TO RADIANS ** 6-$ 6-$ 6-$$$6-+G:,$G:,,%+E:Q},$E:,$E:,,!!6-D:'M:@&#@,, 6-$$6-+G:,&G:,$G:,,'+E:,$E:,,? 56-@p%D:M:@R}&#@,',? A!!6-D:M:@&#@,',X** CONVERT BACK TO DEGb 6-$l 6-$v N:,"@S} 6-A`&** PRINT OUT **0@@@##(}** HORIZON COORDINATES **(DATE: T}%A6-P:$A,'A(UT=  HR's<<(Altitude of object= P:$A,'A Deg.;;(U}Azimuth of Object= P:$A,'A Deg.  A** START **0@@@ARV}@..(&}** HORIZON COORDINATES CALCULATOR **%%(1. Cal. Altitude & Azimuth%%(2. Cal. Angle of Rising OjW}ect''(3. Cal. Angle of Setting ObjectL(Input one of above.V.)@. @I)!@QA`"X}@IAj"@Q6-@* CAL. ANGLE *ARB0@@@B( }InputY} your Latitude (Deg,Min)(JAX,FL. is 30, 19.75 ( 6-%+'@`,1+(#Input Object's Declination (Z}D,M)16-%+'@`, 6-$ 6-$6-G:,'E:,!!6-D:'M:@&#@,, 6-$.N:,"[}6@$6-O:,%@. A6-@&  "@ 6-O:,%A>>(Object's Azmuth Angle= P:$A\},'A DEG.** AGAIN **AR@(Another calculation?)@"@%]}"@x A  AAR + Πٛ 6-P:+@$,'@, ^}6-+Ag$,&%@0 6-&Bg%?P 6-%C@ 6-&CAP  6-'Be% ##6-CdT$%? )_}$#@ 6-'A6 6-%@d`e` 6-'@$& 6-&P:,0 6-$@$: $ D:HORIZON.BAS )z STAR ENCOUNTERS =============== STAR ENCOUNTERS. Will the Earth ever collide with a star? What !a}close calls have we had in the past? Have these encounters had any effect on our enviroment? With the help of a star a!b}tlas, this program can calculate the distance to any star in the past, present, or future. You will need the followin!c}g information from the atlas: 1) Proper motion of the star in seconds of arc per year. 2) Radial velocity of the !d}star in kilometers per second. 3) Apparent (Visual) magnitude of the star. 4) Distance to the star in light !e} years. Since some of this information is difficult for astronomers to obtain accurately, be sure to check many sou!f}rces, and use the most up-to-date information possible. There may be a dim and distant star, barely noticeable (and!g} possibly inaccurately recorded) out there, that could be on a collision course with our solar system. So watch magazi!q}?b%DOS SYSb*)DUP SYSb SAUTORUN SYSb_HELP DOCb5oHALLEY BASbASTRNOMYBASb3HORIZON DOCbEHORIZON BASb`STARENC DOCbSTARENC BASb-ASTRONIIBASb:SOLARSYSBASbPLANETRMBASbTSTARGAZEBASbKgMAROONEDBASnes and articles for any new information on stars within 50 light-years of Earth. BD +61 366 might be just such a !r}star. This rather uninteresting object hides among other 7th magnitude stars only a few degrees from Epsilon Cassiopeia!s}e. It's been classified as a red dwarf, a type of star somewhat cooler and smaller than the Sun. While the spectral c!t}lassification is tentative, if it IS correct, then BD +61 366 should be only about 30 light years distant. Taken at !u}face value, these figures lead to extraordinary results. During the next 800,000 years this star may well brighten by!v} 12 or 13 magnitudes! IF the dwarf classification of this star is correct, BD+61 366 ought to be incredibly close in fu!w}ture times: only a quarter of a light-year away! If humans still populate the Earth in 800,000 A.D., they could wa!x}tch this exqusite, golden star drift the full angular diameter of the Moon in a single lifetime. Information on severa!y}l stars (including BD +61 366) is includ- ed below to get you started: BD +61 366 KAPTEYN'S ---------- !z} --------- P.M.=0.003 P.M.=8.719 DIS.=30 ly DIS.=13 ly R.V.=-11.2 R.V.=-110.0 MAG.=7.5 !{}MAG.=9.54 BARNARD'S POLARIS --------- ------- P.M.=10.278 P.M.=0.046 DIS.=6 ly DIS.=6!|}80 ly R.V.=-110.0 R.V.=-17.4 MAG.=9.54 MAG.=1.99 VEGA MIZAR-ALCOR ---- ----!}}------- P.M.=0.345 P.M.=0.127 DIS.=26.5 ly DIS.=88 ly R.V.=-13.9 R.V.=-05.6 MAG.=0.04 MAG.!~}=2.26 MERAK DENEB ----- ----- P.M.=0.087 P.M.=0.003 DIS.=78 ly DIS.=1600 ly !} R.V.=-12.0 R.V.=-04.6 MAG.=2.37 MAG.=1.26 DUBHE ----- P.M.=0.138 !} DIS.=105 ly R.V.=-08.9 MAG.=1.81 DUBHE ----- P.M.=0.138 B9:PDDTRSMNPMANTTABADLIST73A@@ ? %V@#$@@@#Y"?gQ@%}TEa @ @pt& AiXv@ @x2* STAR ENCOUNTERS *<!!* FORMULA'S FROM APR 79 AND%}F* JUNE 79 ASTRONOMYP* PROGRAM COPRIGHT 4/79T* R.GROKETTZd +@-@@f70@@%}@70@@@h @STAR ENCOUNTERSi-@@j @---------------k%}6-@6(@ASTRONOMY FOR ATARImAR@n (By:p(Russell A. Grokett, Jr.v-@%}A x5 +5(#Input Proper Motion of star (Sec.z(of Arc per year)|6-?%}~0;@,0@@K:9)(!Input distance to star (in Light5(Years)96-'@& %}6-@t$$--(%Input Radial Velocity (in Kilometers( per Sec.),N:,"6@"6-$6@, A%}N:,"@6-66-M:#@%#@,6-+@t$#@$,'))6-+?D$#@,'+#@%}$,.*(!Input apparent magnitude of star.6-%+@$K:',,6-+B$$,'#@** PRINT OUT%} ***##(} *** Ҡ *** ( ((STAR AT PRESENT:##(Magnitude...............&,,(Radial Vel%}ocity..........P:,kps0&&(Proper Motion............P:,:++(Distance.................P:,LY?,,(Space Velo%}city...........P:,kpsD(STAR AT ENCOUNTER:N&&(New Magnitude...........P:,X,,(Time.....................%}P:,Yrsb&&(New Proper Motion........P:,lEE(Minimum Distance.........P:+$@&,$A,'ALY%}AR@&&(Another calculation (Y or N))@ 6.>:,# 4Y@# A 4%}NA AAR D:STARENC.BASNAR4Y@# A 4$WN_uCC5CCC1DDXDXHMSCCCCZDMSTDTYJSSSCGGGGGSSSSSTTLLLLLWWWWWWD)}ELAD?ffp>'7CD0P@@@vBd A6 @` CD @ @@)}@@1@uAA39@@1@CDc9PE!S!`E!BITE)}!BWBD B2!@"#$%CE09&@@'(@6)@@*Ba+Aw@8p,BTYb-@ )}.@Yb/@P0@Yb1E!BVA2CE083@ 4@"5@(6@ 7AQ8Bf6UT AA*ASTRON 2* BY JAMES J. BRENNAN I)}N INTERFACE AGE AUGUST 1977@ +(  ASTRON 22//A PROGRAM TO DO ASTRONOMICAL COMPUTATION)}S< FINITIALIZE THE PROGRAMP AZ77GET THE REQUIRED INFORMATION FOR THE CALCULATIONSd A nUUCAL)}CULATE THE NUMBER OF DAYS ELAPSED FROM THE BASE DATE TO THE DATE IN QUESTION A0__CALCULATE THE JULIAN DATE (@ 0)} HRS U.T.) FOR THE DATE IN QUESTION (@ GREENWICH LONGITUDE) A@ CALCULATE THE SIDEREAL DAY AP++CA)}LCULATE THE GREENWICH SIDEREAL TIME A`PPCALCULATE THE GREENWICH MEAN TIME GIVEN THE LOCAL CIVIL TIME AND TIME Z)}ONE ApDDCONVERT THE GREENWICH SIDEREAL TIME ACCOUNT FOR THE ACTUAL GMT ACONVERT GMT TO LMT )} A((CONVERT GMT TO LOCAL SIDEREAL TIME" B,**PRINT OUT THE DATA THAT WAS COMPUTED6 BIN)}ITIALIZATION SUBROUTINE6-?ffp6->'756-CD0PN6-@X6-@b6-@vl6-Bd)}q6-Bf6UTv6-A66-@`6-CD$00SUBROUTINE TO GET THE REQUIRED INFORMATION.. &)} ENTER THE YEAR, MONTH AND DAY OF THE88 0DATE IN QUESTION. (DON'T FORGET THE COMMAS!) -&Add )}\ ENTER THE HOURS, MINUTES AND SECONDS OF THE LOCAL CIVIL TIME. (DON'T FORGET THE COMMAS!)  11 (WHAT IS THE )}CIVIL TIME ZONE (PST OR PDT);@,VV N ENTER THE DEGREES, MINUTES AND SECONDSOF LONGITUDE OF THE PLACE)} IN QUESTION.*)) !(AGAIN, DON'T FORGET THE COMMAS!)4 >$ ``ROUTINE TO CALCULATE THE NUMBER OF ELAPSED DAYS )}FROM THE BASE DATE TO THE DATE IN QUESTION 9@, ))31,28,31,30,31,30,31,31,30,31,30,31 6- !@)}A10+ ..P:'@,&+'@,A100 6-@: -@@D "8,-X  b 6)}-8,&% -%@@ 6-8,%   6- 6-%@ A3p ..P:'@,&+'@)},"A3@ 6-%Ae A2e 6-%Af A2e* @A44 ..P:'@,&+')}@,A4> 6-%@H -@&@R 6-8,%\  f 6-%p  "6-&Afu )}@6-&@1z $--SUBROUTINE TO CALCULATE THE JULIAN DATEccTHE JULIAN DATE FOR THE BASE DATE OF 10 AUG)}UST 1976 IS 2443000.5 AT 0 HOURS U.T. AT GREENWICH 6-%$hhSUBROUTINE TO CALCULATE THE SIDEREAL DATE IN TOTAL S)}ECONDS AT 0 HOURS U.T. ON THE DATE IN QUESTION$$SD=2449690.0 ON 10 AUGUST 1976 6-$ 6-%$$p99SUBROUT)}INE TO CALCULATE THE GREENWICH SIDEREAL TIMEzeeTHE GST AT 0 HOURS U.T. ON THE BASE DATE OF 10 AUGUST 1976 WAS 21 HOURS, 14)} MINUTES, 23.155 SEC(MEAN SIDEREAL TIME)''6-%+@!$%@$%@#P,$XIICALCULATE THE ACTUAL GREENWI)}CH MEAN TIME FOR THE CIVIL TIME ENTEREDv6-$%$%@$$Au0PSTAv+ 4PST6-%@)}$+ADD 8 HOURS+ 4PDT6-%@$+ADD 7 HOURS6-P:',6-&+$,6-P:',6-&+$, )} 6- $L>> 6THERE WAS AN ERROR IN THE CIVIL TIME THAT YOU ENTERED.V66 .PLEASE RE-ENTER THE LOCAL TIME IN HRS,MIN,SE)}C.`  Ap4PDTAqR R GRE-ENTER THE TIME ZONE. (IT CAN ONLY BE OR ):INPUT CZ$:GOTO 708)}0@LLSUBROUTINE TO CONVERT GREENWICH SIDEREAL TO ACCOUNT FOR THE ACTUAL GMTT 6-%h16-P:',6-&+$,%6-P:',)}16-&+$,r 6-P:',6-&+$, 6-|$(#&&SUBROUTINE TO CONVERT GMT TO LMT<#6-$%$%P# 6-$d# 6-)}&x#6-P:',#6-&+$,#6-P:',#6-&+$,# 6-#$'66SUBROUTINE TO CONVERT GMT TO LOCAL SIDEREAL )}TIME`'6-&&$j'6-P:',DAYSt'6-&+$,SEC REMAINING~'6-P:',HOURS'6-&+$,SEC REMAINING)}'6-P:',MIN'6-&+$,SEC REMAINING'* 6-*SECONDS OF LOCAL SIDEREAL TIME'$ N//SUBROUTINE TO PRINT O)}UT THE DATA COMPUTED*N    4N11 FOR THE CIVIL DATE   %A>N// AND THE CIVIL TIME ::)} HN##  AT LONGITUDE ::RN** "THE FOLLOWING INFORMATION APPLIES:WN-@AP ZN 6)}-%@$[N@$6-&@$\N3  3 %THE GREENWICH MEAN TIME (OR U.T.) IS aN ::dN )}6-%@$eN@$6-&@$fN; ; THE GREENWICH SIDEREAL TIME IS ::P:,pN, , THE GREENWIC)}H SIDEREAL DATE IS N  THE JULIAN DAY IS N 6-%@$N@$6-&@$N. . #THE )}LOCAL MEAN TIME (CORRECTED FOR N::  LONGITUDE :: ) IS ::P:,N' ' THE LOCAL SIDEREAL DAY IS)} N 6-%@$N7 7 THE LOCAL SIDEREAL TIME IS ::P:,ND:ASTRONII.BASPSTPO)}@1@ 6-%@$N7 7 THE LOCAL SIDEREAL TIME IS ::P:,ND:ASTRONII.BASPSTPO(TTBRLSZSRQRRPEVVZTLXYZXXYYZZEEIDDAPLANETSEAPKUJWCI-}PLANETSIMDYDZZDDPRVFHFHFHFHFHDPINDECABG-} -} !"#$%-}&'()*+,-./012@3@4@5-}@6@7@8@9@:@;@<@=>?@ABCD-}EFGHIJKLMNOPQRST-}UVWXYZ[\ SOLAR SYSTEMd APn"@Ax-}!) A @!A )!A,Ay&+&,$+&,$ A!* A-} 6-%A`,Ay&+&,$+&,$ !) $ @!Ap  )!$,-}Ay&+&,$+&,$$ !* $ 6-%A`",Ay&+&,$+&,$,$66-&P:',$@-}6-&+'$,J!6-ApT6-&+'+@%$E:,,,^ 6-'&h@6-r6@6-6-}|6-6D:'M:6$%@,,%!'@6-& 6-% 6-$&!A`6-&A` -}6-A`% 6-'6-G:,$6-$E:,$E:,6-$E:,$G:,6-$G:, 6-&6-&6-& 6-}-$!A`6-&A`"$6-M:$%$, 6-&6-$E:,&$G:,06-$G:,%$E:,:-}6-@D 6-ApN6-D:',$X 6-%Ab'!* '6--}%A`l 6-'v6-D:'M:@&$,,$$56-@W6-@W)WyP)6-@#C@'56-@MM;@,-};@,9,9,9,9,9,9,9,9,9,9,'6-@e6-@(10'6-? 9, +-}( SOLAR SYSTEM**("DO YOU WANT TO DISPLAY THE SAME.*(!PLANETS AS YOUR LAST RUN (Y OR N).4NA-}0YA 4Y(>:A%,AA' =(-("YOU HAVE'NT PICKED THE PLAN-}ETS YET0(3(= A + ..(&CHOOSE THE PLANETS YOU WANT TO DISPLAY*(Ԡӛ-@@-}#A%" 68,- (DISPLAY  (Y OR N)? A&(4NAp$0-}YAE)68,-@*( PLOT........."80 68,-68,-68,-'68,-068,-B""68-},-$+@&$,'@L"68,-@'"68,-8,'V68,-$'A`68,-'j t A-}Ԡ//MERCURY,87.969,.2056,72,77.1,37.53,48.1,766VENUS,224.701,.0068,134.539,131.3,140.5,76.5,3.4--EARTH,365.-}256,.0167,186,102.6,-3.82,0,044MARS,686.980,.0934,283.407,335.7,287,49.4,1.8599JUIPTER,4332.125,.0478,967.641,13.6,16-}08,100.24,1.3;;SATURN,10825.863,.0555,1775.966,95.5,2090,113.51,2.49@1)(!ENTER BEGINNING DATE? MM,DD,YYYY1E-}!@AJ6-+"@,$@1%+"@,$@Y%+"@,$@%+"@,$A %+"@,$AQ-}%+"@,$A%+"@,$A%+"@ ,$AC%+"@,$AsO;!@;6-+"@,$A%+"-}@,$A4TOO6-P:$Ae%P:'@,%%%@&P:'A,%P:'A,'@,^$$P:'@,'@A-}h$$P:'A,'AA`r$$P:'A,'AAp|!@A6-&@6--}&Br1 6-6*( (&(ENTER # OF DAYS TO PLOT* ( ( (*&(ENTER # OF DAYS BETWEEN PLOTS*!-}A`*( (AT LEAST 1 DAY APART.* A +6-6-@" A'P -}ț6-q6-@6-8,!6-8,*6-8,36-8,<6-8,E6-8,N6-8,W6-8,_6-%h6-8,-}q6-8,0 A6-@5! 6-6-6-6-!6-? A ٛ&6-@&8,"-}A!0e 6-8,6-8,6-8,'6-8,06-8,96-8,B6-8,K6-8,S6-%\6-8,e6-8, A% -}6-6-6-6-% A 6-6- A!0H ӛR&6-@&8,"A"`\e 6-8,6-8-},6-8,'6-8,06-8,96-8,B6-8,K6-8,S6-%\6-8,e6-8,f Ap% 6-6-6-6-% -}Az 6-6- A"` ӛ&6-@&8,"A#e 6-8,6-8,6-8,'6-8,06--}8,96-8,B6-8,K6-8,S6-%\6-8,e6-8, A% 6-6-6-6-% A 6-6- -}A#L қV &6-@&8,"A% ` e 6-8,6-8,6-8,'6-8,06-8,96-8,B6-8,K-}6-8,S6-%\6-8,e6-8,j At % 6-6-6-6-% A~  6-6- A%  Λ &-}6-@&8,"A&@ e 6-8,6-8,6-8,'6-8,06-8,96-8,B6-8,K6-8,S6-%\6-8,-}e6-8, A % 6-6-6-6-% A  6-6- A&@( ;#@@K:0)@-};@2  6.>:,$P 6-%Z %!A' A  6-6- z-@@-}4-@6?P2@`@T v2z  A' ! A&-}+! AP @ (($(ENTER FACTOR: 0 OR 1-20)( A' J6-6-A`-}(6-6@46-A@6-?uJ A(  @A'` &(#(ENTER CENTER COORDINATES&( ( R.A. DEC.-}( ( HH.HH DD.DD  6-$@&A9' 6-$@%A9'" 6-&@', 6-%@'6 -} 6-%A`@ !A`6-&A`J /+@%@/0@^ 0@@-}@h 0@@r #A)| " +6-$@%$?%+6-%'@` "*"-}$  A A)@ PISCES nn1,11,24,19,1,17,27,0,1,18,28,29,1,9,29,49,0,55,28,43,0,47,27,26,0,53,26,56,1,-}28,15,5,1,43,8,54,1,59,2,31 991,39,5,14,1,28,5,53,1,11,7,19,1,0,7,37,0,46,7,19,23 LL57,6,35,23,37,5,21,23,40,1,30,23,25-},6,6,23,18,5,6,23,15,3,1,23,24,0,59 ARIES $$1,51,19,3,1,52,20,34,2,1,25,42 TAURUS 775,23,28,34,4,39,22,52,5,3-}5,21,7,5,4,18,35,4,33,16 3325,4,26,15,51,4,17,15,31,4,23,17,49,4,26,19,4& LEO0 999,43,24,0,9,50,26,15,10,14,23,40,10-},17,20,6,10,5,175 660,10,6,12,13,11,11,20,48,11,47,14,51,11,12,15,42 LIBRA <<14,48,-15,-50,15,10,-19,-28,15,14,-9,--}12,15,33,-14,-37 SAGITTARIUS 8818,3,-30,-26,18,14,-36,-47,18,21,-34,-25,18,18,-29 MM-51,18,25,-25,-27,18,43,-27,-3-},18,52,-26,-22,18,59,-29,-57,19,4,-27,-45 0,0,0,0D:SOLARSYS.BAS25,18,18,-29 MM-51,18,25,-25,-27,18,43,-27,-3,M]^NCONLEVELSEASONNAMEADTBRLRSCSISCSTALINCOPLCRCDSEASONDELAXSIZYSIZ@1} 1} ooźӠ͠Ӡ1}ԠӠ ŠӠԠĠŮ ooԠӠҠҠ٠Ġ٠ 1} ŠĠĠĠ٠ ծŠԠՠΠϡ##d** INITILIZE **1}n6-@x669,;@,;@,;@ ,;@, A** STAR X,Y CALC ** !) $1}!Ap  )!$ 6-&+&,$6-+&,$ $$ !* $ 6-%A`" A@1}** BEGINNER ***6-@6-@*6.BEGINNER A5-@ +@ -@2}70@@70@@#AB%8,$%@."3"@A2}8AR@(B A6L(A  ConstellationV-@` A@j)"@)"@,2}) APt /~  +!(Press ANY KEY to continue+ A70 A72} ' +@'0@@@4-@@4(@** PLANETARIUM **6-@6(@2}this completes your (@ study of theM"-@ &B:,'@@/(@M(@ constel2}lations4-@@4(@I"(@ view ͠-(@I(@ [y]2} [n]kkź A test of knowledge or a continuation to a higher level may be@@. 2} added to your program at this point!  A76.>:, 4Y A 4N(0Y)02}NA<EE** INTERMEDIATE LEVEL ** May be added by you... EE** SHUFFLE FOR QUIZ ** 2 } May be added by you... )-@"68,-$@& )$** SEASON **''A6A6 A60A6@2 }6.SPRING$$6.SUMMER$.6.FALL$86.WINTER$j** GET **th#@@K:0)2 }@;@O-@APS V$hGet key pressed** PLOT STARS **d6-6-A`(6-6@2 }46-A@6-@L6-@X6-@@d6-AY6-$@&'6-$@%' 6-&' 6-2 }%' 6-%A`!A`6-&A` " A$h** CONSTEL. DATA **rNNLEO,2}10.5,18,4,10,145.75,24,147.5,26.25,153.5,23.67,154.25,20.1,151.25,17w<<151.5,12.22,168,15.7,167.75,20.8,176.75,14.85,168,12}5.7|??GEMINI,7,25,4,10,93,22.52,95,22.53,100.25,25.18,107,30.33MM112.75,32,115.5,28.15,109.25,22.08,105.25,20.65,98.752},16.45,100.5,12.95^^SCORPIUS,16.5,-32,2,15,239,-25.47,239.25,-22.48,240.75,-19.67,239.25,-22.48,244.5,-25.47QQ247,-262}.32,248.25,-28.12,251.75,-34.2,252,-37.97,252.5,-42.28,257.25,-43.1855263.5,-42.97,266,-40.12,264.75,-39,262.5,-37.07C2}CURSA MAJOR,12.1,56,1,8,206.25,49,200,55.5,192.5,56.5,183,57.5++178,53.5,164.5,56.5,165.5,62,183,57.5D:PANITC0zOPP))GUESS1GUESS2GUESS3ASK1ASK2STARRIGHWRONTOTALIGHMEDIUDARGREEREYELLOBLACBLUPAUSNOISBUZTWINKLW6}AIQUIERROSCORINTRSTARCURSOOUATTRACUNTOUCRESPONSOFKEYBOARDRAWINDOTEXTEXTCAPBACKGRNBACKTEXSMALAVERAGLARGP6}ICTURVOICEPURNORMAQUESTIOCONSTCONSTCONSTCORRECKEANSWEPITCTIMFLASHULUMIDELACONS6}@ 6} !"6}#$%&'()*+,-./016}23456789:;<=>? BB*STARGAZ6}ING by Thomas M. Krischan kk*ENHANCED by BELLCOM BBS, 6} PUBLIC DOMAIN LIBRARY ee* P.O. Box 1043, Peterborough, Ontario, Canad6}a K9J 7A5. II*PUBLISHED IN ANTIC MAGAZINE VOL.2 NO. 3, JUNE 1983 ISSUEOO;@`,;@@,;6}@@,;@@,;@,9@ <@,'6-6-'6-c6-@6-@'6-6}36-@?6-@K6-@W6-c6-@{6-AQ6-AP'6-APP36-AR?6-AQP6}K6-AW6-ASc6-Ao6-A`{6-@#c6-AR6-@'6-@w36-AU?6-AdK6 }6-W6-B7uc6-Apo6-@6-@'6-36-@?6-@K6-W6-@c66!}-@o6-@'6-6-@'6-@ @ B-AAA86-P:'A&6"}@ ,< B( 2 < P6-&@ c dn+ 00s # "vM-6#}M(@QUESTION NUMBER  NUMBER CORRECT x"-@"(@y"-@"(6$}@}#%@0""-@"(@"-@"(@"-@ 6%}"(@?-@?(@ PRESS KEY TO QUIT 6-F:,"A`(F:,"@16&}6-@( Ap(F:,"@06-@( Ap(F:,"@&6-@( Ap2F:,"@9 6-6'}&A.6-&@2  H-@@",(@0 >6-%@H A (Ϡ 6(} -( ( (-( PRESS ANY KEY TO CONTINUE   $+ 00 0 6-&/-6)}/(@ YOU ANSWERED/-@/(@ QUESTIONS/-@/(@ COR6*}RECTLY1-@1(@ INCORRECTLY@-@@(@P:+',$A, PERCENT!!!! 6+}($#P:'$@,$@%A(""-@ "(@"$$( PRESS ANY KEY TO CONTINUE+   6,}$$$YOU'LL DO BETTER NEXT TIME!**NOT TOO GOOD, BUT YOU'RE LEARNING!NICE TRY!GOOD JOB!VERY GOOD!6-}!&11EXCELLENT! THAT'S ALMOST A PERFECT SCORE.0++TREMENDOUS!! THAT'S A PERFECT SCORE!!,,What is the giant co6.}nstellation in the++southeastern skies during the winter?1. ,71002. ,71103. ,7126/}0$2LV,,Which star of the winter sky is called`the Dog Star?j1. ,7130t2. ,7140~3. 60},71501))What constellation name is also thename of a galaxy?1. ,72202. 61},72303. ,71703,,What constellation forms a lazy W or M(''depending on when you look at i62}t?21. ,7180<2. ,7190F3. ,7200P1x++Which constellation is the shape of a63}question mark or sickle?1. ,71502. ,71603. ,72102; -A@6@64}*2. 82;$:-@PAU@)2- 72:$-A $'-65}@P '6-(4 6-F:,"* A*6-%@4 AQ`2-@@ $PL-@66}A'2@@>6-H:,$@D6-L0$2@ !2$$-%(OOPS.....THAT'S THE67} WRONG KEY) - ps+ 00t 00u7-@7(@self teaching seri68}esw2-@2(@ star gazingz1-@1(@ A WINTER1-@ 1(69}@ ASTRONOMY1-@1(@ Q U I Z !p(p(eThe heavens declare the glory of GOD 6:} and the firmament showeth his handiwork.  %-@A % AXb'+6;} Ap0'0g0@0m"@6-n"@6-o"@6-u6<}vS#-@@ !"268<@,-C68<@,-O!S {X @!-@@ 88<6=}@,!T,8<@,8<@,X |[#%@#-@@ )":68<@,-K68<@6>},-W![ X @!-@@ 88<@,!T,8<@,8<@,X c  6?}#%@+-@@ 1"B68<@,-S68<@,-_!c  @!-@@ 886@}<@,!T,8<@,8<@,/8%@<@,8%@<@, $__20,48,24,52,22,54,26A}0,60,24,64,38,62,48,52,52,48,64,42,72,38,84,24,88,28,89,32,88,36,-1,-168,40,-1,-1kk20,48,24,52,22,54,20,60,24,64,386B},62,48,52,52,48,64,42,68,40,72,38,88,28,84,24,88,28,89,32,88,36,-1,-1QQ(ISCORPIUS is a large constellation including 6C}the shape of a scorpion'sOL(Ctail. It is located in the southern sky during the summer months.O$//62,42,62,46,62,6D}50,66,50,68,50,72,50,-1,-1##28,44,44,24,84,64,88,40,-1,-1##28,44,44,24,84,64,88,40,-1,-1SS(KORION appears as 4 st6E}ars forming a large lazy Z lying on its side with aOL(Cbelt of three stars in a close line. A sword hangs from the b6F}elt.O$5524,36,40,34,54,38,68,44,72,56,92,56,96,44,-1,-1 -1,-15524,36,40,34,54,38,68,44,72,56,92,56,96,44,-1,-16G}LL(DURSA MAJOR (the Big Bear) is often referred to as the Big Dipper.@=(4Actually, the dipper is only a part of 6H}Ursa Major.@$5532,28,44,34,42,40,38,46,52,32,76,20,84,44,-1,-180,32,-1,-1;;38,46,42,40,44,34,32,28,44,34,52,36I}2,80,32,84,44,-1,-1QQ(ISIRIUS is the brightest star in the constellation Canis Major (Big Dog)@=(4which follows Ori6J}on the hunter across the night sky.@$))52,20,60,28,52,36,60,52,68,44,-1,-160,20,-1,-15552,20,60,20,60,28,52,36K}6,60,52,68,44,60,28,-1,-1PP(HVEGA is the brightest star in the constellation Lyra. Vega is on theWT(Kwestern hori6L}zon and sets shortly aftersundown with the deepening of winter.W$..64,16,56,8,44,16,48,40,62,38,60,38,-1,-160,64,6M}-1,-14464,16,56,8,44,16,48,40,60,64,62,38,64,16,-1,-1OO(GARCTURUS is the brightest star in the constellation BOOTES (6N}called BearTQ(HDriver & Herdsman). It is shaped like a kite and is near the Big Dipper.T$AA24,24,60,28,70,34,74,36,6O}76,36,80,38,76,42,72,44,28,52,-1,-1**87,11,89,9,91,7,93,5,95,7,93,9,-1,-1AA24,24,60,28,70,34,74,36,76,36,80,38,76,42,6P}72,44,28,52,-1,-1OO(GPLEIADES sometimes called the Seven Sisters appears as a group of 6-7QN(Estars forming a tiny 6Q}'?' nearly over- head in January, nearby Taurus.Q$5524,16,52,28,72,32,92,36,76,40,52,40,20,40,-1,-151,16,52,16,-16R},-15524,16,52,28,72,32,92,36,76,40,52,40,20,40,-1,-1SS(KANDROMEDA is a constellation which shares a star with anot6S}her constelll-:7(.ation called the Great Square of Pegasus.:$ 28,28,62,30,74,42,-1,-1 48,40,80,44,88,24,6T}-1,-1//28,28,48,40,62,30,74,42,80,44,88,24,-1,-1NN(FCASSEOPIA is in the sky during all seasons. It never goes belo6U}w the1.(%horizon for viewers in North America.1$,,104,16,80,20,68,48,108,44,112,56,-1,-132,24,32,44,-1,-186V}8104,16,80,20,32,24,32,44,68,48,108,44,112,56,-1,-1RR(JGEMINI (The Twins) is seen primarily as two bright stars. CASTOR6W} & POLLUXLI(@mark the heads of the twins, seen in the eastern January skies.L$ ;;80,20,88,44,44,52,28,44,25,44,44,26X}0,46,18,40,14,-1,-1!32,20,-1,-1"5580,20,88,44,44,52,28,44,32,20,44,20,80,20,-1,-1%QQ(IAURIGA is roughly the shap6Y}e of a pentagon very close overhead in the&(month of January.$*kk14,26,20,20,28,20,36,20,42,26,50,20,48,14,84,6Z}44,80,40,72,48,73,54,80,56,92,60,64,80,56,72,53,80,-1,-1+ -1,-1,AA84,44,80,40,72,48,73,54,80,56,92,60,64,80,56,72,53,86[}0,-1,-1/SS(KLEO (The Lion) rises in the east in January. To find Leo - imagine a hole0UR(Ipoked in the bottom of the 6\}Big Dipper.The water falls on the lion's head.U$4//62,42,62,46,62,50,66,50,68,50,72,50,-1,-15GG28,44,27,44,28,43,27,46]}3,43,24,44,24,84,64,88,40,87,40,88,41,-1,-16##28,44,44,24,84,64,88,40,-1,-19SS(KThe four major stars of Orion in ordero6^}f their brightness are . BETELGEUSE:.+(". RIGEL . BELLATRIX and . SAIPH.$>24,24,60,28,28,52,-1,-1?NN80,38,706_},34,74,36,76,36,76,42,72,44,87,11,89,9,91,7,93,5,95,7,93,9,-1,-1@AA24,24,60,28,70,34,74,36,76,36,80,38,76,42,72,44,28,52,-6`}1,-1CSS(KTAURUS (The Bull) is shaped like a V. It contains the Hyades & the PleiadesDOL(Cclusters. Both are open clust6a}ers containing hundreds of stars.O$@ OF QUIZ OR REVIEWT2(>:A%,2( PRESS Ԡ FOR ^%6b}%( PRESS Ԡ FOR REhF:B2y,"@$r"F:B2y,"@" A| A@(# כ-#6c}-AqAr0@2#+ 007#0@0F#S#-@@ !"268<@6d},-C68<@,-O!S K#X @!-@@ 88<@,!T,8<@,8<@,X 6e}P#[#%@#-@@ )":68<@,-K68<@,-W![ Q#X @!-@@ 6f}88<@,!T,8<@,8<@,X U# -@A #   ' D:STARGAZ.BAS4|'(%%%ALIAAAAAAAZER@@@@@@A?`:h} @ @ A @ >?P?3Ap@`AW=>P>3@pC:i}W|MAROONED IN SPACE | 81,68,72,81,91,91,81 :j}٠ ''0.0553,0.378,2.64,3032,0,0.241,36 ))0.8150,0.894,6.46,7523,0,0.615,67.2 ))0.1074,0.379,3.2,4220,2:k},1.881,141.7%%0.0002,0.035,0.33,470,0,4.6,257''0.00003,0.022,0.21,300,0,4.61,257,,317.89,2.54,37.3,88750,16,11.86:l}2,483.9++95.17,1.07,22.1,74580,17,29.456,887.1))14.56,0.8,13.9,31600,5,84.07,1783.7**17.24,1.2,15.8,30200,3,164.8:m}1,2795.5(;@,"AR@((}# (}AR@0@"-@@:n}"(  "-@@"( Š "-@@"( ;-@@;(!M A R O O N E D:o} I N S P A C E-@@(   -@@(  !-@@( "-@@:p}( #-@@( $/(/($Original version for TRS-80 written %--(%by: William L. Colsher. AT:q}ARI version&..(%written by: Rickey L. Wails 03/27/81 (u-@@"72@@K-@:r}@O q2u --@A 2D (}-@@@(DO YOU NEED INSTR:s}UCTIONS [/] D< 4Y AFr (}-@@'(CHOOSE:*(@([] METRIC SYSTEMC(J(orM(d([]:t} ENGLISH SYSTEMg(n(>rG #@H'6-@"@'6-@`K6-6-P! (}-@:u}A'! Z-@@5 d#-@"@#(PLANETS:n|-@0@#( 1.MERCURY5-@0:v}@A(2.VENUSS-@0@^(3.MARSp-@0@|(4.CERESxC-@0@#( 5.PHALLAS5-@0@:w}C( 6.JUPITERa-@0@ "(7.SATURN4-@0@A(8.URANUSS-@0@a( 9.NEPTUNE8-:x}@8(ASSOCIATIVE LOGIC UNIT DAMAGEDB-@B((HUMAN INTERVENTION REQUIRED.ORBIT STABLEK0@:y}@@70@@@K-@@A-@ A('PLANTARY SURVEY DATA IS IN PREPARATI:z}ON.-@@92@P@@M-AQ s2@`@@-:{}A )%2) ~-@@)-@@@( T:|}-@AX j-@@~(#-@A  # K-@( --:}}@3( E-@!K( v-@@#v(\ :~} %%6-P:H:,$@ %?,"A  6-%-@!:}"%  6-1-@1(٠٠66-'A@"-@"( Ӻ:} J-@A)-@@0($R2@P@@t2@`@@2:} T( Ƚ ^ A 6-'A,-@,( Šٺ :}-@A)-@@0($R2@P@@t2@`@@2:} &-@&( Ƚ  A 6-$'A,-@,(:} Šٺ -@A)-@@/($Q2@P@@s2@`@:}@2 "@a( ˮЮӮ "@( ͮЮӮ & A b6-$:}'Al%-@%( Һ v-@A)-@@/($Q2@P@@:}s2@`@@2 "@( Ӻ  "@a ( :}Ӻ  A )-@)( ҠӺ -#-@@'(I2@P@:}@k2@`@@2  A *6-'A4+-:}@+( ȠƠҺ >-@A)-@@/($Q2@P@@s2@:}`@@2 H( Ƚ R A 6-$$B.-@:}.( Š͠κ -@A)-@@/($Q2@P@@s2@`:}@@2 "@( Ӻ !"@a!( Ӻ  :}A "@A0:-@:( ,-@,(ENERGY IS E:}XPENDED-@(;-@;(!YOU HAVE 2 HOURS BEFORE THE O2 IS9-@9( :} ?-@?(%DEPLEATED.THE PLANET WE ARE j-@F(, :} X-@j( ORBITING IS OOA A A A A A :}A A A >-@>($ I-@=(#YOU ARE :}ĠΠ I6-@ Ap.-@@$( . A p,-@@"( :}, A p+-@@!( + A p,-@@"( , A p.-@@$( :} . A p.-@@$( . A p--@@#( - A p--@@:}#( - A p.-@@$( . A p3 (}-@3( MAROONED IN SPACE:} 0-(%0(B( ΧӠ(B(%YOU ARE MAROONED IN SPACE, LOCKED IN ,,($OR:}BIT AROUND AN UNKNOWN PLANET IN ,,($OUR SOLAR SYSTEM! A MALFUNCTION HAS--(%PREVENTED YOUR COMPUTER FROM MAKING :}--(%AN IDENTIFICATION. THE COMPUTER'S --(%SCANNERS CAN PROVIDE YOU WITH INFOR- FC(;MATION ON THE PLANET SO THAT :}YOU MAY PROPERLY IDENTIFY IT.F($--(%WHEN THE PLANET IS IDENTIFIED,THE %;;(3COMPUTER CAN THEN PLOT A COURSE FOR H:}OME [EARTH].39-@@#5(PRESS [] TO CONTINUE98$*** ASK WHAT PLANET ***"@$:}A-@A(' A-@ A(' :} A-@!A(' A-@"A(' :} A-@A(' B-@B(( :} A-@A(' A-@A(' :} V A -@L('WHAT PLANET ARE WE ORBITING [1-9] PV("A%A:}-@A(' 2-@2(DATA NOT CONSISTENT WITHA-:}@A(' 4-@4(INFORMATION ON THAT PLANETA-@:}A(' 5-@5(MORE DATA IS IN PREPARATION-@A :}$ A-@A('  ;-@;(!MY DATA INDICATES YOU ARE CORRECT:} A-@A('  A-@A('A COURSE FOR EARTH HAS BEEN PLOTTE:}D  A-@A('  .-@.(WE WILL BE HOME SOON A-:}@A('  6-@6(HERE IS THE REST OF THE DATA --:}@-(ON THE PLANET BELOW 6-@6-$ +"A`+"@Ap 3-@#:}/(WILL YOU PLAY AGAIN 3 4Y@q (} pzw%2A@@9-@@0=:} _2@@@s-@@0w w%2@d@@9-@@@= _2:}@S@@s-@@0w %2@d@@9-@@P= _2:}@S@@s-@@w 2 A0Xbw%2:}Ab@@9-@@p= _2s-@@w l%2Ab:}@@9-@@P= _2A!@@s-@@w 2:}v A0{@J-@@T%%2@P@@^-@P h:}%%2@`@@r-@P w%%2|  A:}D2:MAROONED.BAS@@r-@P w%%2|  A8