static const int DAY_TICKS         =  74; ///< ticks per day

static const int DAYS_IN_YEAR      = 365; ///< days per year

static const int DAYS_IN_LEAP_YEAR = 366; ///< sometimes, you need one day more...

static const int STATION_RATING_TICKS     = 185; ///< cycle duration for updating station rating

static const int STATION_ACCEPTANCE_TICKS = 250; ///< cycle duration for updating station acceptance

STR_NEWS_OFFER_OF_SUBSIDY_EXPIRED                               :{BIG_FONT}{BLACK}Offer of subsidy expired:{}{}{STRING} from {STRING2} to {STRING2} will now not attract a subsidy

STR_NEWS_SUBSIDY_WITHDRAWN_SERVICE                              :{BIG_FONT}{BLACK}Subsidy withdrawn:{}{}{STRING} service from {STRING2} to {STRING2} is no longer subsidised

STR_NEWS_ROAD_REBUILDING                                        :{BIG_FONT}{BLACK}Traffic chaos in {TOWN}!{}{}Road rebuilding programme funded by {RAW_STRING} brings 6 months of misery to motorists!

STR_NEWS_EXCLUSIVE_RIGHTS_TITLE                                 :{BIG_FONT}{BLACK}Transport monopoly!

STR_CONFIG_SETTING_VEHICLE_BREAKDOWNS_HELPTEXT                  :Control how often inadequately serviced vehicles may break down

STR_CONFIG_SETTING_SUBSIDY_MULTIPLIER                           :Subsidy multiplier: {STRING2}

STR_CONFIG_SETTING_SUBSIDY_MULTIPLIER_HELPTEXT                  :Set how much is paid for subsidised connections

STR_CONFIG_SETTING_CONSTRUCTION_COSTS                           :Construction costs: {STRING2}

STR_CONFIG_SETTING_CONSTRUCTION_COSTS_HELPTEXT                  :Set level of construction and purchase costs

STR_CONFIG_SETTING_RECESSIONS                                   :Recessions: {STRING2}

	SLV_INDUSTRY_TEXT,                      ///< 289  PR#8576 v1.11.0-RC1  Additional GS text for industries.

	SLV_MAPGEN_SETTINGS_REVAMP,             ///< 290  PR#8891 v1.11  Revamp of some mapgen settings (snow coverage, desert coverage, heightmap height, custom terrain type).

	SLV_GROUP_REPLACE_WAGON_REMOVAL,        ///< 291  PR#7441 Per-group wagon removal flag.

	SL_MAX_VERSION,                         ///< Highest possible saveload version

};

static const SaveLoad _subsidies_desc[] = {

	    SLE_VAR(Subsidy, cargo_type, SLE_UINT8),

};

static void Save_SUBS()

			accounting->Add(new SettingEntry("difficulty.initial_interest"));

			accounting->Add(new SettingEntry("difficulty.max_loan"));

			accounting->Add(new SettingEntry("difficulty.subsidy_multiplier"));

			accounting->Add(new SettingEntry("economy.feeder_payment_share"));

			accounting->Add(new SettingEntry("economy.infrastructure_maintenance"));

			accounting->Add(new SettingEntry("difficulty.vehicle_costs"));

	byte   vehicle_costs;                    ///< amount of money spent on vehicle running cost

	byte   competitor_speed;                 ///< the speed at which the AI builds

	byte   vehicle_breakdowns;               ///< likelihood of vehicles breaking down

	byte   construction_cost;                ///< how expensive is building

	byte   terrain_type;                     ///< the mountainousness of the landscape

	byte   quantity_sea_lakes;               ///< the amount of seas/lakes

	assert(!this->IsAwarded());

	this->awarded = company;

	char company_name[MAX_LENGTH_COMPANY_NAME_CHARS * MAX_CHAR_LENGTH];

	SetDParam(0, company);

	char *cn = stredup(company_name);

	/* Add a news item */

	InjectDParam(1);

	SetDParamStr(0, cn);

/**

 * Setup the string parameters for printing the subsidy at the screen, and compute the news reference for the subsidy.

 * @param s %Subsidy being printed.

 * @return Reference of the subsidy in the news system.

 */

{

	NewsReferenceType reftype1 = NR_NONE;

	NewsReferenceType reftype2 = NR_NONE;

	const CargoSpec *cs = CargoSpec::Get(s->cargo_type);

	switch (s->src_type) {

		case ST_INDUSTRY:

	}

	SetDParam(5, s->dst);

	return std::pair<NewsReferenceType, NewsReferenceType>(reftype1, reftype2);

}

	s->remaining = SUBSIDY_OFFER_MONTHS;

	s->awarded = INVALID_COMPANY;

	AddNewsItem(STR_NEWS_SERVICE_SUBSIDY_OFFERED, NT_SUBSIDIES, NF_NORMAL, reftype.first, s->src, reftype.second, s->dst);

	SetPartOfSubsidyFlag(s->src_type, s->src, POS_SRC);

	SetPartOfSubsidyFlag(s->dst_type, s->dst, POS_DST);

	for (Subsidy *s : Subsidy::Iterate()) {

		if (--s->remaining == 0) {

			if (!s->IsAwarded()) {

				AddNewsItem(STR_NEWS_OFFER_OF_SUBSIDY_EXPIRED, NT_SUBSIDIES, NF_NORMAL, reftype.first, s->src, reftype.second, s->dst);

				AI::BroadcastNewEvent(new ScriptEventSubsidyOfferExpired(s->index));

				Game::NewEvent(new ScriptEventSubsidyOfferExpired(s->index));

			} else {

				if (s->awarded == _local_company) {

					AddNewsItem(STR_NEWS_SUBSIDY_WITHDRAWN_SERVICE, NT_SUBSIDIES, NF_NORMAL, reftype.first, s->src, reftype.second, s->dst);

				}

				AI::BroadcastNewEvent(new ScriptEventSubsidyExpired(s->index));

	if (modified) {

		RebuildSubsidisedSourceAndDestinationCache();

	} else if (_settings_game.linkgraph.distribution_pax != DT_MANUAL &&

			   _settings_game.linkgraph.distribution_mail != DT_MANUAL &&

			   _settings_game.linkgraph.distribution_armoured != DT_MANUAL &&

/** Struct about subsidies, offered and awarded */

struct Subsidy : SubsidyPool::PoolItem<&_subsidy_pool> {

	CargoID cargo_type;  ///< Cargo type involved in this subsidy, CT_INVALID for invalid subsidy

	CompanyID awarded;   ///< Subsidy is awarded to this company; INVALID_COMPANY if it's not awarded to anyone

	SourceType src_type; ///< Source of subsidised path (ST_INDUSTRY or ST_TOWN)

	SourceType dst_type; ///< Destination of subsidised path (ST_INDUSTRY or ST_TOWN)

/** Constants related to subsidies */

static const uint SUBSIDY_OFFER_MONTHS         =  12; ///< Duration of subsidy offer

static const uint SUBSIDY_PAX_MIN_POPULATION   = 400; ///< Min. population of towns for subsidised pax route

static const uint SUBSIDY_CARGO_MIN_POPULATION = 900; ///< Min. population of destination town for cargo route

static const uint SUBSIDY_MAX_PCT_TRANSPORTED  =  42; ///< Subsidy will be created only for towns/industries with less % transported

static const uint SUBSIDY_MAX_DISTANCE         =  70; ///< Max. length of subsidised route (DistanceManhattan)

static const uint SUBSIDY_TOWN_CARGO_RADIUS    =   6; ///< Extent of a tile area around town center when scanning for town cargo acceptance and production (6 ~= min catchmement + min station / 2)

#endif /* SUBSIDY_BASE_H */

#include "company_type.h"

#include "cargo_type.h"

#include "news_type.h"

void DeleteSubsidyWith(SourceType type, SourceID index);

bool CheckSubsidised(CargoID cargo_type, CompanyID company, SourceType src_type, SourceID src, const Station *st);

void RebuildSubsidisedSourceAndDestinationCache();

			if (!s->IsAwarded()) {

				if (IsInsideMM(pos, 0, cap)) {

					/* Displays the two offered towns */

					SetDParam(7, _date - ymd.day + s->remaining * 32);

					DrawString(x, right, y + pos * FONT_HEIGHT_NORMAL, STR_SUBSIDIES_OFFERED_FROM_TO);

				}

		for (const Subsidy *s : Subsidy::Iterate()) {

			if (s->IsAwarded()) {

				if (IsInsideMM(pos, 0, cap)) {

					SetDParam(7, s->awarded);

					SetDParam(8, _date - ymd.day + s->remaining * 32);

strval   = STR_SUBSIDY_X1_5

[SDT_VAR]

var      = difficulty.construction_cost

type     = SLE_UINT8

from     = SLV_97