>0 100:1370# STERN SETZEN?SWM(ARREL):SWSWP1a(HS(SB(DE)CB(DE)(SW))u2H0X0:Y0:<AC(((DE)SB(H))(CB(H)))FSWǩAAPR120H240:WAǯ2ZX((W)R120.5)dY(128(W)R)n(25,30);(N$" ",10):X,Y,7x* FIXSTERNE42280@I0I1^ RE,DE,F$(I),H:F(I)HQQkDEDEP1|N$F$(I):30F(I)F(I)QCXY: REKTASZENSION/DEKLINATIONSN(ABP1):CS(ABP1)SL(ALP1):CL(ALP1) DES(ECSNESCSSL)6RE2((ECCSSLESSN)((DE)CSCL))KREM(REP2):30Z EINGABEN{QA(U8)QB((QCV)4),QD"QA(X8)QB((QCY)4),QE:UX:VY,A$:A$""3006A(A$):A8X8XX8:280@A9X232XX8:280JA10Y12YY4:280+TA11Y244YY4:280E^A25X8XX1:280ahA24X240XX1:280{rA18Y8YY1:280|A17Y248YY1:280A48A54:280A526:::1700A480,31,0,39:7,1:::XM1E9:Z1:A51730'A505;(25,30);"STERNBILD ":490C5;(25,30);"SU.STERN"W TEST PLANETENzI05:XPP(I,0)X:YPP(I,1)YXPXPXPYPYP:XPXMXMXP:ZI:XPXM:XP0(26,30);P$(Z):680 TEST FIXSTERNEI0I1:HF(I):HS(HQQ)* HHHSQQ:XT(HQC):HHQCXT:XSXTX:YPHY` XFXSXSYPYP:XFXMXMXF:ZFI:XUXT:YUH:HUHS :XPXMA49(26,30);P$(Z):XP(Z,0):YP(Z,1):680 XXU:YYU:(26,30);F$(ZF) &(27,30);"Sternbild":(28,30);S$(HU,1) 0(29,30);S$(HU,0):A50680 :GHU:HS(G)10 D STERNBILD BLINKENE NIH:H70:HL HLb XHS(F(I)QQ):HSG650 bHUF(I)QQHS:XU(HUQC):YUHUQCXU lXUYU0640:H71 vHLXU,YU:XU,YU II1:600 H702;(27,30);"N.SICHTBAR":710 A$:A$""HL590& 25,30,30,39:6::2809 X,Y:3:X,Y,7P 2:A$:A$""680Y 670m A$:A$""710~ X9:Y9:670 2;"Eingabe:" "";N$:N(N$)  TEST PLANETEN Z1:I05:N$(P$(I),N)ZI:I5 :Z0800! (26,30);(P$(Z)" ",9):XP(Z,0):YP(Z,1)N X0680:Ԟ2;(27,30);"N.SICHTBAR":710c  TEST FIXSTERNE *I0I1:N$(F$(I),N)ZI:II1 4:Z0880 >(26,30);(F$(Z)" ",10):(27,30);"Sternbild" HHF(Z):HS(HQQ):HHQQHS:X(HQC):YHXQC, R(28,30);S$(HS,1):(29,30);S$(HS,0)9 \X0680\ f2;(27,30);"N.SICHTBAR":710s p TEST STERNBILDER zI0I3:N$(S$(I,0),N)ZI:II3:910 N$(S$(I,1),N)ZI:II3 :Z02;(27,30);"UNBEKANNT":710(27,30);"STERNBILD":(28,30);S$(Z,1)4(29,30);S$(Z,0):GZ:HS(Z)1=590H ERDEdBEM(TG.98560999.18)ELM(BE((BE102.2)P1)1.845)EA1((EL192.2)P1).0167 SONNELSM(EL180) MONDLMTG13.176451.23PMTG.111399208.9KM372.1TG.0529536=LMM(LM):PMM(PM):KMM(KM)]$AMLMPM:KMKM(ASP1).16q.MS(LMLS)2AM8AMAM(MSP1)1.27389(ASP1)(.186389.36)BLMLM(MSP1)1.27389(ASP1).186389(AMP1)2LM1LMLS:LMLM(M12P1).658333$VM2LMKM:LMLM(M22P1).12<`BM(M2P1)5.14539PjM3(LMLS)2M2gtBMBM(M3P1).15~ALLS:AB0:N$"SONNE":220X01180I13:X,Y,I,6:ALLM:ABBM:N$"MOND":220X0X,Y,2,7 PLANETEN4450:Z05(P$(Z),TB,EP,PH,MP,E,KN,I,AE<MLM(TBTGEP)WWLML((MLPH)P1)MPwSPAE((WLPH90)P1)EAEWSM(CELWL)P1:SI(WS) FLEASP(WS)WE(SIFL)P2ALM(ELWE180(FL0))(WT((WLKN)P1)I2AB((WTP1)((WEP1)SI))P2'<N$P$(Z):220=FP(Z,0)X:P(Z,1)YEP:[Z0,31,0,39:7,6:sd1,11,1,38:6,2::n" **** ***** ***** **** * * *****"x" * * * * * * * *"" * * * * * ** * *"" *** * **** **** * * * ****"B" * * * * * * ** *"o" **** * ***** * * * * *****" " ==================================="" (C) bidat'88 fuer KC85/3" NACH H.HINKELMANN (HAMM/BRD)13,30,1,38:7,6 "DIESES PROGRAMM ZEICHNET EINE STERN-"L"KARTE MIT SONNE, MOND, PLANETEN UND"x"FIXSTERNEN FUER EINEN VORGEGEBENEN""ORT UND ZEITPUNKT. DER DANACH IM BILD""ERSCHEINENDE CURSOR KANN MIT DEN CUR-""SORTASTEN AUF EINEN STERN BEWEGT WER-"+"DEN. DAS PROGRAMM GIBT DEN NAMEN DES"W"STERNS AN. WIRD EIN NAME EINGEGEBEN,"""SUCHT DAS PROGRAMM DEN STERN BZW.","DAS STERNBILD UND LAESST ES BLINKEN."6P$(5),P(5,1),F$(176),F(176),S$(38,1),S(38),M(12)@M(X)X(X360)360JS(X)(X(1XX))5TC(X)ǯ2(X(1XX))\^I1175:I338:F1:P1ǯ180:P2180vh2260:I112:M(I):rQA10240:QB32:QC255:QD56:QE62:QQ65536| STERNBILDER EINLESEN4050:I0I3:S$(I,0),S$(I,1),S(I)::30);:"";A$ PARAMETEREINGABE21,30,1,38:7,3:j0,7:" * * STERNE * * PARAMETEREINGABE * * ":7,3"BITTE GEBEN SIE NUN DIE GEOGRAFISCHEN""KOORDINATEN FUER DEN STANDORT DES BE-""OBACHTERS AN, z.B. FUER ERFURT:"1:"LAENGE:11";:3:" (WESTL.LAENGE NEGATIV)"Q1:"BREITE:51";:3:" (SUEDL.BREITE NEGATIV)"{:2:"EINGABE GEOGR. LAENGE:";L:LL(L)1801770"EINGABE GEOGR. BREITE:";B(B)901790:3:"BITTE GEBEN SIE NUN DIE UHRZEIT"1:"(WELTZEIT)";:3:"EIN:"6&:2:"EINGABE UHRZEIT (WELTZEIT)";U01:"hh.mm";:2:":";WZ:3::"BITTE GEBEN SIE NUN DAS DATUM EIN:":D2:"EINGABE JAHR:";J:J100JJ1900N" MONAT:";M:M1M121870X" TAG:";T:T1T311880b ABLAUFSTEUERUNGl1970#v2100,95061230?140`X120:Y128:U120:V128:280u ZEITBERECHNUNGZT(WZ)(WZ(WZ)).6H7TZT24M(M)(M2(J4(J4)))K365.2422JH7TA365.2422(J1900)H7TG365.2422(J1950)H7E23.427:AS5.1453SB(BP1):CB(BP1)MES(EP1):EC(EP1)rLO(L15)15:OZM(ZT15LO)15 ARZT360.98624(TA1461(TA1461))1440.03ARAR(TA1461).030757299.2019 ARM(AR):* BILDSCHIRMAUFBAU47,0:1,30,0,29:>7,6:1,30,30,39:PH1,3,30,39::0:"* STERNE * ======" sR4,15,30,39:7,3:::"DATUM:"\((T),2)"."((M),2)"."((J),4)f"ORTSZEIT ";(OZ)(OZ(OZ)).6p"WELTZEIT ";WZ:"KOORDINAT"zA$"o.L.":L0A$"w.L.")(L);A$:A$"n.B.":B0A$"s.B."J(B);A$:15,23,30,39:7,5:{:"FUNKTIONEN==========1=STERN 2=ST.BILD""3=NAME":"4=PARAM.":"0=ENDE"0,8,0,247,77,0:120,128,120,70:25,30,30,390,31,59,90,120,151181,212,243,273,304,334' FIXSTERNE>27.2,89,POLARIS,0W267,86.6,PHERKORD,0n 252.8,82.1,UMI3,0 246.3,75.5,UMI4,0 236.5,78,UMI5,0$ 230,72,PHERKAD,0. 222.7,74.4,KOCHAB,08 206.4,49.6,BENETNASCH,1B 200.5,55.2,MIZAR,1L 193,56.2,ALIOTH,1.V 183.2,57.3,MEGREZ,1E` 177.8,54,PHEKDA,1[j 165.2,62,DUBHE,1st 164.7,56.6,MERAK,1~ 28.6,63.2,CAS1,2 20.5,60,KSORA,2 13.5,60.4,CAS3,2 9.5,56.3,SCHEDAR,2 1.6,58.9,CAPH,2 2.7,14.9,ALGENIB,3 345.5,14.9,MARKAB,3+ 345.3,27.8,SCHEAT,3A 327.8,9.6,ENIF,3X 311,33.8,GIENHA,4n 310,45.1,DENEB,4 305,40.1,SADOR,4 296.2,45,CYG4,4 292.2,28,ALBIREO,4 302.8,-.9,AQL1,5  297,8.7,ATAIR,5  298.2,6.3,ALSHAIN,5 !( 296,10.5,TARAZED,5!!2 290.8,3,OKAB,56!< 286.6,-5,AQL5,5M!F 286.4,13.8,AQL6,5h!P 284.2,32.6,SULAPHAT,6}!Z 281,39.6,LYR2,6!d 282,33.3,SCHELIAK,6!n 283,37,LYR4,6!x 278.8,38.7,WEGA,6! 264.8,-30,SCO1,7! 261.8,-37,SCO2,7" 251.8,-34.2,SCO3,7" 262.5,-37.1,SHAULA,72" 239,-26,SCO5,7J" 244.5,-25.5,SCO6,7e" 246.5,-26.3,ANTARES,7~" 240.6,-19.7,ACRAB,7" 239.3,-22.5,DSHUBBA,7" 248.2,-28.1,SCO10,7" 228.4,33.3,BOO1,8" 225,40.6,MERES,8" 220.8,27.3,IZAR,8# 217.5,38.5,HARIS,8%# 217.4,30.6,BOO5,8># 213.2,19.5,ARKTUR,8U#" 208,18.6,MUFRID,8l#, 200.5,-11,SPIKA,9#6 197,-5.3,VIR2,9#@ 195,11,VINDEMIAT,9#J 193.2,3.7,AUVA,9#T 190,-1,PORRIMA,9#^ 184,0,VIR6,9#h 177,2,ZAVIJAH,9$r 191.2,-59.4,CRU1,10$| 187,-56.8,CRU2,103$ 186,-62.8,CRU3,10J$ 184.6,-60,CRU4,10f$ 176.5,14.9,DENEBOLA,11~$ 167.8,15.7,COXA,11$ 167.8,20,ZOSMA,11$ 154.3,20.1,ALGEIBA,11$ 151.5,12.2,REGULUS,11$ 151.2,17,LEO7,11$ 145.8,24,ELASED,11% 115.5,28,POLLUX,12)% 112.7,32,KASTOR,12?% 100.6,13,GEM3,12X% 100,25.2,MEBSUTA,12q% 98.8,16.4,ALHENA,12% 93,22.5,TEJAD,12% 110.5,-29.2,ALUDRA,13%& 106.5,-26.3,WEZEN,13%0 104.2,-29,ADARA,13%: 100.8,-16.4,SIRIUS,13&D 95,-18,MIRZAM,13&N 94.5,-30,FURUD,131&X 89,37.2,AUR1,14I&b 89,45,MENKALMAN,14a&l 78.2,46,CAPELLA,14z&v 75.5,41.2,HOEDUS,14& 73.5,29.5,HASSALEH,14& 88,7.4,BETEIGEUZE,15& 86.2,-9.7,SAYPH,15& 84.5,-2,ALNITAK,15& 83.2,-1.2,ALNILAM,15' 82.2,-.3,MINTAKA,15-' 80.5,6.3,BELLATRIX,15C' 78,-8.2,RIGEL,15X' 58.6,40,PER1,16r' 57.8,31.7,MENKHIB,16' 54.8,47.6,PER3,16' 50.2,49.7,ALGENIB,16' 46.2,40.8,ALGOL,16' 45.2,53.3,MIRFAK,16' 30,42,ALAMAK,17( 16.2,35.4,MIRACH,17( 9.2,30.6,AND3,170(* 1.5,28.8,SIRRAH,17I(4 354.2,77.4,ALRAI,18](> 342,66,CEP2,18v(H 322,70.3,ALPHIRK,18(R 319.2,62.4,ALDERAMIN,18(\ 268.8,51.5,ETAMIN,19(f 262.2,52.3,ALWAID,19(p 231,59,DRA3,19(z 246,61.6,DRA4,19 ) 257.2,65.8,NODUS1,19#) 288,67.6,NODUS2,199) 31,23.2,HAMAL,20R) 28,20.6,SHERATAN,20g) 83.7,21,TAU1,21~) 80.8,28.6,NATH,21) 68.2,16.4,ALDEBARAN,21) 59.5,12.4,TAU4,21) 56.1,24,ALCYONE,21) 56.9,24.1,PLEJADEN,21) 114.2,5.5,PROKYON,22* 111,8.4,GOMEISA,223* 330.8,-.6,SADALMELEK,23M*322.2,-6,SADALSUD,23f*210.9,-36.1,CEN1,24*199.4,-36.5,CEN2,24*$219,-60.6,TOLIMAN,24*.210,-60.1,CEN4,24*8189.9,-48.7,CEN5,24*B181.5,-50.4,CEN6,24*L204.2,-53.2,CEN7,24+V218,-41.9,CEN8,24(+`45,3.9,MENKAR,25A+j10.2,18.3,KAITOS,25U+t34,3.2,M\RA,25n+~233.1,26.9,GEMMA,26+141.2,-8.4,ALFARD,27+263,12.6,ALHAGUE,28+265.2,4.6,AL_RAI,28+243,-3.6,YED,28+248.6,-10.5,OPH4,28,256.9,-15.7,OPH5,28 ,343.8,-29.9,FORMALHAUT,299,102.2,-50.4,PUP1,30S,120.4,-39.9,NAPOS,30j,108.8,-37,PUP3,30,121.4,-24.2,PUP4,30,274.5,-29.9,KAUSMEDIUS,31,275.2,-34.4,KAUS_AUSTR,31, 284.8,-30,ASCELLA,31,276.2,-25.4,KAUSBOREAL,31-283,-26.4,NUNKI,31--(95.5,-52.7,CANOPUS,32F-2138.2,-69.5,CAR2,32_-<125.4,-59.3,CAR3,32v-F139,-59.1,CAR4,32-P24,-57.5,ARCHERNAR,33-Z331.2,-47.2,ALNAIR,34-d340,-47.1,GRU2,34-n305.5,-56.9,PAV1,35-x6,-42.6,PHO1,36.250,-68.9,TRA1,37!.237.8,-63.3,TRA2,37:.228.5,-68.5,TRA3,37R.122,-47.12,VEL1,38k.130.8,-54.5,VEL2,38.140.2,-54.8,VEL3,38.136.5,-43.2,VEL4,38.161.2,-49.1,VEL5,38. STERNBILDER.URSA MINOR,KL.WAGEN,1.URSA MAIOR,GR.WAGEN,8/CASSIOPEIA,KASSIOPEIA,154/PEGASUS,PEGASUS,20J/CYGNUS,SCHWAN,24`/AQUILLA,ADLER,29s/LYRA,LEIER,36/"SCORPIUS,SKORPION,41/,BOOTES,BOOTES,51/6VIRGIO,JUNGFRAU,58/@CRUX,KR.SUEDENS,65/JLEO,LOEWE,69/TGEMINI,ZWILLINGE,760^CANIS MAIOR,GR.HUND,8220hAURIGA,FUHRMANN,88F0rORION,ORION,93_0|PERSEUS,PERSEUS,100|0ANDROMEDA,ANDROMEDA,1060CEPHEUS,KEPHEUS,1100DRACO,DRACHE,1140ARIES,WIDDER,1200TAURUS,STIER,1220CANIS MINOR,KL.HUND,1281AQUARIUS,WASSERMANN,130,1CENTAURUS,ZENTAUR,132D1CETUS,WALFISCH,140_1CORONABOR,N.KRONE,143y1HYDRA,WASSERSCHL,1441OPHIUCHUS,SCHLTRAGER,1451PISCESAUST,S.FISCHE,1501PUPPIS,PUPPIS,1511SAGITARIUS,SCHUETZE,1551CARINA,KIEL,1602&ERIDANUS,ERIDANUS,164.20GRUS,KRANICH,165A2:PAVO,PFAU,167Z2DPHOENIX,PHOENIX,168x2NTRIANGAUST,S.DREIECK,1692XVELA,SEGEL,1722b PLANETEN2lMERKUR,4.0923,31.19,76.9872v23,.2056,47.826,7.004,.38712VENUS,1.6021,80.85,131.14930.76,.0068,76.410,3.394,.7233>3MARS,.5240,144.14,335.507`311,.0934,49.326,1.850,1.52373JUPITER,.0831,316.19,13.83935.30,.0485,100.146,1.305,5.20283SATURN,.0335,158.36,92.46035.5,.0557,113.511,2.486,9.5810 4URANUS,.0117,98.38,170.173.45.70,.0472,73.847,.773,19.1823=4 *** ENDE2.46035.5,.0557,113.511,2.486,9.5810 4URANUS,.0117,98.