/*! \brief Use item on selected target
*
* Do target selection for using an item and then use it.
*
* \param pp Item index
*/
static void camp_item_targetting(int pp)
{
int t1, tg, z;
t1 = g_inv[pp][0];
if (items[t1].use == USE_NOT || items[t1].use > USE_CAMP_INF)
{
return;
}
if (items[t1].tgt == TGT_NONE || items[t1].tgt > TGT_ALLY_ALL)
{
return;
}
while (1)
{
update_equipstats();
tg = select_any_player(items[t1].tgt - 1, items[t1].icon,
items[t1].name);
if (tg > -1)
{
z = item_effects(0, tg, t1);
if (z == 0)
{
play_effect(SND_BAD, 128);
}
else
{
revert_equipstats();
if (z == 1)
{
play_effect(SND_ITEM, 128);
select_any_player(3, 0, "");
}
if (items[t1].use != USE_ANY_INF && items[t1].use != USE_CAMP_INF)
{
remove_item(pp, 1);
}
return;
}
}
else
{
return;
}
kq_yield();
}
}
/*! \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 ();
}
