|
|
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[] = "@(#)systemname.c 5.4 (Berkeley) 6/1/90"; ! 22: #endif /* not lint */ ! 23: ! 24: # include "trek.h" ! 25: ! 26: /* ! 27: ** RETRIEVE THE STARSYSTEM NAME ! 28: ** ! 29: ** Very straightforward, this routine just gets the starsystem ! 30: ** name. It returns zero if none in the specified quadrant ! 31: ** (which, by the way, is passed it). ! 32: ** ! 33: ** This routine knows all about such things as distressed ! 34: ** starsystems, etc. ! 35: */ ! 36: ! 37: char *systemname(q1) ! 38: struct quad *q1; ! 39: { ! 40: register struct quad *q; ! 41: register int i; ! 42: ! 43: q = q1; ! 44: ! 45: i = q->qsystemname; ! 46: if (i & Q_DISTRESSED) ! 47: i = Event[i & Q_SYSTEM].systemname; ! 48: ! 49: i &= Q_SYSTEM; ! 50: if (i == 0) ! 51: return (0); ! 52: return (Systemname[i]); ! 53: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.