xref: /netbsd-src/games/robots/make_level.c (revision a4cc1f4f0637905f7929d8a1548fb2e9be0fa870)
1*a4cc1f4fSdholland /*	$NetBSD: make_level.c,v 1.10 2009/07/20 06:39:06 dholland Exp $	*/
26045e6e0Scgd 
361f28255Scgd /*
46045e6e0Scgd  * Copyright (c) 1980, 1993
56045e6e0Scgd  *	The Regents of the University of California.  All rights reserved.
661f28255Scgd  *
761f28255Scgd  * Redistribution and use in source and binary forms, with or without
861f28255Scgd  * modification, are permitted provided that the following conditions
961f28255Scgd  * are met:
1061f28255Scgd  * 1. Redistributions of source code must retain the above copyright
1161f28255Scgd  *    notice, this list of conditions and the following disclaimer.
1261f28255Scgd  * 2. Redistributions in binary form must reproduce the above copyright
1361f28255Scgd  *    notice, this list of conditions and the following disclaimer in the
1461f28255Scgd  *    documentation and/or other materials provided with the distribution.
15e5aeb4eaSagc  * 3. Neither the name of the University nor the names of its contributors
1661f28255Scgd  *    may be used to endorse or promote products derived from this software
1761f28255Scgd  *    without specific prior written permission.
1861f28255Scgd  *
1961f28255Scgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
2061f28255Scgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
2161f28255Scgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
2261f28255Scgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
2361f28255Scgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
2461f28255Scgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
2561f28255Scgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
2661f28255Scgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
2761f28255Scgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
2861f28255Scgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
2961f28255Scgd  * SUCH DAMAGE.
3061f28255Scgd  */
3161f28255Scgd 
329007937fSlukem #include <sys/cdefs.h>
3361f28255Scgd #ifndef lint
346045e6e0Scgd #if 0
356045e6e0Scgd static char sccsid[] = "@(#)make_level.c	8.1 (Berkeley) 5/31/93";
366045e6e0Scgd #else
37*a4cc1f4fSdholland __RCSID("$NetBSD: make_level.c,v 1.10 2009/07/20 06:39:06 dholland Exp $");
386045e6e0Scgd #endif
3961f28255Scgd #endif /* not lint */
4061f28255Scgd 
41*a4cc1f4fSdholland #include <curses.h>
42*a4cc1f4fSdholland #include <string.h>
4361f28255Scgd #include "robots.h"
4461f28255Scgd 
4561f28255Scgd /*
4661f28255Scgd  * make_level:
4761f28255Scgd  *	Make the current level
4861f28255Scgd  */
499007937fSlukem void
make_level(void)5030870bd5Sdholland make_level(void)
5161f28255Scgd {
529007937fSlukem 	int i;
539007937fSlukem 	COORD *cp;
549007937fSlukem 	int x;
5561f28255Scgd 
5661f28255Scgd 	reset_count();
5761f28255Scgd 	for (i = 1; i < Y_FIELDSIZE; i++)
5861f28255Scgd 		for (x = 1; x < X_FIELDSIZE; x++)
5961f28255Scgd 			if (Field[i][x] != 0)
6061f28255Scgd 				mvaddch(i, x, ' ');
6161f28255Scgd 	if (My_pos.y > 0)
6261f28255Scgd 		mvaddch(My_pos.y, My_pos.x, ' ');
6361f28255Scgd 
64*a4cc1f4fSdholland 	Waiting = false;
6561f28255Scgd 	Wait_bonus = 0;
6661f28255Scgd 	leaveok(stdscr, FALSE);
6761f28255Scgd 	for (cp = Robots; cp < &Robots[MAXROBOTS]; cp++)
6861f28255Scgd 		cp->y = -1;
6961f28255Scgd 	My_pos.y = -1;
7061f28255Scgd 
71130a514fSlukem 	memset(Field, 0, sizeof Field);
7261f28255Scgd 	Min.y = Y_FIELDSIZE;
7361f28255Scgd 	Min.x = X_FIELDSIZE;
7461f28255Scgd 	Max.y = 0;
7561f28255Scgd 	Max.x = 0;
7661f28255Scgd 	if ((i = Level * 10) > MAXROBOTS)
7761f28255Scgd 		i = MAXROBOTS;
7861f28255Scgd 	Num_robots = i;
7918dfb39eSchristos 	memset(Scrap, 0, sizeof(Scrap[0]) * MAXROBOTS);
8018dfb39eSchristos 	Num_scrap = 0;
8161f28255Scgd 	while (i-- > 0) {
8261f28255Scgd 		cp = rnd_pos();
8361f28255Scgd 		Robots[i] = *cp;
8461f28255Scgd 		Field[cp->y][cp->x]++;
8561f28255Scgd 		if (cp->y < Min.y)
8661f28255Scgd 			Min.y = cp->y;
8761f28255Scgd 		if (cp->x < Min.x)
8861f28255Scgd 			Min.x = cp->x;
8961f28255Scgd 		if (cp->y > Max.y)
9061f28255Scgd 			Max.y = cp->y;
9161f28255Scgd 		if (cp->x > Max.x)
9261f28255Scgd 			Max.x = cp->x;
9361f28255Scgd 	}
9461f28255Scgd 	My_pos = *rnd_pos();
9561f28255Scgd 	refresh();
9661f28255Scgd }
97