void
losexp(const char *drainer) /* e.g., hit by drain life attack */
/* cause of death, if drain should be fatal */
{
register int num;
#ifdef WIZARD
/* override life-drain resistance when handling an explicit
wizard mode request to reduce level; never fatal though */
if (drainer && !strcmp(drainer, "#levelchange"))
drainer = 0;
else
#endif
if (resists_drli(&youmonst)) return;
if (u.ulevel > 1) {
pline("%s level %d.", Goodbye(), u.ulevel--);
/* remove intrinsic abilities */
adjabil(u.ulevel + 1, u.ulevel);
reset_rndmonst(NON_PM); /* new monster selection */
} else {
if (drainer) {
killer_format = KILLED_BY;
killer = drainer;
done(DIED);
}
/* no drainer or lifesaved */
u.uexp = 0;
}
num = newhp();
u.uhpmax -= num;
check_uhpmax();
if (u.uhpmax < 1) u.uhpmax = 1;
u.uhp -= num;
if (u.uhp < 1) u.uhp = 1;
else if (u.uhp > u.uhpmax) u.uhp = u.uhpmax;
if (u.ulevel < urole.xlev)
num = rn1((int)ACURR(A_WIS)/2 + urole.enadv.lornd + urace.enadv.lornd,
urole.enadv.lofix + urace.enadv.lofix);
else
num = rn1((int)ACURR(A_WIS)/2 + urole.enadv.hirnd + urace.enadv.hirnd,
urole.enadv.hifix + urace.enadv.hifix);
num = enermod(num); /* M. Stephenson */
u.uenmax -= num;
if (u.uenmax < 0) u.uenmax = 0;
u.uen -= num;
if (u.uen < 0) u.uen = 0;
else if (u.uen > u.uenmax) u.uen = u.uenmax;
if (u.uexp > 0)
u.uexp = newuexp(u.ulevel) - 1;
flags.botl = 1;
}
void
pluslvl(boolean incr)
/* true iff via incremental experience growth */
{
/* (false for potion of gain level) */
register int num;
if (!incr) You_feel("more experienced.");
num = newhp();
u.uhpmax += num;
u.uhp += num;
if (Upolyd) {
num = rnd(8);
u.mhmax += num;
u.mh += num;
}
if (u.ulevel < urole.xlev)
num = rn1((int)ACURR(A_WIS)/2 + urole.enadv.lornd + urace.enadv.lornd,
urole.enadv.lofix + urace.enadv.lofix);
else
num = rn1((int)ACURR(A_WIS)/2 + urole.enadv.hirnd + urace.enadv.hirnd,
urole.enadv.hifix + urace.enadv.hifix);
num = enermod(num); /* M. Stephenson */
if (!Role_if(PM_TOURIST)) { /* Tourists have no innate magic abilities */
u.uenmax += num;
u.uen += num;
}
if (u.ulevel < MAXULEV) {
if (incr) {
long tmp = newuexp(u.ulevel + 1);
if (u.uexp >= tmp) u.uexp = tmp - 1;
} else {
u.uexp = newuexp(u.ulevel);
}
++u.ulevel;
if (u.ulevelmax < u.ulevel) u.ulevelmax = u.ulevel;
pline("Welcome to experience level %d.", u.ulevel);
adjabil(u.ulevel - 1, u.ulevel); /* give new intrinsics */
reset_rndmonst(NON_PM); /* new monster selection */
}
flags.botl = 1;
}
static void newman(void)
{
int tmp, oldlvl;
tmp = u.uhpmax;
oldlvl = u.ulevel;
u.ulevel = u.ulevel + rn1(5, -2);
if (u.ulevel > 127 || u.ulevel < 1) { /* level went below 0? */
u.ulevel = oldlvl; /* restore old level in case they lifesave */
goto dead;
}
if (u.ulevel > MAXULEV) u.ulevel = MAXULEV;
/* If your level goes down, your peak level goes down by
the same amount so that you can't simply use blessed
full healing to undo the decrease. But if your level
goes up, your peak level does *not* undergo the same
adjustment; you might end up losing out on the chance
to regain some levels previously lost to other causes. */
if (u.ulevel < oldlvl) u.ulevelmax -= (oldlvl - u.ulevel);
if (u.ulevelmax < u.ulevel) u.ulevelmax = u.ulevel;
if (!rn2(10)) change_sex();
adjabil(oldlvl, (int)u.ulevel);
reset_rndmonst(NON_PM); /* new monster generation criteria */
/* random experience points for the new experience level */
u.uexp = rndexp(FALSE);
/* u.uhpmax * u.ulevel / oldlvl: proportionate hit points to new level
* -10 and +10: don't apply proportionate HP to 10 of a starting
* character's hit points (since a starting character's hit points
* are not on the same scale with hit points obtained through level
* gain)
* 9 - rn2(19): random change of -9 to +9 hit points
*/
u.uhpmax = ((u.uhpmax - 10) * (long)u.ulevel / oldlvl + 10) +
(9 - rn2(19));
u.uhp = u.uhp * (long)u.uhpmax/tmp;
tmp = u.uenmax;
u.uenmax = u.uenmax * (long)u.ulevel / oldlvl + 9 - rn2(19);
if (u.uenmax < 0)
u.uenmax = 0;
u.uen = (tmp ? u.uen * (long)u.uenmax / tmp : u.uenmax);
redist_attr();
u.uhunger = rn1(500,500);
if (Sick)
make_sick(0L, NULL, FALSE, SICK_ALL);
Stoned = 0;
delayed_killer = 0;
if (u.uhp <= 0 || u.uhpmax <= 0) {
if (Polymorph_control) {
if (u.uhp <= 0) u.uhp = 1;
if (u.uhpmax <= 0) u.uhpmax = 1;
} else {
dead: /* we come directly here if their experience level went to 0 or less */
pline("Your new form doesn't seem healthy enough to survive.");
killer_format = KILLED_BY_AN;
killer="unsuccessful polymorph";
done(DIED);
newuhs(FALSE);
return; /* lifesaved */
}
}
newuhs(FALSE);
polyman("You feel like a new %s!",
(flags.female && urace.individual.f) ? urace.individual.f :
(urace.individual.m) ? urace.individual.m : urace.noun);
if (Slimed) {
pline("Your body transforms, but there is still slime on you.");
Slimed = 10L;
}
iflags.botl = 1;
see_monsters();
encumber_msg();
}
