ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/spell_util.C
(Generate patch)

Comparing deliantra/server/server/spell_util.C (file contents):
Revision 1.122 by root, Sat Dec 31 06:18:02 2011 UTC vs.
Revision 1.126 by root, Wed Nov 21 12:12:03 2012 UTC

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,2009,2010,2011 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 4 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (©) 2001 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2001 Mark Wedel & Crossfire Development Team
6 * Copyright (©) 1992 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.
12 * 12 *
13 * This program is distributed in the hope that it will be useful, 13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details. 16 * GNU General Public License for more details.
17 * 17 *
18 * You should have received a copy of the Affero GNU General Public License 18 * You should have received a copy of the Affero GNU General Public License
19 * and the GNU General Public License along with this program. If not, see 19 * and the GNU General Public License along with this program. If not, see
20 * <http://www.gnu.org/licenses/>. 20 * <http://www.gnu.org/licenses/>.
21 * 21 *
22 * The authors can be reached via e-mail to <support@deliantra.net> 22 * The authors can be reached via e-mail to <support@deliantra.net>
23 */ 23 */
24 24
25#include <global.h> 25#include <global.h>
26#include <spells.h> 26#include <spells.h>
255 return spop; 255 return spop;
256 256
257 return 0; 257 return 0;
258} 258}
259 259
260/* 260/*
261 * Look at object 'op' and see if they know the spell 261 * Look at object 'op' and see if they know the spell
262 * spname. This is pretty close to check_spell_known 262 * spname. This is pretty close to check_spell_known
263 * above, but it uses a looser matching mechanism. 263 * above, but it uses a looser matching mechanism.
264 * returns the matching spell object, or NULL. 264 * returns the matching spell object, or NULL.
265 * If we match multiple spells but don't get an 265 * If we match multiple spells but don't get an
266 * exact match, we also return NULL. 266 * exact match, we also return NULL.
267 */ 267 */
268object * 268object *
269lookup_spell_by_name (object *op, const char *spname) 269object::find_spell (shstr_cmp name) const
270{ 270{
271 object *spob1 = 0, *spob2 = 0;
272 int nummatch = 0;
273
274 if (!spname)
275 return 0;
276
277 /* Try to find the spell. We store the results in spob1
278 * and spob2 - spob1 is only taking the length of
279 * the past spname, spob2 uses the length of the spell name.
280 */
281 for (object *spob = op->inv; spob; spob = spob->below) 271 for (object *spob = inv; spob; spob = spob->below)
282 { 272 if (spob->name == name && spob->type == SPELL)
283 if (spob->type == SPELL)
284 {
285 // TODO: WTF?
286 if (!strncmp (spob->name, spname, strlen (spname)))
287 {
288 nummatch++;
289 spob1 = spob;
290 }
291 else if (!strncmp (spob->name, spname, strlen (spob->name)))
292 {
293 /* if spells have ambiguous names, it makes matching
294 * really difficult. (eg, fire and fireball would
295 * fall into this category). It shouldn't be hard to
296 * make sure spell names don't overlap in that fashion.
297 */
298 if (spob2)
299 LOG (llevError, "Found multiple spells with overlapping base names: %s, %s\n", &spob2->name, &spob->name);
300
301 spob2 = spob;
302 }
303 }
304 }
305 /* if we have best match, return it. Otherwise, if we have one match
306 * on the loser match, return that, otehrwise null
307 */
308 if (spob2)
309 return spob2; 273 return spob;
310 274
311 if (spob1 && nummatch == 1)
312 return spob1;
313
314 return NULL; 275 return 0;
315} 276}
316 277
317/* reflwall - decides weither the (spell-)object sp_op will 278/* reflwall - decides weither the (spell-)object sp_op will
318 * be reflected from the given mapsquare. Returns 1 if true. 279 * be reflected from the given mapsquare. Returns 1 if true.
319 * (Note that for living creatures there is a small chance that 280 * (Note that for living creatures there is a small chance that
338 299
339/* cast_create_object: creates object new_op in direction dir 300/* cast_create_object: creates object new_op in direction dir
340 * or if that is blocked, beneath the player (op). 301 * or if that is blocked, beneath the player (op).
341 * we pass 'caster', but don't use it for anything. 302 * we pass 'caster', but don't use it for anything.
342 * This is really just a simple wrapper function . 303 * This is really just a simple wrapper function .
343 * returns the direction that the object was actually placed 304 * returns true to indicate whether the operation was successful.
344 * in. 305 * destroys the object is unsuccessful.
345 */ 306 */
346int 307bool
347cast_create_obj (object *op, object *caster, object *new_op, int dir) 308cast_create_obj (object *op, object *caster, object *new_op, int dir)
348{ 309{
349 maptile *m; 310 mapxy pos (op);
350 sint16 sx, sy; 311 pos.move (dir);
351 312
352 if (dir && 313 if (!pos.normalise ()
353 ((get_map_flags (op->map, &m, op->x + freearr_x[dir], op->y + freearr_y[dir], &sx, &sy) & P_OUT_OF_MAP) || 314 || pos->blocks (op) // perversely enough, we check if the palyer can reach that space
354 OB_TYPE_MOVE_BLOCK (op, GET_MAP_MOVE_BLOCK (m, sx, sy)))) 315 || !new_op->can_drop_at (pos.m, pos.x, pos.y)
316 )
355 { 317 {
356 new_draw_info (NDI_UNIQUE, 0, op, "Something is in the way."); 318 op->failmsg ("Your spell fizzles! H<Something is in the way.>");
357 new_draw_info (NDI_UNIQUE, 0, op, "You cast it at your feet."); 319 new_op->destroy ();
358 dir = 0; 320 return 0;
359 } 321 }
360 322
361 new_op->set_flag (FLAG_IDENTIFIED); 323 new_op->set_flag (FLAG_IDENTIFIED);
362 op->map->insert (new_op,
363 op->x + freearr_x[dir], op->y + freearr_y[dir],
364 op,
365 dir ? 0 : INS_BELOW_ORIGINATOR);
366 324
325 pos.insert (new_op, op, dir ? 0 : INS_BELOW_ORIGINATOR);
326
367 return dir; 327 return 1;
368} 328}
369 329
370static bool 330static bool
371mergable_owner (object *o1, object *o2) 331mergable_owner (object *o1, object *o2)
372{ 332{
820 op->failmsgf ("%s smites you!" HINT_GRACE, godname); 780 op->failmsgf ("%s smites you!" HINT_GRACE, godname);
821 cast_magic_storm (op, tmp, power); 781 cast_magic_storm (op, tmp, power);
822 } 782 }
823} 783}
824 784
825/* 785/*
826 * spell_failure() handles the various effects for differing degrees 786 * spell_failure() handles the various effects for differing degrees
827 * of failure badness. 787 * of failure badness.
828 * op is the player that failed. 788 * op is the player that failed.
829 * failure is a random value of how badly you failed. 789 * failure is a random value of how badly you failed.
830 * power is how many spellpoints you'd normally need for the spell. 790 * power is how many spellpoints you'd normally need for the spell.
831 * skill is the skill you'd need to cast the spell. 791 * skill is the skill you'd need to cast the spell.
832 */ 792 */
833
834void 793void
835spell_failure (object *op, int failure, int power, object *skill) 794spell_failure (object *op, int failure, int power, object *skill)
836{ 795{
837 object *tmp; 796 object *tmp;
838 797

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines