cpp/openttd-patchpack/source Files · src/script/api/script_cargolist.cpp

Files @ r27658:e733eec54ddb

Branch filter:

Location: cpp/openttd-patchpack/source/src/script/api/script_cargolist.cpp

r27658:e733eec54ddb 1.9 KiB text/x-c Show Annotation Show as Raw Download as Raw

Jonathan G Rennison

Change: Add separate setting for server sent commands per frame limit (#11023)

Set a higher default value for this setting.
Use the higher of this and existing commands per frame limit
setting for server-originating commands, e.g. GS.

This is to support the GSAsyncMode class.
This also avoids undue throttling when more than one
script is in operation (e.g. AIs).

/*
 * This file is part of OpenTTD.
 * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
 * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
 */

/** @file script_cargolist.cpp Implementation of ScriptCargoList and friends. */

#include "../../stdafx.h"
#include "script_cargolist.hpp"
#include "script_industry.hpp"
#include "script_station.hpp"
#include "../../cargotype.h"
#include "../../industry.h"
#include "../../station_base.h"

#include "../../safeguards.h"

ScriptCargoList::ScriptCargoList()
{
	for (const CargoSpec *cs : CargoSpec::Iterate()) {
		this->AddItem(cs->Index());
	}
}

ScriptCargoList_IndustryAccepting::ScriptCargoList_IndustryAccepting(IndustryID industry_id)
{
	if (!ScriptIndustry::IsValidIndustry(industry_id)) return;

	Industry *ind = ::Industry::Get(industry_id);
	for (const auto &a : ind->accepted) {
		if (::IsValidCargoID(a.cargo)) {
			this->AddItem(a.cargo);
		}
	}
}

ScriptCargoList_IndustryProducing::ScriptCargoList_IndustryProducing(IndustryID industry_id)
{
	if (!ScriptIndustry::IsValidIndustry(industry_id)) return;

	Industry *ind = ::Industry::Get(industry_id);
	for (const auto &p : ind->produced) {
		if (::IsValidCargoID(p.cargo)) {
			this->AddItem(p.cargo);
		}
	}
}

ScriptCargoList_StationAccepting::ScriptCargoList_StationAccepting(StationID station_id)
{
	if (!ScriptStation::IsValidStation(station_id)) return;

	Station *st = ::Station::Get(station_id);
	for (CargoID i = 0; i < NUM_CARGO; i++) {
		if (HasBit(st->goods[i].status, GoodsEntry::GES_ACCEPTANCE)) this->AddItem(i);
	}
}