Function TileLoop_Station

src/station_cmd.cpp:3735–3802

static void TileLoop_Station(TileIndex tile)
{
	auto *st = BaseStation::GetByTile(tile);
	switch (GetStationType(tile)) {
		case StationType::Airport:
			TriggerAirportTileAnimation(Station::From(st), tile, AirportAnimationTrigger::TileLoop);
			break;

		case StationType::Rail:
		case StationType::RailWaypoint:
			TriggerStationAnimation(st, tile, StationAnimationTrigger::TileLoop);
			break;

		case StationType::Dock:
			if (!IsTileFlat(tile)) break; // only handle water part
			[[fallthrough]];

		case StationType::Oilrig: //(station part)
		case StationType::Buoy:
			TileLoop_Water(tile);
			break;

		case StationType::Truck:
		case StationType::Bus:
			TriggerRoadStopAnimation(st, tile, StationAnimationTrigger::TileLoop);
			break;

		case StationType::RoadWaypoint: {
			switch (_settings_game.game_creation.landscape) {
				case LandscapeType::Arctic:
					if (IsRoadWaypointOnSnowOrDesert(tile) != (GetTileZ(tile) > GetSnowLine())) {
						ToggleRoadWaypointOnSnowOrDesert(tile);
						MarkTileDirtyByTile(tile);
					}
					break;

				case LandscapeType::Tropic:
					if (GetTropicZone(tile) == TROPICZONE_DESERT && !IsRoadWaypointOnSnowOrDesert(tile)) {
						ToggleRoadWaypointOnSnowOrDesert(tile);
						MarkTileDirtyByTile(tile);
					}
					break;

				default: break;
			}

			HouseZone new_zone = HouseZone::TownEdge;
			const Town *t = ClosestTownFromTile(tile, UINT_MAX);
			if (t != nullptr) {
				new_zone = GetTownRadiusGroup(t, tile);
			}

			/* Adjust road ground type depending on 'new_zone' */
			Roadside new_rs = new_zone != HouseZone::TownEdge ? Roadside::Paved : Roadside::Grass;
			Roadside cur_rs = GetRoadWaypointRoadside(tile);

			if (new_rs != cur_rs) {
				SetRoadWaypointRoadside(tile, cur_rs == Roadside::Barren ? new_rs : Roadside::Barren);