|
|
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
6: * provided that the above copyright notice and this paragraph are
7: * duplicated in all such forms and that any documentation,
8: * advertising materials, and other materials related to such
9: * distribution and use acknowledge that the software was developed
10: * by the University of California, Berkeley. The name of the
11: * University may not be used to endorse or promote products derived
12: * from this software without specific prior written permission.
13: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
14: * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
15: * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
16: */
17:
18: #ifndef lint
19: static char sccsid[] = "@(#)systemname.c 5.3 (Berkeley) 6/18/88";
20: #endif /* not lint */
21:
22: # include "trek.h"
23:
24: /*
25: ** RETRIEVE THE STARSYSTEM NAME
26: **
27: ** Very straightforward, this routine just gets the starsystem
28: ** name. It returns zero if none in the specified quadrant
29: ** (which, by the way, is passed it).
30: **
31: ** This routine knows all about such things as distressed
32: ** starsystems, etc.
33: */
34:
35: char *systemname(q1)
36: struct quad *q1;
37: {
38: register struct quad *q;
39: register int i;
40:
41: q = q1;
42:
43: i = q->qsystemname;
44: if (i & Q_DISTRESSED)
45: i = Event[i & Q_SYSTEM].systemname;
46:
47: i &= Q_SYSTEM;
48: if (i == 0)
49: return (0);
50: return (Systemname[i]);
51: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.