Function FlameEmitterControl

TombEngine/Objects/Effects/flame_emitters.cpp:141–261

	}

	void FlameEmitterControl(short itemNumber)
	{
		auto* item = &g_Level.Items[itemNumber];
		bool active = (item->TriggerFlags < 0) ? TriggerActive(item) : CalculateActiveState(item);

		if (active)
		{
			// Jet flame.
			if (item->TriggerFlags < 0)
			{
				short ocb = -item->TriggerFlags;
				if ((ocb & 7) == 2 || (ocb & 7) == 7)
				{
					// Constant flames.
					SoundEffect(SFX_TR4_FLAME_EMITTER, &item->Pose);
					TriggerSuperJetFlame(item, -256 - (3072 * GlobalCounter & 0x1C00), GlobalCounter & 1);

					auto color = GetFlameColor(item->Model.Color);
					SpawnDynamicLight(item->Pose.Position.x, item->Pose.Position.y, item->Pose.Position.z,
						(GetRandomControl() & 3) + 20,
						color.x, color.y, color.z);
				}
				else
				{
					// Intermittent flames.
					auto& pauseTimer = item->ItemFlags[0];
					auto& jetFlameVel = item->ItemFlags[1];
					auto& smallFlameAlpha = item->ItemFlags[2];
					auto& flameTimer = item->ItemFlags[3];

					if (pauseTimer)
					{
						if (jetFlameVel)
							jetFlameVel = jetFlameVel - (jetFlameVel >> 2);

						if (smallFlameAlpha > 0)
						{
							smallFlameAlpha -= 8;
						}
						else
						{
							smallFlameAlpha = 0;
						}

						pauseTimer--;
						if (pauseTimer == 1)
							flameTimer = (GetRandomControl() & 0x3F) + 150;
					}
					else
					{
						if (!--flameTimer)
						{
							pauseTimer = ((ocb % 8) != 0) ?
								Random::GenerateInt(2 * FPS, 4 * FPS) :						   // Pause of 2 to 4 seconds.
								Random::GenerateInt((ocb / 8) * FPS, FPS + ((ocb / 8 * FPS))); // Pause of 1 second * (ocb / 8) to 1 second plus 1 second * (ocb / 8).
						}

						if (smallFlameAlpha < UCHAR_MAX)