|
|
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.