|
|
1.1 ! root 1: /* ! 2: * Copyright (c) 1980 Regents of the University of California. ! 3: * All rights reserved. The Berkeley software License Agreement ! 4: * specifies the terms and conditions for redistribution. ! 5: */ ! 6: ! 7: #ifndef lint ! 8: static char sccsid[] = "@(#)systemname.c 5.1 (Berkeley) 1/29/86"; ! 9: #endif not lint ! 10: ! 11: # include "trek.h" ! 12: ! 13: /* ! 14: ** RETRIEVE THE STARSYSTEM NAME ! 15: ** ! 16: ** Very straightforward, this routine just gets the starsystem ! 17: ** name. It returns zero if none in the specified quadrant ! 18: ** (which, by the way, is passed it). ! 19: ** ! 20: ** This routine knows all about such things as distressed ! 21: ** starsystems, etc. ! 22: */ ! 23: ! 24: char *systemname(q1) ! 25: struct quad *q1; ! 26: { ! 27: register struct quad *q; ! 28: register int i; ! 29: ! 30: q = q1; ! 31: ! 32: i = q->qsystemname; ! 33: if (i & Q_DISTRESSED) ! 34: i = Event[i & Q_SYSTEM].systemname; ! 35: ! 36: i &= Q_SYSTEM; ! 37: if (i == 0) ! 38: return (0); ! 39: return (Systemname[i]); ! 40: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.