/**
* @brief Initialises base.
* @note This command is executed in the init node of the base menu.
* It is called everytime the base menu pops up and sets the cvars.
* @todo integrate building status tooltips from B_CheckBuildingStatusForMenu_f into this one
*/
static void B_BaseInit_f (void)
{
int i;
base_t *base = B_GetCurrentSelectedBase();
if (!base)
return;
/* make sure the credits cvar is up-to-date */
CP_UpdateCredits(ccs.credits);
cgi->Cvar_SetValue("mn_base_num_aircraft", AIR_BaseCountAircraft(base));
/* activate or deactivate the aircraft button */
if (AIR_AircraftAllowed(base)) {
if (AIR_BaseHasAircraft(base))
cgi->UI_ExecuteConfunc("update_basebutton aircraft false \"%s\"", _("Aircraft management and crew equipment"));
else
cgi->UI_ExecuteConfunc("update_basebutton aircraft true \"%s\"", _("Buy or produce at least one aircraft first."));
} else {
cgi->UI_ExecuteConfunc("update_basebutton aircraft true \"%s\"", _("No Hangar functional in base."));
}
if (BS_BuySellAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton buysell false \"%s\"", _("Buy/Sell equipment, aircraft and UGV"));
else
cgi->UI_ExecuteConfunc("update_basebutton buysell true \"%s\"", va(_("No %s functional in base."), _("Storage")));
if (B_GetCount() > 1)
cgi->UI_ExecuteConfunc("update_basebutton transfer false \"%s\"", _("Transfer equipment, vehicles, aliens and employees to other bases"));
else
cgi->UI_ExecuteConfunc("update_basebutton transfer true \"%s\"", _("Build at least a second base to transfer equipment or personnel"));
if (RS_ResearchAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton research false \"%s\"", _("Research new technology"));
else
cgi->UI_ExecuteConfunc("update_basebutton research true \"%s\"", va(_("No %s functional in base."), _("Laboratory")));
if (PR_ProductionAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton production false \"%s\"", _("Produce equipment, aircraft and UGV"));
else
cgi->UI_ExecuteConfunc("update_basebutton production true \"%s\"", va(_("No %s functional in base."), _("Workshop")));
if (E_HireAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton hire false \"%s\"", _("Hire or dismiss employees"));
else
cgi->UI_ExecuteConfunc("update_basebutton hire true \"%s\"", va(_("No %s functional in base."), _("Living Quarters")));
if (AC_ContainmentAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton containment false \"%s\"", _("Manage captured aliens"));
else
cgi->UI_ExecuteConfunc("update_basebutton containment true \"%s\"", va(_("No %s functional in base."), _("Containment")));
if (HOS_HospitalAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton hospital false \"%s\"", _("Treat wounded soldiers and perform implant surgery"));
else
cgi->UI_ExecuteConfunc("update_basebutton hospital true \"%s\"", va(_("No %s functional in base."), _("Hospital")));
/*
* Gather data on current/max space for living quarters, storage, lab and workshop
* clear_bld_space ensures 0/0 data for facilities which may not exist in base
*/
cgi->UI_ExecuteConfunc("clear_bld_space");
for (i = 0; i < ccs.numBuildingTemplates; i++) {
const building_t* b = &ccs.buildingTemplates[i];
const baseCapacities_t capType = B_GetCapacityFromBuildingType(b->buildingType);
capacities_t cap;
if (capType == MAX_CAP)
continue;
/* Check if building matches one of our four types */
if (b->buildingType != B_QUARTERS && b->buildingType != B_STORAGE && b->buildingType != B_WORKSHOP && b->buildingType != B_LAB && b->buildingType != B_ANTIMATTER)
continue;
/* only show already researched buildings */
if (!RS_IsResearched_ptr(b->tech))
continue;
cap = *CAP_Get(base, capType);
assert(b->tpl);
const int count = B_GetNumberOfBuildingsInBaseByTemplate(base, b->tpl);
if (count < 1)
continue;
cgi->UI_ExecuteConfunc("show_bld_space \"%s\" \"%s\" %i %i %i %i", _(b->name), b->id, cap.cur, cap.max, count, b->tpl->maxCount);
}
/*
* Get the number of different employees in the base
* @todo: Get the number of injured soldiers if hospital exists
*/
cgi->UI_ExecuteConfunc("current_employees %i %i %i %i", E_CountHired(base, EMPL_SOLDIER), E_CountHired(base, EMPL_PILOT), E_CountHired(base, EMPL_SCIENTIST), E_CountHired(base, EMPL_WORKER));
/*
* List the first five aircraft in the base if they exist
*/
cgi->UI_ExecuteConfunc("clear_aircraft");
if (AIR_AircraftAllowed(base)) {
if (AIR_BaseHasAircraft(base)) {
i = 0;
AIR_ForeachFromBase(aircraft, base) {
if (i > 5)
break;
/*
* UI node should use global IDX to identify aircraft but it uses order of aircraft in base (i)
* See @todo in cp_aircraft_callbacks.c in AIR_AircraftSelect()
*/
cgi->UI_ExecuteConfunc("show_aircraft %i \"%s\" \"%s\" \"%s\" %i", i, aircraft->name, aircraft->id, AIR_AircraftStatusToName(aircraft), AIR_IsAircraftInBase(aircraft));
i++;
}
}
}
/* Get the research item closest to completion in the base if it exists */
cgi->UI_ExecuteConfunc("clear_research");
if (RS_ResearchAllowed(base)) {
const technology_t *closestTech = NULL;
double finished = -1;
for (i = 0; i < ccs.numTechnologies; i++) {
const technology_t *tech = RS_GetTechByIDX(i);
if (!tech)
continue;
if (tech->base != base)
continue;
if (tech->statusResearch == RS_RUNNING) {
const double percent = (1 - tech->time / tech->overallTime) * 100;
if (percent > finished) {
finished = percent;
closestTech = tech;
}
}
}
if (closestTech != NULL)
cgi->UI_ExecuteConfunc("show_research \"%s\" %i %3.0f", closestTech->name, closestTech->scientists, finished);
}
/* Get the production item closest to completion in the base if it exists */
cgi->UI_ExecuteConfunc("clear_production");
if (PR_ProductionAllowed(base)) {
const production_queue_t *queue = PR_GetProductionForBase(base);
if (queue->numItems > 0) {
const production_t *production = &queue->items[0];
cgi->UI_ExecuteConfunc("show_production \"%s\" %3.0f", PR_GetName(&production->data), PR_GetProgress(production) * 100);
}
}
}
/**
* @brief Checks why a button in base menu is disabled, and create a popup to inform player
*/
static void B_CheckBuildingStatusForMenu_f (void)
{
int num;
const char *buildingID;
const building_t *building;
const base_t *base = B_GetCurrentSelectedBase();
if (cgi->Cmd_Argc() != 2) {
Com_Printf("Usage: %s <buildingID>\n", cgi->Cmd_Argv(0));
return;
}
buildingID = cgi->Cmd_Argv(1);
building = B_GetBuildingTemplate(buildingID);
if (!building || !base)
return;
/* Maybe base is under attack ? */
if (B_IsUnderAttack(base)) {
CP_Popup(_("Notice"), _("Base is under attack, you can't access this building !"));
return;
}
if (building->buildingType == B_HANGAR) {
/* this is an exception because you must have a small or large hangar to enter aircraft menu */
CP_Popup(_("Notice"), _("You need at least one Hangar (and its dependencies) to use aircraft."));
return;
}
num = B_GetNumberOfBuildingsInBaseByBuildingType(base, building->buildingType);
if (num > 0) {
int numUnderConstruction;
/* maybe all buildings of this type are under construction ? */
B_CheckBuildingTypeStatus(base, building->buildingType, B_STATUS_UNDER_CONSTRUCTION, &numUnderConstruction);
if (numUnderConstruction == num) {
int minDay = 99999;
building_t *b = NULL;
while ((b = B_GetNextBuildingByType(base, b, building->buildingType))) {
if (b->buildingStatus == B_STATUS_UNDER_CONSTRUCTION) {
const float remaining = B_GetConstructionTimeRemain(b);
minDay = std::min(minDay, (int)std::max(0.0f, remaining));
}
}
CP_Popup(_("Notice"), ngettext("Construction of building will be over in %i day.\nPlease wait to enter.", "Construction of building will be over in %i days.\nPlease wait to enter.",
minDay), minDay);
return;
}
if (!B_CheckBuildingDependencesStatus(building)) {
const building_t *dependenceBuilding = building->dependsBuilding;
assert(building->dependsBuilding);
if (B_GetNumberOfBuildingsInBaseByBuildingType(base, dependenceBuilding->buildingType) <= 0) {
/* the dependence of the building is not built */
CP_Popup(_("Notice"), _("You need a building %s to make building %s functional."), _(dependenceBuilding->name), _(building->name));
return;
} else {
/* maybe the dependence of the building is under construction
* note that we can't use B_STATUS_UNDER_CONSTRUCTION here, because this value
* is not use for every building (for exemple Command Centre) */
building_t *b = NULL;
while ((b = B_GetNextBuildingByType(base, b, dependenceBuilding->buildingType))) {
if (!B_IsBuildingBuiltUp(b)) {
CP_Popup(_("Notice"), _("Building %s is not finished yet, and is needed to use building %s."),
_(dependenceBuilding->name), _(building->name));
return;
}
}
/* the dependence is built but doesn't work - must be because of their dependendes */
CP_Popup(_("Notice"), _("Make sure that the dependencies of building %s (%s) are operational, so that building %s may be used."),
_(dependenceBuilding->name), _(dependenceBuilding->dependsBuilding->name), _(building->name));
return;
}
}
/* all buildings are OK: employees must be missing */
if (building->buildingType == B_WORKSHOP && E_CountHired(base, EMPL_WORKER) <= 0) {
CP_Popup(_("Notice"), _("You need to recruit %s to use building %s."),
E_GetEmployeeString(EMPL_WORKER, 2), _(building->name));
return;
} else if (building->buildingType == B_LAB && E_CountHired(base, EMPL_SCIENTIST) <= 0) {
CP_Popup(_("Notice"), _("You need to recruit %s to use building %s."),
E_GetEmployeeString(EMPL_SCIENTIST, 2), _(building->name));
return;
}
} else {
CP_Popup(_("Notice"), _("Build a %s first."), _(building->name));
return;
}
}
/**
* @brief Updates the hospital menu.
* @sa HOS_Init_f
*/
static void HOS_UpdateMenu (void)
{
char name[128];
char rank[128];
int j, type;
int entry;
base_t *base = B_GetCurrentSelectedBase();
if (!base)
return;
/* Reset list. */
cgi->UI_ExecuteConfunc("hospital_clear");
for (type = 0, j = 0, entry = 0; type < MAX_EMPL; type++) {
E_Foreach(type, employee) {
float injuryLevel = HOS_InjuryLevel(&employee->chr);
if (!E_IsInBase(employee, base))
continue;
/* Don't show soldiers who are gone in mission */
if (E_IsAwayFromBase(employee))
continue;
/* Don't show healthy employees */
if (employee->chr.HP >= employee->chr.maxHP && injuryLevel <= 0)
continue;
if (j >= hospitalFirstEntry && entry < HOS_MENU_MAX_ENTRIES) {
/* Print name. */
Q_strncpyz(name, employee->chr.name, sizeof(name));
/* Print rank for soldiers or type for other personel. */
if (type == EMPL_SOLDIER) {
const rank_t *rankPtr = CL_GetRankByIdx(employee->chr.score.rank);
Q_strncpyz(rank, _(rankPtr->name), sizeof(rank));
} else
Q_strncpyz(rank, E_GetEmployeeString(employee->type, 1), sizeof(rank));
Com_DPrintf(DEBUG_CLIENT, "%s ucn: %i entry: %i\n", name, employee->chr.ucn, entry);
/* If the employee is seriously wounded (HP <= 50% maxHP), make him red. */
if (employee->chr.HP <= (int) (employee->chr.maxHP * 0.5) || injuryLevel >= 0.5)
cgi->UI_ExecuteConfunc("hospitalserious %i", entry);
/* If the employee is semi-seriously wounded (HP <= 85% maxHP), make him yellow. */
else if (employee->chr.HP <= (int) (employee->chr.maxHP * 0.85) || injuryLevel >= 0.15)
cgi->UI_ExecuteConfunc("hospitalmedium %i", entry);
else
cgi->UI_ExecuteConfunc("hospitallight %i", entry);
/* Display name in the correct list-entry. */
cgi->Cvar_Set(va("mn_hos_item%i", entry), name);
/* Display rank in the correct list-entry. */
cgi->Cvar_Set(va("mn_hos_rank%i", entry), rank);
/* Prepare the health bar */
cgi->Cvar_Set(va("mn_hos_hp%i", entry), va("%i", employee->chr.HP));
cgi->Cvar_Set(va("mn_hos_hpmax%i", entry), va("%i", employee->chr.maxHP));
/* Send wound info */
HOS_EntryWoundData(&employee->chr, entry);
/* Increase the counter of list entries. */
entry++;
}
j++;
}
}
/**
* @brief Resets the currently selected building.
*
* Is called e.g. when leaving the build-menu
*/
static void B_ResetBuildingCurrent_f (void)
{
base_t *base = B_GetCurrentSelectedBase();
B_ResetBuildingCurrent(base);
}
/**
* @brief Add selected item to current zone.
* @note Called from airequip menu
* @sa aircraftItemType_t
*/
static void AIM_AircraftEquipAddItem_f (void)
{
int zone;
aircraftSlot_t *slot;
aircraft_t *aircraft = NULL;
base_t *base = B_GetCurrentSelectedBase();
zone = (airequipID == AC_ITEM_AMMO) ? 2 : 1;
/* proceed only if an item has been selected */
if (!aimSelectedTechnology)
return;
assert(base);
aircraft = base->aircraftCurrent;
assert(aircraft);
base = aircraft->homebase; /* we need to know where items will be removed */
slot = AII_SelectAircraftSlot(aircraft, airequipID);
/* the clicked button doesn't correspond to the selected zone */
if (zone != airequipSelectedZone)
return;
/* check if the zone exists */
if (zone >= ZONE_MAX)
return;
/* update the new item to slot */
switch (zone) {
case ZONE_MAIN:
if (!slot->nextItem) {
/* we add the weapon, shield, item if slot is free or the installation of current item just began */
if (!slot->item || (slot->item && slot->installationTime == slot->item->craftitem.installationTime)) {
AII_RemoveItemFromSlot(base, slot, false);
AII_AddItemToSlot(base, aimSelectedTechnology, slot, false); /* Aircraft stats are updated below */
AII_AutoAddAmmo(slot);
break;
} else if (slot->item == INVSH_GetItemByID(aimSelectedTechnology->provides)) {
/* the added item is the same than the one in current slot */
if (slot->installationTime == -slot->item->craftitem.installationTime) {
/* player changed his mind: he just want to re-add the item he just removed */
slot->installationTime = 0;
break;
} else if (!slot->installationTime) {
/* player try to add a weapon he already have: just skip */
return;
}
} else {
/* We start removing current item in slot, and the selected item will be installed afterwards */
slot->installationTime = -slot->item->craftitem.installationTime;
/* more below */
}
} else {
/* remove weapon and ammo of next item */
AII_RemoveNextItemFromSlot(base, slot, false);
/* more below */
}
/* we change the weapon, shield, item, or base defence that will be installed AFTER the removal
* of the one in the slot atm */
AII_AddItemToSlot(base, aimSelectedTechnology, slot, true);
AII_AutoAddAmmo(slot);
break;
case ZONE_AMMO:
/* we can change ammo only if the selected item is an ammo (for weapon or base defence system) */
if (airequipID >= AC_ITEM_AMMO) {
AII_AddAmmoToSlot(base, aimSelectedTechnology, slot);
}
break;
default:
/* Zone higher than ZONE_AMMO shouldn't exist */
return;
}
/* Update the values of aircraft stats (just in case an item has an installationTime of 0) */
AII_UpdateAircraftStats(aircraft);
AIM_AircraftEquipMenuUpdate();
}
/**
* @brief Delete an object from a zone.
*/
static void AIM_AircraftEquipRemoveItem_f (void)
{
int zone;
aircraftSlot_t *slot;
aircraft_t *aircraft = NULL;
base_t *base = B_GetCurrentSelectedBase();
zone = (airequipID == AC_ITEM_AMMO) ? 2 : 1;
assert(base);
aircraft = base->aircraftCurrent;
assert(aircraft);
slot = AII_SelectAircraftSlot(aircraft, airequipID);
/* no item in slot: nothing to remove */
if (!slot->item)
return;
/* update the new item to slot */
switch (zone) {
case ZONE_MAIN:
if (!slot->nextItem) {
/* we change the weapon, shield, item, or base defence that is already in the slot */
/* if the item has been installed since less than 1 hour, you don't need time to remove it */
if (slot->installationTime < slot->item->craftitem.installationTime) {
slot->installationTime = -slot->item->craftitem.installationTime;
AII_RemoveItemFromSlot(base, slot, true); /* we remove only ammo, not item */
} else {
AII_RemoveItemFromSlot(base, slot, false); /* we remove weapon and ammo */
}
/* aircraft stats are updated below */
} else {
/* we change the weapon, shield, item, or base defence that will be installed AFTER the removal
* of the one in the slot atm */
AII_RemoveNextItemFromSlot(base, slot, false); /* we remove weapon and ammo */
/* if you canceled next item for less than 1 hour, previous item is still functional */
if (slot->installationTime == -slot->item->craftitem.installationTime) {
slot->installationTime = 0;
}
}
break;
case ZONE_AMMO:
/* we can change ammo only if the selected item is an ammo (for weapon or base defence system) */
if (airequipID >= AC_ITEM_AMMO) {
if (slot->nextAmmo)
AII_RemoveNextItemFromSlot(base, slot, true);
else
AII_RemoveItemFromSlot(base, slot, true);
}
break;
default:
/* Zone higher than ZONE_AMMO shouldn't exist */
return;
}
/* Update the values of aircraft stats */
AII_UpdateAircraftStats(aircraft);
AIM_AircraftEquipMenuUpdate();
}
/**
* @brief Update the item description according to the tech and the slot selected
*/
static void AIM_UpdateItemDescription (bool fromList, bool fromSlot)
{
int status;
aircraft_t *aircraft;
aircraftSlot_t *slot;
base_t *base = B_GetCurrentSelectedBase();
assert(base);
aircraft = base->aircraftCurrent;
assert(aircraft);
slot = AII_SelectAircraftSlot(aircraft, airequipID);
/* update mini ufopedia */
/** @todo we should clone the text, and not using the ufopedia text */
if (fromList)
UP_AircraftItemDescription(INVSH_GetItemByIDSilent(aimSelectedTechnology ? aimSelectedTechnology->provides : NULL));
else if (fromSlot) {
if (airequipID == AC_ITEM_AMMO)
UP_AircraftItemDescription(slot->ammo);
else
UP_AircraftItemDescription(slot->item);
}
/* update status */
status = AIM_CheckTechnologyIntoSlot(slot, aimSelectedTechnology);
switch (status) {
case AIM_LOADING_NOSLOTSELECTED:
Cvar_Set("mn_aircraft_item_warning", _("No slot selected."));
break;
case AIM_LOADING_NOTECHNOLOGYSELECTED:
Cvar_Set("mn_aircraft_item_warning", _("No item selected."));
break;
case AIM_LOADING_ALIENTECH:
Cvar_Set("mn_aircraft_item_warning", _("You can't equip an alien technology."));
break;
case AIM_LOADING_TECHNOLOGYNOTRESEARCHED:
Cvar_Set("mn_aircraft_item_warning", _("Technology requested is not yet completed."));
break;
case AIM_LOADING_TOOHEAVY:
Cvar_Set("mn_aircraft_item_warning", _("This item is too heavy for the selected slot."));
break;
case AIM_LOADING_NOWEAPON:
Cvar_Set("mn_aircraft_item_warning", _("Equip a weapon first."));
break;
case AIM_LOADING_NOTUSABLEWITHWEAPON:
Cvar_Set("mn_aircraft_item_warning", _("Ammo not usable with current weapon."));
break;
case AIM_LOADING_UNKNOWNPROBLEM:
Cvar_Set("mn_aircraft_item_warning", _("Unknown problem."));
break;
case AIM_LOADING_OK:
Cvar_Set("mn_aircraft_item_warning", _("Ok"));
break;
}
if (*Cvar_GetString("mn_item") == '\0') {
cgi->UI_ExecuteConfunc("airequip_no_item");
} else {
if (fromSlot) {
cgi->UI_ExecuteConfunc("airequip_installed_item");
} else {
if (status == AIM_LOADING_OK)
cgi->UI_ExecuteConfunc("airequip_installable_item");
else
cgi->UI_ExecuteConfunc("airequip_noinstallable_item");
}
}
}
/**
* @brief Will fill the list with employees
* @note this is the init function in the employee hire menu
*/
static void E_EmployeeList_f (void)
{
Employee* employee;
int hiredEmployeeIdx;
linkedList_t* employeeListName;
base_t* base = B_GetCurrentSelectedBase();
if (!base)
return;
if (cgi->Cmd_Argc() < 2) {
Com_Printf("Usage: %s <category> <employeeid>\n", cgi->Cmd_Argv(0));
return;
}
employeeCategory = atoi(cgi->Cmd_Argv(1));
if (employeeCategory >= MAX_EMPL || employeeCategory < 0)
employeeCategory = EMPL_SOLDIER;
if (cgi->Cmd_Argc() == 3)
hiredEmployeeIdx = atoi(cgi->Cmd_Argv(2));
else
hiredEmployeeIdx = -1;
/* reset the employee count */
employeesInCurrentList = 0;
cgi->LIST_Delete(&employeeList);
/* make sure, that we are using the linked list */
cgi->UI_ResetData(TEXT_LIST);
employeeListName = nullptr;
E_Foreach(employeeCategory, e) {
/* don't show employees of other bases */
if (e->isHired() && !e->isHiredInBase(base))
continue;
/* don't show employees being transferred to other bases */
if (e->transfer)
continue;
cgi->LIST_AddPointer(&employeeListName, e->chr.name);
cgi->LIST_AddPointer(&employeeList, e);
employeesInCurrentList++;
}
cgi->UI_RegisterLinkedListText(TEXT_LIST, employeeListName);
/* If the list is empty OR we are in pilots/scientists/workers-mode: don't show the model&stats. */
/** @note
* 0 == nothing is displayed
* 1 == all is displayed
* 2 == only stuff wanted for scientists/workers/pilots are displayed
*/
/** @todo replace magic numbers - use confuncs */
if (employeesInCurrentList == 0) {
cgi->Cvar_Set("mn_show_employee", "0");
} else {
if (employeeCategory == EMPL_SCIENTIST || employeeCategory == EMPL_WORKER)
cgi->Cvar_Set("mn_show_employee", "3");
else if (employeeCategory == EMPL_PILOT)
cgi->Cvar_Set("mn_show_employee", "2");
else
cgi->Cvar_Set("mn_show_employee", "1");
}
/* Select the current employee if name was changed or first one. Use the direct string
* execution here - otherwise the employeeCategory might be out of sync */
if (hiredEmployeeIdx < 0 || selectedEmployee == nullptr)
employee = E_GetEmployeeByMenuIndex(0);
else
employee = selectedEmployee;
E_EmployeeSelect(employee);
/* update scroll */
cgi->UI_ExecuteConfunc("hire_update_number %i", employeesInCurrentList);
cgi->UI_ExecuteConfunc("employee_scroll 0");
}
/**
* @brief Fill market item list
*/
static void BS_FillMarket_f (void)
{
const base_t* base = B_GetCurrentSelectedBase();
itemFilterTypes_t type;
if (cgi->Cmd_Argc() < 2) {
cgi->Com_Printf("Usage: %s <category>\n", cgi->Cmd_Argv(0));
return;
}
if (cgi->Cmd_Argc() >= 3)
base = B_GetFoundedBaseByIDX(atoi(cgi->Cmd_Argv(2)));
if (!base) {
cgi->Com_Printf("No/invalid base selected.\n");
return;
}
type = cgi->INV_GetFilterTypeID(cgi->Cmd_Argv(1));
cgi->UI_ExecuteConfunc("ui_market_clear");
switch (type) {
case FILTER_UGVITEM:
/* show own UGV */
E_Foreach(EMPL_ROBOT, robot) {
const ugv_t* ugv = robot->getUGV();
const technology_t* tech = RS_GetTechByProvided(ugv->id);
if (!robot->isHiredInBase(base))
continue;
cgi->UI_ExecuteConfunc("ui_market_add \"ugv-%d\" \"%s\" 1 0 0 %d - \"%s\"", robot->chr.ucn, _(tech->name), ugv->price, robot->isAwayFromBase() ? _("UGV is away from home") : "-");
}
/* show buyable UGV */
for (int i = 0; i < cgi->csi->numUGV; i++) {
const ugv_t* ugv = &cgi->csi->ugvs[i];
const technology_t* tech = RS_GetTechByProvided(ugv->id);
const objDef_t* ugvWeapon = INVSH_GetItemByID(ugv->weapon);
const int buyable = std::min(E_CountUnhiredRobotsByType(ugv), BS_GetItemOnMarket(ugvWeapon));
assert(tech);
if (!RS_IsResearched_ptr(tech))
continue;
if (buyable <= 0)
continue;
cgi->UI_ExecuteConfunc("ui_market_add %s \"%s\" 0 %d %d %d - -", ugv->id, _(tech->name), buyable, ugv->price, ugv->price);
}
/* show (UGV) items, fall through */
case FILTER_S_PRIMARY:
case FILTER_S_SECONDARY:
case FILTER_S_HEAVY:
case FILTER_S_IMPLANT:
case FILTER_S_MISC:
case FILTER_S_ARMOUR:
case FILTER_DUMMY:
case FILTER_CRAFTITEM:
case MAX_FILTERTYPES: {
for (int i = 0; i < cgi->csi->numODs; i++) {
const objDef_t* od = &cgi->csi->ods[i];
const technology_t* tech = RS_GetTechForItem(od);
if (!BS_IsOnMarket(od))
continue;
if (B_ItemInBase(od, base) + BS_GetItemOnMarket(od) <= 0)
continue;
if (type != MAX_FILTERTYPES && !cgi->INV_ItemMatchesFilter(od, type))
continue;
cgi->UI_ExecuteConfunc("ui_market_add %s \"%s\" %d %d %d %d %s -", od->id, _(od->name), B_ItemInBase(od, base), BS_GetItemOnMarket(od), BS_GetItemBuyingPrice(od), BS_GetItemSellingPrice(od), RS_IsResearched_ptr(tech) ? va("%d", ccs.eMarket.autosell[i]) : "-");
}
break;
}
case FILTER_AIRCRAFT: {
AIR_ForeachFromBase(aircraft, base) {
cgi->UI_ExecuteConfunc("ui_market_add \"aircraft_%d\" \"%s\" 1 0 0 %d - \"%s\"", aircraft->idx, aircraft->name, BS_GetAircraftSellingPrice(aircraft), AIR_IsAircraftInBase(aircraft) ? "-" : _("Aircraft is away from home"));
}
for (int i = 0; i < ccs.numAircraftTemplates; i++) {
const aircraft_t* aircraft = &ccs.aircraftTemplates[i];
if (!BS_AircraftIsOnMarket(aircraft))
continue;
if (!RS_IsResearched_ptr(aircraft->tech))
continue;
if (BS_GetAircraftOnMarket(aircraft) <= 0)
continue;
cgi->UI_ExecuteConfunc("ui_market_add \"%s\" \"%s\" 0 %d %d %d - -", aircraft->id, _(aircraft->tech->name), BS_GetAircraftOnMarket(aircraft), BS_GetAircraftBuyingPrice(aircraft), BS_GetAircraftSellingPrice(aircraft));
}
break;
}
default:
break;
}
static void AIM_AircraftEquipMenuUpdate (void)
{
static char smallbuffer1[256];
static char smallbuffer2[128];
const char *typeName;
aircraft_t *aircraft;
aircraftSlot_t *slot;
base_t *base = B_GetCurrentSelectedBase();
if (!base)
return;
/* don't let old links appear on this menu */
cgi->UI_ResetData(TEXT_AIREQUIP_1);
cgi->UI_ResetData(TEXT_AIREQUIP_2);
cgi->UI_ResetData(TEXT_ITEMDESCRIPTION);
cgi->UI_ResetData(TEXT_LIST);
aircraft = base->aircraftCurrent;
assert(aircraft);
/* Check that airequipSelectedSlot corresponds to an existing slot for this aircraft */
AIM_CheckAirequipSelectedSlot(aircraft);
/* Select slot */
slot = AII_SelectAircraftSlot(aircraft, airequipID);
/* Check that the selected zone is OK */
AIM_CheckAirequipSelectedZone(slot);
/* Fill the list of item you can equip your aircraft with */
AIM_UpdateAircraftItemList(slot);
Cvar_Set("mn_equip_itemtype_name", AIM_AircraftItemtypeName(airequipID));
switch (airequipID) {
case AC_ITEM_ELECTRONICS:
typeName = "item";
break;
case AC_ITEM_SHIELD:
typeName = "armour";
break;
case AC_ITEM_AMMO:
typeName = "ammo";
break;
case AC_ITEM_WEAPON:
typeName = "weapon";
break;
default:
typeName = "unknown";
break;
}
Cvar_Set("mn_equip_itemtype", typeName);
/* First slot: item currently assigned */
if (!slot->item) {
Com_sprintf(smallbuffer1, sizeof(smallbuffer1), "%s", _("No item assigned.\n"));
Q_strcat(smallbuffer1, va(_("This slot is for %s or smaller items."),
AII_WeightToName(slot->size)), sizeof(smallbuffer1));
} else {
technology_t *itemTech = RS_GetTechForItem(slot->item);
technology_t *nextItemTech = slot->nextItem ? RS_GetTechForItem(slot->nextItem) : NULL;
/* Print next item if we are removing item currently installed and a new item has been added. */
Com_sprintf(smallbuffer1, sizeof(smallbuffer1), "%s\n", slot->nextItem ? _(nextItemTech->name) : _(itemTech->name));
if (!slot->installationTime) {
Q_strcat(smallbuffer1, _("This item is functional.\n"), sizeof(smallbuffer1));
} else if (slot->installationTime > 0) {
Q_strcat(smallbuffer1, va(_("This item will be installed in %i hours.\n"),
slot->installationTime), sizeof(smallbuffer1));
} else if (slot->nextItem) {
Q_strcat(smallbuffer1, va(_("%s will be removed in %i hours.\n"), _(itemTech->name),
- slot->installationTime), sizeof(smallbuffer1));
Q_strcat(smallbuffer1, va(_("%s will be installed in %i hours.\n"), _(nextItemTech->name),
slot->nextItem->craftitem.installationTime - slot->installationTime), sizeof(smallbuffer1));
} else {
Q_strcat(smallbuffer1, va(_("This item will be removed in %i hours.\n"),
-slot->installationTime), sizeof(smallbuffer1));
}
}
cgi->UI_RegisterText(TEXT_AIREQUIP_1, smallbuffer1);
/* Second slot: ammo slot (only used for weapons) */
if ((airequipID == AC_ITEM_WEAPON || airequipID == AC_ITEM_AMMO) && slot->item) {
if (!slot->ammo) {
AIM_EmphazeAmmoSlotText();
Com_sprintf(smallbuffer2, sizeof(smallbuffer2), "%s", _("No ammo assigned to this weapon."));
} else {
const objDef_t *ammo = slot->nextAmmo ? slot->nextAmmo : slot->ammo;
const technology_t *tech = RS_GetTechForItem(ammo);
AIM_NoEmphazeAmmoSlotText();
if (!ammo->isVirtual)
Q_strncpyz(smallbuffer2, _(tech->name), sizeof(smallbuffer2));
else
Q_strncpyz(smallbuffer2, _("No ammo needed"), sizeof(smallbuffer2));
}
} else
*smallbuffer2 = '\0';
cgi->UI_RegisterText(TEXT_AIREQUIP_2, smallbuffer2);
/* Draw existing slots for this aircraft */
AIM_DrawAircraftSlots(aircraft);
}
/**
* @brief Buy/Sell item/aircraft/ugv on the market
*/
static void BS_Buy_f (void)
{
const char* itemid;
int count;
base_t* base = B_GetCurrentSelectedBase();
const aircraft_t* aircraft;
const ugv_t* ugv;
const objDef_t* od;
if (cgi->Cmd_Argc() < 2) {
cgi->Com_Printf("Usage: %s <item-id> <count> [base-idx] \nNegative count means selling. If base index is omitted buys on the currently selected base.\n",
cgi->Cmd_Argv(0));
return;
}
itemid = cgi->Cmd_Argv(1);
count = atoi(cgi->Cmd_Argv(2));
if (cgi->Cmd_Argc() >= 4)
base = B_GetFoundedBaseByIDX(atoi(cgi->Cmd_Argv(3)));
if (char const* const rest = Q_strstart(itemid, "aircraft_")) {
/* aircraft sell - with aircraft golbal idx */
int idx = atoi(rest);
aircraft_t* aircraft = AIR_AircraftGetFromIDX(idx);
if (!aircraft) {
cgi->Com_Printf("Invalid aircraft index!\n");
return;
}
AIR_RemoveEmployees(*aircraft);
BS_SellAircraft(aircraft);
return;
}
if (char const* const rest = Q_strstart(itemid, "ugv-")) {
/* ugv sell - with unique character number index */
int ucn = atoi(rest);
Employee* robot = E_GetEmployeeByTypeFromChrUCN(EMPL_ROBOT, ucn);
if (!robot) {
cgi->Com_Printf("Invalid UCN for UGV!\n");
return;
}
BS_SellUGV(robot);
return;
}
if (!base) {
cgi->Com_Printf("No/invalid base selected.\n");
return;
}
aircraft = AIR_GetAircraftSilent(itemid);
if (aircraft) {
if (!B_GetBuildingStatus(base, B_COMMAND)) {
CP_Popup(_("Note"), _("No Command Centre in this base.\nHangars are not functional.\n"));
return;
}
/* We cannot buy aircraft if there is no power in our base. */
if (!B_GetBuildingStatus(base, B_POWER)) {
CP_Popup(_("Note"), _("No power supplies in this base.\nHangars are not functional."));
return;
}
/* We cannot buy aircraft without any hangar. */
if (!AIR_AircraftAllowed(base)) {
CP_Popup(_("Note"), _("Build a hangar first."));
return;
}
/* Check free space in hangars. */
if (CAP_GetFreeCapacity(base, AIR_GetHangarCapacityType(aircraft)) <= 0) {
CP_Popup(_("Notice"), _("You cannot buy this aircraft.\nNot enough space in hangars.\n"));
return;
}
if (ccs.credits < BS_GetAircraftBuyingPrice(aircraft)) {
CP_Popup(_("Notice"), _("You cannot buy this aircraft.\nNot enough credits.\n"));
return;
}
BS_BuyAircraft(aircraft, base);
return;
}
ugv = cgi->Com_GetUGVByIDSilent(itemid);
if (ugv) {
const objDef_t* ugvWeapon = INVSH_GetItemByID(ugv->weapon);
if (!ugvWeapon)
cgi->Com_Error(ERR_DROP, "BS_BuyItem_f: Could not get weapon '%s' for ugv/tank '%s'.", ugv->weapon, ugv->id);
if (E_CountUnhiredRobotsByType(ugv) < 1)
return;
if (ccs.eMarket.numItems[ugvWeapon->idx] < 1)
return;
if (ccs.credits < ugv->price) {
CP_Popup(_("Not enough money"), _("You cannot buy this item as you don't have enough credits."));
return;
}
if (CAP_GetFreeCapacity(base, CAP_ITEMS) < UGV_SIZE + ugvWeapon->size) {
CP_Popup(_("Not enough storage space"), _("You cannot buy this item.\nNot enough space in storage.\nBuild more storage facilities."));
return;
}
BS_BuyUGV(ugv, base);
return;
}
if (count == 0) {
cgi->Com_Printf("Invalid number of items to buy/sell: %s\n", cgi->Cmd_Argv(2));
return;
}
/* item */
od = INVSH_GetItemByID(cgi->Cmd_Argv(1));
if (od) {
if (!BS_IsOnMarket(od))
return;
if (count > 0) {
/* buy */
const int price = BS_GetItemBuyingPrice(od);
count = std::min(count, BS_GetItemOnMarket(od));
/* no items available on market */
if (count <= 0)
return;
if (price <= 0) {
cgi->Com_Printf("Item on market with invalid buying price: %s (%d)\n", od->id, BS_GetItemBuyingPrice(od));
return;
}
/** @todo warn if player can buy less item due to available credits? */
count = std::min(count, ccs.credits / price);
/* not enough money for a single item */
if (count <= 0) {
CP_Popup(_("Not enough money"), _("You cannot buy this item as you don't have enough credits."));
return;
}
if (od->size <= 0) {
cgi->Com_Printf("Item on market with invalid size: %s (%d)\n", od->id, od->size);
return;
}
count = std::min(count, CAP_GetFreeCapacity(base, CAP_ITEMS) / od->size);
if (count <= 0) {
CP_Popup(_("Not enough storage space"), _("You cannot buy this item.\nNot enough space in storage.\nBuild more storage facilities."));
return;
}
BS_BuyItem(od, base, count);
} else {
/* sell */
count = std::min(-1 * count, B_ItemInBase(od, base));
/* no items in storage */
if (count <= 0)
return;
BS_SellItem(od, base, count);
}
return;
}
cgi->Com_Printf("Invalid item ID\n");
}
/**
* @brief Draws a base.
*/
static void UI_BaseMapNodeDraw (uiNode_t * node)
{
int width, height, row, col;
const building_t *building;
const base_t *base = B_GetCurrentSelectedBase();
qboolean used[MAX_BUILDINGS];
if (!base) {
UI_PopWindow(qfalse);
return;
}
/* reset the used flag */
OBJZERO(used);
width = node->size[0] / BASE_SIZE;
height = node->size[1] / BASE_SIZE + BASE_IMAGE_OVERLAY;
for (row = 0; row < BASE_SIZE; row++) {
const char *image = NULL;
for (col = 0; col < BASE_SIZE; col++) {
vec2_t pos;
UI_GetNodeAbsPos(node, pos);
pos[0] += col * width;
pos[1] += row * (height - BASE_IMAGE_OVERLAY);
/* base tile */
if (B_IsTileBlocked(base, col, row)) {
building = NULL;
image = "base/invalid";
} else if (B_GetBuildingAt(base, col, row) == NULL) {
building = NULL;
image = "base/grid";
} else {
building = B_GetBuildingAt(base, col, row);
assert(building);
if (building->image)
image = building->image;
/* some buildings are drawn with two tiles - e.g. the hangar is no square map tile.
* These buildings have the needs parameter set to the second building part which has
* its own image set, too. We are searching for this second building part here. */
if (B_BuildingGetUsed(used, building->idx))
continue;
B_BuildingSetUsed(used, building->idx);
}
/* draw tile */
if (image != NULL)
UI_DrawNormImageByName(qfalse, pos[0], pos[1], width * (building ? building->size[0] : 1), height * (building ? building->size[1] : 1), 0, 0, 0, 0, image);
if (building) {
switch (building->buildingStatus) {
case B_STATUS_DOWN:
case B_STATUS_CONSTRUCTION_FINISHED:
break;
case B_STATUS_UNDER_CONSTRUCTION:
{
const float time = max(0.0, B_GetConstructionTimeRemain(building));
UI_DrawString("f_small", ALIGN_UL, pos[0] + 10, pos[1] + 10, pos[0] + 10, node->size[0], 0, va(ngettext("%3.1f day left", "%3.1f days left", time), time), 0, 0, NULL, qfalse, 0);
break;
}
default:
break;
}
}
}
}
if (!node->state)
return;
UI_BaseMapGetCellAtPos(node, mousePosX, mousePosY, &col, &row);
if (col == -1)
return;
/* if we are building */
if (ccs.baseAction == BA_NEWBUILDING) {
int y, x;
int xCoord, yCoord, widthRect, heigthRect;
vec2_t pos;
assert(base->buildingCurrent);
for (y = row; y < row + base->buildingCurrent->size[1]; y++) {
for (x = col; x < col + base->buildingCurrent->size[0]; x++) {
if (!B_MapIsCellFree(base, x, y))
return;
}
}
UI_GetNodeAbsPos(node, pos);
xCoord = pos[0] + col * width;
yCoord = pos[1] + row * (height - BASE_IMAGE_OVERLAY);
widthRect = base->buildingCurrent->size[0] * width;
heigthRect = base->buildingCurrent->size[1] * (height - BASE_IMAGE_OVERLAY);
R_DrawRect(xCoord, yCoord, widthRect, heigthRect, white, 3, 1);
}
}
/**
* @brief Initialises base.
* @note This command is executed in the init node of the base menu.
* It is called everytime the base menu pops up and sets the cvars.
* @todo integrate building status tooltips from B_CheckBuildingStatusForMenu_f into this one
*/
static void B_BaseInit_f (void)
{
base_t* base = B_GetCurrentSelectedBase();
if (!base)
return;
/* make sure the credits cvar is up-to-date */
CP_UpdateCredits(ccs.credits);
/* activate or deactivate the aircraft button */
if (AIR_AircraftAllowed(base)) {
if (AIR_BaseHasAircraft(base))
cgi->UI_ExecuteConfunc("update_basebutton aircraft false \"%s\"", _("Aircraft management and crew equipment"));
else
cgi->UI_ExecuteConfunc("update_basebutton aircraft true \"%s\"", _("Buy or produce at least one aircraft first."));
} else {
cgi->UI_ExecuteConfunc("update_basebutton aircraft true \"%s\"", _("No Hangar functional in base."));
}
if (BS_BuySellAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton buysell false \"%s\"", _("Buy/Sell equipment, aircraft and UGV"));
else
cgi->UI_ExecuteConfunc("update_basebutton buysell true \"%s\"", va(_("No %s functional in base."), _("Storage")));
if (B_GetCount() > 1)
cgi->UI_ExecuteConfunc("update_basebutton transfer false \"%s\"", _("Transfer equipment, vehicles, aliens and employees to other bases"));
else
cgi->UI_ExecuteConfunc("update_basebutton transfer true \"%s\"", _("Build at least a second base to transfer equipment or personnel"));
if (RS_ResearchAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton research false \"%s\"", _("Research new technology"));
else
cgi->UI_ExecuteConfunc("update_basebutton research true \"%s\"", va(_("No %s functional in base."), _("Laboratory")));
if (PR_ProductionAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton production false \"%s\"", _("Produce equipment, aircraft and UGV"));
else
cgi->UI_ExecuteConfunc("update_basebutton production true \"%s\"", va(_("No %s functional in base."), _("Workshop")));
if (E_HireAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton hire false \"%s\"", _("Hire or dismiss employees"));
else
cgi->UI_ExecuteConfunc("update_basebutton hire true \"%s\"", va(_("No %s functional in base."), _("Living Quarters")));
if (AC_ContainmentAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton containment false \"%s\"", _("Manage captured aliens"));
else
cgi->UI_ExecuteConfunc("update_basebutton containment true \"%s\"", va(_("No %s functional in base."), _("Containment")));
if (HOS_HospitalAllowed(base))
cgi->UI_ExecuteConfunc("update_basebutton hospital false \"%s\"", _("Treat wounded soldiers and perform implant surgery"));
else
cgi->UI_ExecuteConfunc("update_basebutton hospital true \"%s\"", va(_("No %s functional in base."), _("Hospital")));
/*
* Gather data on current/max space for living quarters, storage, lab and workshop
* clear_bld_space ensures 0/0 data for facilities which may not exist in base
*/
cgi->UI_ExecuteConfunc("clear_bld_space");
for (int i = 0; i < ccs.numBuildingTemplates; i++) {
const building_t* b = &ccs.buildingTemplates[i];
/* Check if building matches one of our four types */
if (b->buildingType != B_QUARTERS && b->buildingType != B_STORAGE && b->buildingType != B_WORKSHOP && b->buildingType != B_LAB && b->buildingType != B_ANTIMATTER)
continue;
/* only show already researched buildings */
if (!RS_IsResearched_ptr(b->tech))
continue;
const baseCapacities_t capType = B_GetCapacityFromBuildingType(b->buildingType);
if (capType == MAX_CAP)
continue;
const int count = B_GetNumberOfBuildingsInBaseByTemplate(base, b->tpl);
if (count < 1)
continue;
const capacities_t& cap = *CAP_Get(base, capType);
cgi->UI_ExecuteConfunc("show_bld_space \"%s\" \"%s\" %i %i %i %i", _(b->name), b->id, cap.cur, cap.max, count, b->tpl->maxCount);
}
/*
* Get the number of different employees in the base
* @todo: Get the number of injured soldiers if hospital exists
*/
cgi->UI_ExecuteConfunc("current_employees %i %i %i %i", E_CountHired(base, EMPL_SOLDIER), E_CountHired(base, EMPL_PILOT), E_CountHired(base, EMPL_SCIENTIST), E_CountHired(base, EMPL_WORKER));
/*
* List the first five aircraft in the base if they exist
*/
cgi->UI_ExecuteConfunc("clear_aircraft");
if (AIR_AircraftAllowed(base)) {
AIR_ForeachFromBase(aircraft, base) {
cgi->UI_ExecuteConfunc("show_aircraft %i \"%s\" \"%s\" \"%s\" %i", aircraft->idx, aircraft->name, aircraft->id, AIR_AircraftStatusToName(aircraft), AIR_IsAircraftInBase(aircraft));
}
}
/**
* @brief Fills the battery list, descriptions, and weapons in slots
* of the basedefence equip menu
*/
static void BDEF_BaseDefenceMenuUpdate_f (void)
{
char type[MAX_VAR];
base_t* base = B_GetCurrentSelectedBase();
installation_t* installation = INS_GetCurrentSelectedInstallation();
aircraftItemType_t bdefType;
linkedList_t* slotList = nullptr;
const bool missileResearched = RS_IsResearched_ptr(RS_GetTechByID("rs_building_missile"));
const bool laserResearched = RS_IsResearched_ptr(RS_GetTechByID("rs_building_laser"));
if (cgi->Cmd_Argc() != 2)
type[0] = '\0';
else
Q_strncpyz(type, cgi->Cmd_Argv(1), sizeof(type));
/* don't let old links appear on this menu */
cgi->UI_ResetData(TEXT_BASEDEFENCE_LIST);
cgi->UI_ResetData(TEXT_LIST);
cgi->UI_ResetData(TEXT_ITEMDESCRIPTION);
/* base or installation should not be nullptr because we are in the menu of this base or installation */
if (!base && !installation)
return;
/* base and installation should not both be set. This function requires one or the other set. */
if (base && installation) {
Sys_Error("BDEF_BaseDefenceMenuUpdate_f: Both the base and installation are set");
return;
}
cgi->Cvar_Set("mn_target", _("None"));
cgi->UI_ExecuteConfunc("setautofire disable");
if (installation) {
/* Every slot aims the same target */
if (installation->numBatteries) {
cgi->UI_ExecuteConfunc("setautofire %i", installation->batteries[0].autofire);
if (installation->batteries[0].target)
cgi->Cvar_Set("mn_target", "%s", UFO_GetName(installation->batteries[0].target));
}
} else if (base) {
bool autofire = false;
/* Every slot aims the same target */
if (base->numBatteries) {
autofire |= base->batteries[0].autofire;
if (base->batteries[0].target)
cgi->Cvar_Set("mn_target", "%s", UFO_GetName(base->batteries[0].target));
}
if (base->numLasers) {
autofire |= base->lasers[0].autofire;
if (base->lasers[0].target && !base->batteries[0].target)
cgi->Cvar_Set("mn_target", "%s", UFO_GetName(base->lasers[0].target));
}
if (base->numBatteries || base->numLasers)
cgi->UI_ExecuteConfunc("setautofire %i", autofire);
}
/* Check if we can change to laser or missile */
if (base) {
cgi->UI_ExecuteConfunc("set_defencetypes %s %s",
(!missileResearched) ? "na" : (base && base->numBatteries > 0) ? "enable" : "disable",
(!laserResearched) ? "na" : (base && base->numLasers > 0) ? "enable" : "disable");
} else if (installation) {
cgi->UI_ExecuteConfunc("set_defencetypes %s %s",
(!missileResearched) ? "na" : (installation && installation->installationStatus == INSTALLATION_WORKING
&& installation->numBatteries > 0) ? "enable" : "disable", "na");
}
if (Q_streq(type, "missile"))
bdefType = AC_ITEM_BASE_MISSILE;
else if (Q_streq(type, "laser"))
bdefType = AC_ITEM_BASE_LASER;
else /* info page */
return;
/* Check that the base or installation has at least 1 battery */
if (base) {
if (base->numBatteries + base->numLasers < 1) {
Com_Printf("BDEF_BaseDefenceMenuUpdate_f: there is no defence battery in this base: you shouldn't be in this function.\n");
return;
}
} else if (installation) {
if (installation->installationStatus != INSTALLATION_WORKING) {
Com_Printf("BDEF_BaseDefenceMenuUpdate_f: installation isn't working: you shouldn't be in this function.\n");
return;
} else if (installation->installationTemplate->maxBatteries < 1) {
Com_Printf("BDEF_BaseDefenceMenuUpdate_f: there is no defence battery in this installation: you shouldn't be in this function.\n");
return;
}
}
if (installation) {
/* we are in the installation defence menu */
if (installation->installationTemplate->maxBatteries == 0) {
cgi->LIST_AddString(&slotList, _("No defence of this type in this installation"));
} else {
BDEF_FillSlotList(installation->batteries, installation->installationTemplate->maxBatteries, &slotList);
}
} else if (bdefType == AC_ITEM_BASE_MISSILE) {
/* we are in the base defence menu for missile */
if (base->numBatteries == 0) {
cgi->LIST_AddString(&slotList, _("No defence of this type in this base"));
} else {
BDEF_FillSlotList(base->batteries, base->numActiveBatteries, &slotList);
}
} else if (bdefType == AC_ITEM_BASE_LASER) {
/* we are in the base defence menu for laser */
if (base->numLasers == 0) {
cgi->LIST_AddString(&slotList, _("No defence of this type in this base"));
} else {
BDEF_FillSlotList(base->lasers, base->numActiveLasers, &slotList);
}
} else {
Com_Printf("BDEF_BaseDefenceMenuUpdate_f: unknown bdefType.\n");
return;
}
cgi->UI_RegisterLinkedListText(TEXT_BASEDEFENCE_LIST, slotList);
}
/**
* @brief Select the current slot you want to assign the item to.
* @note This function is only for aircraft and not far bases.
*/
static void AIM_AircraftEquipSlotSelect_f (void)
{
int i;
itemPos_t pos;
aircraft_t *aircraft;
base_t *base = B_GetCurrentSelectedBase();
int updateZone = 0;
if (!base)
return;
if (Cmd_Argc() < 2) {
Com_Printf("Usage: %s <arg> <zone1|zone2|item>\n", Cmd_Argv(0));
return;
}
aircraft = base->aircraftCurrent;
assert(aircraft);
i = atoi(Cmd_Argv(1));
pos = (itemPos_t)i;
if (Cmd_Argc() == 3) {
if (Q_streq(Cmd_Argv(2), "zone1")) {
updateZone = 1;
} else if (Q_streq(Cmd_Argv(2), "zone2")) {
updateZone = 2;
}
}
airequipSelectedSlot = ZONE_NONE;
/* select the slot corresponding to pos, and set airequipSelectedSlot to this slot */
switch (airequipID) {
case AC_ITEM_ELECTRONICS:
/* electronics selected */
for (i = 0; i < aircraft->maxElectronics; i++) {
if (aircraft->electronics[i].pos == pos) {
airequipSelectedSlot = i;
break;
}
}
if (i == aircraft->maxElectronics)
Com_Printf("this slot hasn't been found in aircraft electronics slots\n");
break;
case AC_ITEM_AMMO:
case AC_ITEM_WEAPON:
/* weapon selected */
for (i = 0; i < aircraft->maxWeapons; i++) {
if (aircraft->weapons[i].pos == pos) {
airequipSelectedSlot = i;
break;
}
}
if (i == aircraft->maxWeapons)
Com_Printf("this slot hasn't been found in aircraft weapon slots\n");
break;
default:
Com_Printf("AIM_AircraftEquipSlotSelect_f : only weapons and electronics have several slots\n");
break;
}
/* Update menu after changing slot */
AIM_AircraftEquipMenuUpdate();
/* update description with the selected slot */
if (updateZone > 0)
AIM_UpdateItemDescription(false, true);
else
AIM_UpdateItemDescription(true, false);
}
/**
* @brief add item to a base defence slot (installation too)
*/
static void BDEF_AddItem_f (void)
{
aircraftSlot_t* slot;
installation_t* installation = INS_GetCurrentSelectedInstallation();
base_t* base = B_GetCurrentSelectedBase();
technology_t** list;
technology_t* itemTech = nullptr;
aircraftItemType_t bdefType;
int slotIDX;
if ((!base && !installation) || (base && installation)) {
Com_Printf("Exiting early base and installation both true or both false\n");
return;
}
if (cgi->Cmd_Argc() < 3) {
Com_Printf("Usage: %s <type> <slotIDX>\n", cgi->Cmd_Argv(0));
return;
}
bdefType = BDEF_GetItemTypeFromID(cgi->Cmd_Argv(1));
slotIDX = atoi(cgi->Cmd_Argv(2));
if (bdefType == MAX_ACITEMS) {
Com_Printf("BDEF_AddItem_f: Invalid defence type.\n");
return;
}
if (slotIDX < 0) {
return;
} else {
int maxWeapon;
if (base)
maxWeapon = (bdefType == AC_ITEM_BASE_MISSILE) ? base->numActiveBatteries : base->numActiveLasers;
else
maxWeapon = installation->numBatteries;
if (slotIDX >= maxWeapon)
return;
}
slot = (installation) ? BDEF_GetInstallationSlotByIDX(installation, bdefType, slotIDX) : BDEF_GetBaseSlotByIDX(base, bdefType, slotIDX);
if (!slot) {
Com_Printf("BDEF_AddItem_f: Invalid slot.\n");
return;
}
list = AII_GetCraftitemTechsByType(bdefType);
while (*list) {
if (AIM_SelectableCraftItem(slot, *list)) {
itemTech = *list;
break;
}
list++;
}
if (!itemTech)
return;
if (!slot->nextItem) {
/* we add the weapon, shield, item, or base defence if slot is free or the installation of
* current item just began */
if (!slot->item || (slot->item && slot->installationTime == slot->item->craftitem.installationTime)) {
AII_RemoveItemFromSlot(base, slot, false);
AII_AddItemToSlot(base, itemTech, slot, false); /* Aircraft stats are updated below */
AII_AutoAddAmmo(slot);
} else if (slot->item == INVSH_GetItemByID(itemTech->provides)) {
/* the added item is the same than the one in current slot */
if (slot->installationTime == -slot->item->craftitem.installationTime) {
/* player changed his mind: he just want to re-add the item he just removed */
slot->installationTime = 0;
} else if (!slot->installationTime) {
/* player try to add a weapon he already have: just skip */
}
} else {
/* We start removing current item in slot, and the selected item will be installed afterwards */
slot->installationTime = -slot->item->craftitem.installationTime;
AII_AddItemToSlot(base, itemTech, slot, true);
AII_AutoAddAmmo(slot);
}
} else {
/* remove weapon and ammo of next item */
AII_RemoveItemFromSlot(base, slot, false);
AII_AddItemToSlot(base, itemTech, slot, true);
AII_AutoAddAmmo(slot);
}
/* Reinit menu */
cgi->Cmd_ExecuteString("basedef_updatemenu %s", BDEF_GetIDFromItemType(slot->type));
}
/**
* @brief Buys aircraft or craftitem.
* @sa BS_SellAircraft_f
*/
static void BS_BuyAircraft_f (void)
{
int num;
const aircraft_t *aircraftTemplate;
base_t *base = B_GetCurrentSelectedBase();
if (Cmd_Argc() < 2) {
Com_Printf("Usage: %s <num>\n", Cmd_Argv(0));
return;
}
if (!base)
return;
num = atoi(Cmd_Argv(1));
if (num < 0 || num >= buyList.length)
return;
if (buyCat == FILTER_AIRCRAFT) {
int freeSpace;
if (!B_GetBuildingStatus(base, B_COMMAND)) {
CP_Popup(_("Note"), _("No command centre in this base.\nHangars are not functional.\n"));
return;
}
/* We cannot buy aircraft if there is no power in our base. */
if (!B_GetBuildingStatus(base, B_POWER)) {
CP_Popup(_("Note"), _("No power supplies in this base.\nHangars are not functional."));
return;
}
/* We cannot buy aircraft without any hangar. */
if (!AIR_AircraftAllowed(base)) {
CP_Popup(_("Note"), _("Build a hangar first."));
return;
}
aircraftTemplate = buyList.l[num].aircraft;
freeSpace = AIR_CalculateHangarStorage(aircraftTemplate, base, 0);
/* Check free space in hangars. */
if (freeSpace < 0) {
Com_Printf("BS_BuyAircraft_f: something bad happened, AIR_CalculateHangarStorage returned -1!\n");
return;
}
if (freeSpace == 0) {
CP_Popup(_("Notice"), _("You cannot buy this aircraft.\nNot enough space in hangars.\n"));
return;
} else {
const int price = BS_GetAircraftBuyingPrice(aircraftTemplate);
if (ccs.credits < price) {
CP_Popup(_("Notice"), _("You cannot buy this aircraft.\nNot enough credits.\n"));
return;
} else {
/* Hangar capacities are being updated in AIR_NewAircraft().*/
BS_RemoveAircraftFromMarket(aircraftTemplate, 1);
CP_UpdateCredits(ccs.credits - price);
AIR_NewAircraft(base, aircraftTemplate);
Cmd_ExecuteString(va("buy_type %s", INV_GetFilterType(FILTER_AIRCRAFT)));
}
}
}
}
