//What says on the tin.
#library "PrussianRoverkill"
#include "zcommon.acs"

Script "Zwerg Get Clips" (Void)
{
	SetResultValue(CheckInventory("ZwergClip"));
}

Script "Be sweet" (void)
{
	while(CheckInventory("PowerComradeTimeFreeze")) //PowerTimeFreezer
	{
		TakeInventory("NukeCellAmmo", 1);
		Delay(const:35);
	}
}

script "Pitchfork Simulation" (void)
{
	SetActivatorToTarget(0);
	int pitch = GetActorPitch(0) + Random(-0.02, 0.02);
	int vAng = (pitch % 1.0);
	int byteAng = vAng >> 8;
	SetResultValue(byteAng * 360 / 0xFF);
	//PrintBold(f:pitch, s:"\n", f:vAng, s:"\n", d:byteAng);
}

script "PedalToTheMetal" (void)
{
	LocalSetMusic("EXTREME");
	delay(35*69);
	LocalSetMusic("*");
	Terminate;
}

Script "TankMusicStop" (void)
{
	LocalSetMusic("TANKTHME");
	Terminate;
}

Script "TankMusicStart" (void)
{
	LocalSetMusic("*");
	Terminate;
}


Script "MusicStop" (void)
{
	SetMusic("");
	Terminate;
}

Script "MusicStart" (void)
{
	SetMusic("*");
	Terminate;
}