summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/tunnelbridge_cmd.cpp199
1 files changed, 85 insertions, 114 deletions
diff --git a/src/tunnelbridge_cmd.cpp b/src/tunnelbridge_cmd.cpp
index 386b1b549..06d65d077 100644
--- a/src/tunnelbridge_cmd.cpp
+++ b/src/tunnelbridge_cmd.cpp
@@ -179,35 +179,17 @@ bool CheckBridge_Stuff(BridgeType bridge_type, uint bridge_len, DoCommandFlag fl
*/
CommandCost CmdBuildBridge(TileIndex end_tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
{
- BridgeType bridge_type;
RailType railtype = INVALID_RAILTYPE;
RoadTypes roadtypes = ROADTYPES_NONE;
- uint x;
- uint y;
- uint sx;
- uint sy;
- TileIndex tile_start;
- TileIndex tile_end;
- Slope tileh_start;
- Slope tileh_end;
- uint z_start;
- uint z_end;
- TileIndex tile;
- TileIndexDiff delta;
- uint bridge_len;
- Axis direction;
CommandCost cost(EXPENSES_CONSTRUCTION);
- CommandCost ret;
- bool replace_bridge = false;
- BridgeType replaced_bridge_type;
- TransportType transport_type;
+ Owner owner;
/* unpack parameters */
- bridge_type = GB(p2, 0, 8);
+ BridgeType bridge_type = GB(p2, 0, 8);
if (p1 >= MapSize()) return CMD_ERROR;
- transport_type = (TransportType)GB(p2, 15, 2);
+ TransportType transport_type = (TransportType)GB(p2, 15, 2);
/* type of bridge */
switch (transport_type) {
@@ -225,42 +207,42 @@ CommandCost CmdBuildBridge(TileIndex end_tile, DoCommandFlag flags, uint32 p1, u
break;
default:
- /* Airports don't have tunnels. */
+ /* Airports don't have bridges. */
return CMD_ERROR;
}
+ TileIndex tile_start = p1;
+ TileIndex tile_end = end_tile;
- x = TileX(end_tile);
- y = TileY(end_tile);
- sx = TileX(p1);
- sy = TileY(p1);
+ if (tile_start == tile_end) {
+ return_cmd_error(STR_ERROR_CANNOT_START_AND_END_ON);
+ }
- /* check if valid, and make sure that (x,y) are smaller than (sx,sy) */
- if (x == sx) {
- if (y == sy) return_cmd_error(STR_ERROR_CANNOT_START_AND_END_ON);
+ Axis direction;
+ if (TileX(tile_start) == TileX(tile_end)) {
direction = AXIS_Y;
- if (y > sy) Swap(y, sy);
- } else if (y == sy) {
+ } else if (TileY(tile_start) == TileY(tile_end)) {
direction = AXIS_X;
- if (x > sx) Swap(x, sx);
} else {
return_cmd_error(STR_ERROR_START_AND_END_MUST_BE_IN);
}
- bridge_len = sx + sy - x - y - 1;
+ if (tile_end < tile_start) Swap(tile_start, tile_end);
+
+ uint bridge_len = GetTunnelBridgeLength(tile_start, tile_end);
if (transport_type != TRANSPORT_WATER) {
/* set and test bridge length, availability */
if (!CheckBridge_Stuff(bridge_type, bridge_len, flags)) return_cmd_error(STR_ERROR_CAN_T_BUILD_BRIDGE_HERE);
}
/* retrieve landscape height and ensure it's on land */
- tile_start = TileXY(x, y);
- tile_end = TileXY(sx, sy);
if (IsWaterTile(tile_start) || IsWaterTile(tile_end)) {
return_cmd_error(STR_ERROR_ENDS_OF_BRIDGE_MUST_BOTH);
}
- tileh_start = GetTileSlope(tile_start, &z_start);
- tileh_end = GetTileSlope(tile_end, &z_end);
+ uint z_start;
+ uint z_end;
+ Slope tileh_start = GetTileSlope(tile_start, &z_start);
+ Slope tileh_end = GetTileSlope(tile_end, &z_end);
CommandCost terraform_cost_north = CheckBridgeSlopeNorth(direction, &tileh_start, &z_start);
CommandCost terraform_cost_south = CheckBridgeSlopeSouth(direction, &tileh_end, &z_end);
@@ -301,8 +283,7 @@ CommandCost CmdBuildBridge(TileIndex end_tile, DoCommandFlag flags, uint32 p1, u
}
cost.AddCost((bridge_len + 1) * _price.clear_bridge); // The cost of clearing the current bridge.
- replace_bridge = true;
- replaced_bridge_type = GetBridgeType(tile_start);
+ owner = GetTileOwner(tile_start);
/* Do not remove road types when upgrading a bridge */
roadtypes |= GetRoadTypes(tile_start);
@@ -312,7 +293,7 @@ CommandCost CmdBuildBridge(TileIndex end_tile, DoCommandFlag flags, uint32 p1, u
bool allow_on_slopes = (_settings_game.construction.build_on_slopes && transport_type != TRANSPORT_WATER);
/* Try and clear the start landscape */
- ret = DoCommand(tile_start, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+ CommandCost ret = DoCommand(tile_start, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
if (CmdFailed(ret)) return ret;
cost = ret;
@@ -331,13 +312,9 @@ CommandCost CmdBuildBridge(TileIndex end_tile, DoCommandFlag flags, uint32 p1, u
cost.AddCost(terraform_cost_south);
if (transport_type == TRANSPORT_WATER && (tileh_start == SLOPE_FLAT || tileh_end == SLOPE_FLAT)) return_cmd_error(STR_ERROR_LAND_SLOPED_IN_WRONG_DIRECTION);
- }
- if (!replace_bridge) {
TileIndex Heads[] = {tile_start, tile_end};
- int i;
-
- for (i = 0; i < 2; i++) {
+ for (int i = 0; i < 2; i++) {
if (MayHaveBridgeAbove(Heads[i])) {
if (IsBridgeAbove(Heads[i])) {
TileIndex north_head = GetNorthernBridgeEnd(Heads[i]);
@@ -350,12 +327,63 @@ CommandCost CmdBuildBridge(TileIndex end_tile, DoCommandFlag flags, uint32 p1, u
}
}
}
+
+ TileIndexDiff delta = (direction == AXIS_X ? TileDiffXY(1, 0) : TileDiffXY(0, 1));
+ for (TileIndex tile = tile_start + delta; tile != tile_end; tile += delta) {
+ if (GetTileMaxZ(tile) > z_start) return_cmd_error(STR_BRIDGE_TOO_LOW_FOR_TERRAIN);
+
+ if (MayHaveBridgeAbove(tile) && IsBridgeAbove(tile)) {
+ /* Disallow crossing bridges for the time being */
+ return_cmd_error(STR_ERROR_MUST_DEMOLISH_BRIDGE_FIRST);
+ }
+
+ switch (GetTileType(tile)) {
+ case MP_WATER:
+ if (!IsWater(tile) && !IsCoast(tile)) goto not_valid_below;
+ break;
+
+ case MP_RAILWAY:
+ if (!IsPlainRail(tile)) goto not_valid_below;
+ break;
+
+ case MP_ROAD:
+ if (IsRoadDepot(tile)) goto not_valid_below;
+ break;
+
+ case MP_TUNNELBRIDGE:
+ if (IsTunnel(tile)) break;
+ if (direction == DiagDirToAxis(GetTunnelBridgeDirection(tile))) goto not_valid_below;
+ if (z_start < GetBridgeHeight(tile)) goto not_valid_below;
+ break;
+
+ case MP_UNMOVABLE:
+ if (!IsOwnedLand(tile)) goto not_valid_below;
+ break;
+
+ case MP_CLEAR:
+ break;
+
+ default:
+ not_valid_below:;
+ /* try and clear the middle landscape */
+ ret = DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+ if (CmdFailed(ret)) return ret;
+ cost.AddCost(ret);
+ break;
+ }
+
+ if (flags & DC_EXEC) {
+ SetBridgeMiddle(tile, direction);
+ MarkTileDirtyByTile(tile);
+ }
+ }
+
+ owner = _current_company;
}
/* do the drill? */
if (flags & DC_EXEC) {
DiagDirection dir = AxisToDiagDir(direction);
- Owner owner = replace_bridge ? GetTileOwner(tile_start) : _current_company;
switch (transport_type) {
case TRANSPORT_RAIL:
@@ -375,63 +403,11 @@ CommandCost CmdBuildBridge(TileIndex end_tile, DoCommandFlag flags, uint32 p1, u
default:
NOT_REACHED();
- break;
}
MarkTileDirtyByTile(tile_start);
MarkTileDirtyByTile(tile_end);
}
- delta = (direction == AXIS_X ? TileDiffXY(1, 0) : TileDiffXY(0, 1));
- for (tile = tile_start + delta; tile != tile_end; tile += delta) {
- if (GetTileMaxZ(tile) > z_start) return_cmd_error(STR_BRIDGE_TOO_LOW_FOR_TERRAIN);
-
- if (MayHaveBridgeAbove(tile) && IsBridgeAbove(tile) && !replace_bridge) {
- /* Disallow crossing bridges for the time being */
- return_cmd_error(STR_ERROR_MUST_DEMOLISH_BRIDGE_FIRST);
- }
-
- switch (GetTileType(tile)) {
- case MP_WATER:
- if (!IsWater(tile) && !IsCoast(tile)) goto not_valid_below;
- break;
-
- case MP_RAILWAY:
- if (!IsPlainRail(tile)) goto not_valid_below;
- break;
-
- case MP_ROAD:
- if (IsRoadDepot(tile)) goto not_valid_below;
- break;
-
- case MP_TUNNELBRIDGE:
- if (IsTunnel(tile)) break;
- if (replace_bridge) break;
- if (direction == DiagDirToAxis(GetTunnelBridgeDirection(tile))) goto not_valid_below;
- if (z_start < GetBridgeHeight(tile)) goto not_valid_below;
- break;
-
- case MP_UNMOVABLE:
- if (!IsOwnedLand(tile)) goto not_valid_below;
- break;
-
- case MP_CLEAR:
- break;
-
- default:
-not_valid_below:;
- /* try and clear the middle landscape */
- ret = DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
- if (CmdFailed(ret)) return ret;
- cost.AddCost(ret);
- break;
- }
-
- if (flags & DC_EXEC) {
- SetBridgeMiddle(tile, direction);
- MarkTileDirtyByTile(tile);
- }
- }
-
if ((flags & DC_EXEC) && transport_type == TRANSPORT_RAIL) {
Track track = AxisToTrack(direction);
AddSideToSignalBuffer(tile_start, INVALID_DIAGDIR, _current_company);
@@ -466,16 +442,8 @@ not_valid_below:;
*/
CommandCost CmdBuildTunnel(TileIndex start_tile, DoCommandFlag flags, uint32 p1, uint32 p2, const char *text)
{
- TileIndexDiff delta;
- TileIndex end_tile;
- DiagDirection direction;
- Slope start_tileh;
- Slope end_tileh;
TransportType transport_type = (TransportType)GB(p1, 9, 1);
- uint start_z;
- uint end_z;
CommandCost cost(EXPENSES_CONSTRUCTION);
- CommandCost ret;
_build_tunnel_endtile = 0;
if (transport_type == TRANSPORT_RAIL) {
@@ -485,13 +453,15 @@ CommandCost CmdBuildTunnel(TileIndex start_tile, DoCommandFlag flags, uint32 p1,
if (!AreValidRoadTypes(rts) || !HasRoadTypesAvail(_current_company, rts)) return CMD_ERROR;
}
- start_tileh = GetTileSlope(start_tile, &start_z);
- direction = GetInclinedSlopeDirection(start_tileh);
+ uint start_z;
+ uint end_z;
+ Slope start_tileh = GetTileSlope(start_tile, &start_z);
+ DiagDirection direction = GetInclinedSlopeDirection(start_tileh);
if (direction == INVALID_DIAGDIR) return_cmd_error(STR_ERROR_SITE_UNSUITABLE_FOR_TUNNEL);
if (IsWaterTile(start_tile)) return_cmd_error(STR_ERROR_CAN_T_BUILD_ON_WATER);
- ret = DoCommand(start_tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+ CommandCost ret = DoCommand(start_tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
if (CmdFailed(ret)) return ret;
/* XXX - do NOT change 'ret' in the loop, as it is used as the price
@@ -499,7 +469,7 @@ CommandCost CmdBuildTunnel(TileIndex start_tile, DoCommandFlag flags, uint32 p1,
* cost before the loop will yield different costs depending on start-
* position, because of increased-cost-by-length: 'cost += cost >> 3' */
- delta = TileOffsByDiagDir(direction);
+ TileIndexDiff delta = TileOffsByDiagDir(direction);
DiagDirection tunnel_in_way_dir;
if (DiagDirToAxis(direction) == AXIS_Y) {
tunnel_in_way_dir = (TileX(start_tile) < (MapMaxX() / 2)) ? DIAGDIR_SW : DIAGDIR_NE;
@@ -507,15 +477,16 @@ CommandCost CmdBuildTunnel(TileIndex start_tile, DoCommandFlag flags, uint32 p1,
tunnel_in_way_dir = (TileY(start_tile) < (MapMaxX() / 2)) ? DIAGDIR_SE : DIAGDIR_NW;
}
- end_tile = start_tile;
+ TileIndex end_tile = start_tile;
- /** Tile shift coeficient. Will decrease for very long tunnels to avoid exponential growth of price*/
+ /* Tile shift coeficient. Will decrease for very long tunnels to avoid exponential growth of price*/
int tiles_coef = 3;
- /** Number of tiles from start of tunnel */
+ /* Number of tiles from start of tunnel */
int tiles = 0;
- /** Number of tiles at which the cost increase coefficient per tile is halved */
+ /* Number of tiles at which the cost increase coefficient per tile is halved */
int tiles_bump = 25;
+ Slope end_tileh;
for (;;) {
end_tile += delta;
if (!IsValidTile(end_tile)) return_cmd_error(STR_TUNNEL_THROUGH_MAP_BORDER);