| 1 | /* Make sure there are no adjacent or incompatible ship docking areas */
| 1 | /**
|
|---|
| 2 | TileIndex tile_adj;
| 2 | * Is this tile a target for ships to get to a nearby dock?
|
|---|
| 3 | Axis axis_cur = DiagDirToAxis(direction);
| 3 | * @param tile Tile to query
|
|---|
| | | 4 | * @param diagdir Diagonal direction to compare against or INVALID_DIAGDIR
|
|---|
| | | 5 | * @return True if is a target for ships to get to this tile
|
|---|
| | | 6 | */
|
|---|
| | | 7 | static inline bool IsTileDock(TileIndex tile, DiagDirection diagdir = INVALID_DIAGDIR)
|
|---|
| | | 8 | {
|
|---|
| | | 9 | Axis axis = diagdir == INVALID_DIAGDIR ? INVALID_AXIS : DiagDirToAxis(diagdir);
|
|---|
| 5 | if (axis_cur == AXIS_Y) {
| 11 | for (DiagDirection rot = DIAGDIR_BEGIN; rot < DIAGDIR_END; rot++) {
|
|---|
| 6 | tile_adj = tile_cur + TileDiffXY(-2, 0);
| 12 | TileIndex tc = TileAddByDiagDir(tile, rot);
|
|---|
| 7 | if (IsTileType(tile_adj, MP_STATION) && IsOilRig(tile_adj)) return_cmd_error(STR_ERROR_SITE_UNSUITABLE);
| 13 | if (IsTileType(tc, MP_STATION) && (IsDock(tc) || IsOilRig(tc))) {
|
|---|
| 8 | if (IsTileType(tile_adj, MP_INDUSTRY) && GetIndustryGfx(tile_adj) == GFX_OILRIG_1) return_cmd_error(STR_ERROR_SITE_UNSUITABLE);
| 14 | Station *dock = Station::GetByTile(tc);
|
|---|
| | | 15 | TileIndex docking_location = TILE_ADD(dock->dock_tile, ToTileIndexDiff(GetDockOffset(dock->dock_tile)));
|
|---|
| | | 16 | if (axis == INVALID_AXIS) {
|
|---|
| | | 17 | return tile == docking_location;
|
|---|
| | | 18 | }
|
|---|
| | | 19 | else {
|
|---|
| | | 20 | if (tile == docking_location) {
|
|---|
| | | 21 | Axis axis_tc = DiagDirToAxis(rot);
|
|---|
| | | 22 | return axis != axis_tc;
|
|---|
| | | 23 | }
|
|---|
| | | 24 | }
|
|---|
| | | 25 | }
|
|---|
| | | 26 | if (rot == DIAGDIR_NE && IsTileType(tc + TileDiffXY(-1, 0), MP_INDUSTRY) && GetIndustryGfx(tc + TileDiffXY(-1, 0)) == GFX_OILRIG_1) return true;
|
|---|
| 11 | tile_adj = tile_cur + (axis_cur == AXIS_X ? TileDiffXY(0, -1) : TileDiffXY(1, 0));
| 11 | return false;
|
|---|
| 12 | if (IsDockTile(tile_adj)) {
| 12 | } |
|---|
| 13 | Station *st = Station::GetByTile(tile_adj);
| | |
|---|
| 14 | tile_adj = st->dock_tile;
| | |
|---|
| 15 | Axis axis_adj = DiagDirToAxis(GetDockDirection(tile_adj));
| | |
|---|
| 16 | if (axis_cur != axis_adj) return_cmd_error(STR_ERROR_TOO_CLOSE_TO_ANOTHER_DOCK);
| | |
|---|
| 17 | }
| | |
|---|
| 18 |
| | |
|---|
| 19 | tile_adj = tile_cur - (axis_cur == AXIS_X ? TileDiffXY(0, -1) : TileDiffXY(1, 0));
| | |
|---|
| 20 | if (IsDockTile(tile_adj)) {
| | |
|---|
| 21 | Station *st = Station::GetByTile(tile_adj);
| | |
|---|
| 22 | tile_adj = st->dock_tile;
| | |
|---|
| 23 | Axis axis_adj = DiagDirToAxis(GetDockDirection(tile_adj));
| | |
|---|
| 24 | if (axis_cur != axis_adj) return_cmd_error(STR_ERROR_TOO_CLOSE_TO_ANOTHER_DOCK);
| | |
|---|
| 25 | } | | |
|---|