/*! \brief Check for level-ups
*
* Checks for level ups.
*
* \param pl - Player
* \param ls - Learned new spell
* \returns 1 if new spell learned, 0 otherwise
*/
static int check_xp(int pl, int ls)
{
int stp = 0, z = 0;
if (party[pl].lvl >= 50)
{
return 0;
}
while (!stp)
{
if (party[pl].xp >= party[pl].next)
{
level_up(pl);
z = 1;
}
else
{
stp = 1;
}
if (party[pl].lvl >= 50)
{
stp = 1;
}
}
if (ls == 1)
{
learn_new_spells(pl);
}
return z;
}
/*! \brief Player defeated the enemies
* \author Josh Bolduc
* \date Created ????????
* \date Updated
*
* Distribute the booty!
*/
static void heroes_win (void)
{
int tgp = 0;
int index;
int b;
int c;
int z;
int nc = 0;
int txp = 0;
int found_item = 0;
int nr = 0;
int ent = 0;
s_fighter t1;
s_fighter t2;
play_music ("rend5.s3m", 0);
kq_wait (500);
revert_equipstats ();
for (index = 0; index < numchrs; index++)
fighter[index].aframe = 4;
battle_render (0, 0, 0);
blit2screen (0, 0);
kq_wait (250);
for (index = 0; index < numchrs; index++) {
if ((fighter[index].sts[S_STONE] == 0)
&& (fighter[index].sts[S_DEAD] == 0))
nc++;
ta[index] = 0;
}
for (index = PSIZE; index < PSIZE + numens; index++) {
txp += fighter[index].xp;
tgp += fighter[index].gp;
}
/* JB: nc should never be zero if we won, but whatever */
if (nc > 0)
txp /= nc;
gp += tgp;
if (tgp > 0)
sprintf (strbuf, _("Gained %d xp and found %d gp."), txp, tgp);
else
sprintf (strbuf, _("Gained %d xp."), txp);
menubox (double_buffer, 152 - (strlen (strbuf) * 4), 8, strlen (strbuf), 1,
BLUE);
print_font (double_buffer, 160 - (strlen (strbuf) * 4), 16, strbuf,
FNORMAL);
blit2screen (0, 0);
blit (double_buffer, back, 0, 0, 0, 0, 352, 280);
for (index = 0; index < numens; index++) {
/* PH bug: (?) should found_item be reset to zero at the start of this loop?
* If you defeat 2 enemies, you should (possibly) get 2 items, right?
*/
if ((rand () % 100) < fighter[index + PSIZE].dip) {
if (fighter[index + PSIZE].defeat_item_common > 0)
found_item = fighter[index + PSIZE].defeat_item_common;
if (fighter[index + PSIZE].defeat_item_rare > 0) {
if ((rand () % 100) < 5)
found_item = fighter[index + PSIZE].defeat_item_rare;
}
if (found_item > 0) {
if (check_inventory (found_item, 1) != 0) {
sprintf (strbuf, _("%s found!"), items[found_item].name);
menubox (double_buffer, 148 - (strlen (strbuf) * 4),
nr * 24 + 48, strlen (strbuf) + 1, 1, BLUE);
draw_icon (double_buffer, items[found_item].icon,
156 - (strlen (strbuf) * 4), nr * 24 + 56);
print_font (double_buffer, 164 - (strlen (strbuf) * 4),
nr * 24 + 56, strbuf, FNORMAL);
nr++;
}
}
}
}
if (nr > 0) {
blit2screen (0, 0);
wait_enter ();
blit (back, double_buffer, 0, 0, 0, 0, 352, 280);
}
nr = 0;
for (c = 0; c < numchrs; c++) {
if ((party[pidx[c]].sts[S_STONE] == 0)
&& (party[pidx[c]].sts[S_DEAD] == 0)) {
b = c * 160;
player2fighter (pidx[c], &t1);
if (give_xp (pidx[c], txp, 0) == 1) {
menubox (double_buffer, b, 40, 18, 9, BLUE);
player2fighter (pidx[c], &t2);
print_font (double_buffer, b + 8, 48, _("Level up!"), FGOLD);
print_font (double_buffer, b + 8, 56, _("Max HP"), FNORMAL);
print_font (double_buffer, b + 8, 64, _("Max MP"), FNORMAL);
print_font (double_buffer, b + 8, 72, _("Strength"), FNORMAL);
print_font (double_buffer, b + 8, 80, _("Agility"), FNORMAL);
print_font (double_buffer, b + 8, 88, _("Vitality"), FNORMAL);
print_font (double_buffer, b + 8, 96, _("Intellect"), FNORMAL);
print_font (double_buffer, b + 8, 104, _("Sagacity"), FNORMAL);
sprintf (strbuf, "%3d>", t1.mhp);
print_font (double_buffer, b + 96, 56, strbuf, FNORMAL);
sprintf (strbuf, "%3d", t2.mhp);
print_font (double_buffer, b + 128, 56, strbuf, FGREEN);
sprintf (strbuf, "%3d>", t1.mmp);
print_font (double_buffer, b + 96, 64, strbuf, FNORMAL);
sprintf (strbuf, "%3d", t2.mmp);
print_font (double_buffer, b + 128, 64, strbuf, FGREEN);
for (z = 0; z < 5; z++) {
sprintf (strbuf, "%3d>", t1.stats[z]);
print_font (double_buffer, b + 96, z * 8 + 72, strbuf, FNORMAL);
sprintf (strbuf, "%3d", t2.stats[z]);
if (t2.stats[z] > t1.stats[z])
print_font (double_buffer, b + 128, z * 8 + 72, strbuf,
FGREEN);
else
print_font (double_buffer, b + 128, z * 8 + 72, strbuf,
FNORMAL);
}
nr++;
} else
menubox (double_buffer, b, 104, 18, 1, BLUE);
sprintf (strbuf, _("Next level %7d"),
party[pidx[c]].next - party[pidx[c]].xp);
print_font (double_buffer, b + 8, 112, strbuf, FGOLD);
}
}
blit2screen (0, 0);
for (c = 0; c < numchrs; c++)
if ((party[pidx[c]].sts[S_STONE] == 0)
&& (party[pidx[c]].sts[S_DEAD] == 0))
ent += learn_new_spells (pidx[c]);
if (ent == 0)
wait_enter ();
}
