Function AutoSelectWeapon

Descent3/weapon.cpp:1266–1374

Auto selects a weapon, usually the next best weapon. step_up = true if we're going to next higher in order. step_up = false if we're going to next lower in order.

//	step_up = true if we're going to next higher in order.
//	step_up = false if we're going to next lower in order.
bool AutoSelectWeapon(int weapon_type, int new_wpn) {
  player *plr;
  ship *ship;
  uint16_t *sel_list; // a weapon selection list
  int weapon_index; // the current weapon index
  int list_index;   // index into a selection list
  int list_initial; // initial index in list.
  int slot;
  bool sel_new_wpn = false;

  void (*setwpnfunc)(int, int); // Call either primary or secondary set weapon function

  LOGFILE((_logfp, "Entering AutoSelect\n"));

  ASSERT((weapon_type == PW_PRIMARY) || (weapon_type == PW_SECONDARY));
  plr = &Players[Player_num];
  weapon_index = plr->weapon[weapon_type].index;
  ship = &Ships[plr->ship_index];

  //	choose primary or secondary list and select function
  sel_list = (weapon_type == PW_SECONDARY) ? SecondaryWpnSelectList : PrimaryWpnSelectList;
  setwpnfunc = (weapon_type == PW_SECONDARY) ? SetSecondaryWeapon : SetPrimaryWeapon;

  list_index = 0;
  list_initial = 0;
  while (WPNINDEX(list_index) != SELLIST_END) {
    if (WPNINDEX(list_index) == weapon_index)
      list_initial = list_index;
    list_index++;
  }

  list_index--;

  //	this code takes care of selecting a GIVEN new weapon over the existing.
  if (new_wpn > -1) {
    while (WPNINDEX(list_index) != SELLIST_START && WPNINDEX(list_index) != new_wpn)
      list_index--;
    if (!(sel_list[list_index] & WPNSEL_SKIP)) {
      if (list_initial >= list_index) {
        uint16_t index = WPNINDEX(list_initial);
        otype_wb_info *wb = &ship->static_wb[index];
        if (index >= SECONDARY_INDEX && wb->ammo_usage && (wb->ammo_usage <= plr->weapon_ammo[index])) {
          LOGFILE((_logfp, "keep current ammo weapon...(ind=%d)\n", list_index));
          return sel_new_wpn; // the current weapon supercedes the new weapon, (or is the same) so return
        } else if (index < SECONDARY_INDEX && wb->ammo_usage && plr->weapon_ammo[index]) {
          LOGFILE((_logfp, "keep current ammo weapon...(ind=%d)\n", list_index));
          return sel_new_wpn; // the current weapon supercedes the new weapon, (or is the same) so return
        } else if (!wb->ammo_usage && (plr->energy >= wb->energy_usage)) {
          LOGFILE((_logfp, "keep current energy weapon...(ind=%d)\n", list_index));
          return sel_new_wpn; // the current weapon supercedes the new weapon, (or is the same) so return
        }
        LOGFILE((_logfp, "tried to keep current weapon, but no ammo!...(ind=%d)\n", list_index));
      }
    } else {
      LOGFILE((_logfp, "tried to autoselect skipped weapon, will not do...(ind=%d)\n", list_index));
      return sel_new_wpn;
    }
  }