void TShipsControlConstruct::Player(TPlanet * APlanet, TShipType::E AShipType, int ACount, Globals::TPlayer * APlayer)
    {
        // Нельзя строить непонятное количество юнитов
        if (ACount <= 0)
        {
            TEngine::Log->Write("Count", __func__, __FILE__);
            return;
        }
        // Нельзя строить если планета в бою
        if (APlanet->Timer[TPlanetTimer::Battle])
        {
            TEngine::Log->Write("Battle", __func__, __FILE__);
            return;
        }
        // Нельзя строить если технология закрыта
        if (APlayer->PlanetarProfile->Tech(AShipType, TShipTech::Active)->Value == 0)
        {
            TEngine::Log->Write("Tech", __func__, __FILE__);
            return;
        }
        // Определим параметры будущего юнита
        bool TmpStationary = APlayer->PlanetarProfile->Tech(AShipType, TShipTech::Stationary)->Supported;
        // Проверка постройки нестационарнго флота
        if (!APlanet->IsManned())
        {
            // Нельзя строить на чужой планете
            if (!APlanet->Owner->IsRoleFriend(APlayer))
            {
                TEngine::Log->Write("Role", __func__, __FILE__);
                return;
            }
            // На нежилых можно строить только стационарки
            if (!TmpStationary)
            {
                TEngine::Log->Write("Manned", __func__, __FILE__);
                return;
            }
        }
        // На жилых не стационарный флот можно строить только если есть верфь
        if ((!TmpStationary)
            && (!true/*APlanet->Constructors->ContainsKey(APlayer)*/))
        {
            TEngine::Log->Write("Shipyard", __func__, __FILE__);
            return;
        }
        // Иначе построим кораблик
        Execute(APlanet, AShipType, ACount, APlayer);
    }