home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / files / astronmy / starlist.txt < prev    next >
Text File  |  1988-02-27  |  14KB  |  232 lines
  1. This file may be freely distributed for non-commercial use as a complete 
  2. file with  all information intact.
  3.  
  4. For commercial usage, contact:   QUARTERFLASH on GEnie EMAIL or
  5.  
  6.                                   D. J. PEDERSEN
  7.                                   197 SIERRA VISTA AVE.
  8.                                   MOUNTAIN VIEW, CA. 
  9.                                   94043
  10.  
  11. List of 90 stelar objects with magnitude, distance in light years, 
  12. luminosity, right asscention and declination. (oc=open cluster).
  13.  
  14. Definitions may be found in Star_data listing.
  15.  
  16. Followed the star list is a listing of data statements in Hewlett Packard 
  17. "ROCKY MOUNTAIN BASIC" which may be easily converted for use with other 
  18. languages. 
  19.  
  20.  
  21.     Name             Mag     Dist   Lum        Spec    Ra     Dec
  22.  
  23.  
  24.     SIRIUS           -1.6     8.7    23        A0     6.43    -16.7 
  25.     CANOPUS          -.7      98     1500      F0     6.23    -52.7 
  26.     ARCTURUS         -.1      36     110       K2     14.14    19.4 
  27.     VEGA              0       27     52        A0     18.36    38.8 
  28.     CAPELLA           .1      45     140       G0     5.14     46 
  29.     RIGEL             .2      900    55000     B8     5.13    -8.3 
  30.     PROCYON           .4      11.3   8         F5     7.37     5.4 
  31.     BETELGEUSE        .4      520    15000     M0     5.54     7.4 
  32.     ALTAIR            .8      16.6   10        A5     19.49    8.8 
  33.     ALDEBARAN         .9      68     150       K5     4.34     16.5 
  34.     ANTARES           1       520    10000     M1     16.28   -26.3 
  35.     SPICA             1       220    1700      B2     13.24   -11 
  36.     FOMALHAUT         1.2     23     13        A3     22.56   -29.7 
  37.     POLLUX            1.2     35     33        K0     7.43     28.1 
  38.     DENEB             1.3     1600   55000     A2     20.4     45.2 
  39.     REGULUS           1.4     84     155       B8     10.07    12.1 
  40.     CASTOR            1.6     45     35        A0     7.33     32 
  41.     ADHARA            1.6     680    9000      B1     6.57    -28.9 
  42.     BELLATRIX         1.6     470    3800      B2     5.24     6.4 
  43.     SHAULA            1.6     310    1700      B1     17.32   -37.1 
  44.     ELNATH            1.7     300    1500      B7     5.24     28.6 
  45.     ALNILAM           1.7     1600   4200      B0     5.35    -1.2 
  46.     MIRFAK            1.8     570    4700      F5     3.22     49.8 
  47.     DUBHE             1.8     105    150       K0     11.02    61.9 
  48.     ALIOTH            1.8     68     70        A0     12.53    56.1 
  49.     GAMMA VELORUM     1.8     520    3500      O      8.09    -47.3 
  50.     KAUS AUSTRALIS    1.8     124    220       B9     18.22   -34.4 
  51.     ALNITAK           1.8     1600   35000     O9     5.39    -2 
  52.     AL NAIR           1.8     64     60        B7     22.06   -47.1 
  53.     ALKAID            1.9     210    600       B3     13.46    49.5 
  54.     ALHENA            1.9     105    140       A0     6.36     16.4 
  55.     WEZEN             1.9     2100   55000     F8     7.07    -26.4 
  56.     LAMBDA SCORPII    1.9     650    3500      F0     17.35   -43 
  57.     MENKALINAN        1.9     88     100       A2     5.57     45 
  58.     MIRZAM            2       750    7000      B1     6.21    -17.9 
  59.     DELTA VELORUM     2       76     65        A0     8.44    -54.6 
  60.     POLARIS           2       680    5500      F8     2.03     89.1 
  61.     ALPHARD           2       94     110       K4     9.26    -8.5 
  62.     HAMAL             2       76     70        K2     2.05     23.3 
  63.     DIPHDA            2       57     38        K1     .42     -18.2 
  64.     THETA CENTAURI    2       55     35        K0     14.05   -36.2 
  65.     MIRACH            2       76     11        M0     1.08     35.5 
  66.     NUNKI             2.1     300    1000      B2     18.53   -26.3 
  67.     RASALHAQUE        2.1     58     38        A5     17.34    12.6 
  68.     ALPHERATZ         2.1     90     90        B9     .07      28.9 
  69.     ALGOL             2.1     105    130       B8     3.06     40.8 
  70.     KOCHAB            2.1     105    130       K4     14.51    74.3 
  71.     ALMACH            2.1     260    750       K3     2.02     42.2 
  72.     SAIPH             2.1     2100   50000     B0     5.54     7.4 
  73.     SCHEDAR           2.1     150    225       K0     .39      56.4 
  74.     M103/581          7.5     60     5         oc     1.32     60.6 
  75.     N752              7       70     45        oc     1.56     37.6 
  76.     N869              4.5     350    36        oc     2.17     57 
  77.     N884              4.5     300    36        oc     2.21     57 
  78.     M34/1039          5.5     80     18        oc     2.4      42.7 
  79.     N1502             5.5     15     7         oc     4.05     62.3 
  80.     N1528             6.5     60     25        oc     4.14     51.2 
  81.     N1746             6       80     45        oc     5.02     23.8 
  82.     M38/1912          7.5     100    20        oc     5.27     35.8 
  83.     M36/1960          6.5     60     12        oc     5.35     34.1 
  84.     M37/2099          6       150    20        oc     5.51     32.5 
  85.     M35/2168          5.5     120    40        oc     6.07     24.4 
  86.     N2244             6       16     40        oc     6.31     4.9 
  87.     N2264             4.5     20     30        oc     6.4      9.9 
  88.     M41/2287          5       50     30        oc     6.46    -20.7 
  89.     N2281             7       30     15        oc     6.48     41.1 
  90.     N2301             6       60     15        oc     6.51     .5 
  91.     M50/2323          7       100    16        oc     7.02    -8.2 
  92.     N2353             5       25     20        oc     7.14    -10.2 
  93.     M47/2422          4.5     50     25        oc     7.35    -14.4 
  94.     M46/2437          6       150    25        oc     7.41    -14.8 
  95.     M93/2447          6       60     18        oc     7.44    -23.8 
  96.     M48/2548          5.5     80     30        oc     8.12    -5.7 
  97.     M44/2632          4       200    90        oc     8.39     20.1 
  98.     M67/2682          6       65     15        oc     8.5      11.9 
  99.     N6124             6.5     120    25        oc     16.24   -40.6 
  100.     N6383             5.5     12     6         oc     17.33   -32.6 
  101.     M6/6405           5       80     25        oc     17.38   -32.2 
  102.     M7/6475           3.5     80     60        oc     17.52   -34.8 
  103.     M23/6494          7       120    25        oc     17.56   -19 
  104.     M8/6530           7       25     20        oc     18.02   -24.4 
  105.     M21/6531          6.5     40     12        oc     18.03   -22.5 
  106.     M16/6611          6.5     100    30        oc     18.17   -13.8 
  107.     M17/6618          7       35     25        oc     18.19   -16.2 
  108.     N6633             5       65     20        oc     18.26    6.5 
  109.     M25               6.5     50     40        oc     18.3    -19.3 
  110.     M11/6705          6.5     200    10        oc     18.5    -6.3 
  111.     M39/7092          5       25     30        oc     21.31    48.2 
  112.     M52/7654          7       120    12        oc     23.23    61.5 
  113.     N7789             9.5     200    30        oc     23.56    56.5 
  114.  
  115. listing of star data statements.
  116.  
  117.       dimension sizes:
  118.       Name$(90)[16],REAL Mag(90),Dist(90),Lum(90),Spec$(90)[2]
  119.       REAL Ra(90),Dec(90)
  120.       ("lum" may be integer type to save memory.)
  121.  
  122. 1580 Star_data:SUB Star_data
  123. 1590       COM /Stars/ Name$(*),Mag(*),Dist(*),Lum(*),Spec$(*),Ra(*),Dec(*)
  124. 1600       REM                       STAR DATA
  125. 1610       REM     copyright: DEAN J. PEDERSEN 1984
  126. 1620       REM                 ALL RIGHTS RESERVED
  127. 1630       REM     *******LISTING OF 50 BRIGHTEST STARS********
  128. 1640       REM            (followed by 40 open clusters)
  129. 1660    !***********************************************************************
  130. 1670 Names:DATA SIRIUS,CANOPUS,ARCTURUS,VEGA,CAPELLA,RIGEL,PROCYON
  131. 1680       DATA BETELGEUSE,ALTAIR,ALDEBARAN,ANTARES,SPICA,FOMALHAUT
  132. 1690       DATA POLLUX,DENEB,REGULUS,CASTOR,ADHARA,BELLATRIX,SHAULA
  133. 1700       DATA ELNATH,ALNILAM,MIRFAK,DUBHE,ALIOTH,GAMMA VELORUM
  134. 1710       DATA KAUS AUSTRALIS,ALNITAK,AL NAIR,ALKAID,ALHENA,WEZEN
  135. 1720       DATA LAMBDA SCORPII,MENKALINAN,MIRZAM,DELTA VELORUM
  136. 1730       DATA POLARIS,ALPHARD,HAMAL,DIPHDA,THETA CENTAURI,MIRACH
  137. 1740       DATA NUNKI,RASALHAQUE,ALPHERATZ,ALGOL,KOCHAB,ALMACH
  138. 1750       DATA SAIPH,SCHEDAR
  139. 1760    !****open clusters   (40)
  140. 1770       DATA M103/581,N752,N869,N884,M34/1039,N1502,N1528,N1746,M38/1912
  141. 1780       DATA M36/1960,M37/2099,M35/2168,N2244,N2264,M41/2287,N2281,N2301
  142. 1790       DATA M50/2323,N2353,M47/2422,M46/2437,M93/2447,M48/2548,M44/2632
  143. 1800       DATA M67/2682,N6124,N6383,M6/6405,M7/6475,M23/6494,M8/6530,M21/6531
  144. 1810       DATA M16/6611,M17/6618,N6633,M25,M11/6705,M39/7092,M52/7654,N7789
  145. 1820    !***********************************************************************
  146. 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
  147. 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
  148. 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
  149. 1860       DATA 2.1,2.1,2.1,2.1,2.1,2.1
  150. 1870    !***OPEN CLUSTERS (40)
  151. 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
  152. 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
  153. 1900    !***********************************************************************
  154. 1910 Dist: DATA 8.7,98,36,27,45,900,11.3,520,16.6,68,520,220,23,35,1600,84,45
  155. 1920       DATA 680,470,310,300,1600,570,105,68,520,124,1600,64,210,105,2100
  156. 1930       DATA 650,88,750,76,680,94,76,57,55,76,300,58,90,105,105,260,2100,150
  157. 1940    !******* OPEN CLUSTERS (NUMBER OF STARS)
  158. 1950       DATA 60,70,350,300,80,15,60,80,100,60,150,120,16,20,50,30,60,100
  159. 1960       DATA 25,50,150,60,80,200,65,120,12,80,80,120,25,40,100,35,65,50,200
  160. 1970       DATA 25,120,200
  161. 1980    !***********************************************************************
  162. 1990 Lum:  DATA 23,1500,110,52,140,55000,8,15000,10,150,10000,1700,13,33,55000
  163. 2000       DATA 155,35,9000,3800,1700,1500,4200,4700,150,70,3500,220,35000,60
  164. 2010       DATA 600,140,55000,3500,100,7000,65,5500,110,70,38,35,11,1000,38,90
  165. 2020       DATA 130,130,750,50000,225
  166. 2030    !******OPEN CLUSTERS (DIA IN MIN ARC)
  167. 2040       DATA 5,45,36,36,18,7,25,45,20,12,20,40,40,30,30,15,15,16,20,25,25,18
  168. 2050       DATA 30,90,15,25,6,25,60,25,20,12,30,25,20,40,10,30,12,30
  169. 2060    !***********************************************************************
  170. 2070 Spec: DATA A0,F0,K2,A0,G0,B8,F5,M0,A5,K5,M1,B2,A3,K0,A2,B8,A0,B1,B2,B1,B7
  171. 2080       DATA B0,F5,K0,A0,O,B9,O9,B7,B3,A0,F8,F0,A2,B1,A0,F8,K4,K2,K1,K0,M0
  172. 2090       DATA B2,A5,B9,B8,K4,K3,B0,K0
  173. 2100    ! **********OPEN CLUSTERS (X40)
  174. 2110       DATA oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc
  175. 2120       DATA oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc,oc
  176. 2130    ! DEFINITIONS:
  177. 2140    !              TYPE       CELSIUS       COLOR
  178. 2150    !              O          ABOVE 30K     BLUE
  179. 2160    !              B          10-30K        BLUISH-WHITE
  180. 2170    !              A          8-10K         WHITE
  181. 2180    !              F          6-8K          YELLOWISH-WHITE
  182. 2190    !              G          4.6-6K        YELLOW
  183. 2200    !              K          3.7-4.6K      YELLOW-ORANGE
  184. 2210    !              M          2.2-3.7K      REDISH-ORANGE
  185. 2220    !     OR   "Oh Be A Fine Girl Kiss Me"
  186. 2230    !              nb         na            nebulae
  187. 2240    !              gc         na            globular cluster
  188. 2250    !              oc         na            open cluster
  189. 2260    !              ms         na            multiple stars
  190. 2270    !              gx         na            galaxy
  191. 2280    !***********************************************************************
  192. 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
  193. 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
  194. 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
  195. 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
  196. 2330       DATA 5.54,0.39
  197. 2340    !******OPEN CLUSTERS (X40)
  198. 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
  199. 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
  200. 4
  201. 2370       DATA 17.33,17.38,17.52,17.56,18.02,18.03,18.17,18.19,18.26,18.30,18.5
  202. 0
  203. 2380       DATA 21.31,23.23,23.56
  204. 2390    !***********************************************************************
  205. 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
  206. 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
  207. 2420       DATA 56.1,-47.3,-34.4,-2.0,-47.1,49.5,16.4,-26.4,-43.0,45.0,-17.9
  208. 2430       DATA -54.6,89.1,-8.5,23.3,-18.2,-36.2,35.5,-26.3,12.6,28.9,40.8
  209. 2440       DATA 74.3,42.2,7.4,56.4
  210. 2450    !********OPEN CLUSTERS (X40)
  211. 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
  212. 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
  213. 2480       DATA -32.6,-32.2,-34.8,-19.0,-24.4,-22.5,-13.8,-16.2,6.5,-19.3,-6.3
  214. 2490       DATA 48.2,61.5,56.5
  215. 2500    !***********************************************************************
  216. 2510       RESTORE Names
  217. 2520       READ Name$(*)
  218. 2530       RESTORE Mag
  219. 2540       READ Mag(*)
  220. 2550       RESTORE Dist
  221. 2560       READ Dist(*)
  222. 2570       RESTORE Lum
  223. 2580       READ Lum(*)
  224. 2590       RESTORE Spec
  225. 2600       READ Spec$(*)
  226. 2610       RESTORE Ra
  227. 2620       READ Ra(*)
  228. 2630       RESTORE Dec
  229. 2640       READ Dec(*)
  230. 2650       SUBEXIT
  231. 2660  SUBEND
  232.