Function PoolSetWeapons

engine/Poseidon/UI/OptionsUI.cpp:1376–1432

        if (!weapon)
        {
            continue;
        }
        veh->AddWeaponCargo(weapon, mh.weapons[i].count);
    }

    for (int i = 0; i < mh.magazines.Size(); i++)
    {
        RString name = mh.magazines[i].name;
        Ref<MagazineType> magazine = MagazineTypes.New(name);
        if (!magazine)
        {
            continue;
        }
        veh->AddMagazineCargo(magazine, mh.magazines[i].count);
    }

    mh.weapons.Clear();
    mh.magazines.Clear();

    return GameValue();
}

GameValue PoolSetWeapons(const GameState* state, GameValuePar oper1)
{
    Object* obj = ::GetObject(oper1);
    if (!obj)
    {
        return GameValue();
    }

    VehicleSupply* veh = dyn_cast<VehicleSupply>(obj);
    if (!veh)
    {
        return GameValue();
    }

    int i = GetGCampaignHistory().battles.Size() - 1;
    if (i < 0)
    {
        return GameValue();
    }
    BattleHistory& bh = GetGCampaignHistory().battles[i];
    i = bh.missions.Size() - 1;
    if (i < 0)
    {
        return GameValue();
    }
    MissionHistory& mh = bh.missions[i];

    // mh.weapons.Clear();
    // mh.magazines.Clear();

    for (int i = 0; i < veh->GetWeaponCargoSize(); i++)
    {
        const WeaponType* weapon = veh->GetWeaponCargo(i);
        if (!weapon)
        {
            continue;