From f48cc9d4bf9c3b29a747c04ff72d2ed160609296 Mon Sep 17 00:00:00 2001
From: rubidium <rubidium@openttd.org>
Date: Thu, 23 Jul 2009 00:14:05 +0000
Subject: (svn r16923) -Codechange: move Cmd*Buoy* to waypoint_cmd.cpp and make
 them behave more like waypoints, e.g. reuse station signs of recently deleted
 buoys

---
 src/station_cmd.cpp | 73 -----------------------------------------------------
 1 file changed, 73 deletions(-)

(limited to 'src/station_cmd.cpp')

diff --git a/src/station_cmd.cpp b/src/station_cmd.cpp
index 72271a219..b3724e241 100644
--- a/src/station_cmd.cpp
+++ b/src/station_cmd.cpp
@@ -1943,44 +1943,6 @@ static CommandCost RemoveAirport(TileIndex tile, DoCommandFlag flags)
 	return cost;
 }
 
-/** Build a buoy.
- * @param tile tile where to place the bouy
- * @param flags operation to perform
- * @param p1 unused
- * @param p2 unused
- */
-CommandCost CmdBuildBuoy(TileIndex tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
-{
-	if (!IsWaterTile(tile) || tile == 0) return_cmd_error(STR_ERROR_SITE_UNSUITABLE);
-	if (MayHaveBridgeAbove(tile) && IsBridgeAbove(tile)) return_cmd_error(STR_ERROR_MUST_DEMOLISH_BRIDGE_FIRST);
-
-	if (GetTileSlope(tile, NULL) != SLOPE_FLAT) return_cmd_error(STR_ERROR_SITE_UNSUITABLE);
-
-	/* allocate and initialize new station */
-	if (!Waypoint::CanAllocateItem()) return_cmd_error(STR_ERROR_TOO_MANY_STATIONS_LOADING);
-
-	if (flags & DC_EXEC) {
-		Waypoint *st = new Waypoint(tile);
-
-		st->string_id = STR_SV_STNAME_BUOY;
-
-		st->facilities |= FACIL_DOCK;
-		st->owner = OWNER_NONE;
-
-		st->build_date = _date;
-
-		if (st->town == NULL) MakeDefaultWaypointName(st);
-
-		MakeBuoy(tile, st->index, GetWaterClass(tile));
-
-		st->UpdateVirtCoord();
-		InvalidateWindowData(WC_STATION_LIST, st->owner, 0);
-		InvalidateWindowWidget(WC_STATION_VIEW, st->index, SVW_SHIPS);
-	}
-
-	return CommandCost(EXPENSES_CONSTRUCTION, _price.build_dock);
-}
-
 /**
  * Tests whether the company's vehicles have this station in orders
  * When company == INVALID_COMPANY, then check all vehicles
@@ -2003,41 +1965,6 @@ bool HasStationInUse(StationID station, CompanyID company)
 	return false;
 }
 
-/**
- * Remove a buoy
- * @param tile TileIndex been queried
- * @param flags operation to perform
- * @return cost or failure of operation
- */
-static CommandCost RemoveBuoy(TileIndex tile, DoCommandFlag flags)
-{
-	/* XXX: strange stuff, allow clearing as invalid company when clearing landscape */
-	if (!Company::IsValidID(_current_company) && !(flags & DC_BANKRUPT)) return_cmd_error(INVALID_STRING_ID);
-
-	Waypoint *st = Waypoint::GetByTile(tile);
-
-	if (HasStationInUse(st->index, INVALID_COMPANY)) return_cmd_error(STR_BUOY_IS_IN_USE);
-	/* remove the buoy if there is a ship on tile when company goes bankrupt... */
-	if (!(flags & DC_BANKRUPT) && !EnsureNoVehicleOnGround(tile)) return CMD_ERROR;
-
-	if (flags & DC_EXEC) {
-		st->facilities &= ~FACIL_DOCK;
-
-		InvalidateWindowWidget(WC_STATION_VIEW, st->index, SVW_SHIPS);
-
-		/* We have to set the water tile's state to the same state as before the
-		 * buoy was placed. Otherwise one could plant a buoy on a canal edge,
-		 * remove it and flood the land (if the canal edge is at level 0) */
-		MakeWaterKeepingClass(tile, GetTileOwner(tile));
-		MarkTileDirtyByTile(tile);
-
-		st->UpdateVirtCoord();
-		st->delete_ctr = 0;
-	}
-
-	return CommandCost(EXPENSES_CONSTRUCTION, _price.remove_truck_station);
-}
-
 static const TileIndexDiffC _dock_tileoffs_chkaround[] = {
 	{-1,  0},
 	{ 0,  0},
-- 
cgit v1.2.3-54-g00ecf