version 1.37 | | version 1.38 |
---|
| | |
/* | | /* |
* static char *rcsid_pets_c = | | * static char *rcsid_pets_c = |
* "$Id: pets.c,v 1.37 2005/10/01 17:46:05 ryo_saeba Exp $"; | | * "$Id: pets.c,v 1.38 2005/10/28 19:08:53 akirschbaum Exp $"; |
*/ | | */ |
| | |
/* | | /* |
| | |
else | | else |
nrof = die_roll(2, 2, op, PREFER_HIGH); | | nrof = die_roll(2, 2, op, PREFER_HIGH); |
summon_arch = mon->arch; | | summon_arch = mon->arch; |
| | } else { |
| | summon_arch = NULL; |
} | | } |
| | |
if (spell_ob->stats.dam) | | if (spell_ob->stats.dam) |
| | |
if (dir > 0) { | | if (dir > 0) { |
x = op->x + freearr_x[dir]; | | x = op->x + freearr_x[dir]; |
y = op->y + freearr_y[dir]; | | y = op->y + freearr_y[dir]; |
| | } else { |
| | x = 0; |
| | y = 0; |
} | | } |
| | |
if (dir == -1 || arch_blocked(summon_arch, op->map, x, y)){ | | if (dir == -1 || arch_blocked(summon_arch, op->map, x, y)){ |