From 9b6b2cabc187f3cb72a53d396418ab1b9ebd2933 Mon Sep 17 00:00:00 2001 From: truebrain Date: Mon, 19 Dec 2011 21:05:36 +0000 Subject: (svn r23633) -Add: allow most build commands from GameScript given a CompanyMode is active in that scope --- src/script/api/script_company.cpp | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/script/api/script_company.cpp') diff --git a/src/script/api/script_company.cpp b/src/script/api/script_company.cpp index 6d11c17ac..efc2848a5 100644 --- a/src/script/api/script_company.cpp +++ b/src/script/api/script_company.cpp @@ -191,6 +191,7 @@ /* static */ bool ScriptCompany::SetLoanAmount(int32 loan) { + EnforcePrecondition(false, ScriptObject::GetCompany() != OWNER_DEITY); EnforcePrecondition(false, loan >= 0); EnforcePrecondition(false, (loan % GetLoanInterval()) == 0); EnforcePrecondition(false, loan <= GetMaxLoanAmount()); @@ -205,6 +206,7 @@ /* static */ bool ScriptCompany::SetMinimumLoanAmount(int32 loan) { + EnforcePrecondition(false, ScriptObject::GetCompany() != OWNER_DEITY); EnforcePrecondition(false, loan >= 0); int32 over_interval = loan % GetLoanInterval(); @@ -219,6 +221,7 @@ /* static */ bool ScriptCompany::BuildCompanyHQ(TileIndex tile) { + EnforcePrecondition(false, ScriptObject::GetCompany() != OWNER_DEITY); EnforcePrecondition(false, ::IsValidTile(tile)); return ScriptObject::DoCommand(tile, OBJECT_HQ, 0, CMD_BUILD_OBJECT); -- cgit v1.2.3-54-g00ecf