server/random_maps/decor.C

/*
 * This file is part of Crossfire TRT, the Roguelike Realtime MORPG.
 * 
 * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
 * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
 * Copyright (©) 1992,2007 Frank Tore Johansen
 * 
 * Crossfire TRT is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 * 
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 * GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <http://www.gnu.org/licenses/>.
 * 
 * The authors can be reached via e-mail to <crossfire@schmorp.de>
 */

#include <global.h>
#include <random_map.h>
#include <rproto.h>

#define NR_DECOR_OPTIONS 1

/* return a simple count of objects in the map at x,y. */

int
obj_count_in_map (maptile *map, int x, int y)
{
  int count = 0;
  object *tmp;

  for (tmp = GET_MAP_OB (map, x, y); tmp != NULL; tmp = tmp->above)
    count++;
  return count;
}

/* put the decor into the map.  Right now, it's very primitive. */

void
put_decor (maptile *map, char **maze, char *decorstyle, int decor_option, random_map_params *RP)
{
  maptile *decor_map;
  char style_name[1024];

  sprintf (style_name, "/styles/decorstyles");

  decor_map = find_style (style_name, decorstyle, -1);
  if (!decor_map)
    return;

  /* pick a random option, only 1 option right now. */
  if (decor_option == 0)
    decor_option = rndm (NR_DECOR_OPTIONS) + 1;

  switch (decor_option)
    {
      case 0:
        break;
      case 1:
        {                       /* random placement of decor objects. */
          int number_to_place = rndm (RP->Xsize * RP->Ysize / 5);
          int failures = 0;
          object *new_decor_object;

          while (failures < 100 && number_to_place > 0)
            {
              int x, y;

              x = rndm (RP->Xsize - 2) + 1;
              y = rndm (RP->Ysize - 2) + 1;
              if (maze[x][y] == 0 && obj_count_in_map (map, x, y) < 2)
                {               /* empty */
                  object *this_object;

                  new_decor_object = decor_map->pick_random_object ();
                  this_object = arch_to_object (new_decor_object->arch);
                  new_decor_object->copy_to (this_object);
                  this_object->x = x;
                  this_object->y = y;
                  /* it screws things up if decor can stop people */
                  this_object->move_block = 0;
                  insert_ob_in_map (this_object, map, NULL, 0);
                  number_to_place--;
                }
              else
                failures++;
            }
          break;
        }
      default:
        {                       /* place decor objects everywhere: tile the map. */
          int i, j;

          for (i = 1; i < RP->Xsize - 1; i++)
            for (j = 1; j < RP->Ysize - 1; j++)
              {
                if (maze[i][j] == 0)
                  {
                    object *new_decor_object, *this_object;

                    new_decor_object = decor_map->pick_random_object ();
                    this_object = arch_to_object (new_decor_object->arch);
                    new_decor_object->copy_to (this_object);
                    this_object->x = i;
                    this_object->y = j;
                    /* it screws things up if decor can stop people */
                    this_object->move_block = 0;
                    insert_ob_in_map (this_object, map, NULL, 0);
                  }
              }
          break;
        }
    }
}
Revision:	1.16
Committed:	Sun Jul 1 05:00:19 2007 UTC (16 years, 11 months ago) by root
Content type:	text/plain
Branch:	MAIN
CVS Tags:	rel-2_2, rel-2_3
Changes since 1.15:	+10 -12 lines
Log Message:	- upgrade crossfire trt to the GPL version 3 (hopefully correctly). - add a single file covered by the GNU Affero General Public License (which is not yet released, so I used the current draft, which is legally a bit wavy, but its likely better than nothing as it expresses direct intent by the authors, and we can upgrade as soon as it has been released). * this should ensure availability of source code for the server at least and hopefully also archetypes and maps even when modified versions are not being distributed, in accordance of section 13 of the agplv3.
#	Content
1	/*
2	* This file is part of Crossfire TRT, the Roguelike Realtime MORPG.
3	*
4	* Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
5	* Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
6	* Copyright (©) 1992,2007 Frank Tore Johansen
7	*
8	* Crossfire TRT is free software: you can redistribute it and/or modify
9	* it under the terms of the GNU General Public License as published by
10	* the Free Software Foundation, either version 3 of the License, or
11	* (at your option) any later version.
12	*
13	* This program is distributed in the hope that it will be useful,
14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16	* GNU General Public License for more details.
17	*
18	* You should have received a copy of the GNU General Public License
19	* along with this program. If not, see <http://www.gnu.org/licenses/>.
20	*
21	* The authors can be reached via e-mail to <crossfire@schmorp.de>
22	*/
23
24	#include <global.h>
25	#include <random_map.h>
26	#include <rproto.h>
27
28	#define NR_DECOR_OPTIONS 1
29
30	/* return a simple count of objects in the map at x,y. */
31
32	int
33	obj_count_in_map (maptile *map, int x, int y)
34	{
35	int count = 0;
36	object *tmp;
37
38	for (tmp = GET_MAP_OB (map, x, y); tmp != NULL; tmp = tmp->above)
39	count++;
40	return count;
41	}
42
43	/* put the decor into the map. Right now, it's very primitive. */
44
45	void
46	put_decor (maptile map, char maze, char decorstyle, int decor_option, random_map_params *RP)
47	{
48	maptile *decor_map;
49	char style_name[1024];
50
51	sprintf (style_name, "/styles/decorstyles");
52
53	decor_map = find_style (style_name, decorstyle, -1);
54	if (!decor_map)
55	return;
56
57	/* pick a random option, only 1 option right now. */
58	if (decor_option == 0)
59	decor_option = rndm (NR_DECOR_OPTIONS) + 1;
60
61	switch (decor_option)
62	{
63	case 0:
64	break;
65	case 1:
66	{ /* random placement of decor objects. */
67	int number_to_place = rndm (RP->Xsize * RP->Ysize / 5);
68	int failures = 0;
69	object *new_decor_object;
70
71	while (failures < 100 && number_to_place > 0)
72	{
73	int x, y;
74
75	x = rndm (RP->Xsize - 2) + 1;
76	y = rndm (RP->Ysize - 2) + 1;
77	if (maze[x][y] == 0 && obj_count_in_map (map, x, y) < 2)
78	{ /* empty */
79	object *this_object;
80
81	new_decor_object = decor_map->pick_random_object ();
82	this_object = arch_to_object (new_decor_object->arch);
83	new_decor_object->copy_to (this_object);
84	this_object->x = x;
85	this_object->y = y;
86	/* it screws things up if decor can stop people */
87	this_object->move_block = 0;
88	insert_ob_in_map (this_object, map, NULL, 0);
89	number_to_place--;
90	}
91	else
92	failures++;
93	}
94	break;
95	}
96	default:
97	{ /* place decor objects everywhere: tile the map. */
98	int i, j;
99
100	for (i = 1; i < RP->Xsize - 1; i++)
101	for (j = 1; j < RP->Ysize - 1; j++)
102	{
103	if (maze[i][j] == 0)
104	{
105	object new_decor_object, this_object;
106
107	new_decor_object = decor_map->pick_random_object ();
108	this_object = arch_to_object (new_decor_object->arch);
109	new_decor_object->copy_to (this_object);
110	this_object->x = i;
111	this_object->y = j;
112	/* it screws things up if decor can stop people */
113	this_object->move_block = 0;
114	insert_ob_in_map (this_object, map, NULL, 0);
115	}
116	}
117	break;
118	}
119	}
120	}