]> git.pond.sub.org Git - empserver/blob - src/lib/subs/nxtsct.c
Indented with src/scripts/indent-emp.
[empserver] / src / lib / subs / nxtsct.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2000, Dave Pare, Jeff Bailey, Thomas Ruschak,
4  *                           Ken Stevens, Steve McClure
5  *
6  *  This program is free software; you can redistribute it and/or modify
7  *  it under the terms of the GNU General Public License as published by
8  *  the Free Software Foundation; either version 2 of the License, or
9  *  (at your option) any later version.
10  *
11  *  This program is distributed in the hope that it will be useful,
12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  *  GNU General Public License for more details.
15  *
16  *  You should have received a copy of the GNU General Public License
17  *  along with this program; if not, write to the Free Software
18  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  *
20  *  ---
21  *
22  *  See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
23  *  related information and legal notices. It is expected that any future
24  *  projects/authors will amend these files as needed.
25  *
26  *  ---
27  *
28  *  nxtsct.c: Select/get the next sector from a range of sectors
29  * 
30  *  Known contributors to this file:
31  *     Dave Pare, 1989
32  */
33
34 #include "misc.h"
35 #include "var.h"
36 #include "xy.h"
37 #include "sect.h"
38 #include "nsc.h"
39 #include "file.h"
40 #include "prototypes.h"
41 #include "optlist.h"
42
43 /*
44  * get the next sector in the range
45  * that matches the conditions.
46  */
47 int
48 nxtsct(register struct nstr_sect *np, struct sctstr *sp)
49 {
50     while (1) {
51         np->dx++;
52         np->x++;
53         if (np->x >= WORLD_X)
54             np->x = 0;
55         if (np->dx >= np->range.width) {
56             np->dx = 0;
57             np->x = np->range.lx;
58             np->dy++;
59             if (np->dy >= np->range.height)
60                 return 0;
61             np->y++;
62             if (np->y >= WORLD_Y)
63                 np->y = 0;
64         }
65         if ((np->y + np->x) & 01)
66             continue;
67         if (np->type == NS_DIST) {
68             np->curdist = mapdist(np->x, np->y, np->cx, np->cy);
69             if (np->curdist > np->dist)
70                 continue;
71         }
72         np->id = sctoff(np->x, np->y);
73         if (!np->read(EF_SECTOR, np->id, (caddr_t)sp))
74             continue;
75         if (np->ncond == 0)
76             return 1;
77         if (nstr_exec(np->cond, np->ncond, (caddr_t)sp, EF_SECTOR))
78             return 1;
79     }
80     /*NOTREACHED*/
81 }