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

Add console command to merge two companies

Browse Source
This commit is contained in:
Jonathan G Rennison
2024-05-28 17:58:33 +01:00
parent f2f8692fb2
commit cbea3b8b46
6 changed files with 74 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
src/company_cmd.cpp
View File

@@ -931,6 +931,7 @@ void CompanyAdminRemove(CompanyID company_id, CompanyRemoveReason reason)
* - bits 0..15: CompanyCtrlAction
* - bits 16..23: CompanyID
* - bits 24..31: CompanyRemoveReason (with CCA_DELETE)
* - bits 24..31: CompanyID to merge (with CCA_MERGE)
* @param p2 ClientID
* @param text unused
* @return the cost of this operation or an error
@@ -1071,6 +1072,38 @@ CommandCost CmdCompanyCtrl(TileIndex tile, DoCommandFlag flags, uint32_t p1, uin
break;
}
case CCA_MERGE: {
Company *c = Company::GetIfValid(company_id);
if (c == nullptr) return CMD_ERROR;
CompanyID to_merge_id = (CompanyID)GB(p1, 24, 8);
if (to_merge_id == company_id) return CMD_ERROR;
Company *to_merge = Company::GetIfValid(to_merge_id);
if (to_merge == nullptr) return CMD_ERROR;
if (!(flags & DC_EXEC)) return CommandCost();
SubtractMoneyFromAnyCompany(c, CommandCost(EXPENSES_OTHER, to_merge->current_loan - to_merge->money));
DEBUG(desync, 1, "merge_companies: %s, company_id: %u, merged_company_id: %u", debug_date_dumper().HexDate(), company_id, to_merge_id);
CompanyNewsInformation *cni = new CompanyNewsInformation(to_merge, c);
SetDParam(0, STR_NEWS_COMPANY_MERGER_TITLE);
SetDParam(1, STR_NEWS_MERGER_TAKEOVER_TITLE);
SetDParamStr(2, cni->company_name);
SetDParamStr(3, cni->other_company_name);
AddCompanyNewsItem(STR_MESSAGE_NEWS_FORMAT, cni);
AI::BroadcastNewEvent(new ScriptEventCompanyMerger(to_merge_id, company_id));
Game::NewEvent(new ScriptEventCompanyMerger(to_merge_id, company_id));
ChangeOwnershipOfCompanyItems(to_merge_id, company_id);
PostAcquireCompany(to_merge);
break;
}
default: return CMD_ERROR;
}