/**
* @brief Gets the pilots available in the system by a certain criteria.
*
* @usage p = pilot.get() -- Gets all the pilots
* @usage p = pilot.get( { faction.get("Empire") } ) -- Only gets empire pilots.
*
* @luaparam f If f is a table of factions, it will only get pilots matching those factions. Otherwise it gets all the pilots.
* @luareturn A table containing the pilots.
* @luafunc get( f )
*/
static int pilot_getPilots( lua_State *L )
{
int i, j, k;
int *factions;
int nfactions;
LuaFaction *f;
LuaPilot p;
/* Check for belonging to faction. */
if (lua_istable(L,1)) {
/* Get table length and preallocate. */
nfactions = (int) lua_objlen(L,1);
factions = malloc( sizeof(int) * nfactions );
/* Load up the table. */
lua_pushnil(L);
i = 0;
while (lua_next(L, -2) != 0) {
f = lua_tofaction(L, -1);
factions[i++] = f->f;
lua_pop(L,1);
}
/* Now put all the matching pilots in a table. */
lua_newtable(L);
k = 1;
for (i=0; i<pilot_nstack; i++) {
for (j=0; j<nfactions; j++) {
if ((pilot_stack[i]->faction == factions[j]) &&
!pilot_isDisabled(pilot_stack[i])) {
lua_pushnumber(L, k++); /* key */
p.pilot = pilot_stack[i]->id;
lua_pushpilot(L, p); /* value */
lua_rawset(L,-3); /* table[key] = value */
break; /* Continue to next pilot. */
}
}
}
/* clean up. */
free(factions);
}
else {
/* Now put all the matching pilots in a table. */
lua_newtable(L);
k = 1;
for (i=0; i<pilot_nstack; i++) {
if (!pilot_isDisabled(pilot_stack[i])) {
lua_pushnumber(L, k++); /* key */
p.pilot = pilot_stack[i]->id;
lua_pushpilot(L, p); /* value */
lua_rawset(L,-3); /* table[key] = value */
break; /* Continue to next pilot. */
}
}
}
return 1;
}
/**
* @brief Starts autonav.
*/
void player_autonavStart (void)
{
/* Not under manual control or disabled. */
if (pilot_isFlag( player.p, PILOT_MANUAL_CONTROL ) ||
pilot_isDisabled(player.p))
return;
if ((player.p->nav_hyperspace == -1) && (player.p->nav_planet== -1))
return;
else if ((player.p->nav_planet != -1) && !player_getHypPreempt()) {
player_autonavPnt( cur_system->planets[ player.p->nav_planet ]->name );
return;
}
if (player.p->fuel < player.p->fuel_consumption) {
player_message(_("\arNot enough fuel to jump for autonav."));
return;
}
if (pilot_isFlag( player.p, PILOT_NOJUMP)) {
player_message(_("\arHyperspace drive is offline."));
return;
}
if (!player_autonavSetup())
return;
player.autonav = AUTONAV_JUMP_APPROACH;
}
/**
* @brief Disables a given active outfit.
*
* @param p Pilot whose outfit we are disabling.
* @return Whether the outfit was actually disabled.
*/
int pilot_outfitOff( Pilot *p, PilotOutfitSlot *o )
{
double c;
/* Must not be disabled or cooling down. */
if ((pilot_isDisabled(p)) || (pilot_isFlag(p, PILOT_COOLDOWN)))
return 0;
if (outfit_isAfterburner( o->outfit )) /* Afterburners */
pilot_afterburnOver( p );
else if (outfit_isBeam( o->outfit )) {
/* Beams use stimer to represent minimum time until shutdown. */
o->stimer = -1;
}
else {
c = outfit_cooldown( o->outfit );
if (o->stimer != INFINITY)
o->stimer = c - (c * o->stimer / outfit_duration( o->outfit ));
else
o->stimer = c;
o->state = PILOT_OUTFIT_COOLDOWN;
}
return 1;
}
/**
* @brief Has a pilot attempt to board another pilot.
*
* @param p Pilot doing the boarding.
* @return 1 if target was boarded.
*/
int pilot_board( Pilot *p )
{
Pilot *target;
/* Make sure target is sane. */
target = pilot_get(p->target);
if (target == NULL) {
DEBUG("NO TARGET");
return 0;
}
/* Check if can board. */
if (!pilot_isDisabled(target))
return 0;
else if (vect_dist(&p->solid->pos, &target->solid->pos) >
target->ship->gfx_space->sw * PILOT_SIZE_APROX )
return 0;
else if ((pow2(VX(p->solid->vel)-VX(target->solid->vel)) +
pow2(VY(p->solid->vel)-VY(target->solid->vel))) >
(double)pow2(MAX_HYPERSPACE_VEL))
return 0;
else if (pilot_isFlag(target,PILOT_BOARDED))
return 0;
/* Set the boarding flag. */
pilot_setFlag(target, PILOT_BOARDED);
pilot_setFlag(p, PILOT_BOARDING);
/* Set time it takes to board. */
p->ptimer = 3.;
return 1;
}
/**
* @brief Disables a given active outfit.
*
* @param p Pilot whose outfit we are disabling.
* @return Whether the outfit was actually disabled.
*/
int pilot_outfitOff( Pilot *p, PilotOutfitSlot *o )
{
/* Must not be disabled or cooling down. */
if ((pilot_isDisabled(p)) || (pilot_isFlag(p, PILOT_COOLDOWN)))
return 0;
if (outfit_isAfterburner( o->outfit )) /* Afterburners */
pilot_afterburnOver( p );
else {
o->stimer = outfit_cooldown( o->outfit );
o->state = PILOT_OUTFIT_COOLDOWN;
}
return 1;
}
/**
* @brief Checks whether the speed should be reset due to damage or missile locks.
*
* @return 1 if the speed should be reset.
*/
int player_autonavShouldResetSpeed (void)
{
double failpc, shield, armour;
int i, n;
Pilot **pstk;
int hostiles, will_reset;
if (!player_isFlag(PLAYER_AUTONAV))
return 0;
hostiles = 0;
will_reset = 0;
failpc = conf.autonav_reset_speed;
shield = player.p->shield / player.p->shield_max;
armour = player.p->armour / player.p->armour_max;
pstk = pilot_getAll( &n );
for (i=0; i<n; i++) {
if ((pstk[i]->id != PLAYER_ID) && pilot_isHostile( pstk[i] ) &&
pilot_inRangePilot( player.p, pstk[i] ) &&
!pilot_isDisabled( pstk[i] ) &&
!pilot_isFlag( pstk[i], PILOT_BRIBED )) {
hostiles = 1;
break;
}
}
if (hostiles) {
if (failpc > .995) {
will_reset = 1;
player.autonav_timer = MAX( player.autonav_timer, 0. );
}
else if ((shield < lasts && shield < failpc) || armour < lasta) {
will_reset = 1;
player.autonav_timer = MAX( player.autonav_timer, 2. );
}
}
lasts = shield;
lasta = armour;
if (will_reset || (player.autonav_timer > 0)) {
player_autonavResetSpeed();
return 1;
}
return 0;
}
/**
* @brief Starts autonav.
*/
void player_autonavStart (void)
{
/* Not under manual control or disabled. */
if (pilot_isFlag( player.p, PILOT_MANUAL_CONTROL ) ||
pilot_isDisabled(player.p))
return;
if ((player.p->nav_hyperspace == -1) && (player.p->nav_planet== -1))
return;
else if ((player.p->nav_planet != -1) && !player_getHypPreempt()) {
player_autonavPnt( cur_system->planets[ player.p->nav_planet ]->name );
return;
}
if (player.p->fuel < player.p->fuel_consumption) {
player_message("\erNot enough fuel to jump for autonav.");
return;
}
/**
* @fn void player_board (void)
*
* @brief Attempt to board the player's target.
*
* Creates the window on success.
*/
void player_board (void)
{
Pilot *p;
unsigned int wdw;
char c;
HookParam hparam[2];
if (player.p->target==PLAYER_ID) {
/* We don't try to find far away targets, only nearest and see if it matches.
* However, perhaps looking for first boardable target within a certain range
* could be more interesting. */
player_targetNearest();
p = pilot_get(player.p->target);
if ((!pilot_isDisabled(p) && !pilot_isFlag(p,PILOT_BOARDABLE)) ||
pilot_isFlag(p,PILOT_NOBOARD)) {
player_targetClear();
player_message("\erYou need a target to board first!");
return;
}
/**
* @brief Activate the afterburner.
*/
void pilot_afterburn (Pilot *p)
{
double afb_mod;
if (p == NULL)
return;
if (pilot_isFlag(p, PILOT_HYP_PREP) || pilot_isFlag(p, PILOT_HYPERSPACE) ||
pilot_isFlag(p, PILOT_LANDING) || pilot_isFlag(p, PILOT_TAKEOFF) ||
pilot_isDisabled(p) || pilot_isFlag(p, PILOT_COOLDOWN))
return;
/* Not under manual control if is player. */
if (pilot_isFlag( p, PILOT_MANUAL_CONTROL ) && pilot_isFlag( p, PILOT_PLAYER ))
return;
/** @todo fancy effect? */
if (p->afterburner == NULL)
return;
/* The afterburner only works if its efficiency is high enough. */
if (pilot_heatEfficiencyMod( p->afterburner->heat_T,
p->afterburner->outfit->u.afb.heat_base,
p->afterburner->outfit->u.afb.heat_cap ) < 0.3)
return;
if (p->afterburner->state == PILOT_OUTFIT_OFF) {
p->afterburner->state = PILOT_OUTFIT_ON;
p->afterburner->stimer = outfit_duration( p->afterburner->outfit );
pilot_setFlag(p,PILOT_AFTERBURNER);
pilot_calcStats( p );
/* @todo Make this part of a more dynamic activated outfit sound system. */
sound_playPos(p->afterburner->outfit->u.afb.sound_on,
p->solid->pos.x, p->solid->pos.y, p->solid->vel.x, p->solid->vel.y);
}
if (pilot_isPlayer(p)) {
afb_mod = MIN( 1., player.p->afterburner->outfit->u.afb.mass_limit / player.p->solid->mass );
spfx_shake( afb_mod * player.p->afterburner->outfit->u.afb.rumble * SHAKE_MAX );
}
}
/**
* @brief Performs an appropriate action when a pilot is clicked.
*
* @param pilot Index of the pilot.
* @return Whether the click was used.
*/
int input_clickedPilot( unsigned int pilot )
{
Pilot *p;
if (pilot == PLAYER_ID)
return 0;
p = pilot_get(pilot);
if (pilot == player.p->target && input_isDoubleClick( (void*)p )) {
if (pilot_isDisabled(p) || pilot_isFlag(p, PILOT_BOARDABLE))
player_board();
else
player_hail();
}
else
player_targetSet( pilot );
input_clicked( (void*)p );
return 1;
}
/**
* @brief Prepares the player to enter autonav.
*
* @return 1 on success, 0 on failure (disabled, etc.)
*/
static int player_autonavSetup (void)
{
/* Not under manual control or disabled. */
if (pilot_isFlag( player.p, PILOT_MANUAL_CONTROL ) ||
pilot_isDisabled(player.p))
return 0;
/* Autonav is mutually-exclusive with other autopilot methods. */
player_restoreControl( PINPUT_AUTONAV, NULL );
player_message(_("\apAutonav initialized."));
if (!player_isFlag(PLAYER_AUTONAV)) {
tc_base = player_isFlag(PLAYER_DOUBLESPEED) ? 2. : 1.;
tc_mod = tc_base;
if (conf.compression_mult >= 1.)
player.tc_max = MIN( conf.compression_velocity / solid_maxspeed(player.p->solid, player.p->speed, player.p->thrust), conf.compression_mult );
else
player.tc_max = conf.compression_velocity /
solid_maxspeed(player.p->solid, player.p->speed, player.p->thrust);
/* Safe cap. */
player.tc_max = MAX( 1., player.tc_max );
}
/* Sane values. */
tc_rampdown = 0;
tc_down = 0.;
lasts = player.p->shield / player.p->shield_max;
lasta = player.p->armour / player.p->armour_max;
/* Set flag and tc_mod just in case. */
player_setFlag(PLAYER_AUTONAV);
pause_setSpeed( tc_mod );
/* Make sure time acceleration starts immediately. */
player.autonav_timer = 0.;
return 1;
}
/**
* @brief Handles a weapon set press.
*
* @param p Pilot the weapon set belongs to.
* @param id ID of the weapon set.
* @param type Is +1 if it's a press or -1 if it's a release.
*/
void pilot_weapSetPress( Pilot* p, int id, int type )
{
int i, l, on, n;
PilotWeaponSet *ws;
ws = pilot_weapSet(p,id);
/* Case no outfits. */
if (ws->slots == NULL)
return;
/* Handle fire groups. */
switch (ws->type) {
case WEAPSET_TYPE_CHANGE:
/* On press just change active weapon set to whatever is available. */
if (type > 0) {
if (id != p->active_set)
pilot_weapSetUpdateOutfits( p, ws );
p->active_set = id;
}
break;
case WEAPSET_TYPE_WEAPON:
/* Activation philosophy here is to turn on while pressed and off
* when it's not held anymore. */
if (type > 0)
ws->active = 1;
else if (type < 0)
ws->active = 0;
break;
case WEAPSET_TYPE_ACTIVE:
/* The behaviour here is more complex. What we do is consider a group
* to be entirely off if not all outfits are either on or cooling down.
* In the case it's deemed to be off, all outfits that are off get turned
* on, otherwise all outfits that are on are turrned to cooling down. */
/* Only care about presses. */
if (type < 0)
break;
/* Must not be disabled or cooling down. */
if ((pilot_isDisabled(p)) || (pilot_isFlag(p, PILOT_COOLDOWN)))
return;
/* Decide what to do. */
on = 1;
l = array_size(ws->slots);
for (i=0; i<l; i++) {
if (ws->slots[i].slot->state == PILOT_OUTFIT_OFF) {
on = 0;
break;
}
}
/* Turn them off. */
n = 0;
if (on) {
for (i=0; i<l; i++) {
if (ws->slots[i].slot->state != PILOT_OUTFIT_ON)
continue;
n += pilot_outfitOff( p, ws->slots[i].slot );
}
}
/* Turn them on. */
else {
for (i=0; i<l; i++) {
if (ws->slots[i].slot->state != PILOT_OUTFIT_OFF)
continue;
if (outfit_isAfterburner(ws->slots[i].slot->outfit))
pilot_afterburn( p );
else {
ws->slots[i].slot->state = PILOT_OUTFIT_ON;
ws->slots[i].slot->stimer = outfit_duration( ws->slots[i].slot->outfit );
}
n++;
}
}
/* Must recalculate stats. */
if (n > 0)
pilot_calcStats( p );
break;
}
}
/**
* @brief Handles a click event.
*/
static void input_clickevent( SDL_Event* event )
{
unsigned int pid;
Pilot *p;
int mx, my, mxr, myr, pntid, jpid;
int rx, ry, rh, rw, res;
double x, y, m, r, rp, d, dp, px, py;
double ang, angp, mouseang;
Planet *pnt;
JumpPoint *jp;
HookParam hparam[2];
/* Generate hook. */
hparam[0].type = HOOK_PARAM_NUMBER;
hparam[0].u.num = event->button.button;
hparam[1].type = HOOK_PARAM_SENTINAL;
hooks_runParam( "mouse", hparam );
/* Handle zoom. */
if (event->button.button == SDL_BUTTON_WHEELUP) {
input_clickZoom( 1.1 );
return;
}
else if (event->button.button == SDL_BUTTON_WHEELDOWN) {
input_clickZoom( 0.9 );
return;
}
/* Middle mouse enables mouse flying. */
if (event->button.button == SDL_BUTTON_MIDDLE) {
player_toggleMouseFly();
return;
}
/* Mouse targetting is left only. */
if (event->button.button != SDL_BUTTON_LEFT)
return;
/* Player must not be NULL. */
if (player_isFlag(PLAYER_DESTROYED) || (player.p == NULL))
return;
px = player.p->solid->pos.x;
py = player.p->solid->pos.y;
gl_windowToScreenPos( &mx, &my, event->button.x, event->button.y );
gl_screenToGameCoords( &x, &y, (double)mx, (double)my );
if ((mx <= 15 || my <= 15 ) || (my >= gl_screen.h - 15 || mx >= gl_screen.w - 15)) { /* Border */
x = (mx - (gl_screen.w / 2.)) + px;
y = (my - (gl_screen.h / 2.)) + py;
mouseang = atan2(py - y, px - x);
angp = pilot_getNearestAng( player.p, &pid, mouseang, 1 );
ang = system_getClosestAng( cur_system, &pntid, &jpid, x, y, mouseang );
if ((ABS(angle_diff(mouseang, angp)) > M_PI / 64) ||
ABS(angle_diff(mouseang, ang)) < ABS(angle_diff(mouseang, angp)))
pid = PLAYER_ID; /* Pilot angle is too great, or planet/jump is closer. */
if (ABS(angle_diff(mouseang, ang)) > M_PI / 64 )
jpid = pntid = -1; /* Asset angle difference is too great. */
}
else { /* Radar targeting requires raw coordinates. */
mxr = event->button.x;
myr = gl_screen.rh - event->button.y;
gui_radarGetPos( &rx, &ry );
gui_radarGetDim( &rw, &rh );
if ((mxr > rx && mxr <= rx + rw ) && (myr > ry && myr <= ry + rh )) { /* Radar */
m = 1;
gui_radarGetRes( &res );
x = (mxr - (rx + rw / 2.)) * res + px;
y = (myr - (ry + rh / 2.)) * res + py;
}
else /* Visual (on-screen) */
m = res = 1. / cam_getZoom();
dp = pilot_getNearestPos( player.p, &pid, x, y, 1 );
d = system_getClosest( cur_system, &pntid, &jpid, x, y );
rp = MAX( 1.5 * PILOT_SIZE_APROX * pilot_get(pid)->ship->gfx_space->sw / 2 * m, 10. * res);
if (pntid >=0) { /* Planet is closer. */
pnt = cur_system->planets[ pntid ];
r = MAX( 1.5 * pnt->radius, 100. );
}
else if (jpid >= 0) {
jp = &cur_system->jumps[ jpid ];
r = MAX( 1.5 * jp->radius, 100. );
}
else {
r = 0.;
}
/* Reject pilot if it's too far or a valid asset is closer. */
if (dp > pow2(rp) || (d < pow2(r) && dp < pow2(rp) && dp > d))
pid = PLAYER_ID;
if (d > pow2(r)) /* Planet or jump point is too far. */
jpid = pntid = -1;
}
if (pid != PLAYER_ID) {
/* Apply an action if already selected. */
if (!pilot_isFlag(player.p, PILOT_DEAD) && (pid == player.p->target)) {
p = pilot_get(pid);
if (pilot_isDisabled(p) || pilot_isFlag(p, PILOT_BOARDABLE))
player_board();
else
player_hail();
}
else
player_targetSet( pid );
}
else if (pntid >= 0) { /* Planet is closest. */
if (pntid == player.p->nav_planet) {
pnt = cur_system->planets[ pntid ];
if (planet_hasService(pnt, PLANET_SERVICE_LAND) &&
(!areEnemies( player.p->faction, pnt->faction ) || pnt->bribed ))
player_land();
else
player_hailPlanet();
}
else
player_targetPlanetSet( pntid );
}
else if (jpid >= 0) { /* Jump point is closest. */
jp = &cur_system->jumps[ jpid ];
if (jpid == player.p->nav_hyperspace) {
if (space_canHyperspace(player.p)) {
if (!paused) player_autonavAbort(NULL);
player_jump();
}
else
player_autonavStart();
}
else
player_targetHyperspaceSet( jpid );
}
}
/**
* @brief Runs the input command.
*
* @param keynum The index of the keybind.
* @param value The value of the keypress (defined above).
* @param kabs The absolute value.
*/
static void input_key( int keynum, double value, double kabs, int repeat )
{
unsigned int t;
HookParam hparam[3];
/* Repetition stuff. */
if (conf.repeat_delay != 0) {
if ((value == KEY_PRESS) && !repeat) {
repeat_key = keynum;
repeat_keyTimer = SDL_GetTicks();
repeat_keyCounter = 0;
}
else if (value == KEY_RELEASE) {
repeat_key = -1;
repeat_keyTimer = 0;
repeat_keyCounter = 0;
}
}
/*
* movement
*/
/* accelerating */
if (KEY("accel") && !repeat) {
if (kabs >= 0.) {
if (!paused) player_autonavAbort(NULL);
player_accel(kabs);
input_accelButton = 1;
}
else { /* prevent it from getting stuck */
if (value==KEY_PRESS) {
if (!paused) player_autonavAbort(NULL);
player_setFlag(PLAYER_ACCEL);
player_accel(1.);
input_accelButton = 1;
}
else if (value==KEY_RELEASE) {
player_accelOver();
player_rmFlag(PLAYER_ACCEL);
input_accelButton = 0;
}
/* double tap accel = afterburn! */
t = SDL_GetTicks();
if ((conf.afterburn_sens != 0) &&
(value==KEY_PRESS) && INGAME() && NOHYP() && NODEAD() &&
(t-input_accelLast <= conf.afterburn_sens))
pilot_afterburn( player.p );
else if (value==KEY_RELEASE)
pilot_afterburnOver( player.p );
if (value==KEY_PRESS)
input_accelLast = t;
}
/* turning left */
} else if (KEY("left") && !repeat) {
if (kabs >= 0.) {
if (!paused) player_autonavAbort(NULL);
player_setFlag(PLAYER_TURN_LEFT);
player_left = kabs;
}
else {
/* set flags for facing correction */
if (value==KEY_PRESS) {
if (!paused) player_autonavAbort(NULL);
player_setFlag(PLAYER_TURN_LEFT);
player_left = 1.;
}
else if (value==KEY_RELEASE) {
player_rmFlag(PLAYER_TURN_LEFT);
player_left = 0.;
}
}
/* turning right */
} else if (KEY("right") && !repeat) {
if (kabs >= 0.) {
if (!paused) player_autonavAbort(NULL);
player_setFlag(PLAYER_TURN_RIGHT);
player_right = kabs;
}
else {
/* set flags for facing correction */
if (value==KEY_PRESS) {
if (!paused) player_autonavAbort(NULL);
player_setFlag(PLAYER_TURN_RIGHT);
player_right = 1.;
}
else if (value==KEY_RELEASE) {
player_rmFlag(PLAYER_TURN_RIGHT);
player_right = 0.;
}
}
/* turn around to face vel */
} else if (KEY("reverse") && !repeat) {
if (value==KEY_PRESS) {
if (!paused) player_autonavAbort(NULL);
player_setFlag(PLAYER_REVERSE);
}
else if ((value==KEY_RELEASE) && player_isFlag(PLAYER_REVERSE))
player_rmFlag(PLAYER_REVERSE);
/*
* combat
*/
/* shooting primary weapon */
} else if (KEY("primary") && NODEAD() && !repeat) {
if (value==KEY_PRESS) {
player_setFlag(PLAYER_PRIMARY);
}
else if (value==KEY_RELEASE)
player_rmFlag(PLAYER_PRIMARY);
/* targeting */
} else if (INGAME() && NODEAD() && KEY("target_next")) {
if (value==KEY_PRESS) player_targetNext(0);
} else if (INGAME() && NODEAD() && KEY("target_prev")) {
if (value==KEY_PRESS) player_targetPrev(0);
} else if (INGAME() && NODEAD() && KEY("target_nearest")) {
if (value==KEY_PRESS) player_targetNearest();
} else if (INGAME() && NODEAD() && KEY("target_nextHostile")) {
if (value==KEY_PRESS) player_targetNext(1);
} else if (INGAME() && NODEAD() && KEY("target_prevHostile")) {
if (value==KEY_PRESS) player_targetPrev(1);
} else if (INGAME() && NODEAD() && KEY("target_hostile")) {
if (value==KEY_PRESS) player_targetHostile();
} else if (INGAME() && NODEAD() && KEY("target_clear")) {
if (value==KEY_PRESS) player_targetClear();
/* face the target */
} else if (KEY("face") && !repeat) {
if (value==KEY_PRESS) {
if (!paused) player_autonavAbort(NULL);
player_setFlag(PLAYER_FACE);
}
else if ((value==KEY_RELEASE) && player_isFlag(PLAYER_FACE))
player_rmFlag(PLAYER_FACE);
/* board them ships */
} else if (KEY("board") && INGAME() && NOHYP() && NODEAD() && !repeat) {
if (value==KEY_PRESS) {
if (!paused) player_autonavAbort(NULL);
player_board();
}
/*
* Escorts.
*/
} else if (INGAME() && NODEAD() && KEY("e_targetNext") && !repeat) {
if (value==KEY_PRESS) player_targetEscort(0);
} else if (INGAME() && NODEAD() && KEY("e_targetPrev") && !repeat) {
if (value==KEY_PRESS) player_targetEscort(1);
} else if (INGAME() && NODEAD() && KEY("e_attack") && !repeat) {
if (value==KEY_PRESS) escorts_attack(player.p);
} else if (INGAME() && NODEAD() && KEY("e_hold") && !repeat) {
if (value==KEY_PRESS) escorts_hold(player.p);
} else if (INGAME() && NODEAD() && KEY("e_return") && !repeat) {
if (value==KEY_PRESS) escorts_return(player.p);
} else if (INGAME() && NODEAD() && KEY("e_clear") && !repeat) {
if (value==KEY_PRESS) escorts_clear(player.p);
/*
* secondary weapons
*/
/* shooting secondary weapon */
} else if (KEY("secondary") && NOHYP() && NODEAD() && !repeat) {
if (value==KEY_PRESS) {
player_setFlag(PLAYER_SECONDARY);
}
else if (value==KEY_RELEASE)
player_rmFlag(PLAYER_SECONDARY);
/* Weapon sets. */
} else if (KEY("weapset1")) {
player_weapSetPress( 0, value, repeat );
} else if (KEY("weapset2")) {
player_weapSetPress( 1, value, repeat );
} else if (KEY("weapset3")) {
player_weapSetPress( 2, value, repeat );
} else if (KEY("weapset4")) {
player_weapSetPress( 3, value, repeat );
} else if (KEY("weapset5")) {
player_weapSetPress( 4, value, repeat );
} else if (KEY("weapset6")) {
player_weapSetPress( 5, value, repeat );
} else if (KEY("weapset7")) {
player_weapSetPress( 6, value, repeat );
} else if (KEY("weapset8")) {
player_weapSetPress( 7, value, repeat );
} else if (KEY("weapset9")) {
player_weapSetPress( 8, value, repeat );
} else if (KEY("weapset0")) {
player_weapSetPress( 9, value, repeat );
/*
* space
*/
} else if (KEY("autonav") && INGAME() && NOHYP() && NODEAD()) {
if (value==KEY_PRESS) player_autonavStart();
/* target planet (cycles like target) */
} else if (KEY("target_planet") && INGAME() && NOHYP() && NOLAND() && NODEAD()) {
if (value==KEY_PRESS) player_targetPlanet();
/* target nearest planet or attempt to land */
} else if (KEY("land") && INGAME() && NOHYP() && NOLAND() && NODEAD()) {
if (value==KEY_PRESS) {
if (!paused) player_autonavAbort(NULL);
player_land();
}
} else if (KEY("thyperspace") && NOHYP() && NOLAND() && NODEAD()) {
if (value==KEY_PRESS)
player_targetHyperspace();
} else if (KEY("starmap") && NOHYP() && NODEAD() && !repeat) {
if (value==KEY_PRESS) map_open();
} else if (KEY("jump") && INGAME() && !repeat) {
if (value==KEY_PRESS) {
if (!paused) player_autonavAbort(NULL);
player_jump();
}
} else if (KEY("overlay") && NODEAD() && INGAME() && !repeat) {
ovr_key( value );
} else if (KEY("mousefly") && NODEAD() && !repeat) {
if (value==KEY_PRESS)
player_toggleMouseFly();
} else if (KEY("cooldown") && NOLAND() && NODEAD() && !repeat) {
if (value==KEY_PRESS) {
if ((!paused) && (player_isFlag(PLAYER_AUTONAV)))
player_autonavAbort(NULL);
if (!pilot_isDisabled(player.p))
player_toggleCooldown();
}
/*
* Communication.
*/
} else if (KEY("log_up") && INGAME() && NODEAD()) {
if (value==KEY_PRESS) {
gui_messageScrollUp(5);
}
} else if (KEY("log_down") && INGAME() && NODEAD()) {
if (value==KEY_PRESS) {
gui_messageScrollDown(5);
}
} else if (KEY("hail") && INGAME() && NOHYP() && NODEAD() && !repeat) {
if (value==KEY_PRESS) {
player_hail();
}
} else if (KEY("autohail") && INGAME() && NOHYP() && NODEAD() && !repeat) {
if (value==KEY_PRESS) {
player_autohail();
}
/*
* misc
*/
/* zooming in */
} else if (KEY("mapzoomin") && INGAME() && NODEAD()) {
if (value==KEY_PRESS) gui_setRadarRel(-1);
/* zooming out */
} else if (KEY("mapzoomout") && INGAME() && NODEAD()) {
if (value==KEY_PRESS) gui_setRadarRel(1);
/* take a screenshot */
} else if (KEY("screenshot")) {
if (value==KEY_PRESS) player_screenshot();
/* pause the games */
} else if (KEY("pause") && !repeat) {
if (value==KEY_PRESS) {
if (!toolkit_isOpen()) {
if (paused)
unpause_game();
else
pause_game();
}
}
/* toggle speed mode */
} else if (KEY("speed") && !repeat) {
if ((value==KEY_PRESS) && !player_isFlag(PLAYER_AUTONAV)) {
if (!player_isFlag( PLAYER_CINEMATICS_2X )) {
if (player_isFlag(PLAYER_DOUBLESPEED)) {
pause_setSpeed(1.);
player_rmFlag(PLAYER_DOUBLESPEED);
} else {
pause_setSpeed(2.);
player_setFlag(PLAYER_DOUBLESPEED);
}
}
}
/* opens a small menu */
} else if (KEY("menu") && NODEAD() && !repeat) {
if (value==KEY_PRESS) menu_small();
/* shows pilot information */
} else if (KEY("info") && NOHYP() && NODEAD() && !repeat) {
if (value==KEY_PRESS) menu_info( INFO_MAIN );
/* Opens the Lua console. */
} else if (KEY("console") && NODEAD() && !repeat) {
if (value==KEY_PRESS) cli_open();
}
/* Key press not used. */
else {
return;
}
/* Run the hook. */
hparam[0].type = HOOK_PARAM_STRING;
hparam[0].u.str = input_keybinds[keynum].name;
hparam[1].type = HOOK_PARAM_BOOL;
hparam[1].u.b = (value > 0.);
hparam[2].type = HOOK_PARAM_SENTINEL;
hooks_runParam( "input", hparam );
}
/**
* @fn void player_board (void)
*
* @brief Attempt to board the player's target.
*
* Creates the window on success.
*/
void player_board (void)
{
Pilot *p;
unsigned int wdw;
if (player->target==PLAYER_ID) {
player_message("You need a target to board first!");
return;
}
p = pilot_get(player->target);
if (!pilot_isDisabled(p)) {
player_message("You cannot board a ship that isn't disabled!");
return;
}
else if (vect_dist(&player->solid->pos,&p->solid->pos) >
p->ship->gfx_space->sw * PILOT_SIZE_APROX) {
player_message("You are too far away to board your target.");
return;
}
else if ((pow2(VX(player->solid->vel)-VX(p->solid->vel)) +
pow2(VY(player->solid->vel)-VY(p->solid->vel))) >
(double)pow2(MAX_HYPERSPACE_VEL)) {
player_message("You are going too fast to board the ship.");
return;
}
else if (pilot_isFlag(p,PILOT_BOARDED)) {
player_message("Your target cannot be boarded again.");
return;
};
/* pilot will be boarded */
pilot_setFlag(p,PILOT_BOARDED);
player_message("Boarding ship %s.", p->name);
/*
* create the boarding window
*/
wdw = window_create( "Boarding", -1, -1, BOARDING_WIDTH, BOARDING_HEIGHT );
window_addText( wdw, 20, -30, 120, 60,
0, "txtCargo", &gl_smallFont, &cDConsole,
"Credits:\n"
"Cargo:\n"
"Fuel:\n"
);
window_addText( wdw, 80, -30, 120, 60,
0, "txtData", &gl_smallFont, &cBlack, NULL );
window_addButton( wdw, 20, 20, BUTTON_WIDTH, BUTTON_HEIGHT,
"btnStealCredits", "Credits", board_stealCreds);
window_addButton( wdw, 20+BUTTON_WIDTH+20, 20, BUTTON_WIDTH, BUTTON_HEIGHT,
"btnStealCargo", "Cargo", board_stealCargo);
window_addButton( wdw, 20+2*(BUTTON_WIDTH+20), 20, BUTTON_WIDTH, BUTTON_HEIGHT,
"btnStealCargo", "Fuel", board_stealFuel);
window_addButton( wdw, -20, 20, BUTTON_WIDTH, BUTTON_HEIGHT,
"btnBoardingClose", "Leave", board_exit );
board_update(wdw);
/*
* run hook if needed
*/
pilot_runHook(p, PILOT_HOOK_BOARD);
}