1 | /* |
1 | /* |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
3 | * |
3 | * |
4 | * Copyright (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | * Copyright (©) 2001,2007 Mark Wedel & Crossfire Development Team |
5 | * Copyright (©) 2001 Mark Wedel & Crossfire Development Team |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
6 | * Copyright (©) 1992 Frank Tore Johansen |
7 | * |
7 | * |
8 | * Deliantra is free software: you can redistribute it and/or modify it under |
8 | * Deliantra is free software: you can redistribute it and/or modify it under |
9 | * the terms of the Affero GNU General Public License as published by the |
9 | * the terms of the Affero GNU General Public License as published by the |
10 | * Free Software Foundation, either version 3 of the License, or (at your |
10 | * Free Software Foundation, either version 3 of the License, or (at your |
11 | * option) any later version. |
11 | * option) any later version. |
… | |
… | |
109 | freeindex = -1; |
109 | freeindex = -1; |
110 | for (tries = 0; tries < 15 && freeindex == -1; tries++) |
110 | for (tries = 0; tries < 15 && freeindex == -1; tries++) |
111 | { |
111 | { |
112 | kx = rmg_rndm (RP->Xsize - 2) + 1; |
112 | kx = rmg_rndm (RP->Xsize - 2) + 1; |
113 | ky = rmg_rndm (RP->Ysize - 2) + 1; |
113 | ky = rmg_rndm (RP->Ysize - 2) + 1; |
114 | freeindex = find_free_spot (the_key, map, kx, ky, 1, SIZEOFFREE1 + 1); |
114 | freeindex = rmg_find_free_spot (the_key, map, kx, ky, 1, SIZEOFFREE1 + 1); |
115 | } |
115 | } |
116 | |
116 | |
117 | // can freeindex ever be < 0? |
117 | // can freeindex ever be < 0? |
118 | if (freeindex >= 0) |
118 | if (freeindex >= 0) |
119 | { |
119 | { |
… | |
… | |
194 | treasureoptions (may be 0 for random choices or positive) |
194 | treasureoptions (may be 0 for random choices or positive) |
195 | */ |
195 | */ |
196 | void |
196 | void |
197 | place_treasure (maptile *map, char **layout, char *treasure_style, int treasureoptions, random_map_params *RP) |
197 | place_treasure (maptile *map, char **layout, char *treasure_style, int treasureoptions, random_map_params *RP) |
198 | { |
198 | { |
199 | char styledirname[1024]; |
|
|
200 | char stylefilepath[1024]; |
|
|
201 | maptile *style_map = 0; |
|
|
202 | int num_treasures; |
199 | int num_treasures; |
203 | |
200 | |
204 | /* bail out if treasure isn't wanted. */ |
201 | /* bail out if treasure isn't wanted. */ |
205 | if (treasure_style) |
202 | if (treasure_style) |
206 | if (!strcmp (treasure_style, "none")) |
203 | if (!strcmp (treasure_style, "none")) |
… | |
… | |
228 | |
225 | |
229 | if (num_treasures <= 0) |
226 | if (num_treasures <= 0) |
230 | return; |
227 | return; |
231 | |
228 | |
232 | /* get the style map */ |
229 | /* get the style map */ |
233 | sprintf (styledirname, "%s", "/styles/treasurestyles"); |
230 | maptile *style_map = find_style ("/styles/treasurestyles", treasure_style, RP->difficulty); |
234 | sprintf (stylefilepath, "%s/%s", styledirname, treasure_style); |
|
|
235 | style_map = find_style (styledirname, treasure_style, -1); |
|
|
236 | |
231 | |
237 | if (!style_map) |
232 | if (!style_map) |
238 | { |
233 | { |
239 | LOG (llevError, "unable to load style map %s %s.\n", styledirname, treasure_style); |
234 | LOG (llevError, "unable to load style map %s %s.\n", "/styles/treasurestyles", treasure_style); |
240 | return; |
235 | return; |
241 | } |
236 | } |
242 | |
237 | |
243 | /* all the treasure at one spot in the map. */ |
238 | /* all the treasure at one spot in the map. */ |
244 | if (treasureoptions & CONCENTRATED) |
239 | if (treasureoptions & CONCENTRATED) |
… | |
… | |
366 | if (tlist != NULL) |
361 | if (tlist != NULL) |
367 | for (ti = 0; ti < n_treasures; ti++) |
362 | for (ti = 0; ti < n_treasures; ti++) |
368 | { /* use the treasure list */ |
363 | { /* use the treasure list */ |
369 | object *new_treasure = style_map->pick_random_object (rmg_rndm); |
364 | object *new_treasure = style_map->pick_random_object (rmg_rndm); |
370 | |
365 | |
371 | insert_ob_in_ob (arch_to_object (new_treasure->arch), the_chest); |
366 | insert_ob_in_ob (new_treasure->arch->instance (), the_chest); |
372 | } |
367 | } |
373 | else |
368 | else |
374 | { /* use the style map */ |
369 | { /* use the style map */ |
375 | the_chest->randomitems = tlist; |
370 | the_chest->randomitems = tlist; |
376 | the_chest->stats.hp = n_treasures; |
371 | the_chest->stats.hp = n_treasures; |
… | |
… | |
384 | } |
379 | } |
385 | |
380 | |
386 | /* stick a trap in the chest if required */ |
381 | /* stick a trap in the chest if required */ |
387 | if (treasureoptions & TRAPPED) |
382 | if (treasureoptions & TRAPPED) |
388 | { |
383 | { |
389 | maptile *trap_map = find_style ("/styles/trapstyles", "traps", -1); |
384 | maptile *trap_map = find_style ("/styles/trapstyles", "traps", RP->difficulty); |
390 | |
385 | |
391 | if (trap_map) |
386 | if (trap_map) |
392 | { |
387 | { |
393 | object *the_trap = trap_map->pick_random_object (rmg_rndm); |
388 | object *the_trap = trap_map->pick_random_object (rmg_rndm); |
394 | |
389 | |
… | |
… | |
439 | /* don't bother searching this square unless the map says life exists. */ |
434 | /* don't bother searching this square unless the map says life exists. */ |
440 | if (GET_MAP_FLAGS (map, lx, ly) & P_IS_ALIVE) |
435 | if (GET_MAP_FLAGS (map, lx, ly) & P_IS_ALIVE) |
441 | { |
436 | { |
442 | object *the_monster = GET_MAP_OB (map, lx, ly); |
437 | object *the_monster = GET_MAP_OB (map, lx, ly); |
443 | |
438 | |
444 | for (; the_monster != NULL && (!QUERY_FLAG (the_monster, FLAG_MONSTER)); the_monster = the_monster->above); |
439 | for (; the_monster != NULL && (!the_monster->flag [FLAG_MONSTER]); the_monster = the_monster->above); |
445 | if (the_monster && QUERY_FLAG (the_monster, FLAG_MONSTER)) |
440 | if (the_monster && the_monster->flag [FLAG_MONSTER]) |
446 | return the_monster; |
441 | return the_monster; |
447 | } |
442 | } |
448 | } |
443 | } |
449 | return NULL; |
444 | return NULL; |
450 | } |
445 | } |
… | |
… | |
478 | if (GET_MAP_FLAGS (map, x, y) & P_IS_ALIVE) |
473 | if (GET_MAP_FLAGS (map, x, y) & P_IS_ALIVE) |
479 | { |
474 | { |
480 | object *the_monster = GET_MAP_OB (map, x, y); |
475 | object *the_monster = GET_MAP_OB (map, x, y); |
481 | |
476 | |
482 | /* check off this point */ |
477 | /* check off this point */ |
483 | for (; the_monster != NULL && (!QUERY_FLAG (the_monster, FLAG_ALIVE)); the_monster = the_monster->above); |
478 | for (; the_monster != NULL && (!the_monster->flag [FLAG_ALIVE]); the_monster = the_monster->above); |
484 | if (the_monster && QUERY_FLAG (the_monster, FLAG_ALIVE)) |
479 | if (the_monster && the_monster->flag [FLAG_ALIVE]) |
485 | { |
480 | { |
486 | theMonsterToFind = the_monster; |
481 | theMonsterToFind = the_monster; |
487 | return theMonsterToFind; |
482 | return theMonsterToFind; |
488 | } |
483 | } |
489 | } |
484 | } |
… | |
… | |
659 | *cy = ly; |
654 | *cy = ly; |
660 | return; |
655 | return; |
661 | } |
656 | } |
662 | } |
657 | } |
663 | /* give up and return the closest free spot. */ |
658 | /* give up and return the closest free spot. */ |
664 | i = find_free_spot (archetype::find (shstr_chest), map, x, y, 1, SIZEOFFREE1 + 1); |
659 | i = rmg_find_free_spot (archetype::find (shstr_chest), map, x, y, 1, SIZEOFFREE1 + 1); |
665 | |
660 | |
666 | if (i != -1) |
661 | if (i != -1) |
667 | { |
662 | { |
668 | *cx = x + freearr_x[i]; |
663 | *cx = x + freearr_x[i]; |
669 | *cy = y + freearr_y[i]; |
664 | *cy = y + freearr_y[i]; |