Function SwitchPlayerWeapon

Descent3/weapon.cpp:1192–1261

automatically switches weapon up to next level in autoselect order to this value. and type.

// automatically switches weapon up to next level in autoselect order to this value. and type.
int SwitchPlayerWeapon(int weapon_type) {
  player *plr;
  ship *ship;
  int new_index;
  void (*setwpnfunc)(int, int); // Call either primary or secondary set weapon function
  uint16_t *sel_list;
  int plr_wpn_index;

  plr = &Players[Player_num];
  ship = &Ships[plr->ship_index];
  plr_wpn_index = plr->weapon[weapon_type].index;

  setwpnfunc = (weapon_type == PW_SECONDARY) ? SetSecondaryWeapon : SetPrimaryWeapon;
  sel_list = (weapon_type == PW_SECONDARY) ? SecondaryWpnSelectList : PrimaryWpnSelectList;

  new_index = 0;
  while (WPNINDEX(new_index) != plr_wpn_index && WPNINDEX(new_index) != SELLIST_END)
    new_index++;

  if (WPNINDEX(new_index) == SELLIST_END) {
    Int3();        // every weapon should be in list that's in the game. bad
    new_index = 1; // 1st item after SELLIST_START
  }

  // select weapon if we can. find a weapon we can select, if we go back to start, return.
  //	THIS CODE IS SIMILAR BUT NOT THE SAME AS THE AUTO SELECT CODE.
  int old_index = new_index;
  new_index++;

  while (old_index != new_index) {
    if (WPNINDEX(new_index) == SELLIST_END) {
      new_index = 0;
    } else if (WPNINDEX(new_index) == SELLIST_START) {
      new_index++;
    } else {
      uint16_t wpn_index = WPNINDEX(new_index);
      otype_wb_info *wb = &ship->static_wb[wpn_index];
      int slot = (weapon_type == PW_SECONDARY)
                     ? (((wpn_index - SECONDARY_INDEX) % NUM_SECONDARY_SLOTS) + NUM_PRIMARY_SLOTS)
                     : (wpn_index % NUM_PRIMARY_SLOTS);

      // mprintf(0, "wpn_index = %d\n", wpn_index);

      if ((Players[Player_num].weapon_flags & HAS_FLAG(wpn_index)) && !(sel_list[new_index] & WPNSEL_SKIP)) {

        if (wpn_index >= SECONDARY_INDEX && wb->ammo_usage && (wb->ammo_usage <= plr->weapon_ammo[wpn_index])) {
          //	we've found a weapon to select to that uses ammo!
          (*setwpnfunc)(wpn_index, slot);
          LOGFILE((_logfp, "ammo wpn: switch to new index %d\n", wpn_index));
          break;
        } else if (wpn_index < SECONDARY_INDEX && wb->ammo_usage && plr->weapon_ammo[wpn_index]) {
          //	we've found a weapon to select to that uses ammo!
          (*setwpnfunc)(wpn_index, slot);
          LOGFILE((_logfp, "ammo wpn: switch to new index %d\n", wpn_index));
          break;
        } else if (!wb->ammo_usage && (plr->energy >= wb->energy_usage)) {
          //	we've found an energy weapon to select to!
          (*setwpnfunc)(wpn_index, slot);