From b10eea628d07bf69c22faa6a156c337b41c15276 Mon Sep 17 00:00:00 2001 From: belugas Date: Tue, 27 Nov 2007 17:13:49 +0000 Subject: (svn r11534) -Feature(newgrf): Implement property 23h for Industries. This will add a cost to the removal of an industry using the cheat magic bulldozer. Note that the removal of regular or newgrf industries without specified removal cost will have no cost applied to. This is a difference from original spec, where a default base cost is added. --- src/industry_cmd.cpp | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'src/industry_cmd.cpp') diff --git a/src/industry_cmd.cpp b/src/industry_cmd.cpp index 28ff57720..ca920aabc 100644 --- a/src/industry_cmd.cpp +++ b/src/industry_cmd.cpp @@ -401,7 +401,7 @@ static CommandCost ClearTile_Industry(TileIndex tile, byte flags) } if (flags & DC_EXEC) delete i; - return CommandCost(); + return CommandCost(indspec->GetRemovalCost()); } static void TransportIndustryGoods(TileIndex tile) @@ -2227,6 +2227,11 @@ Money IndustrySpec::GetConstructionCost() const )) >> 8; } +Money IndustrySpec::GetRemovalCost() const +{ + return (_price.remove_house * this->removal_cost_multiplier) >> 8; +} + static CommandCost TerraformTile_Industry(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new) { if (AutoslopeEnabled()) { -- cgit v1.2.3-70-g09d2