]> git.pond.sub.org Git - empserver/blob - src/lib/subs/nxtsct.c
Update copyright notice
[empserver] / src / lib / subs / nxtsct.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2013, Dave Pare, Jeff Bailey, Thomas Ruschak,
4  *                Ken Stevens, Steve McClure, Markus Armbruster
5  *
6  *  Empire 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 3 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, see <http://www.gnu.org/licenses/>.
18  *
19  *  ---
20  *
21  *  See files README, COPYING and CREDITS in the root of the source
22  *  tree for related information and legal notices.  It is expected
23  *  that future projects/authors will amend these files as needed.
24  *
25  *  ---
26  *
27  *  nxtsct.c: Select/get the next sector from a range of sectors
28  *
29  *  Known contributors to this file:
30  *     Dave Pare, 1989
31  */
32
33 #include <config.h>
34
35 #include "file.h"
36 #include "optlist.h"
37 #include "prototypes.h"
38 #include "sect.h"
39
40 /*
41  * get the next sector in the range
42  * that matches the conditions.
43  */
44 int
45 nxtsct(struct nstr_sect *np, struct sctstr *sp)
46 {
47     while (1) {
48         np->dx++;
49         np->x++;
50         if (np->x >= WORLD_X)
51             np->x = 0;
52         if (np->dx >= np->range.width) {
53             np->dx = 0;
54             np->x = np->range.lx;
55             np->dy++;
56             if (np->dy >= np->range.height)
57                 return 0;
58             np->y++;
59             if (np->y >= WORLD_Y)
60                 np->y = 0;
61         }
62         if ((np->y + np->x) & 01)
63             continue;
64         if (np->type == NS_DIST) {
65             np->curdist = mapdist(np->x, np->y, np->cx, np->cy);
66             if (np->curdist > np->dist)
67                 continue;
68         }
69         np->id = sctoff(np->x, np->y);
70         if (!ef_read(EF_SECTOR, np->id, sp))
71             continue;
72         if (np->ncond == 0)
73             return 1;
74         if (nstr_exec(np->cond, np->ncond, sp))
75             return 1;
76     }
77     /*NOTREACHED*/
78 }