monster spells (insects, nasties)

This throttles insect creation through monster spell casting.  Especially
insects.  It was creating m_lev worth of insects--for a 25th level priest,
that means every batch of insects was size 25!

I also lowered the range for nasties creation for similar reasons.
This commit is contained in:
arromdee
2002-04-06 04:00:04 +00:00
parent 69ee06a9bc
commit 68310c7d79
3 changed files with 6 additions and 2 deletions
+1
View File
@@ -51,6 +51,7 @@ avoid dmonsfree impossible message due to migrating a dead monster via
avoid temporary disappearing Burdened message due to updating status line avoid temporary disappearing Burdened message due to updating status line
midway thru in_container midway thru in_container
don't credit player's wisdom when makelevel creates random Elbereth engravings don't credit player's wisdom when makelevel creates random Elbereth engravings
reduce insect/monster creation from monster spells
Platform- and/or Interface-Specific Fixes Platform- and/or Interface-Specific Fixes
+4 -1
View File
@@ -542,9 +542,12 @@ int spellnum;
boolean success; boolean success;
int i; int i;
coord bypos; coord bypos;
int quan;
quan = (mtmp->m_lev < 2) ? 1 : rnd((int)mtmp->m_lev / 2);
if (quan < 3) quan = 3;
success = pm ? TRUE : FALSE; success = pm ? TRUE : FALSE;
for (i = 0; i <= (int) mtmp->m_lev; i++) { for (i = 0; i <= quan; i++) {
if (!enexto(&bypos, mtmp->mux, mtmp->muy, mtmp->data)) if (!enexto(&bypos, mtmp->mux, mtmp->muy, mtmp->data))
break; break;
if ((pm = mkclass(let,0)) != 0 && if ((pm = mkclass(let,0)) != 0 &&
+1 -1
View File
@@ -491,7 +491,7 @@ toofar:
/* arbitrary distance restriction to keep monster far away /* arbitrary distance restriction to keep monster far away
from you from having cast dozens of sticks-to-snakes from you from having cast dozens of sticks-to-snakes
or similar spells by the time you reach it */ or similar spells by the time you reach it */
if (dist2(mtmp->mx, mtmp->my, u.ux, u.uy) <= 64 && !mtmp->mspec_used) { if (dist2(mtmp->mx, mtmp->my, u.ux, u.uy) <= 49 && !mtmp->mspec_used) {
struct attack *a; struct attack *a;
for (a = &mdat->mattk[0]; a < &mdat->mattk[NATTK]; a++) { for (a = &mdat->mattk[0]; a < &mdat->mattk[NATTK]; a++) {