/**
* @brief Fires a weapon set.
*/
static int pilot_weapSetFire( Pilot *p, PilotWeaponSet *ws, int level )
{
int i, j, ret, s;
/* Case no outfits. */
if (ws->slots == NULL)
return 0;
/* Fire. */
ret = 0;
for (i=0; i<array_size(ws->slots); i++) {
/* Only "active" outfits. */
if ((level != -1) && (ws->slots[i].level != level))
continue;
/* Only run once for each weapon type in the group. */
s = 0;
for (j=0; j<i; j++) {
/* Only active outfits. */
if ((level != -1) && (ws->slots[j].level != level))
continue;
/* Found a match. */
if (ws->slots[j].slot->outfit == ws->slots[i].slot->outfit) {
s = 1;
break;
}
}
if (s!=0)
continue;
/* Shoot the weapon of the weaponset. */
ret += pilot_shootWeaponSetOutfit( p, ws, ws->slots[i].slot->outfit, level );
}
return ret;
}
/**
* @brief Fires a weapon set.
*
* @param p Pilot firing weaponsets.
* @param ws Weapon set to fire.
* @param level Level of the firing weapon set.
*/
static int pilot_weapSetFire( Pilot *p, PilotWeaponSet *ws, int level )
{
int i, j, ret, s;
Pilot *pt;
AsteroidAnchor *field;
Asteroid *ast;
double time;
Outfit *o;
/* Case no outfits. */
if (ws->slots == NULL)
return 0;
/* Fire. */
ret = 0;
for (i=0; i<array_size(ws->slots); i++) {
o = ws->slots[i].slot->outfit;
/* Ignore NULL outfits. */
if (o == NULL)
continue;
/* Only "active" outfits. */
if ((level != -1) && (ws->slots[i].level != level))
continue;
/* Only run once for each weapon type in the group. */
s = 0;
for (j=0; j<i; j++) {
/* Only active outfits. */
if ((level != -1) && (ws->slots[j].level != level))
continue;
/* Found a match. */
if (ws->slots[j].slot->outfit == o) {
s = 1;
break;
}
}
if (s!=0)
continue;
/* Only "locked on" outfits. */
if (outfit_isSeeker(o) &&
(ws->slots[i].slot->u.ammo.lockon_timer > 0.))
continue;
/* If inrange is set we only fire at targets in range. */
time = INFINITY; /* With no target we just set time to infinity. */
if (p->target != p->id){
pt = pilot_get( p->target );
if (pt != NULL)
time = pilot_weapFlyTime( o, p, &pt->solid->pos, &pt->solid->vel);
}
/* Looking for a closer targeted asteroid */
if (p->nav_asteroid != -1){
field = &cur_system->asteroids[p->nav_anchor];
ast = &field->asteroids[p->nav_asteroid];
time = MIN( time, pilot_weapFlyTime( o, p, &ast->pos, &ast->vel) );
}
/* Only "inrange" outfits. */
if ( ws->inrange && outfit_duration(o) < time)
continue;
/* Shoot the weapon of the weaponset. */
ret += pilot_shootWeaponSetOutfit( p, ws, o, level, time );
}
return ret;
}
/**
* @brief Fires a weapon set.
*
* @param p Pilot firing weaponsets.
* @param ws Weapon set to fire.
* @param level Level of the firing weapon set.
*/
static int pilot_weapSetFire( Pilot *p, PilotWeaponSet *ws, int level )
{
int i, j, ret, s;
Pilot *pt;
double dist2;
Outfit *o;
/* Case no outfits. */
if (ws->slots == NULL)
return 0;
/* If inrange is set we only fire at targets in range. */
dist2 = INFINITY; /* With no target we just set distance to infinity. */
if (ws->inrange) {
if (p->target != p->id) {
pt = pilot_get( p->target );
if (pt != NULL)
dist2 = vect_dist2( &p->solid->pos, &pt->solid->pos );
}
}
/* Fire. */
ret = 0;
for (i=0; i<array_size(ws->slots); i++) {
o = ws->slots[i].slot->outfit;
/* Ignore NULL outfits. */
if (o == NULL)
continue;
/* Only "active" outfits. */
if ((level != -1) && (ws->slots[i].level != level))
continue;
/* Only run once for each weapon type in the group. */
s = 0;
for (j=0; j<i; j++) {
/* Only active outfits. */
if ((level != -1) && (ws->slots[j].level != level))
continue;
/* Found a match. */
if (ws->slots[j].slot->outfit == o) {
s = 1;
break;
}
}
if (s!=0)
continue;
/* Only "locked on" outfits. */
if (outfit_isSeeker(o) &&
(ws->slots[i].slot->u.ammo.lockon_timer > 0.))
continue;
/* Only "inrange" outfits. */
if (!outfit_isFighterBay(o) &&
(ws->inrange && (dist2 > ws->slots[i].range2)))
continue;
/* Shoot the weapon of the weaponset. */
ret += pilot_shootWeaponSetOutfit( p, ws, o, level );
}
return ret;
}
