Function MakeLake

src/landscape.cpp:1071–1089

* Make a lake centred on the given tile, of a random diameter. * @param lake_centre The middle tile of the lake. * @param height_lake The height of the lake. */

 * @param height_lake The height of the lake.
 */
static void MakeLake(TileIndex lake_centre, uint height_lake)
{
	MakeRiverAndModifyDesertZoneAround(lake_centre);
	uint diameter = RandomRange(8) + 3;

	/* Run the loop twice, so artefacts from going circular in one direction get (mostly) hidden. */
	for (uint loops = 0; loops < 2; ++loops) {
		for (TileIndex tile : SpiralTileSequence(lake_centre, diameter)) {
			if (!IsValidRiverTerminusTile(tile, height_lake)) continue;
			for (DiagDirection d = DIAGDIR_BEGIN; d < DIAGDIR_END; d++) {
				TileIndex t = tile + TileOffsByDiagDir(d);
				if (IsWaterTile(t)) {
					MakeRiverAndModifyDesertZoneAround(tile);
					break;
				}
			}
		}
	}
}

/**
 * Make wetlands around the given tile.