This file may be freely distributed for non-commercial use as a complete file with all information intact. For commercial usage, contact: QUARTERFLASH on GEnie EMAIL or D. J. PEDERSEN 197 SIERRA VISTA AVE. MOUNTAIN VIEW, CA. 94043 List of 90 stelar objects with magnitude, distance in light years, luminosity, right asscention and declination. (oc=open cluster). Definitions may be found in Star_data listing. Followed the star list is a listing of data statements in Hewlett Packard "ROCKY MOUNTAIN BASIC" which may be easily converted for use with other languages. Name Mag Dist Lum Spec Ra Dec SIRIUS -1.6 8.7 23 A0 6.43 -16.7 CANOPUS -.7 98 1500 F0 6.23 -52.7 ARCTURUS -.1 36 110 K2 14.14 19.4 VEGA 0 27 52 A0 18.36 38.8 CAPELLA .1 45 140 G0 5.14 46 RIGEL .2 900 55000 B8 5.13 -8.3 PROCYON .4 11.3 8 F5 7.37 5.4 BETELGEUSE .4 520 15000 M0 5.54 7.4 ALTAIR .8 16.6 10 A5 19.49 8.8 ALDEBARAN .9 68 150 K5 4.34 16.5 ANTARES 1 520 10000 M1 16.28 -26.3 SPICA 1 220 1700 B2 13.24 -11 FOMALHAUT 1.2 23 13 A3 22.56 -29.7 POLLUX 1.2 35 33 K0 7.43 28.1 DENEB 1.3 1600 55000 A2 20.4 45.2 REGULUS 1.4 84 155 B8 10.07 12.1 CASTOR 1.6 45 35 A0 7.33 32 ADHARA 1.6 680 9000 B1 6.57 -28.9 BELLATRIX 1.6 470 3800 B2 5.24 6.4 SHAULA 1.6 310 1700 B1 17.32 -37.1 ELNATH 1.7 300 1500 B7 5.24 28.6 ALNILAM 1.7 1600 4200 B0 5.35 -1.2 MIRFAK 1.8 570 4700 F5 3.22 49.8 DUBHE 1.8 105 150 K0 11.02 61.9 ALIOTH 1.8 68 70 A0 12.53 56.1 GAMMA VELORUM 1.8 520 3500 O 8.09 -47.3 KAUS AUSTRALIS 1.8 124 220 B9 18.22 -34.4 ALNITAK 1.8 1600 35000 O9 5.39 -2 AL NAIR 1.8 64 60 B7 22.06 -47.1 ALKAID 1.9 210 600 B3 13.46 49.5 ALHENA 1.9 105 140 A0 6.36 16.4 WEZEN 1.9 2100 55000 F8 7.07 -26.4 LAMBDA SCORPII 1.9 650 3500 F0 17.35 -43 MENKALINAN 1.9 88 100 A2 5.57 45 MIRZAM 2 750 7000 B1 6.21 -17.9 DELTA VELORUM 2 76 65 A0 8.44 -54.6 POLARIS 2 680 5500 F8 2.03 89.1 ALPHARD 2 94 110 K4 9.26 -8.5 HAMAL 2 76 70 K2 2.05 23.3 DIPHDA 2 57 38 K1 .42 -18.2 THETA CENTAURI 2 55 35 K0 14.05 -36.2 MIRACH 2 76 11 M0 1.08 35.5 NUNKI 2.1 300 1000 B2 18.53 -26.3 RASALHAQUE 2.1 58 38 A5 17.34 12.6 ALPHERATZ 2.1 90 90 B9 .07 28.9 ALGOL 2.1 105 130 B8 3.06 40.8 KOCHAB 2.1 105 130 K4 14.51 74.3 ALMACH 2.1 260 750 K3 2.02 42.2 SAIPH 2.1 2100 50000 B0 5.54 7.4 SCHEDAR 2.1 150 225 K0 .39 56.4 M103/581 7.5 60 5 oc 1.32 60.6 N752 7 70 45 oc 1.56 37.6 N869 4.5 350 36 oc 2.17 57 N884 4.5 300 36 oc 2.21 57 M34/1039 5.5 80 18 oc 2.4 42.7 N1502 5.5 15 7 oc 4.05 62.3 N1528 6.5 60 25 oc 4.14 51.2 N1746 6 80 45 oc 5.02 23.8 M38/1912 7.5 100 20 oc 5.27 35.8 M36/1960 6.5 60 12 oc 5.35 34.1 M37/2099 6 150 20 oc 5.51 32.5 M35/2168 5.5 120 40 oc 6.07 24.4 N2244 6 16 40 oc 6.31 4.9 N2264 4.5 20 30 oc 6.4 9.9 M41/2287 5 50 30 oc 6.46 -20.7 N2281 7 30 15 oc 6.48 41.1 N2301 6 60 15 oc 6.51 .5 M50/2323 7 100 16 oc 7.02 -8.2 N2353 5 25 20 oc 7.14 -10.2 M47/2422 4.5 50 25 oc 7.35 -14.4 M46/2437 6 150 25 oc 7.41 -14.8 M93/2447 6 60 18 oc 7.44 -23.8 M48/2548 5.5 80 30 oc 8.12 -5.7 M44/2632 4 200 90 oc 8.39 20.1 M67/2682 6 65 15 oc 8.5 11.9 N6124 6.5 120 25 oc 16.24 -40.6 N6383 5.5 12 6 oc 17.33 -32.6 M6/6405 5 80 25 oc 17.38 -32.2 M7/6475 3.5 80 60 oc 17.52 -34.8 M23/6494 7 120 25 oc 17.56 -19 M8/6530 7 25 20 oc 18.02 -24.4 M21/6531 6.5 40 12 oc 18.03 -22.5 M16/6611 6.5 100 30 oc 18.17 -13.8 M17/6618 7 35 25 oc 18.19 -16.2 N6633 5 65 20 oc 18.26 6.5 M25 6.5 50 40 oc 18.3 -19.3 M11/6705 6.5 200 10 oc 18.5 -6.3 M39/7092 5 25 30 oc 21.31 48.2 M52/7654 7 120 12 oc 23.23 61.5 N7789 9.5 200 30 oc 23.56 56.5 listing of star data statements. dimension sizes: Name$(90)[16],REAL Mag(90),Dist(90),Lum(90),Spec$(90)[2] REAL Ra(90),Dec(90) ("lum" may be integer type to save memory.) 1580 Star_data:SUB Star_data 1590 COM /Stars/ Name$(*),Mag(*),Dist(*),Lum(*),Spec$(*),Ra(*),Dec(*) 1600 REM STAR DATA 1610 REM copyright: DEAN J. PEDERSEN 1984 1620 REM ALL RIGHTS RESERVED 1630 REM *******LISTING OF 50 BRIGHTEST STARS******** 1640 REM (followed by 40 open clusters) 1660 !*********************************************************************** 1670 Names:DATA SIRIUS,CANOPUS,ARCTURUS,VEGA,CAPELLA,RIGEL,PROCYON 1680 DATA BETELGEUSE,ALTAIR,ALDEBARAN,ANTARES,SPICA,FOMALHAUT 1690 DATA POLLUX,DENEB,REGULUS,CASTOR,ADHARA,BELLATRIX,SHAULA 1700 DATA ELNATH,ALNILAM,MIRFAK,DUBHE,ALIOTH,GAMMA VELORUM 1710 DATA KAUS AUSTRALIS,ALNITAK,AL NAIR,ALKAID,ALHENA,WEZEN 1720 DATA LAMBDA SCORPII,MENKALINAN,MIRZAM,DELTA VELORUM 1730 DATA POLARIS,ALPHARD,HAMAL,DIPHDA,THETA CENTAURI,MIRACH 1740 DATA NUNKI,RASALHAQUE,ALPHERATZ,ALGOL,KOCHAB,ALMACH 1750 DATA SAIPH,SCHEDAR 1760 !****open clusters (40) 1770 DATA M103/581,N752,N869,N884,M34/1039,N1502,N1528,N1746,M38/1912 1780 DATA M36/1960,M37/2099,M35/2168,N2244,N2264,M41/2287,N2281,N2301 1790 DATA M50/2323,N2353,M47/2422,M46/2437,M93/2447,M48/2548,M44/2632 1800 DATA M67/2682,N6124,N6383,M6/6405,M7/6475,M23/6494,M8/6530,M21/6531 1810 DATA M16/6611,M17/6618,N6633,M25,M11/6705,M39/7092,M52/7654,N7789 1820 !*********************************************************************** 1830 Mag: DATA -1.6,-0.7,-0.1,0.0,0.1,0.2,0.4,0.4,0.8,0.9,1.0,1.0,1.2,1.2 1840 DATA 1.3,1.4,1.6,1.6,1.6,1.6,1.7,1.7,1.8,1.8,1.8,1.8,1.8,1.8,1.8 1850 DATA 1.9,1.9,1.9,1.9,1.9,2.0,2.0,2.0,2.0,2.0,2.0,2.0,2.0,2.1,2.1 1860 DATA 2.1,2.1,2.1,2.1,2.1,2.1 1870 !***OPEN CLUSTERS (40) 1880 DATA 7.5,7.0,4.5,4.5,5.5,5.5,6.5,6,7.5,6.5,6,5.5,6,4.5,5,7,6,7,5 1890 DATA 4.5,6,6,5.5,4,6,6.5,5.5,5,3.5,7,7,6.5,6.5,7,5,6.5,6.5,5,7,9.5 1900 !*********************************************************************** 1910 Dist: DATA 8.7,98,36,27,45,900,11.3,520,16.6,68,520,220,23,35,1600,84,45 1920 DATA 680,470,310,300,1600,570,105,68,520,124,1600,64,210,105,2100 1930 DATA 650,88,750,76,680,94,76,57,55,76,300,58,90,105,105,260,2100,150 1940 !******* OPEN CLUSTERS (NUMBER OF STARS) 1950 DATA 60,70,350,300,80,15,60,80,100,60,150,120,16,20,50,30,60,100 1960 DATA 25,50,150,60,80,200,65,120,12,80,80,120,25,40,100,35,65,50,200 1970 DATA 25,120,200 1980 !*********************************************************************** 1990 Lum: DATA 23,1500,110,52,140,55000,8,15000,10,150,10000,1700,13,33,55000 2000 DATA 155,35,9000,3800,1700,1500,4200,4700,150,70,3500,220,35000,60 2010 DATA 600,140,55000,3500,100,7000,65,5500,110,70,38,35,11,1000,38,90 2020 DATA 130,130,750,50000,225 2030 !******OPEN CLUSTERS (DIA IN MIN ARC) 2040 DATA 5,45,36,36,18,7,25,45,20,12,20,40,40,30,30,15,15,16,20,25,25,18 2050 DATA 30,90,15,25,6,25,60,25,20,12,30,25,20,40,10,30,12,30 2060 !*********************************************************************** 2070 Spec: DATA A0,F0,K2,A0,G0,B8,F5,M0,A5,K5,M1,B2,A3,K0,A2,B8,A0,B1,B2,B1,B7 2080 DATA B0,F5,K0,A0,O,B9,O9,B7,B3,A0,F8,F0,A2,B1,A0,F8,K4,K2,K1,K0,M0 2090 DATA B2,A5,B9,B8,K4,K3,B0,K0 2100 ! **********OPEN CLUSTERS (X40) 2110 DATA oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc 2120 DATA oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc 2130 ! DEFINITIONS: 2140 ! TYPE CELSIUS COLOR 2150 ! O ABOVE 30K BLUE 2160 ! B 10-30K BLUISH-WHITE 2170 ! A 8-10K WHITE 2180 ! F 6-8K YELLOWISH-WHITE 2190 ! G 4.6-6K YELLOW 2200 ! K 3.7-4.6K YELLOW-ORANGE 2210 ! M 2.2-3.7K REDISH-ORANGE 2220 ! OR "Oh Be A Fine Girl Kiss Me" 2230 ! nb na nebulae 2240 ! gc na globular cluster 2250 ! oc na open cluster 2260 ! ms na multiple stars 2270 ! gx na galaxy 2280 !*********************************************************************** 2290 Ra: DATA 6.43,6.23,14.14,18.36,5.14,5.13,7.37,5.54,19.49,4.34,16.28,13.24 2300 DATA 22.56,7.43,20.40,10.07,7.33,6.57,5.24,17.32,5.24,5.35,3.22,11.02 2310 DATA 12.53,8.09,18.22,5.39,22.06,13.46,6.36,7.07,17.35,5.57,6.21,8.44 2320 DATA 2.03,9.26,2.05,0.42,14.05,1.08,18.53,17.34,0.07,3.06,14.51,2.02 2330 DATA 5.54,0.39 2340 !******OPEN CLUSTERS (X40) 2350 DATA 1.32,1.56,2.17,2.21,2.40,4.05,4.14,5.02,5.27,5.35,5.51,6.07,6.31 2360 DATA 6.40,6.46,6.48,6.51,7.02,7.14,7.35,7.41,7.44,8.12,8.39,8.50,16.2 4 2370 DATA 17.33,17.38,17.52,17.56,18.02,18.03,18.17,18.19,18.26,18.30,18.5 0 2380 DATA 21.31,23.23,23.56 2390 !*********************************************************************** 2400 Dec: DATA -16.7,-52.7,19.4,38.8,46.0,-8.3,5.4,7.4,8.8,16.5,-26.3,-11.0 2410 DATA -29.7,28.1,45.2,12.1,32.0,-28.9,6.4,-37.1,28.6,-1.2,49.8,61.9 2420 DATA 56.1,-47.3,-34.4,-2.0,-47.1,49.5,16.4,-26.4,-43.0,45.0,-17.9 2430 DATA -54.6,89.1,-8.5,23.3,-18.2,-36.2,35.5,-26.3,12.6,28.9,40.8 2440 DATA 74.3,42.2,7.4,56.4 2450 !********OPEN CLUSTERS (X40) 2460 DATA 60.6,37.6,57,57,42.7,62.3,51.2,23.8,35.8,34.1,32.5,24.4,4.9,9.9 2470 DATA -20.7,41.1,.5,-8.2,-10.2,-14.4,-14.8,-23.8,-5.7,20.1,11.9,-40.6 2480 DATA -32.6,-32.2,-34.8,-19.0,-24.4,-22.5,-13.8,-16.2,6.5,-19.3,-6.3 2490 DATA 48.2,61.5,56.5 2500 !*********************************************************************** 2510 RESTORE Names 2520 READ Name$(*) 2530 RESTORE Mag 2540 READ Mag(*) 2550 RESTORE Dist 2560 READ Dist(*) 2570 RESTORE Lum 2580 READ Lum(*) 2590 RESTORE Spec 2600 READ Spec$(*) 2610 RESTORE Ra 2620 READ Ra(*) 2630 RESTORE Dec 2640 READ Dec(*) 2650 SUBEXIT 2660 SUBEND