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

Comparing deliantra/server/server/spell_attack.C (file contents):
Revision 1.29 by root, Mon Jan 29 16:11:48 2007 UTC vs.
Revision 1.35 by root, Thu May 17 20:27:02 2007 UTC

1/* 1/*
2 * CrossFire, A Multiplayer game for X-windows 2 * CrossFire, A Multiplayer game
3 * 3 *
4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team 4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
5 * Copyright (C) 2002-2003 Mark Wedel & Crossfire Development Team 5 * Copyright (C) 2002-2003 Mark Wedel & Crossfire Development Team
6 * Copyright (C) 1992 Frank Tore Johansen 6 * Copyright (C) 1992 Frank Tore Johansen
7 * 7 *
145 145
146 /* reduce chances of subsequent forking */ 146 /* reduce chances of subsequent forking */
147 new_bolt->stats.Dex -= 10; 147 new_bolt->stats.Dex -= 10;
148 tmp->stats.Dex -= 10; /* less forks from main bolt too */ 148 tmp->stats.Dex -= 10; /* less forks from main bolt too */
149 new_bolt->stats.Con += 25 * new_dir; /* adjust the left bias */ 149 new_bolt->stats.Con += 25 * new_dir; /* adjust the left bias */
150 new_bolt->speed_left = -0.1; 150 new_bolt->speed_left = -0.1f;
151 new_bolt->direction = t_dir; 151 new_bolt->direction = t_dir;
152 new_bolt->duration++; 152 new_bolt->duration++;
153 new_bolt->stats.dam /= 2; /* reduce daughter bolt damage */ 153 new_bolt->stats.dam /= 2; /* reduce daughter bolt damage */
154 new_bolt->stats.dam++; 154 new_bolt->stats.dam++;
155 tmp->stats.dam /= 2; /* reduce father bolt damage */ 155 tmp->stats.dam /= 2; /* reduce father bolt damage */
163 */ 163 */
164 164
165void 165void
166move_bolt (object *op) 166move_bolt (object *op)
167{ 167{
168 object *tmp;
169 int mflags; 168 int mflags;
170 sint16 x, y; 169 sint16 x, y;
171 maptile *m; 170 maptile *m;
172 171
173 if (--op->duration < 0) 172 if (--op->duration < 0)
246 else 245 else
247 { /* Create a copy of this object and put it ahead */ 246 { /* Create a copy of this object and put it ahead */
248 object *tmp = op->clone (); 247 object *tmp = op->clone ();
249 248
250 m->insert (tmp, x, y, op); 249 m->insert (tmp, x, y, op);
251 tmp->speed_left = -0.1; 250 tmp->speed_left = -0.1f;
252 /* To make up for the decrease at the top of the function */ 251 /* To make up for the decrease at the top of the function */
253 tmp->duration++; 252 tmp->duration++;
254 253
255 /* New forking code. Possibly create forks of this object 254 /* New forking code. Possibly create forks of this object
256 * going off in other directions. 255 * going off in other directions.
381 if (ok_to_put_more (op->map, dx, dy, op, op->attacktype)) 380 if (ok_to_put_more (op->map, dx, dy, op, op->attacktype))
382 { 381 {
383 object *tmp = op->clone (); 382 object *tmp = op->clone ();
384 383
385 tmp->state = 0; 384 tmp->state = 0;
386 tmp->speed_left = -0.21; 385 tmp->speed_left = -0.21f;
387 tmp->range--; 386 tmp->range--;
388 tmp->value = 0; 387 tmp->value = 0;
389 388
390 m->insert (tmp, dx, dy, op); 389 m->insert (tmp, dx, dy, op);
391 } 390 }
519 518
520 /* If nothing alive on this space, no reason to do anything further */ 519 /* If nothing alive on this space, no reason to do anything further */
521 if (!(mflags & P_IS_ALIVE)) 520 if (!(mflags & P_IS_ALIVE))
522 return; 521 return;
523 522
524 for (tmp = GET_MAP_OB (op->map, op->x, op->y); tmp != NULL; tmp = tmp->above) 523 for (tmp = op->ms ().bot; tmp; tmp = tmp->above)
525 { 524 {
526 if (QUERY_FLAG (tmp, FLAG_ALIVE)) 525 if (QUERY_FLAG (tmp, FLAG_ALIVE))
527 { 526 {
528 dam = hit_player (tmp, op->stats.dam, op, op->attacktype, 1); 527 dam = hit_player (tmp, op->stats.dam, op, op->attacktype, 1);
529 if (op->destroyed () || !tmp->destroyed () || (op->stats.dam -= dam) < 0) 528 if (op->destroyed () || !tmp->destroyed () || (op->stats.dam -= dam) < 0)
605 } 604 }
606 else 605 else
607 check_bullet (op); 606 check_bullet (op);
608} 607}
609 608
610
611
612
613/* fire_bullet 609/* fire_bullet
614 * object op (cast from caster) files a bolt in dir. 610 * object op (cast from caster) files a bolt in dir.
615 * spob is the spell object for the bolt. 611 * spob is the spell object for the bolt.
616 * we remove the magic flag - that can be derived from 612 * we remove the magic flag - that can be derived from
617 * spob->attacktype. 613 * spob->attacktype.
684 check_bullet (tmp); 680 check_bullet (tmp);
685 681
686 return 1; 682 return 1;
687} 683}
688 684
689
690
691
692/***************************************************************************** 685/*****************************************************************************
693 * 686 *
694 * CONE RELATED FUNCTIONS 687 * CONE RELATED FUNCTIONS
695 * 688 *
696 *****************************************************************************/ 689 *****************************************************************************/
697
698 690
699/* drops an object based on what is in the cone's "other_arch" */ 691/* drops an object based on what is in the cone's "other_arch" */
700void 692void
701cone_drop (object *op) 693cone_drop (object *op)
702{ 694{
1308 return 0; 1300 return 0;
1309 } 1301 }
1310 return 1; 1302 return 1;
1311} 1303}
1312 1304
1313
1314
1315
1316int 1305int
1317cast_destruction (object *op, object *caster, object *spell_ob) 1306cast_destruction (object *op, object *caster, object *spell_ob)
1318{ 1307{
1319 int i, j, range, mflags, friendly = 0, dam, dur; 1308 int i, j, range, mflags, friendly = 0, dam, dur;
1320 sint16 sx, sy; 1309 sint16 sx, sy;
1340 else if (caster->skill) 1329 else if (caster->skill)
1341 op->skill = caster->skill; 1330 op->skill = caster->skill;
1342 else 1331 else
1343 op->skill = NULL; 1332 op->skill = NULL;
1344 1333
1345 change_skill (op, find_skill_by_name (op, op->skill), 1); 1334 op->change_skill (find_skill_by_name (op, op->skill));
1346 1335
1347 for (i = -range; i < range; i++) 1336 for (i = -range; i < range; i++)
1348 { 1337 {
1349 for (j = -range; j < range; j++) 1338 for (j = -range; j < range; j++)
1350 { 1339 {
1454 new_draw_info (NDI_UNIQUE, 0, op, "Recasting the spell had no effect."); 1443 new_draw_info (NDI_UNIQUE, 0, op, "Recasting the spell had no effect.");
1455 } 1444 }
1456 return 1; 1445 return 1;
1457 } 1446 }
1458 force->duration = spell_ob->duration + SP_level_duration_adjust (caster, spell_ob) * 50; 1447 force->duration = spell_ob->duration + SP_level_duration_adjust (caster, spell_ob) * 50;
1459 force->speed = 1.0; 1448 force->speed = 1.f;
1460 force->speed_left = -1.0; 1449 force->speed_left = -1.f;
1461 SET_FLAG (force, FLAG_APPLIED); 1450 SET_FLAG (force, FLAG_APPLIED);
1462 1451
1463 if (god) 1452 if (god)
1464 { 1453 {
1465 if (spell_ob->last_grace) 1454 if (spell_ob->last_grace)
1611 1600
1612 /* aggravation */ 1601 /* aggravation */
1613 if (QUERY_FLAG (spell, FLAG_MONSTER)) 1602 if (QUERY_FLAG (spell, FLAG_MONSTER))
1614 { 1603 {
1615 CLEAR_FLAG (head, FLAG_SLEEP); 1604 CLEAR_FLAG (head, FLAG_SLEEP);
1616 if (QUERY_FLAG (head, FLAG_FRIENDLY))
1617 remove_friendly_object (head); 1605 remove_friendly_object (head);
1618
1619 done_one = 1; 1606 done_one = 1;
1620 head->enemy = op; 1607 head->enemy = op;
1621 } 1608 }
1622 1609
1623 /* calm monsters */ 1610 /* calm monsters */
1723 * if this has an other_arch field, we insert that in 1710 * if this has an other_arch field, we insert that in
1724 * the surround spaces. 1711 * the surround spaces.
1725 */ 1712 */
1726 for (j = 0; j < 9; j++) 1713 for (j = 0; j < 9; j++)
1727 { 1714 {
1728 object *new_ob;
1729
1730 hx = nx + freearr_x[j]; 1715 hx = nx + freearr_x[j];
1731 hy = ny + freearr_y[j]; 1716 hy = ny + freearr_y[j];
1732 1717
1733 m = op->map; 1718 m = op->map;
1734 mflags = get_map_flags (m, &m, hx, hy, &hx, &hy); 1719 mflags = get_map_flags (m, &m, hx, hy, &hx, &hy);
1810#if 0 1795#if 0
1811 // this is bogus: it causes wrong places to be checked below 1796 // this is bogus: it causes wrong places to be checked below
1812 // (a wall 2 cells away will block the effect...) and 1797 // (a wall 2 cells away will block the effect...) and
1813 // doesn't work for SP_BULLET anyhow, so again tests the wrong 1798 // doesn't work for SP_BULLET anyhow, so again tests the wrong
1814 // space. 1799 // space.
1815 // should be fixed later, but correctness before featurs... 1800 // should be fixed later, but correctness before features...
1816 // (schmorp) 1801 // (schmorp)
1817 1802
1818 /* new offset calculation to make swarm element distribution 1803 /* new offset calculation to make swarm element distribution
1819 * more uniform 1804 * more uniform
1820 */ 1805 */
2110 if (disease->stats.sp) 2095 if (disease->stats.sp)
2111 disease->stats.sp -= dam_mod; 2096 disease->stats.sp -= dam_mod;
2112 2097
2113 if (infect_object (walk, disease, 1)) 2098 if (infect_object (walk, disease, 1))
2114 { 2099 {
2115 object *flash; /* visual effect for inflicting disease */
2116
2117 new_draw_info_format (NDI_UNIQUE, 0, op, "You inflict %s on %s!", &disease->name, &walk->name); 2100 new_draw_info_format (NDI_UNIQUE, 0, op, "You inflict %s on %s!", &disease->name, &walk->name);
2118 2101
2119 disease->destroy (); /* don't need this one anymore */ 2102 disease->destroy (); /* don't need this one anymore */
2120 walk->map->insert (get_archetype (ARCH_DETECT_MAGIC), x, y, op); 2103 walk->map->insert (get_archetype (ARCH_DETECT_MAGIC), x, y, op);
2121 return 1; 2104 return 1;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines