From f4482907dabf064299c7ef50a3ff47589ccb54ff Mon Sep 17 00:00:00 2001 From: rubidium Date: Thu, 30 Aug 2007 17:17:04 +0000 Subject: (svn r11005) -Codechange: move the tiletype specific terraforming checks to the functions for those tile types. -Codechange: barren the rail grounds on terraforming. --- src/water_cmd.cpp | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'src/water_cmd.cpp') diff --git a/src/water_cmd.cpp b/src/water_cmd.cpp index 4c013857a..a3e97c734 100644 --- a/src/water_cmd.cpp +++ b/src/water_cmd.cpp @@ -802,6 +802,14 @@ static uint32 VehicleEnter_Water(Vehicle *v, TileIndex tile, int x, int y) return VETSB_CONTINUE; } +static CommandCost TerraformTile_Water(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new) +{ + /* Canals can't be terraformed */ + if (IsClearWaterTile(tile) && IsCanal(tile)) return_cmd_error(STR_MUST_DEMOLISH_CANAL_FIRST); + + return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR); +} + extern const TileTypeProcs _tile_type_water_procs = { DrawTile_Water, /* draw_tile_proc */ @@ -817,4 +825,5 @@ extern const TileTypeProcs _tile_type_water_procs = { NULL, /* get_produced_cargo_proc */ VehicleEnter_Water, /* vehicle_enter_tile_proc */ GetFoundation_Water, /* get_foundation_proc */ + TerraformTile_Water, /* terraform_tile_proc */ }; -- cgit v1.2.3-54-g00ecf