Function ClearTile_Road

src/road_cmd.cpp:1221–1270

}

static CommandCost ClearTile_Road(TileIndex tile, DoCommandFlags flags)
{
	switch (GetRoadTileType(tile)) {
		case RoadTileType::Normal: {
			RoadBits b = GetAllRoadBits(tile);

			/* Clear the road if only one piece is on the tile OR we are not using the DoCommandFlag::Auto flag */
			if ((HasExactlyOneBit(b) && GetRoadBits(tile, RTT_TRAM) == ROAD_NONE) || !flags.Test(DoCommandFlag::Auto)) {
				CommandCost ret(EXPENSES_CONSTRUCTION);
				for (RoadTramType rtt : _roadtramtypes) {
					if (!MayHaveRoad(tile) || GetRoadType(tile, rtt) == INVALID_ROADTYPE) continue;

					CommandCost tmp_ret = RemoveRoad(tile, flags, GetRoadBits(tile, rtt), rtt, true);
					if (tmp_ret.Failed()) return tmp_ret;
					ret.AddCost(tmp_ret.GetCost());
				}
				return ret;
			}
			return CommandCost(STR_ERROR_MUST_REMOVE_ROAD_FIRST);
		}

		case RoadTileType::Crossing: {
			CommandCost ret(EXPENSES_CONSTRUCTION);

			if (flags.Test(DoCommandFlag::Auto)) return CommandCost(STR_ERROR_MUST_REMOVE_ROAD_FIRST);

			/* Must iterate over the roadtypes in a reverse manner because
			 * tram tracks must be removed before the road bits. */
			for (RoadTramType rtt : { RTT_TRAM, RTT_ROAD }) {
				if (!MayHaveRoad(tile) || GetRoadType(tile, rtt) == INVALID_ROADTYPE) continue;

				CommandCost tmp_ret = RemoveRoad(tile, flags, GetCrossingRoadBits(tile), rtt, true);
				if (tmp_ret.Failed()) return tmp_ret;
				ret.AddCost(tmp_ret.GetCost());
			}

			if (flags.Test(DoCommandFlag::Execute)) {
				Command<CMD_LANDSCAPE_CLEAR>::Do(flags, tile);
			}
			return ret;
		}

		default:
		case RoadTileType::Depot:
			if (flags.Test(DoCommandFlag::Auto)) {
				return CommandCost(STR_ERROR_BUILDING_MUST_BE_DEMOLISHED);
			}
			return RemoveRoadDepot(tile, flags);
	}
}


struct DrawRoadTileStruct {