dave/openttd
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add rate limit for object construction

Browse Source
This commit is contained in:
Jonathan G Rennison
2020-09-14 23:06:49 +01:00
parent f0f5ce5840
commit 2d350d26db
10 changed files with 53 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
src/object_cmd.cpp
View File

@@ -304,11 +304,13 @@ CommandCost CmdBuildObject(TileIndex tile, DoCommandFlag flags, uint32 p1, uint3
}
int hq_score = 0;
int build_object_size = 0;
Company *c = nullptr;
switch (type) {
case OBJECT_TRANSMITTER:
case OBJECT_LIGHTHOUSE:
if (!IsTileFlat(tile)) return_cmd_error(STR_ERROR_FLAT_LAND_REQUIRED);
build_object_size = 1;
break;
case OBJECT_OWNED_LAND:
@@ -344,8 +346,18 @@ CommandCost CmdBuildObject(TileIndex tile, DoCommandFlag flags, uint32 p1, uint3
/* This may never be constructed using this method. */
return CMD_ERROR;
default: // i.e. NewGRF provided.
default: { // i.e. NewGRF provided.
const ObjectSpec *spec = ObjectSpec::Get(type);
build_object_size = GB(spec->size, 0, 4) * GB(spec->size, 4, 4);
break;
}
}
if (build_object_size > 0) {
c = Company::GetIfValid(_current_company);
if (c != nullptr && (int)GB(c->build_object_limit, 16, 16) < build_object_size) {
return_cmd_error(STR_ERROR_BUILD_OBJECT_LIMIT_REACHED);
}
}
if (flags & DC_EXEC) {
@@ -355,6 +367,7 @@ CommandCost CmdBuildObject(TileIndex tile, DoCommandFlag flags, uint32 p1, uint3
if (type == OBJECT_HQ) UpdateCompanyHQ(tile, hq_score);
if (type == OBJECT_OWNED_LAND && c != nullptr) c->purchase_land_limit -= 1 << 16;
if (build_object_size > 0 && c != nullptr) c->build_object_limit -= build_object_size << 16;
}
cost.AddCost(ObjectSpec::Get(type)->GetBuildCost() * size_x * size_y);