Function ClearElementAt

src/openrct2/world/Map.cpp:1390–1475

* Clears the provided element properly from a certain tile, and updates * the pointer (when needed) passed to this function to point to the next element. */

     * the pointer (when needed) passed to this function to point to the next element.
     */
    void ClearElementAt(const CoordsXY& loc, TileElement** elementPtr)
    {
        auto& gameState = getGameState();

        TileElement* element = *elementPtr;
        switch (element->getType())
        {
            case TileElementType::Surface:
                element->baseHeight = kMinimumLandHeight;
                element->clearanceHeight = kMinimumLandHeight;
                element->owner = 0;
                element->asSurface()->SetSlope(kTileSlopeFlat);
                element->asSurface()->SetSurfaceObjectIndex(0);
                element->asSurface()->SetEdgeObjectIndex(0);
                element->asSurface()->SetGrassLength(GRASS_LENGTH_CLEAR_0);
                element->asSurface()->SetOwnership(OWNERSHIP_UNOWNED);
                element->asSurface()->SetParkFences(0);
                element->asSurface()->SetWaterHeight(0);
                // Because this element is not completely removed, the pointer must be updated manually
                // The rest of the elements are removed from the array, so the pointer doesn't need to be updated.
                (*elementPtr)++;
                break;
            case TileElementType::Entrance:
            {
                int32_t rotation = element->getDirectionWithOffset(1);
                auto seqLoc = loc;
                switch (element->asEntrance()->GetSequenceIndex())
                {
                    case 1:
                        seqLoc += CoordsDirectionDelta[rotation];
                        break;
                    case 2:
                        seqLoc -= CoordsDirectionDelta[rotation];
                        break;
                }
                auto parkEntranceRemoveAction = GameActions::ParkEntranceRemoveAction(CoordsXYZ{ seqLoc, element->getBaseZ() });
                auto result = GameActions::ExecuteNested(&parkEntranceRemoveAction, gameState);
                // If asking nicely did not work, forcibly remove this to avoid an infinite loop.
                if (result.error != GameActions::Status::ok)
                {
                    TileElementRemove(element);
                }
                break;
            }
            case TileElementType::Wall:
            {
                CoordsXYZD wallLocation = { loc.x, loc.y, element->getBaseZ(), element->getDirection() };
                auto wallRemoveAction = GameActions::WallRemoveAction(wallLocation);
                auto result = GameActions::ExecuteNested(&wallRemoveAction, gameState);
                // If asking nicely did not work, forcibly remove this to avoid an infinite loop.
                if (result.error != GameActions::Status::ok)
                {
                    TileElementRemove(element);
                }
            }
            break;
            case TileElementType::LargeScenery:
            {