PLANETARIUM V 10 KU"CRT:M1"::,:, :H$(0,),P$(P,)A$"PLANETARIUM":[@]p, ,A$,, :[]t,",A$,, :[@]x,$,A$,, :p, :[]"JH"(;):[]H, ,"VOLBA",,:[@]@,`,"1.Z ",,@C[@]@, ,"2.C ",,@)"VOLBA":SO$"*": "JMENO SOUHVEZDI" ZCVO VO "SOUHVEZDI","DEJE"<[],,"",,@: :'* JULIAN. DATUM*"JULIAN":[]H,H,"ZADEJ HODNOTY",,@?@,0:[@]"P !"4@,p:"ROK,MESIC,DEN,HODINU,MINUTU "%@,: RO,ME,DE,HO,MI ROT RO@ ME ME@ DE DEx @, :[@]"M ": 4 ME RO1RO:ME1MEP: RO1RO: ME1ME(DE1DE(HO)@MI/0JD(6RO1)(t;ME1)DE1%ƨ:'* HVEZDNY CAS*"HVEZDNYCAS" :'ZNAME JDT(JDj)3"S0( a-H~TmHT )@'[],H,"VOLBA ZEM. SOURADNIC",,@:,0:[]"BEZ VOLBY DELKA -12 22 SIRKA 50 05":[]p,,"CHEB",,@j(P,p:[@]"VOLITE ? A/N": VO$: VO$"" (:: VO$"N" ZDF>:ZSH[6: 6) ,p:" ":,p:"DELKA /(+)(-)/":`,:ZD$:p,p:" ":p,:DM$* ,p:" ":,:" ":,p:"SIRKA (+)":`,:ZS$:p,p:"":p,:SM$+ZD(ZD$)(DM$)p.ZS(ZS$)(SM$)p,6ZSZS4:UTHO(MIp)@STS0Y+UT0JSMSTZDp : SM@ SMSM@Th:'*OBZORNIKOVE SOURADNICE*r"OBZORNIK"| I K&RE$H$(I,@):DE$H$(I,)URE((RE$,))((RE$,@,))p((RE$,))a_DE((DE$,,))((DE$,,))p:DE((DE$,)(DE)) HUSMRE HU HUHU@)DEDE4:HUHUp4lSH(ZS)(DE)(ZS)(DE)(HU): (SH) HH:: HH(SH(SH)) SA(DE)(HU)(HH)O (SA) AZ:: AZ(SA(SA)):AZ(AZ)4CA((ZS)(DE)(ZS)(DE)(HU))(HH)& SA CA AZAZ- SA CA AZAZ& SA CA AZAZ,H$(I,@)(AZ):H$(I,)(HH)0:'***NAKRESLENI OBLOHY ***:"OBLOHA"::,@GDR :ZX :ZY:[],>,,>vN[@] ,,,9,:[@],@, ,@:[], ,@"X[]ZX,ZY,,:'***POPIS OBLOHY*** "POPIS"i,@:"ZENIT" :,@:Q$;();"_";();W$;( );"";();E$:[@],9,,4:,:'***CISLO SOUHVEZDI***"VYBER":[@,] ,H,"N D",,:[@,] , ," D",, :P, : SO$:[]H,4,"CEKEJ",,:"JMENO SOUHVEZDI":":'***H ***&"JMENO SOUHVEZDI": ':P0PP: Z : P$(P,Z):Z. P$(P,)SO$ P$(P,)SO$ 5 P$(P,)"*" "NENI V SEZNAMU":z:  8:'*UDAJE O HVEZDACH * B"UDAJE"#L"ROZDELENI":N:K6VNN:A$: A$"*" K(N): j ` Vj"ROZDELENI"t J K~ U  H$(J,U)  U,J :'*****'"ROZDELENI" P  P ', $', .', 8', B', L', V', `', j', t', ~', ', ', ', ', ', ', ', ', ', ', ', ', (, (, (, (, ((, 2(, <(, F(, P(, Z(: ]QP: Q d(, n(, x(, (, (, (, (, (, (, (, (, (, (, (, (, (, ), )"SEZNAM":'****R: [@],H,"N _ SP",,(SO$"*":"JMENO SOUHVEZDI":PO A():B(): A`PP:: A@ PP P PL PP P([],@,"",, : [@],@,P$(P,),,:[@]x,@,P$(P,),,c*(H): B SO$P$(P,):[]H,4,"CEKEJ",,:::  :'****"JMENO"::[@,]@,`,"1.Z ?",,@:[@,]@, ,"2.P ?",,@: "VOLBA"$ VO "VYBER"::"SEZNAM" {:'**** |"VOLBA" VO$: VO$"" VO(VO$)i VO [,],`,"",,@: k VO [,], ,"",,@: j VO@ [,],P,"",,@: i VO [,],,"",,@:    z&:'***ZOBRAZENI TVARU SOUHVEZDI***"SOUHVEZDI"*"JMENO":"UDAJE":R1;:NN J KcRE((H$(J,@),))((H$(J,@),@,))p:REREp4\DE((H$(J,),@))((H$(J,),,))p:DEDE4RR1(DE):' RE=5*/2-RE XR(RE):YR(RE)*&H$(J,@)(X):H$(J,)(Y)0 J5"POSUN":: "ZOBRAZENI"<6[@]4,,"P A/N",,28X$: X$"A" :: X$"N" :: 8:D:'***POSUNUTI SOUHVEZDI*** N"POSUN"]XXA(H$(,@)):XZ(H$(K,@)): XAXZ XZ(H$(K,@))] I K0_ (H$(I,@))XA XA(H$(I,@))0b (H$(I,@))XZ XZ(H$(I,@))l I]vYA(H$(,)):YZ(H$(K,)): YZYA YZ(H$(K,)){ I K0} (H$(I,))YA YA(H$(I,))0 (H$(I,))YZ YZ(H$(I,)) I I K_ XA H$(I,@)((H$(I,@))XA):: H$(I,@)((H$(I,@))XA)_ YZ H$(I,)((H$(I,))YA):: H$(I,)((H$(I,))YA) IB (XZXA) (YZYA) XZXZ:YZYZOK1H(XZXA):K2H(YZYA): K1K2 K1K2L:: K2K1Lx I K:X K1(H$(I,@)):Y K2(H$(I,)):H$(I,@)(X):H$(I,)(Y): I :'***ZOBRAZENI SOUHVEZDI***"ZOBRAZENI" I K:X1((H$(I,@))):Y1((H$(I,))):X2((H$(I,@))):Y2((H$(I,)))NN " Y1 Y1> " Y2 Y2> #,: P$(P,)`[@]X1,Y1,( (H$(I,)))NN:[]X1,Y1,@: []X1,Y1,X2,Y2%I: Y2 Y2>  [@]X2,Y2,( (H$(I,)))NN:[]X2,Y2,@: ZC [@],4,P$(P,),,"STEREOGRAF":'***** X,Y I KDAZZM(H$(I,@)): AZ AZ@ HH(H$(I,))$ AZ AZAZ3YY(HH)((HH)(AZ));XX (HH)(AZ)((HH)(AZ))] AZ@ AZ XX :: AZ  :: XXXXVH$(I,@)(XX):H$(I,)(>YY): :' PRINT/PH$(I,3),H$(I,4),8"VOLBASMER":'*******;B:[]H, ,"SMER POHLEDU",,L[@],x,"1.ZAPAD",,:[@],,,"2.SEVER",,:[@],\,"3.VYCHOD",,:[@],,"4.JIH",,V"VOLBA":XXVO` XX j, t, ~, 2jZM@:Q$"JIH":W$"ZAPAD":E$"SEVER": 5tZM@:Q$"ZAPAD":W$"SEVER":E$"VYCHOD": 4~ZM@:Q$"SEVER":W$"VYCHOD":E$"JIH": .ZM:Q$"VYCHOD":W$"JIH":E$"ZAPAD"d"DEJE":'*****+f:NN :"JULIAN"::"HVEZDNYCAS"h"VOLBASMER"n:"OBLOHA":"POPIS"2x[@] ,,"CEKEJ",,RMA(SM)ZM: MA@ MAMA@ :: MA MAMA@QMI(SM)ZM: MI MIMI@:: MI@ MIMI@ZMZMp4 P L!"ROZDELENI": F$,G$,RE$,DE$6 ZM@p4 "DEKLINACE": 7AB((RE$,)): AB ABAB@D MIMA ABMI AB@ ABMA AB "POKRAC"* MIMA ABMA ABMI "POKRAC" PB[@]4,,"P A/N",,:X$""1X$: X$"A" h:: X$"N" :: "POKRAC"0 ,:" " "UDAJE""OBZORNIK""STEREOGRAF" "ZOBRAZENI""  Y2 Y2> =[]X2 ,Y2,P$(P,),, X"DEKLINACE"bAA((DE$,@))l AA "POKRAC"v' A,A,K,C,R,P,V,C,B,A,P,P,T,T,Z,C,V,A,B,T,O,O,Z,L,E,E,B,G,M P,CM,J,M,V P' CM,V M,UM,M L,LM,R,C,R,L,H,H,S,S,L,L,P,C,M M,UM,H P,CV,V B,C,P,V,H,C,D,D,P,B,H,S,V,L' S K,CB,S,S,H,O,H,H,L,C,L,L,S,S,O,A,S,S,L,V,D,D,K,E,K,C,J,L,P,P,V,A,C,C,*,*' 1,2.0,000823,+2905,4,3.2,003920,+3043,2,2.0,010944,+3537,3,2.1,020354,+4220,2,2.0,010944,+3537,12,3.9,005645,+3830,13,4.5,004949,+4105,*,*,*,*m$' 2,2.2,000910,+5909,1,2.6,004031,+5632,3,1.6,005512,+6035,4,2.8,012549,+6014,5,3.4,015424,+6341,*,*,*,*.' 9,4.1,233957,+0538,11,4.5,234203,+0147,3,3.7,231710,+0317,2,4.5,230352,+0349,3,3.7,231710,+0317,8,4.3,232758,+0623,9,4.1,233957,+0538,24,4.0,235919,+0652,4,4.4,004841,+07350' 5,4.3,010256,+0753,13,4.4,014126,+0529,1,4.3,020202,+0246,15,4.3,014524,+0909,7,3.6,013129,+1521,20,4.5,011140,+3006,*,*,*,*8'3,3.5,024318,+0314,1,2.5,030217,+0406,12,4.2,024456,+1007,14,4.3,022809,+0828,3,3.5,024318,+0314,4,3.8,023929,+0020,15,2.0,021921,-0259,6,3.7,015127,-1020,20,3.5,014404,-1556,13,4.0,020001,-2105,20,3.5,014404,-1556k:' 6,3.7,015127,-1020,8,3.6,012401,-0811,7,3.4,010836,-1011,9,3.6,001926,-0850,2,2,004335,-1759,*,*,*,*[B' 3,3.9,015331,+1917,2,2.6,015439,+2048,1,2.0,020710,+2327,41,3.6,024959,+2716,*,*,*,*L' 6,2.8,035408,+3153,14,4.0,035857,+3547,5,2.9,035751,+4000,4,3.0,034255,+4747,1,1.8,032420,+4951,3,2.9,030448,+5330,7,3.8,025042,+5554,3,2.9,030448,+5330,1,1.8,032420,+4951,2,2.2,030811,+4057,17,3.3,030511,+3850,*,*,*,*ZV' 1,3.4,015305,+2935,2,3.0,020932,+3459,3,4.0,021719,+3351,1,3.4,015305,+2935,*,*,*,*`' 35,4.2,032904,+5957,1,4.3,045403,+6620,2,4.1,050325,+6027,325,4.5,045403,+5346,2,4.1,050325,+6027,1,4.3,045403,+6620,42,5.1,065058,+6734,*,*,*,*j' 8,2.6,055943,+3712,2,1.9,055932,+4457,1,.1,051641,+4600,5,3.0,050158,+4350,7,3.2,050631,+4114,9,2.7,045700,+3309,*,*,*,*t' 15,3.6,032449,+0902,14,3.7,032710,+0944,11,3.5,040040,+1229,3,3.7,041948,+1537,1,.9,043555,+1630,6,3.0,053739,+2109,2,1.6,052617,+2836,5,3.5,042837,+1911,3,3.7,041948,+1537,37,4.4,040442,+2205,*,*,*,*~' 6,1.8,054046,-0157,1,.8,055510,+0724,11,3.4,053508,+0956,3,1.6,052508,+0621,4,2.2,053201,-0018,5,1.7,053612,-0112,6,1.8,054046,-0157,10,2.0,054746,-0940,2,.1,051432,-0812,4,2.2,053201,-0018,*,*,*,*' 7,3.7,055624,-1410,6,3.5,054657,-1450,1,2.6,053244,-1750,12,3.3,051256,-1612,5,3.2,050528,-2222,2,2.8,052815,-2045,3,3.6,054428,-2227,4,3.8,055119,-2052,1,2.6,053244,-1750,*,*,*,*' 2,2.8,050751,-0505,12,4.0,044530,-0315,13,3.9,043619,-0321,15,4,041152,-0650,3,3.0,035802,-1331,4,3.5,034314,-0946,7,3.9,025625,-0854,20,4.5,024506,-1835,20,4.1,030224,-2337,*,*,*,*' 2,1.1,074519,+2801,10,3.6,074427,+2424,4,3.5,072007,+2159,6,4.1,070407,+2034,3,1.9,063743,+1624,12,2.9,062258,+2231,5,3.0,064356,+2508,1,1.58,073436,+3153,2,1.1,074519,+2801,*,*,*,*F' 1,.3,073918,+0514,2,2.8,072709,+0817,3,4.3,072810,+0856,*,*,*,*' 6,4.3,080836,-0259,1,3.9,074115,-0933,4,4.1,071151,-0030,5,4.5,062346,+0436,4,4.1,071151,-0030,2,3.76,062849,-0702,3,4.0,061452,-0617,*,*,*,*' 3,4.1,070345,-1538,1,-1.5,064509,-1643,2,2.0,062242,-1757,1,-1.5,064509,-1643,4,1.8,070824,-2624,7,2.4,072405,-2918,5,1.5,065838,-2858,6,3.0,062018,-3004,*,*,*,*' 7,1.9,134732,+4919,6,2.1,132356,+5456,5,1.8,125402,+5557,4,3.3,121526,+5702,1,1.8,110344,+6145,2,2.4,110151,+5623,3,2.4,115342,+5342,4,3.3,121526,+5702,3,2.4,115349,+5342,22,3.7,114603,+4747,23,3.0,110940,+4429|' 12,3.0,102219,+4130,11,3.4,101706,+4255,23,3.0,110940,+4429,8,3.2,093251,+5141,10,3.6,090337,+4709,9,3.1,085913,+4802r' 8,3.2,093251,+5141,230,3.6,093132,+6304,240,4.6,093429,+6950,15,3.4,083016,+6043,1,1.8,110344,+6145,*,*,*,*I' 15,3.8,105318,+3413,2,4.2,102753,+3642,31,4.5,100726,+3515,*,*,*,*m' 1,4.3,085829,+1152,4,3.9,084441,+1809,9,4.2,084642,+2846,4,3.9,084441,+1809,2,3.5,081631,+0912,*,*,*,*s' 1,3.1,092103,+3424,38,3.8,091850,+3649,31,4.2,082250,+4312,221,4.6,072643,+4913,202,4.5,061937,+5901,*,*,*,*' 16,3.2,140623,-2641,3,3.0,131855,-2311,2,4.3,115254,-3354,14,3.5,113300,-3151,13,3.1,104937,-1611,11,3.6,101035,-1222,1,2.0,092735,-0840,9,3.9,093951,-0108,8,3.9,091422,+0219,5,3.4,084647,+0625,4,4.1,083740,+0542I' 19,4.4,083846,+0321,7,4.30,084314,+0323,8,3.9,091422,+0219,*,*,*,*!' 1,4.5,100756,-0022,*,*,*,*( 2,2.1,114904,+1434,4,2.5,111406,+2031,3,2.0,101956,+1951,6,3.4,101642,+2325,12,3.9,095246,+2601,5,3.0,094551,+2346,7,3.5,100720,+1646,1,1.4,100822,+1158,8,3.3,111415,+1526,2,2.1,114904,+1434,*,*,*,*Z ( 1,4.1,105946,-1818,4,3.6,111920,-1446,3,4.1,112453,-1741,2,4.5,111139,-2250,*,*,*,*( 1,2.5,023113,+8915,4,4.3,173211,+8635,5,4.2,164558,+8202,6,4.3,154403,+7748,2,2.1,145043,+7409,3,3.0,152044,+7150,7,4.9,161730,+7545,6,4.3,154403,+7748,*,*,*,*4( 1,2.9,125602,+3819,2,4.3,123345,+4121,*,*,*,*4(( 2,4.3,131152,+2753,3,4.4,122656,+2816,*,*,*,*2( 1,1.0,132511,-1109,8,4.4,130957,-0532,3,2.7,124140,-0127,7,3.9,121954,-0040,2,3.6,115042,+0146,7,3.9,121954,-0040,3,2.7,124140,-0127,4,3.4,125536,+0323,5,2.8,130211,+1058,4,3.4,125536,+0323,6,3.4,133442,-003654( 4,3.4,125536,+0323,15,4.1,120513,+0844,*,*,*,*m<( 1,4.0,120824,-2443,5,3.0,121008,-2237,3,2.6,121549,-1732,4,2.9,122951,-1631,2,2.7,123423,-2324,*,*,*,*F( 14,3.7,175332,+5652,3,2.2,175636,+5129,2,2.8,173026,+5219,13,4.2,173216,+5510,14,3.7,175332,+5652,4,3.1,191233,+6740,5,3.8,194810,+7016,20,4.4,191533,+7321,22,3.6,182104,+7244,6,3.2,170848,+6543,7,2.7,162359uH( +6130,8,4.0,160154,+5834,9,3.3,152456,+5858,1,3.6,140424,+6422,10,3.8,123329,+6947,11,3.8,113124,+6920,*,*,*,*P( 7,2.7,135441,+1824,1,.1,141540,+1911,17,3.6,143150,+3023,3,3.0,143205,+3819,2,3.5,150157,+4023,4,3.5,151530,+3319,5,2.4,144459,+2705,14,4.5,145123,+1906,*,*,*,*fZ( 3,3.8,155627,+1539,2,3.7,154611,+1525,10,4.1,154844,+1808,2,3.7,154611,+1525,4,3.8,153449,+1032\( 1,2.6,154417,+0625,5,3.7,155049,+0429,12,3.5,154937,-0325,14,3.5,173736,-1524,7,3.3,182118,-0253,8,4.5,185613,+0412,*,*,*,*\d( 13,3.9,153532,-1447,2,2.6,151700,-0923,1,2.7,145053,-1603,19,3.3,150404,-2517,*,*,*,*mn( 8,4.2,153256,+3122,2,3.7,152749,+2906,1,2.2,153441,+2643,3,3.8,154245,+2618,5,4.1,155735,+2653,*,*,*,*x( 1,1.1,162925,-2626,19,2.9,162112,-2535,2,2.6,160527,-1948,19,2.9,162112,-2535,4,2.3,160020,-2237,19,2.9,162112,-2535,16,2.9,155851,-2607,*,*,*,*g( 13,3.3,175901,-0947,2,2.8,174328,+0434,1,2.1,173456,+1234,10,3.2,165744,+0923,5,3.2,161819,-04422( 6,2.6,163709,-1034,7,2.4,171023,-1543,*,*,*( 1,3.1,171439,+1423,2,2.8,163013,+2129,6,2.8,164117,+3136,7,3.5,164254,+3856,19,4.2,163406,+4227,20,3.9,161944,+4619,7,3.5,164254,+3856,16,3.2,171503,+3648,8,3.9,175615,+3715,16,3.2,171503,+3648,5,3.9,170018,+3055[( 6,2.8,164117,+3136,5,3.9,170018,+3055,4,3.1,171502,+2450,12,3.3,174628,+2744,*,*,*,*( 2,3.1,193045,+2758,22,4.2,195033,+3255,7,3.9,195901,+3505,3,2.2,202213,+4015,1,1.3,204126,+4516,3,2.2,202213,+4516,4,2.9,194458,+4508,9,3.8,192942,+5144,4,2.9,194458,+4508,3,2.2,202213,+4015,5,2.4,204613,+3358!( 6,3.2,211256,+3014,*,*,*,*( 1,.0,183656,+3847,6,4.4,184447,+3736,4,3.30,185430,+3654,3,3.2,185856,+3241,2,3.4,185004,+3322,6,4.4,184447,+3736,*,*,*,*Z( 2,4.4,194006,+1801,2,4.4,194102,+1729,4,3.8,194723,+1832,3,3.5,195846,+1929,*,*,*,*( 2,3.7,195519,+0624,1,.8,195047,+0852,3,2.7,194615,+1037,1,.8,195047,+0852,4,3.4,192529,+0307,11,3.4,190615,-0453,4,3.4,192529,+0307,6,3.0,190525,+1352,4,3.4,192529,+0307,7,3.5,195229,+0100,8,3.2,201118,-0049,*,*,*,*E( 2,4.2,1847,-0445,1,3.8,183512,-0815,3,4.7,182912,-1434,*,*,*,*!( 1,4.4,192843,+2440,*,*,*,*( 5,4.0,203313,+1118,1,3.6,203733,+1436,4,4.4,204327,+1505,3,3.9,204639,+1608,1,3.8,203939,+1555,2,3.6,203733,+1436,*,*,*,*( 1,3.9,211550,+0515,2,5.1,212254,+0649,4,4.5,211429,+1000,3,4.7,211021,+1008,5,5.2,205905,+0418,1,3.9,211550,+0515,*,*,*,*( 1,4.2,201738,-1230,2,3.1,202101,-1447,8,4.1,210557,-1714,9,4.3,212215,-1650,3,3.7,214005,-1640,4,2.8,214702,-1608,6,3.7,212640,-2225,24,4.1,205149,-2656,23,4.1,204606,-2516,*,*,*,*( 2,4.4,222334,+5214,1,3.8,223117,+5017,205,4.4,222932,+4743,206,4.5,223029,+4308,270,4.5,221353,+3943,1,4.1,221529,+3745,*,*,*,*( 201,2.0,000823,+2905,2,2.6,230347,+2805,12,3.5,225001,+2436,2,2.6,230347,+2805,1,2.5,230446,+1512,6,3.4,224127,+1050,8,3.5,221012,+0612,5,2.4,214411,+0953,6,3.4,224127,+1050,1,2.5,230446,+1512,3,2.8,001314,+1511,201,2.6,000823,+2905,*,*,*,*) 24,4.5,234243,-1433,4,3.3,225439,-1549,11,3.7,225237,-0735,8,4.2,221649,-0747,1,2.9,220547,-0019,3,3.8,222139,-0123,6,3.7,222850,-0001,7,4.0,223521,-0007,16,4.7,222516,+0122,6,3.7,222850,-0001,3,3.8,222139,-0123[) 1,2.9,220547,-0019,2,2.9,213134,-0535,13,4.5,210936,-1123,5,3.8,204741,-0930,*,*,*,*) 3,3.2,233920,+7737,9,3.5,224941,+6612,4,4.3,222910,+5825,6,3.4,221051,+5812,1,2.4,211835,+6235,7,3.4,204517,+6150,1,2.4,211835,+6235,2,3.2,212839,+7033,9,3.5,224941,+6612,2,3.2,212839,+7033,3,3.2,233920,+7737,*,*,*,