/*
 * Cluster.h                                       © 1988 by Unicorn Systems
 * ---------
 * Deklarationen und Definitionen für Cluster.c (Hauptprogramm).
 * Aztec C 3.6, Kickstart 1.2, Workbench 1.2
 * 
 * Datum:   Autor:      Aenderung:                                   Version:
 * --------------------------------------------------------------------------
 * 1.8.88   Roger       Definitionen erstellt                        1.00
 *
 */

/*=========================   EXTERNE FUNKTIONEN   =========================*/

extern double atof(), sqrt(), fabs();
extern int plot(), getkey();
extern void waitkey(), normalfarben(), closeIO(), pixel(), clear(), dclear();
extern void dprint(), closedwin();
extern int universum(), openIO(), opendwin();


/*=========================   GLOBALE VARIABLEN   ==========================*/

short dflag = 0;
short sflag = 0;
short guru = 1;                           /* Default: Keine Linie */
unsigned long class;
unsigned short code, qual;
unsigned short pl = FIRST;                /* Plotstatus */
int stars = 0;
double *acc[3];                           /* Beschleunigung */
double *vel[3];                           /* Geschwindigkeit */
double *pos[3];                           /* Position */
double *mas;                              /* Sternmasse */
int *col;                                 /* Farbe für jeden Stern */
double nahe = 1.0, delta = 1.0;           /* Normalwerte */
double skal = 1.0;                        /* Skalierungsfaktor */
double dnormal = 0.0, dklein = 0.0;
double skalx, skaly;
double ds[3];                             /* Distanz x- y- z-Achse */
int height = 0;
unsigned long zyklen = 0L;                /* Anzahl Berechnungen */
double alter = 0.0;
int zykflag = 0;
char wort[LINELEN];

int colortable[COLORS][3] = {               /* Tabelle der standardwerte */
   { 0,  0,  0},
   {14, 12, 10},
   {12,  0,  0},
   {15,  6,  0},
   { 0,  9,  0},
   { 3, 15,  1},
   { 0,  0, 15},
   { 2, 12, 13},
   {15,  0, 12},
   {10,  0, 15},
   { 9,  5,  0},
   {10,  8,  0},
   {15, 14,  0},
   {12, 12, 12},
   { 7,  7,  7},
   {13,  6,  0}
};