/**
* @brief Stops a beam outfit and sets delay as appropriate.
*
* @param p Pilot that is firing.
* @param w Pilot's beam outfit.
*/
void pilot_stopBeam( Pilot *p, PilotOutfitSlot *w )
{
double rate_mod, energy_mod, used;
/* There's nothing to do if the beam isn't active. */
if (w->u.beamid == 0)
return;
/* Safeguard against a nasty race condition. */
if (w->outfit == NULL) {
w->u.beamid = 0;
return;
}
/* Calculate rate modifier. */
pilot_getRateMod( &rate_mod, &energy_mod, p, w->outfit );
/* Beam duration used. */
used = w->outfit->u.bem.duration - w->timer;
w->timer = rate_mod * (used / w->outfit->u.bem.duration) * outfit_delay( w->outfit );
w->u.beamid = 0;
}
/**
* @brief Calculates and shoots the appropriate weapons in a weapon set matching an outfit.
*/
static int pilot_shootWeaponSetOutfit( Pilot* p, PilotWeaponSet *ws, Outfit *o, int level, double time )
{
int i, ret;
int is_launcher, is_bay;
double rate_mod, energy_mod;
PilotOutfitSlot *w;
int maxp, minh;
double q, maxt;
/* Store number of shots. */
ret = 0;
/** @TODO Make beams not fire all at once. */
if (outfit_isBeam(o)) {
for (i=0; i<array_size(ws->slots); i++)
if (ws->slots[i].slot->outfit == o)
ret += pilot_shootWeapon( p, ws->slots[i].slot, 0 );
return ret;
}
/* Stores if it is a launcher. */
is_launcher = outfit_isLauncher(o);
is_bay = outfit_isFighterBay(o);
/* Calculate rate modifier. */
pilot_getRateMod( &rate_mod, &energy_mod, p, o );
/* Find optimal outfit, coolest that can fire. */
minh = -1;
maxt = 0.;
maxp = -1;
q = 0.;
for (i=0; i<array_size(ws->slots); i++) {
/* Only matching outfits. */
if (ws->slots[i].slot->outfit != o)
continue;
/* Only match levels. */
if ((level != -1) && (ws->slots[i].level != level))
continue;
/* Simplicity. */
w = ws->slots[i].slot;
/* Launcher only counts with ammo. */
if ((is_launcher || is_bay) && ((w->u.ammo.outfit == NULL) || (w->u.ammo.quantity <= 0)))
continue;
/* Get coolest that can fire. */
if (w->timer <= 0.) {
if (is_launcher) {
if ((minh < 0) || (ws->slots[minh].slot->u.ammo.quantity < w->u.ammo.quantity))
minh = i;
}
else {
if ((minh < 0) || (ws->slots[minh].slot->heat_T > w->heat_T))
minh = i;
}
}
/* Save some stuff. */
if ((maxp < 0) || (w->timer > maxt)) {
maxp = i;
maxt = w->timer;
}
q += 1.;
}
/* No weapon can fire. */
if (minh < 0)
return 0;
/* Only fire if the last weapon to fire fired more than (q-1)/q ago. */
if (maxt > rate_mod * outfit_delay(o) * ((q-1.) / q))
return 0;
/* Shoot the weapon. */
ret += pilot_shootWeapon( p, ws->slots[minh].slot, time );
return ret;
}
/**
* @brief Actually handles the shooting, how often the player.p can shoot and such.
*
* @param p Pilot that is shooting.
* @param w Pilot's outfit to shoot.
* @param time Expected flight time.
* @return 0 if nothing was shot and 1 if something was shot.
*/
static int pilot_shootWeapon( Pilot* p, PilotOutfitSlot* w, double time )
{
Vector2d vp, vv;
double rate_mod, energy_mod;
double energy;
int j;
/* Make sure weapon has outfit. */
if (w->outfit == NULL)
return 0;
/* Reset beam shut-off if needed. */
if (outfit_isBeam(w->outfit) && w->outfit->u.bem.min_duration)
w->stimer = INFINITY;
/* check to see if weapon is ready */
if (w->timer > 0.)
return 0;
/* Calculate rate modifier. */
pilot_getRateMod( &rate_mod, &energy_mod, p, w->outfit );
/* Get weapon mount position. */
pilot_getMount( p, w, &vp );
vp.x += p->solid->pos.x;
vp.y += p->solid->pos.y;
/* Modify velocity to take into account the rotation. */
vect_cset( &vv, p->solid->vel.x + vp.x*p->solid->dir_vel,
p->solid->vel.y + vp.y*p->solid->dir_vel );
/*
* regular bolt weapons
*/
if (outfit_isBolt(w->outfit)) {
/* enough energy? */
if (outfit_energy(w->outfit)*energy_mod > p->energy)
return 0;
energy = outfit_energy(w->outfit)*energy_mod;
p->energy -= energy;
pilot_heatAddSlot( p, w );
weapon_add( w->outfit, w->heat_T, p->solid->dir,
&vp, &p->solid->vel, p, p->target, time );
}
/*
* Beam weapons.
*/
else if (outfit_isBeam(w->outfit)) {
/* Don't fire if the existing beam hasn't been destroyed yet. */
if (w->u.beamid > 0)
return 0;
/* Check if enough energy to last a second. */
if (outfit_energy(w->outfit)*energy_mod > p->energy)
return 0;
/** @todo Handle warmup stage. */
w->state = PILOT_OUTFIT_ON;
w->u.beamid = beam_start( w->outfit, p->solid->dir,
&vp, &p->solid->vel, p, p->target, w );
w->timer = w->outfit->u.bem.duration;
return 1; /* Return early due to custom timer logic. */
}
/*
* missile launchers
*
* must be a secondary weapon
*/
else if (outfit_isLauncher(w->outfit)) {
/* Shooter can't be the target - sanity check for the player.p */
if ((w->outfit->u.lau.ammo->u.amm.ai != AMMO_AI_DUMB) && (p->id==p->target))
return 0;
/* Must have ammo left. */
if ((w->u.ammo.outfit == NULL) || (w->u.ammo.quantity <= 0))
return 0;
/* enough energy? */
if (outfit_energy(w->u.ammo.outfit)*energy_mod > p->energy)
return 0;
energy = outfit_energy(w->u.ammo.outfit)*energy_mod;
p->energy -= energy;
pilot_heatAddSlot( p, w );
weapon_add( w->outfit, w->heat_T, p->solid->dir,
&vp, &p->solid->vel, p, p->target, time );
w->u.ammo.quantity -= 1; /* we just shot it */
p->mass_outfit -= w->u.ammo.outfit->mass;
p->solid->mass -= w->u.ammo.outfit->mass;
pilot_updateMass( p );
/* If last ammo was shot, update the range */
if (w->u.ammo.quantity <= 0) {
for (j=0; j<PILOT_WEAPON_SETS; j++)
pilot_weapSetUpdateRange( &p->weapon_sets[j] );
}
}
/*
* Fighter bays.
*/
else if (outfit_isFighterBay(w->outfit)) {
/* Must have ammo left. */
if ((w->u.ammo.outfit == NULL) || (w->u.ammo.quantity <= 0))
return 0;
/* Create the escort. */
escort_create( p, w->u.ammo.outfit->u.fig.ship,
&vp, &p->solid->vel, p->solid->dir, ESCORT_TYPE_BAY, 1 );
w->u.ammo.quantity -= 1; /* we just shot it */
p->mass_outfit -= w->u.ammo.outfit->mass;
w->u.ammo.deployed += 1; /* Mark as deployed. */
pilot_updateMass( p );
}
else
WARN(_("Shooting unknown weapon type: %s"), w->outfit->name);
/* Reset timer. */
w->timer += rate_mod * outfit_delay( w->outfit );
return 1;
}
/**
* @brief Actually handles the shooting, how often the player.p can shoot and such.
*
* @param p Pilot that is shooting.
* @param w Pilot's outfit to shoot.
* @return 0 if nothing was shot and 1 if something was shot.
*/
static int pilot_shootWeapon( Pilot* p, PilotOutfitSlot* w )
{
Vector2d vp, vv;
double rate_mod, energy_mod;
double energy;
/* Make sure weapon has outfit. */
if (w->outfit == NULL)
return 0;
/* check to see if weapon is ready */
if (w->timer > 0.)
return 0;
/* Calculate rate modifier. */
pilot_getRateMod( &rate_mod, &energy_mod, p, w->outfit );
/* Get weapon mount position. */
pilot_getMount( p, w, &vp );
vp.x += p->solid->pos.x;
vp.y += p->solid->pos.y;
/* Modify velocity to take into account the rotation. */
vect_cset( &vv, p->solid->vel.x + vp.x*p->solid->dir_vel,
p->solid->vel.y + vp.y*p->solid->dir_vel );
/*
* regular bolt weapons
*/
if (outfit_isBolt(w->outfit)) {
/* enough energy? */
if (outfit_energy(w->outfit)*energy_mod > p->energy)
return 0;
energy = outfit_energy(w->outfit)*energy_mod;
p->energy -= energy;
pilot_heatAddSlot( p, w );
weapon_add( w->outfit, w->heat_T, p->solid->dir,
&vp, &p->solid->vel, p, p->target );
}
/*
* Beam weapons.
*/
else if (outfit_isBeam(w->outfit)) {
/* Check if enough energy to last a second. */
if (outfit_energy(w->outfit)*energy_mod > p->energy)
return 0;
/** @todo Handle warmup stage. */
w->state = PILOT_OUTFIT_ON;
w->u.beamid = beam_start( w->outfit, p->solid->dir,
&vp, &p->solid->vel, p, p->target, w );
}
/*
* missile launchers
*
* must be a secondary weapon
*/
else if (outfit_isLauncher(w->outfit)) {
/* Shooter can't be the target - sanity check for the player.p */
if ((w->outfit->u.lau.ammo->u.amm.ai > 0) && (p->id==p->target))
return 0;
/* Must have ammo left. */
if ((w->u.ammo.outfit == NULL) || (w->u.ammo.quantity <= 0))
return 0;
/* enough energy? */
if (outfit_energy(w->u.ammo.outfit)*energy_mod > p->energy)
return 0;
energy = outfit_energy(w->u.ammo.outfit)*energy_mod;
p->energy -= energy;
pilot_heatAddSlot( p, w );
weapon_add( w->outfit, w->heat_T, p->solid->dir,
&vp, &p->solid->vel, p, p->target );
w->u.ammo.quantity -= 1; /* we just shot it */
p->mass_outfit -= w->u.ammo.outfit->mass;
pilot_updateMass( p );
}
/*
* Fighter bays.
*/
else if (outfit_isFighterBay(w->outfit)) {
/* Must have ammo left. */
if ((w->u.ammo.outfit == NULL) || (w->u.ammo.quantity <= 0))
return 0;
/* Create the escort. */
escort_create( p, w->u.ammo.outfit->u.fig.ship,
&vp, &p->solid->vel, p->solid->dir, ESCORT_TYPE_BAY, 1 );
w->u.ammo.quantity -= 1; /* we just shot it */
p->mass_outfit -= w->u.ammo.outfit->mass;
w->u.ammo.deployed += 1; /* Mark as deployed. */
pilot_updateMass( p );
}
else
WARN("Shooting unknown weapon type: %s", w->outfit->name);
/* Reset timer. */
w->timer += rate_mod * outfit_delay( w->outfit );
return 1;
}
