6ecd3d3a12a1aaee4b1a948be88d44e206acbd5c
[super-star-trek.git] / src / sst.h
1 #ifndef __SST_H__
2
3 #include <stdio.h>
4 #include <math.h>
5 #include <stdlib.h>
6 #include <string.h>
7 #include <locale.h>
8 #include <libintl.h>
9 #include <curses.h>
10 #include <stdbool.h>
11
12 #ifdef DATA_DIR
13 #define SSTDOC DATA_DIR"/"DOC_NAME
14 #else
15 #define SSTDOC DOC_NAME
16 #endif
17
18 #define _(str) gettext(str)
19
20 #define min(x, y)       ((x)<(y)?(x):(y))
21 #define max(x, y)       ((x)>(y)?(x):(y))
22
23 #define PHASEFAC (2.0)
24 #define GALSIZE (8)
25 #define NINHAB (GALSIZE * GALSIZE / 2)
26 #define MAXUNINHAB (10)
27 #define PLNETMAX (NINHAB + MAXUNINHAB)
28 #define QUADSIZE (10)
29 #define BASEMAX (5)
30
31 /*
32  * These macros hide the difference between 0-origin and 1-origin addressing.
33  * They're a step towards de-FORTRANizing the code.
34  */
35 #define VALID_QUADRANT(x, y)    ((x)>=1 && (x)<=GALSIZE && (y)>=1 && (y)<=GALSIZE)
36 #define VALID_SECTOR(x, y)      ((x)>=1 && (x)<=QUADSIZE && (y)>=1 && (y)<=QUADSIZE)
37 #define for_quadrants(i)        for (i = 1; i <= GALSIZE; i++)
38 #define for_sectors(i)          for (i = 1; i <= QUADSIZE; i++)
39 #define for_commanders(i)       for (i = 1; i <= game.state.remcom; i++)
40 #define for_local_enemies(i)    for (i = 1; i <= game.nenhere; i++)
41 #define for_starbases(i)        for (i = 1; i <= game.state.rembase; i++)
42
43 typedef struct {int x; int y;} coord;
44
45 #define same(c1, c2)    (c1.x == c2.x && c1.y == c2.y)
46
47 typedef struct {
48     coord w;
49     enum {M=0, N=1, O=2} pclass;
50     int inhabited;      /* if NZ, an index into a name array */
51 #define UNINHABITED     -1
52     int crystals; /* has crystals */
53 #define MINED   -1      /* used to have crystals, but they were mined out */
54     enum {unknown, known, shuttle_down} known;
55 } planet;
56
57 #define DESTROY(pl)     memset(pl, '\0', sizeof(planet))
58
59 typedef struct {
60     int snap,           // snapshot taken
61         remkl,                  // remaining klingons
62         remcom,                 // remaining commanders
63         nscrem,                 // remaining super commanders
64         rembase,                // remaining bases
65         starkl,                 // destroyed stars
66         basekl,                 // destroyed bases
67         nromrem,                // Romulans remaining
68         nplankl,                // destroyed uninhabited planets
69         nworldkl;               // destroyed inhabited planets
70     planet plnets[PLNETMAX];  // Planet information
71     double date,                // stardate
72         remres,         // remaining resources
73         remtime;                // remaining time
74     coord baseq[BASEMAX+1];     // Base quadrant coordinates
75     coord kcmdr[QUADSIZE+1];    // Commander quadrant coordinates
76     coord kscmdr;               // Supercommander quadrant coordinates
77     struct quadrant {
78         int stars;
79         int planet;
80 #define NOPLANET        -1
81         bool starbase;
82         int klingons;
83         int romulans;
84         bool supernova;
85         bool charted;
86         enum {secure, distressed, enslaved} status;
87     } galaxy[GALSIZE+1][GALSIZE+1];     // The Galaxy (subscript 0 not used)
88     struct page {
89         int stars;
90         int starbase;
91         int klingons;
92     } chart[GALSIZE+1][GALSIZE+1];      // the starchart (subscript 0 not used)
93 } snapshot;                             // Data that is snapshot
94
95 #define MAXKLGAME       127
96 #define MAXKLQUAD       9
97
98 #define NKILLK (game.inkling - game.state.remkl)
99 #define NKILLC (game.incom - game.state.remcom)
100 #define NKILLSC (game.inscom - game.state.nscrem)
101 #define NKILLROM (game.inrom - game.state.nromrem)
102 #define KLINGREM (game.state.remkl + game.state.remcom + game.state.nscrem)
103 #define INKLINGTOT (game.inkling + game.incom + game.inscom)
104 #define KLINGKILLED (INKLINGTOT - KLINGREM)
105
106 #define SKILL_NONE      0
107 #define SKILL_NOVICE    1
108 #define SKILL_FAIR      2
109 #define SKILL_GOOD      3
110 #define SKILL_EXPERT    4
111 #define SKILL_EMERITUS  5
112
113 /* game options */
114 #define OPTION_ALL      0xffffffff
115 #define OPTION_TTY      0x00000001      /* old interface */
116 #define OPTION_CURSES   0x00000002      /* new interface */
117 #define OPTION_IOMODES  0x00000003      /* cover both interfaces */
118 #define OPTION_PLANETS  0x00000004      /* planets and mining */
119 #define OPTION_THOLIAN  0x00000008      /* Tholians and their webs */
120 #define OPTION_THINGY   0x00000010      /* Space Thingy can shoot back */
121 #define OPTION_PROBE    0x00000020      /* deep-space probes */
122 #define OPTION_SHOWME   0x00000040      /* bracket Enterprise in chart */
123 #define OPTION_RAMMING  0x00000080      /* enemies may ram Enterprise */
124 #define OPTION_MVBADDY  0x00000100      /* more enemies can move */
125 #define OPTION_BLKHOLE  0x00000200      /* black hole may timewarp you */
126 #define OPTION_BASE     0x00000400      /* bases have good shields */
127 #define OPTION_WORLDS   0x00000800      /* logic for inhabited worlds */
128 #define OPTION_PLAIN    0x01000000      /* user chose plain game */
129 #define OPTION_ALMY     0x02000000      /* user chose Almy variant */
130
131 /* Define devices */
132 #define DSRSENS 0
133 #define DLRSENS 1
134 #define DPHASER 2
135 #define DPHOTON 3
136 #define DLIFSUP 4
137 #define DWARPEN 5
138 #define DIMPULS 6
139 #define DSHIELD 7
140 #define DRADIO  8
141 #define DSHUTTL 9
142 #define DCOMPTR 10
143 #define DTRANSP 11
144 #define DSHCTRL 12
145 #define DDRAY   13  // Added deathray
146 #define DDSP    14  // Added deep space probe
147 #define NDEVICES (15)   // Number of devices
148
149 #define FOREVER 1e30
150
151 /* Define future events */
152 #define FSPY    0       // Spy event happens always (no future[] entry)
153                                         // can cause SC to tractor beam Enterprise
154 #define FSNOVA  1   // Supernova
155 #define FTBEAM  2   // Commander tractor beams Enterprise
156 #define FSNAP   3   // Snapshot for time warp
157 #define FBATTAK 4   // Commander attacks base
158 #define FCDBAS  5   // Commander destroys base
159 #define FSCMOVE 6   // Supercommander moves (might attack base)
160 #define FSCDBAS 7   // Supercommander destroys base
161 #define FDSPROB 8   // Move deep space probe
162 #define FDISTR  9   // Emit distress call from an inhabited world 
163 #define FENSLV  10  // Inhabited word is enslaved */
164 #define FREPRO  11  // Klingons build a ship in an enslaved system
165 #define NEVENTS (12)
166
167 typedef struct {
168     double date;
169     coord quadrant;
170 } event;
171
172 /*
173  * abstract out the event handling -- underlying data structures will change
174  * when we implement stateful events
175  */
176 extern event *unschedule(int);
177 extern int is_scheduled(int);
178 extern event *schedule(int, double);
179 extern void postpone(int, double);
180 extern double scheduled(int);
181
182 #define SSTMAGIC        "SST2.0\n"
183
184 struct game {
185     char magic[sizeof(SSTMAGIC)];
186     unsigned long options;
187     snapshot state;
188     snapshot snapsht;
189     char quad[QUADSIZE+1][QUADSIZE+1];          // contents of our quadrant
190     double kpower[(QUADSIZE+1)*(QUADSIZE+1)];           // enemy energy levels
191     double kdist[(QUADSIZE+1)*(QUADSIZE+1)];            // enemy distances
192     double kavgd[(QUADSIZE+1)*(QUADSIZE+1)];            // average distances
193     double damage[NDEVICES];    // damage encountered
194     event future[NEVENTS];      // future events
195     char passwd[10];            // Self Destruct password
196     coord ks[(QUADSIZE+1)*(QUADSIZE+1)];        // enemy sector locations
197     coord quadrant, sector;     // where we are
198     coord tholian;              // coordinates of Tholian
199     coord base;                 // position of base in current quadrant
200     coord battle;               // base coordinates being attacked
201     coord plnet;                // location of planet in quadrant
202     coord probec;       // current probe quadrant
203     bool gamewon,       // Finished!
204         ididit,         // action taken -- allows enemy to attack
205         alive,          // we are alive (not killed)
206         justin,         // just entered quadrant
207         shldup,         // shields are up
208         resting,        // rest time
209         alldone,        // game is now finished
210         neutz,          // Romulan Neutral Zone
211         isarmed,        // probe is armed
212         inorbit,        // orbiting a planet
213         thawed;         // thawed game
214     int inkling,        // initial number of klingons
215         inbase,         // initial number of bases
216         incom,          // initial number of commanders
217         inscom,         // initial number of commanders
218         inrom,          // initial number of commanders
219         instar,         // initial stars
220         intorps,        // initial/Max torpedoes
221         condit,         // condition (red/yellow/green/docked)
222         torps,          // number of torpedoes
223         ship,           // ship type -- 'E' is Enterprise
224         length,         // length of game
225         skill,          // skill level
226         klhere,         // klingons here
227         comhere,        // commanders here
228         casual,         // causalties
229         nhelp,          // calls for help
230         nkinks,         // count of energy-barrier crossings
231         shldchg,        // shield is changing (affects efficiency)
232         landed,         // party on planet (1), on ship (-1)
233         iplnet,         // planet # in quadrant
234         imine,          // mining
235         inplan,         // initial planets
236         nenhere,        // number of enemies in quadrant
237         ishere,         // super-commander in quandrant
238         irhere,         // Romulans in quadrant
239         icraft,         // Kirk in Galileo
240         ientesc,        // attempted escape from supercommander
241         iscraft,        // =1 if craft on ship, -1 if removed from game
242         isatb,          // =1 if super commander is attacking base
243         iscate,         // super commander is here
244         iattak,         // attack recursion elimination (was cracks[4])
245         icrystl,        // dilithium crystals aboard
246         tourn,          // tournament number
247         ithere,         // Tholian is here 
248         iseenit,        // seen base attack report
249         proben,         // number of moves for probe
250         nprobes;        // number of probes available
251     double inresor,     // initial resources
252         intime,         // initial time
253         inenrg,         // initial/max energy
254         inshld,         // initial/max shield
255         inlsr,          // initial life support resources
256         indate,         // initial date
257         energy,         // energy level
258         shield,         // shield level
259         warpfac,        // warp speed
260         wfacsq,         // squared warp factor
261         lsupres,        // life support reserves
262         dist,           // movement distance
263         direc,          // movement direction
264         optime,         // time taken by current operation
265         docfac,         // repair factor when docking (constant?)
266         damfac,         // damage factor
267         lastchart,      // time star chart was last updated
268         cryprob,        // probability that crystal will work
269         probex,         // location of probe
270         probey,         //
271         probeinx,       // probe x,y increment
272         probeiny,       //
273         height;         // height of orbit around planet
274 };
275 extern struct game game;
276
277 /* the following global state doesn't need to be saved */
278 extern char *device[NDEVICES];
279 extern int iscore, iskill; // Common PLAQ
280 extern double perdate;
281 extern double aaitem;
282 extern char citem[10];
283 extern int seed;
284 extern bool randready;
285 extern bool idebug;
286 extern FILE *logfp;
287
288 /* the Space Thingy's global state should *not* be saved! */
289 extern coord thing;
290 extern int iqhere, iqengry;
291
292 typedef enum {FWON, FDEPLETE, FLIFESUP, FNRG, FBATTLE,
293               FNEG3, FNOVA, FSNOVAED, FABANDN, FDILITHIUM,
294                           FMATERIALIZE, FPHASER, FLOST, FMINING, FDPLANET,
295                           FPNOVA, FSSC, FSTRACTOR, FDRAY, FTRIBBLE,
296                           FHOLE} FINTYPE ;
297 enum loctype {neither, quadrant, sector};
298
299 #define IHR 'R'
300 #define IHK 'K'
301 #define IHC 'C'
302 #define IHS 'S'
303 #define IHSTAR '*'
304 #define IHP 'P'
305 #define IHW '@'
306 #define IHB 'B'
307 #define IHBLANK ' '
308 #define IHDOT '.'
309 #define IHQUEST '?'
310 #define IHE 'E'
311 #define IHF 'F'
312 #define IHT 'T'
313 #define IHWEB '#'
314 #define IHGREEN 'G'
315 #define IHYELLOW 'Y'
316 #define IHRED 'R'
317 #define IHDOCKED 'D'
318 #define IHDEAD 'Z'
319 #define IHMATER0 '-'
320 #define IHMATER1 'o'
321 #define IHMATER2 '0'
322
323
324 /* Function prototypes */
325 void prelim(void);
326 void attack(int);
327 bool choose(bool);
328 void setup(int);
329 void score(void);
330 void atover(int);
331 int srscan(int);
332 void lrscan(void);
333 void phasers(void);
334 void photon(void);
335 void warp(bool);
336 void doshield(int);
337 void dock(int);
338 void dreprt(void);
339 void chart(int);
340 void rechart(void);
341 void impuls(void);
342 void wait(void);
343 void setwrp(void);
344 void events(void);
345 void report(void);
346 void eta(void);
347 void mayday(void);
348 void abandn(void);
349 void finish(FINTYPE);
350 void dstrct(void);
351 void kaboom(void);
352 void freeze(bool);
353 int thaw(void);
354 void plaque(void);
355 int scan(void);
356 #define IHEOL (0)
357 #define IHALPHA (1)
358 #define IHREAL (2)
359 void chew(void);
360 void chew2(void);
361 void skip(int);
362 void prout(char *, ...);
363 void proutn(char *, ...);
364 void stars(void);
365 void newqad(int);
366 bool ja(void);
367 void cramen(int);
368 void crmshp(void);
369 char *cramlc(enum loctype, coord w);
370 double expran(double);
371 double Rand(void);
372 void iran(int, int *, int *);
373 #define square(i) ((i)*(i))
374 void dropin(int, coord*);
375 void newcnd(void);
376 void sortkl(void);
377 void imove(void);
378 void ram(int, int, coord);
379 void crmena(int, int, int, coord w);
380 void deadkl(coord, int, int, int);
381 void timwrp(void);
382 void movcom(void);
383 void torpedo(double, double, int, int, double *, int, int);
384 void huh(void);
385 void pause_game(int);
386 void nova(int, int);
387 void snova(int, int);
388 void scom(int *);
389 void hittem(double *);
390 void prouts(char *, ...);
391 int isit(char *);
392 void preport(void);
393 void orbit(void);
394 void sensor(void);
395 void drawmaps(short);
396 void beam(void);
397 void mine(void);
398 void usecrystals(void);
399 void shuttle(void);
400 void deathray(void);
401 void debugme(void);
402 void attakreport(int);
403 void movetho(void);
404 void probe(void);
405 void iostart(void);
406 void setwnd(WINDOW *);
407 void warble(void);
408 void boom(int ii, int jj);
409 void tracktorpedo(int ix, int iy, int l, int i, int n, int iquad);
410 void cgetline(char *, int);
411 void waitfor(void);
412 void setpassword(void);
413 void commandhook(char *, bool);
414 void makechart(void);
415 void enqueue(char *);
416 char *systemname(int);
417 void newkling(int, coord *);
418
419 /* mode arguments for srscan() */
420 #define SCAN_FULL               1
421 #define SCAN_REQUEST            2
422 #define SCAN_STATUS             3
423 #define SCAN_NO_LEFTSIDE        4
424
425 extern WINDOW *curwnd;
426 extern WINDOW *fullscreen_window;
427 extern WINDOW *srscan_window;
428 extern WINDOW *report_window;
429 extern WINDOW *lrscan_window;
430 extern WINDOW *message_window;
431 extern WINDOW *prompt_window;
432
433 extern void clreol(void);
434 extern void clrscr(void);
435 extern void textcolor(int color);
436 extern void highvideo(void);
437
438 enum COLORS {
439    DEFAULT,
440    BLACK, BLUE, GREEN, CYAN, RED, MAGENTA, BROWN, LIGHTGRAY,
441    DARKGRAY, LIGHTBLUE, LIGHTGREEN, LIGHTCYAN, LIGHTRED, LIGHTMAGENTA, YELLOW, WHITE
442 };
443
444 #endif