games/trek/trek.h

   1 /*
   2  * Copyright (c) 1980, 1993
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by the University of
  16  *      California, Berkeley and its contributors.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  *
  33  *      @(#)trek.h      8.1 (Berkeley) 5/31/93
  34  * $DragonFly: src/games/trek/trek.h,v 1.2 2006/09/07 21:19:44 pavalos Exp $
  35  */
  36
  37 #include        <math.h>
  38 #include        <setjmp.h>
  39 #include        <stdbool.h>
  40 #include        <stdio.h>
  41 #include        <stdlib.h>
  42 #include        <string.h>
  43 #include        <unistd.h>
  44 /*
  45 **  Global Declarations
  46 **
  47 **      Virtually all non-local variable declarations are made in this
  48 **      file.  Exceptions are those things which are initialized, which
  49 **      are defined in "externs.c", and things which are local to one
  50 **      program file.
  51 **
  52 **      So far as I know, nothing in here must be preinitialized to
  53 **      zero.
  54 **
  55 **      You may have problems from the loader if you move this to a
  56 **      different machine.  These things actually get allocated in each
  57 **      source file, which UNIX allows; however, you may (on other
  58 **      systems) have to change everything in here to be "extern" and
  59 **      actually allocate stuff in "externs.c"
  60 */
  61
  62 extern  jmp_buf env;
  63 /*********************  GALAXY  **************************/
  64
  65 /* galactic parameters */
  66 # define        NSECTS          10      /* dimensions of quadrant in sectors */
  67 # define        NQUADS          8       /* dimension of galazy in quadrants */
  68 # define        NINHAB          32      /* number of quadrants which are inhabited */
  69
  70 struct quad             /* definition for each quadrant */
  71 {
  72         char    bases;          /* number of bases in this quadrant */
  73         char    klings;         /* number of Klingons in this quadrant */
  74         char    holes;          /* number of black holes in this quadrant */
  75         int     scanned;        /* star chart entry (see below) */
  76         char    stars;          /* number of stars in this quadrant */
  77         char    qsystemname;    /* starsystem name (see below) */
  78 };
  79
  80 # define        Q_DISTRESSED    0200
  81 # define        Q_SYSTEM        077
  82
  83 /*  systemname conventions:
  84  *      1 -> NINHAB     index into Systemname table for live system.
  85  *      + Q_DISTRESSED  distressed starsystem -- systemname & Q_SYSTEM
  86  *                      is the index into the Event table which will
  87  *                      have the system name
  88  *      0               dead or nonexistent starsystem
  89  *
  90  *  starchart ("scanned") conventions:
  91  *      0 -> 999        taken as is
  92  *      -1              not yet scanned ("...")
  93  *      1000            supernova ("///")
  94  *      1001            starbase + ??? (".1.")
  95 */
  96
  97 /* ascii names of systems */
  98 extern const char       *Systemname[NINHAB];
  99
 100 /* quadrant definition */
 101 struct quad     Quad[NQUADS][NQUADS];
 102
 103 /* defines for sector map  (below) */
 104 # define        EMPTY           '.'
 105 # define        STAR            '*'
 106 # define        BASE            '#'
 107 # define        ENTERPRISE      'E'
 108 # define        QUEENE          'Q'
 109 # define        KLINGON         'K'
 110 # define        INHABIT         '@'
 111 # define        HOLE            ' '
 112
 113 /* current sector map */
 114 char    Sect[NSECTS][NSECTS];
 115
 116
 117 /************************ DEVICES ******************************/
 118
 119 # define        NDEV            16      /* max number of devices */
 120
 121 /* device tokens */
 122 # define        WARP            0       /* warp engines */
 123 # define        SRSCAN          1       /* short range scanners */
 124 # define        LRSCAN          2       /* long range scanners */
 125 # define        PHASER          3       /* phaser control */
 126 # define        TORPED          4       /* photon torpedo control */
 127 # define        IMPULSE         5       /* impulse engines */
 128 # define        SHIELD          6       /* shield control */
 129 # define        COMPUTER        7       /* on board computer */
 130 # define        SSRADIO         8       /* subspace radio */
 131 # define        LIFESUP         9       /* life support systems */
 132 # define        SINS            10      /* Space Inertial Navigation System */
 133 # define        CLOAK           11      /* cloaking device */
 134 # define        XPORTER         12      /* transporter */
 135 # define        SHUTTLE         13      /* shuttlecraft */
 136
 137 /* device names */
 138 struct device
 139 {
 140         const char      *name;          /* device name */
 141         const char      *person;        /* the person who fixes it */
 142 };
 143
 144 extern struct device    Device[NDEV];
 145
 146 /***************************  EVENTS  ****************************/
 147
 148 # define        NEVENTS         12      /* number of different event types */
 149
 150 # define        E_LRTB          1       /* long range tractor beam */
 151 # define        E_KATSB         2       /* Klingon attacks starbase */
 152 # define        E_KDESB         3       /* Klingon destroys starbase */
 153 # define        E_ISSUE         4       /* distress call is issued */
 154 # define        E_ENSLV         5       /* Klingons enslave a quadrant */
 155 # define        E_REPRO         6       /* a Klingon is reproduced */
 156 # define        E_FIXDV         7       /* fix a device */
 157 # define        E_ATTACK        8       /* Klingon attack during rest period */
 158 # define        E_SNAP          9       /* take a snapshot for time warp */
 159 # define        E_SNOVA         10      /* supernova occurs */
 160
 161 # define        E_GHOST         0100    /* ghost of a distress call if ssradio out */
 162 # define        E_HIDDEN        0200    /* event that is unreportable because ssradio out */
 163 # define        E_EVENT         077     /* mask to get event code */
 164
 165 struct event
 166 {
 167         short   x, y;                   /* coordinates */
 168         double  date;                   /* trap stardate */
 169         char    evcode;                 /* event type */
 170         short   systemname;             /* starsystem name */
 171 };
 172 /* systemname conventions:
 173  *      1 -> NINHAB     index into Systemname table for reported distress calls
 174  *
 175  * evcode conventions:
 176  *      1 -> NEVENTS-1  event type
 177  *      + E_HIDDEN      unreported (SSradio out)
 178  *      + E_GHOST       actually already expired
 179  *      0               unallocated
 180  */
 181
 182 # define        MAXEVENTS       25      /* max number of concurrently pending events */
 183
 184 struct event    Event[MAXEVENTS];       /* dynamic event list; one entry per pending event */
 185
 186 /*****************************  KLINGONS  *******************************/
 187
 188 struct kling
 189 {
 190         short   x, y;           /* coordinates */
 191         int     power;          /* power left */
 192         double  dist;           /* distance to Enterprise */
 193         double  avgdist;        /* average over this move */
 194         char    srndreq;        /* set if surrender has been requested */
 195 };
 196
 197 # define        MAXKLQUAD       9       /* maximum klingons per quadrant */
 198
 199 /********************** MISCELLANEOUS ***************************/
 200
 201 /* condition codes */
 202 # define        GREEN           0
 203 # define        DOCKED          1
 204 # define        YELLOW          2
 205 # define        RED             3
 206
 207 /* starbase coordinates */
 208 # define        MAXBASES        9       /* maximum number of starbases in galaxy */
 209
 210 /*  distress calls  */
 211 # define        MAXDISTR        5       /* maximum concurrent distress calls */
 212
 213 /* phaser banks */
 214 # define        NBANKS          6       /* number of phaser banks */
 215
 216 struct xy
 217 {
 218         short   x, y;           /* coordinates */
 219 };
 220
 221
 222 /*
 223  *      note that much of the stuff in the following structs CAN NOT
 224  *      be moved around!!!!
 225  */
 226
 227
 228 /* information regarding the state of the starship */
 229 struct
 230 {
 231         double  warp;           /* warp factor */
 232         double  warp2;          /* warp factor squared */
 233         double  warp3;          /* warp factor cubed */
 234         char    shldup;         /* shield up flag */
 235         char    cloaked;        /* set if cloaking device on */
 236         int     energy;         /* starship's energy */
 237         int     shield;         /* energy in shields */
 238         double  reserves;       /* life support reserves */
 239         int     crew;           /* ship's complement */
 240         int     brigfree;       /* space left in brig */
 241         char    torped;         /* torpedoes */
 242         char    cloakgood;      /* set if we have moved */
 243         int     quadx;          /* quadrant x coord */
 244         int     quady;          /* quadrant y coord */
 245         int     sectx;          /* sector x coord */
 246         int     secty;          /* sector y coord */
 247         short   cond;           /* condition code */
 248         char    sinsbad;        /* Space Inertial Navigation System condition */
 249         const char      *shipname;      /* name of current starship */
 250         char    ship;           /* current starship */
 251         int     distressed;     /* number of distress calls */
 252 }       Ship;
 253
 254 /* sinsbad is set if SINS is working but not calibrated */
 255
 256 /* game related information, mostly scoring */
 257 struct
 258 {
 259         int     killk;          /* number of klingons killed */
 260         int     deaths;         /* number of deaths onboard Enterprise */
 261         char    negenbar;       /* number of hits on negative energy barrier */
 262         char    killb;          /* number of starbases killed */
 263         int     kills;          /* number of stars killed */
 264         char    skill;          /* skill rating of player */
 265         char    length;         /* length of game */
 266         char    killed;         /* set if you were killed */
 267         char    killinhab;      /* number of inhabited starsystems killed */
 268         char    tourn;          /* set if a tournament game */
 269         char    passwd[15];     /* game password */
 270         char    snap;           /* set if snapshot taken */
 271         char    helps;          /* number of help calls */
 272         int     captives;       /* total number of captives taken */
 273 }       Game;
 274
 275 /* per move information */
 276 struct
 277 {
 278         char    free;           /* set if a move is free */
 279         char    endgame;        /* end of game flag */
 280         char    shldchg;        /* set if shields changed this move */
 281         char    newquad;        /* set if just entered this quadrant */
 282         char    resting;        /* set if this move is a rest */
 283         double  time;           /* time used this move */
 284 }       Move;
 285
 286 /* parametric information */
 287 struct
 288 {
 289         char    bases;          /* number of starbases */
 290         char    klings;         /* number of klingons */
 291         double  date;           /* stardate */
 292         double  time;           /* time left */
 293         double  resource;       /* Federation resources */
 294         int     energy;         /* starship's energy */
 295         int     shield;         /* energy in shields */
 296         double  reserves;       /* life support reserves */
 297         int     crew;           /* size of ship's complement */
 298         int     brigfree;       /* max possible number of captives */
 299         char    torped;         /* photon torpedos */
 300         double  damfac[NDEV];   /* damage factor */
 301         double  dockfac;        /* docked repair time factor */
 302         double  regenfac;       /* regeneration factor */
 303         int     stopengy;       /* energy to do emergency stop */
 304         int     shupengy;       /* energy to put up shields */
 305         int     klingpwr;       /* Klingon initial power */
 306         int     warptime;       /* time chewer multiplier */
 307         double  phasfac;        /* Klingon phaser power eater factor */
 308         char    moveprob[6];    /* probability that a Klingon moves */
 309         double  movefac[6];     /* Klingon move distance multiplier */
 310         double  eventdly[NEVENTS];      /* event time multipliers */
 311         double  navigcrud[2];   /* navigation crudup factor */
 312         int     cloakenergy;    /* cloaking device energy per stardate */
 313         double  damprob[NDEV];  /* damage probability */
 314         double  hitfac;         /* Klingon attack factor */
 315         int     klingcrew;      /* number of Klingons in a crew */
 316         double  srndrprob;      /* surrender probability */
 317         int     energylow;      /* low energy mark (cond YELLOW) */
 318 }       Param;
 319
 320 /* Sum of damage probabilities must add to 1000 */
 321
 322 /* other information kept in a snapshot */
 323 struct
 324 {
 325         short   bases;          /* number of starbases */
 326         char    klings;         /* number of klingons */
 327         double  date;           /* stardate */
 328         double  time;           /* time left */
 329         double  resource;       /* Federation resources */
 330         char    distressed;     /* number of currently distressed quadrants */
 331         struct event    *eventptr[NEVENTS];     /* pointer to event structs */
 332         struct xy       base[MAXBASES];         /* locations of starbases */
 333 }       Now;
 334
 335 /* Other stuff, not dumped in a snapshot */
 336 struct
 337 {
 338         struct kling    klingon[MAXKLQUAD];     /* sorted Klingon list */
 339         int             nkling;                 /* number of Klingons in this sector */
 340                                                 /* < 0 means automatic override mode */
 341         char            fast;                   /* set if speed > 300 baud */
 342         struct xy       starbase;       /* starbase in current quadrant */
 343         char            snapshot[sizeof Quad + sizeof Event + sizeof Now];      /* snapshot for time warp */
 344         char            statreport;             /* set to get a status report on a srscan */
 345 }       Etc;
 346
 347 /*
 348  *      eventptr is a pointer to the event[] entry of the last
 349  *      scheduled event of each type.  Zero if no such event scheduled.
 350  */
 351
 352 /* Klingon move indicies */
 353 # define        KM_OB           0       /* Old quadrant, Before attack */
 354 # define        KM_OA           1       /* Old quadrant, After attack */
 355 # define        KM_EB           2       /* Enter quadrant, Before attack */
 356 # define        KM_EA           3       /* Enter quadrant, After attack */
 357 # define        KM_LB           4       /* Leave quadrant, Before attack */
 358 # define        KM_LA           5       /* Leave quadrant, After attack */
 359
 360 /* you lose codes */
 361 # define        L_NOTIME        1       /* ran out of time */
 362 # define        L_NOENGY        2       /* ran out of energy */
 363 # define        L_DSTRYD        3       /* destroyed by a Klingon */
 364 # define        L_NEGENB        4       /* ran into the negative energy barrier */
 365 # define        L_SUICID        5       /* destroyed in a nova */
 366 # define        L_SNOVA         6       /* destroyed in a supernova */
 367 # define        L_NOLIFE        7       /* life support died (so did you) */
 368 # define        L_NOHELP        8       /* you could not be rematerialized */
 369 # define        L_TOOFAST       9       /* pretty stupid going at warp 10 */
 370 # define        L_STAR          10      /* ran into a star */
 371 # define        L_DSTRCT        11      /* self destructed */
 372 # define        L_CAPTURED      12      /* captured by Klingons */
 373 # define        L_NOCREW        13      /* you ran out of crew */
 374
 375 /******************  COMPILE OPTIONS  ***********************/
 376
 377 /* Trace info */
 378 # define        xTRACE          1
 379 int     Trace;
 380
 381 /* external function definitions */
 382 void    abandon(int);
 383 void    attack(int);
 384 void    autover(void);
 385 void    capture(int);
 386 int     cgetc(int);
 387 bool    check_out(int);
 388 void    checkcond(void);
 389 void    compkldist(bool);
 390 void    computer(int);
 391 void    damage(int, double);
 392 bool    damaged(int);
 393 void    dcrept(int);
 394 void    destruct(int);
 395 void    dock(int);
 396 void    undock(int);
 397 void    dumpgame(int);
 398 bool    restartgame(void);
 399 void    dumpme(int);
 400 int     dumpssradio(void);
 401 void    events(int);
 402 bool    getcodi(int *, double *);
 403 void    help(int);
 404 void    impulse(int);
 405 void    initquad(int);
 406 void    sector(int *, int *);
 407 void    killk(int, int);
 408 void    killb(int, int);
 409 void    kills(int, int, int);
 410 void    killd(int, int, int);
 411 void    klmove(int);
 412 void    lose(int);
 413 void    lrscan(int);
 414 double  move(int, int, double, double);
 415 void    nova(int, int);
 416 void    out(int);
 417 void    phaser(int);
 418 void    play(void);
 419 void    ram(int, int);
 420 int     ranf(int);
 421 double  franf(void);
 422 void    rest(int);
 423 struct event    *schedule(int, double, char, char, char);
 424 void    reschedule(struct event *, double);
 425 void    unschedule(struct event *);
 426 struct event    *xsched(int, int, int, int, int);
 427 void    xresched(struct event *, int, int);
 428 long    score(void);
 429 void    setup(void);
 430 void    setwarp(int);
 431 void    shield(int);
 432 void    snova(int, int);
 433 void    srscan(int);
 434 const char      *systemname(struct quad *);
 435 void    torped(int);
 436 char    *bmove(const void *, void *, size_t);
 437 bool    sequal(const char *, const char *);
 438 void    syserr(const char *, ...);
 439 void    visual(int);
 440 void    warp(int, int, double);
 441 void    dowarp(int);
 442 void    win(void);