|
|
1.1 root 1: /*
2: * Copyright (c) 1980 Regents of the University of California.
3: * All rights reserved.
4: *
5: * Redistribution and use in source and binary forms are permitted provided
6: * that: (1) source distributions retain this entire copyright notice and
7: * comment, and (2) distributions including binaries display the following
8: * acknowledgement: ``This product includes software developed by the
9: * University of California, Berkeley and its contributors'' in the
10: * documentation or other materials provided with the distribution and in
11: * all advertising materials mentioning features or use of this software.
12: * Neither the name of the University nor the names of its contributors may
13: * be used to endorse or promote products derived from this software without
14: * specific prior written permission.
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
16: * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
17: * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
18: */
19:
20: #ifndef lint
21: static char sccsid[] = "@(#)dumpssradio.c 5.4 (Berkeley) 6/1/90";
22: #endif /* not lint */
23:
24: # include "trek.h"
25:
26: /**
27: ** output hidden distress calls
28: **/
29:
30: dumpssradio()
31: {
32: register struct event *e;
33: register int j;
34: register int chkrest;
35:
36: chkrest = 0;
37: for (j = 0; j < MAXEVENTS; j++)
38: {
39: e = &Event[j];
40: /* if it is not hidden, then just ignore it */
41: if ((e->evcode & E_HIDDEN) == 0)
42: continue;
43: if (e->evcode & E_GHOST)
44: {
45: unschedule(e);
46: printf("Starsystem %s in quadrant %d,%d is no longer distressed\n",
47: systemname(e), e->x, e->y);
48: continue;
49: }
50:
51: switch (e->evcode)
52: {
53:
54: case E_KDESB:
55: printf("Starbase in quadrant %d,%d is under attack\n",
56: e->x, e->y);
57: chkrest++;
58: break;
59:
60: case E_ENSLV:
61: case E_REPRO:
62: printf("Starsystem %s in quadrant %d,%d is distressed\n",
63: systemname(e), e->x, e->y);
64: chkrest++;
65: break;
66:
67: }
68: }
69:
70: return (chkrest);
71: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.