home *** CD-ROM | disk | FTP | other *** search
- 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
-