/* Create additional river tiles around possible lock locations to connect them. */
	for (uint tile = 0; tile != MapSize(); tile++) {
		if (IsValidTile(tile) && IsTileType(tile, MP_WATER) && IsRiver(tile) && IsInclinedSlope(GetTileSlope(tile))) {
			DoCommand(tile, 0, 0, DC_EXEC | CommandFlagsToDCFlags(GetCommandFlags(CMD_BUILD_LOCK)), CMD_BUILD_LOCK);

			Slope slope = GetTileSlope(tile);
			DiagDirection dir = GetInclinedSlopeDirection(slope);
			int delta_side = TileOffsByDiagDir(ChangeDiagDir(dir, DIAGDIRDIFF_90RIGHT));
			int delta_mid = TileOffsByDiagDir(dir);

			TileIndex tile_upper_centre = tile + 2 * delta_mid;
			TileIndex tile_upper_right = tile + delta_mid + delta_side;
			TileIndex tile_upper_left = tile + delta_mid - delta_side;
			TileIndex tile_upper_upper = HasTileWaterGround(tile_upper_centre) ? INVALID_TILE : tile_upper_centre;
			TileIndex tile_upper_upper_right = HasTileWaterGround(tile_upper_right) ? tile_upper_centre + delta_side : INVALID_TILE;
			TileIndex tile_upper_upper_left = HasTileWaterGround(tile_upper_left) ? tile_upper_centre - delta_side : INVALID_TILE;

			TileIndex tile_lower_centre = tile - 2 * delta_mid;
			TileIndex tile_lower_right = tile - delta_mid + delta_side;
			TileIndex tile_lower_left = tile - delta_mid - delta_side;
			TileIndex tile_lower_lower = HasTileWaterGround(tile_lower_centre) ? INVALID_TILE : tile_lower_centre;
			TileIndex tile_lower_lower_right = HasTileWaterGround(tile_lower_right) ? tile_lower_centre + delta_side : INVALID_TILE;
			TileIndex tile_lower_lower_left = HasTileWaterGround(tile_lower_left) ? tile_lower_centre - delta_side : INVALID_TILE;

			TileIndex tiles[] = {tile_upper_upper, tile_upper_upper_right, tile_upper_upper_left, tile_lower_lower, tile_lower_lower_right, tile_lower_lower_left};
			for (int i = 0; i < lengthof(tiles); i++) {
				if (tiles[i] != INVALID_TILE && !IsWaterTile(tiles[i]) && IsTileFlat(tiles[i])) {
					MakeRiver(tiles[i], Random());
					/* Remove desert directly around the river tile. */
					CircularTileSearch(&tiles[i], 5, RiverModifyDesertZone, NULL);
				}
			}
		}
	}