Function ProduceIndustryGoods

src/industry_cmd.cpp:1160–1231

}

static void ProduceIndustryGoods(Industry *i)
{
	const IndustrySpec *indsp = GetIndustrySpec(i->type);

	/* play a sound? */
	if ((i->counter & 0x3F) == 0) {
		uint32_t r;
		if (Chance16R(1, 14, r) && !indsp->random_sounds.empty() && _settings_client.sound.ambient) {
			if (std::any_of(std::begin(i->produced), std::end(i->produced), [](const auto &p) { return p.history[LAST_MONTH].production > 0; })) {
				/* Play sound since last month had production */
				SndPlayTileFx(
					static_cast<SoundFx>(indsp->random_sounds[((r >> 16) * indsp->random_sounds.size()) >> 16]),
					i->location.tile);
			}
		}
	}

	i->counter--;

	/* If using an industry callback, scale the callback interval by cargo scale percentage. */
	if (indsp->callback_mask.Test(IndustryCallbackMask::Production256Ticks)) {
		if (i->counter % ScaleByInverseCargoScale(Ticks::INDUSTRY_PRODUCE_TICKS, false) == 0) {
			IndustryProductionCallback(i, 1);
			ProduceIndustryGoodsHelper(i, false);
		}
	}

	/*
	 * All other production and special effects happen every 256 ticks, and cargo production is just scaled by the cargo scale percentage.
	 * This keeps a slow trickle of production to avoid confusion at low scale factors when the industry seems to be doing nothing for a long period of time.
	 */
	if ((i->counter % Ticks::INDUSTRY_PRODUCE_TICKS) == 0) {
		/* Handle non-callback cargo production. */
		if (!indsp->callback_mask.Test(IndustryCallbackMask::Production256Ticks)) ProduceIndustryGoodsHelper(i, true);

		IndustryBehaviours indbehav = indsp->behaviour;

		if (indbehav.Test(IndustryBehaviour::PlantFields)) {
			uint16_t cb_res = CALLBACK_FAILED;
			if (indsp->callback_mask.Test(IndustryCallbackMask::SpecialEffect)) {
				cb_res = GetIndustryCallback(CBID_INDUSTRY_SPECIAL_EFFECT, Random(), 0, i, i->type, i->location.tile);
			}

			bool plant;
			if (cb_res != CALLBACK_FAILED) {
				plant = ConvertBooleanCallback(indsp->grf_prop.grffile, CBID_INDUSTRY_SPECIAL_EFFECT, cb_res);
			} else {
				plant = Chance16(1, 8);
			}

			if (plant) PlantRandomFarmField(i);
		}
		if (indbehav.Test(IndustryBehaviour::CutTrees)) {
			uint16_t cb_res = CALLBACK_FAILED;
			if (indsp->callback_mask.Test(IndustryCallbackMask::SpecialEffect)) {
				cb_res = GetIndustryCallback(CBID_INDUSTRY_SPECIAL_EFFECT, Random(), 1, i, i->type, i->location.tile);
			}