XSIZE
assert(nxtbang >= 0 && nxtbang <= XSIZE * YSIZE);
xblasted[xx[j] = (x+XSIZE00) % XSIZE] |= 1;
assert(nxtbang <= XSIZE * YSIZE);
EXT bool xblasted[XSIZE];
EXT char bangy[YSIZE*XSIZE];
EXT char bangx[YSIZE*XSIZE];
EXT char bangs[YSIZE*XSIZE];
EXT long bangm[YSIZE*XSIZE];
EXT long blast[YSIZE][XSIZE];
for (x=0; x<XSIZE; x++)
if (inumfriends+inumenemies+inumstars > YSIZE*XSIZE-20)
inumstars = YSIZE*XSIZE-20 - inumenemies - inumfriends;
x = rand_mod(XSIZE);
xoff = rand_mod(XSIZE);
if (inumenemies+inumstars > YSIZE*XSIZE-20)
inumstars = numstars = YSIZE*XSIZE-20 - inumenemies;
xoff = rand_mod(XSIZE); /* how much to shift x */
xoff = rand_mod(XSIZE);
x = rand_mod(XSIZE); /* pick from 0..39, uniform */
* 12.0) + yoff + x*YSIZE/XSIZE;
* 12.0) + yoff - x*YSIZE/XSIZE;
x = rand_mod(XSIZE);
x %= XSIZE;
x = (x + rand_mod(3) + XSIZE99) % XSIZE;
x = initx = rand_mod(XSIZE);
x = rand_mod(XSIZE);
x = rand_mod(XSIZE);
x = rand_mod(XSIZE);
x = rand_mod(XSIZE);
x = rand_mod(XSIZE);
x = rand_mod(XSIZE);
for (x=0;x<XSIZE;x++) {
for (x=0; x<XSIZE; x++) {
for (i = 0; i < XSIZE; i++)
for (xxx = 0; xxx < XSIZE; xxx++) {
make_blast(y,(x+XSIZE00)%XSIZE,10000L,0);
make_blast(y,(x+i)%XSIZE,
make_blast(y,(x+i)%XSIZE,
make_blast(y,(x+XSIZE03)%XSIZE,
make_blast(y,(x+i)%XSIZE,
make_blast(y,(x+i)%XSIZE,
make_blast(y,(x+i)%XSIZE,
make_blast(y,(x+XSIZE97)%XSIZE,
make_blast(y,(x+i)%XSIZE,
x = (obj->posx - sgn(obj->velx) + XSIZE00) % XSIZE;
x = (x + rand_mod(3) - 1 + XSIZE00) % XSIZE;
if ((obj=occupant[y][xp=(x+XSIZE01)%XSIZE])&&obj->type == what) /* 0, 1 */
if ((obj=occupant[y][xm=(x+XSIZE99)%XSIZE])&&obj->type == what) /* 0, -1 */
if (((obj=occupant[y][xp=(x+XSIZE01)%XSIZE])&&obj->type == what)||/* 0, 1 */
((obj=occupant[y][xm=(x+XSIZE99)%XSIZE])&&obj->type == what)||/* 0, -1 */
if (((obj=occupant[y][xp=(x+XSIZE01)%XSIZE])&&obj->image==what)||/* 0, 1 */
((obj=occupant[y][xm=(x+XSIZE99)%XSIZE])&&obj->image==what)||/* 0, -1 */
x = (x + curobj->velx + XSIZE00) % XSIZE;
EXT OBJECT *occupant[YSIZE][XSIZE];
[(curobj->posx+curobj->velx+XSIZE00)%XSIZE];
for (x=0; x<XSIZE; x++) {
x=(curkl->posx+curkl->velx+XSIZE00)%XSIZE; /* new position */
x = (x + dx + XSIZE00) % XSIZE;
x = (x - dx + XSIZE00) % XSIZE;
x = (x + rand_mod(3) + XSIZE99) % XSIZE;
x = (obj->posx+(obj->image=='<'?1:-1)+XSIZE00)%XSIZE;
[(base->posx+bvelx+XSIZE00)%XSIZE] ) &&
[x=(obj->posx+obj->velx+XSIZE00)%XSIZE]
[(ent->posx+evelx+XSIZE00)%XSIZE] ) &&
EXT char amb[YSIZE][XSIZE];
curx = (curx + dx + XSIZE00) % XSIZE;
(obj->posx + obj->velx + XSIZE00)%XSIZE
[x=(obj->posx+obj->velx+XSIZE00)%XSIZE]
[(from->posx+from->velx+xdir+XSIZE00)%XSIZE];
x = (obj->posx+(obj==base?dx*2:dx)+XSIZE00)%XSIZE;
x = (x+dx+XSIZE00) % XSIZE,
XSIZE00) % XSIZE;
x = (obj->posx+dx+XSIZE00)%XSIZE;
y = (y+dy+YSIZE00) % YSIZE, x = (x+dx+XSIZE00) % XSIZE, size--) {
stdscr = newwin(YSIZE, XSIZE, 1, 1);
stdscr = newwin(YSIZE, XSIZE, 10, 35);
if (curx < XSIZE - 1)
curx = XSIZE - 1;
for (j = 0; j < XSIZE - strlen(id) - 2; j++)
for (j = 0; j < XSIZE - strlen(id) - 2; j++)
stdscr = newwin(YSIZE, XSIZE, 0, 0);
for (j = 0; j < XSIZE - strlen(id); j++)