Spring RTS Engine

Code: Select all

#define TA			// This is a TA script

#include "sfxtype.h"
#include "exptype.h"



piece  base, gun1, barrel1, gun2, barrel2, gun3, barrel3l, barrel3r, minigun, minibarrel;




static-var Exp;




// Signal definitions
#define SIG_AIM				2
#define SIG_AIM_2			4
#define SIG_AIM_3			8
#define SIG_AIM_4			16





SmokeUnit(healthpercent, sleeptime, smoketype)
{
	while( get BUILD_PERCENT_LEFT )
	{
		sleep 400;
	}
	while( TRUE )
	{
		healthpercent = get HEALTH;
		if( healthpercent < 66 )
		{
			smoketype = 256 | 2;
			if( Rand( 1, 66 ) < healthpercent )
			{
				smoketype = 256 | 1;
			}
			emit-sfx smoketype from base;
		}
		sleeptime = healthpercent * 50;
		if( sleeptime < 200 )
		{
			sleeptime = 200;
		}
		sleep sleeptime;
	}
}

GetExp()
{
	Exp = Get VETERAN_LEVEL;
	if (Exp <= 20)
	{
		hide barrel2;
		hide barrel2;
		hide barrel3l;
		hide barrel3r;
		hide gun2;
		hide gun3;
		hide minigun;
		hide minibarrel;
	}
	if (Exp > 20 and Exp <= 40)
	{
		hide barrel1;
		hide gun1;
		show gun2;
		show barrel2;
	}
	if (Exp > 40 and Exp <= 60)
	{
		hide barrel1;
		hide gun1;
		hide barrel2;
		hide gun2;
		show gun3;
		show barrel3l;
		show barrel3r;
	}
	if (Exp > 60)
	{
		hide barrel1;
		hide gun1;
		hide barrel2;
		hide gun2;
		show gun3;
		show barrel3l;
		show barrel3r;
		show minigun;
		show minibarrel;
	}	
	sleep 600;
	start-script GetExp();
}

Create()
{
	start-script SmokeUnit();
	start-script GetExp();
	hide barrel2;
	hide barrel2;
	hide barrel3l;
	hide barrel3r;
	hide gun2;
	hide gun3;
	hide minigun;
	hide minibarrel;
}

AimWeapon1(heading, pitch)
{
	While(Exp <= 20)
	{
		signal SIG_AIM;
		set-signal-mask SIG_AIM;
		turn gun1 to y-axis heading speed <300>;
		turn barrel1 to x-axis <0> - pitch speed <300>;
		wait-for-turn gun1 around y-axis;
		wait-for-turn barrel1 around x-axis;
		return (1);
	}
}

FireWeapon1()
{
	move barrel1 to z-axis [-3] now;
	sleep 100;
	move barrel1 to z-axis [0] now;
}

AimFromWeapon1(piecenum)
{
	piecenum = gun1;
}

QueryWeapon1(piecenum)
{
	piecenum = barrel1;
}

AimWeapon2(heading, pitch)
{
	If (Exp > 20 and Exp <= 40)
	{
		signal SIG_AIM_2;
		set-signal-mask SIG_AIM_2;
		turn gun2 to y-axis heading speed <300>;
		turn barrel2 to x-axis <0> - pitch speed <300>;
		wait-for-turn gun2 around y-axis;
		wait-for-turn barrel2 around x-axis;
		return (1);
	}
}

FireWeapon2()
{
}

AimFromWeapon2(piecenum)
{
	piecenum = gun1;
}

QueryWeapon2(piecenum)
{
	piecenum = barrel1;
}

AimWeapon3(heading, pitch)
{
	If (Exp > 40)
	{
		signal SIG_AIM_3;
		set-signal-mask SIG_AIM_3;
		turn gun3 to y-axis heading speed <300>;
		turn barrel3l to x-axis <0> - pitch speed <300>;
		turn barrel3r to x-axis <0> - pitch speed <300>;
		wait-for-turn gun3 around y-axis;
		wait-for-turn barrel3l around x-axis;
		wait-for-turn barrel3r around x-axis;
		return (1);
	}
}

FireWeapon3()
{
}

AimFromWeapon3(piecenum)
{
	piecenum = gun3;
}

QueryWeapon3(piecenum)
{
	piecenum = barrel3l;
	sleep 200;
	piecenum = barrel3r;
	sleep 200;
	
}

AimWeapon4(heading, pitch)
{
	If (Exp > 60)
	{
		signal SIG_AIM_4;
		set-signal-mask SIG_AIM_4;
		turn minigun to y-axis heading speed <300>;
		turn minibarrel to x-axis <0> - pitch speed <300>;
		wait-for-turn minigun around y-axis;
		wait-for-turn minibarrel around x-axis;
		return (1);
	}
}

FireWeapon4()
{
}

AimFromWeapon4(piecenum)
{
	piecenum = minigun;
}

QueryWeapon4(piecenum)
{
	piecenum = minibarrel;
}

SweetSpot(piecenum)
{
	piecenum = base;
}

Killed(severity, corpsetype)
{
	hide barrel1;
	if( severity <= 25 )
	{
		corpsetype = 1;
		explode gun1 type BITMAPONLY | BITMAP1;
		explode base type BITMAPONLY | BITMAP2;
		explode barrel1 type BITMAPONLY | BITMAP3;
		explode gun1 type BITMAPONLY | BITMAP4;
		return (0);
	}
	if( severity <= 50 )
	{
		corpsetype = 2;
		explode gun1 type FALL | BITMAP1;
		explode base type BITMAPONLY | BITMAP2;
		explode barrel1 type FALL | BITMAP3;
		explode gun1 type FALL | BITMAP4;
		return (0);
	}
	if( severity <= 99 )
	{
		corpsetype = 3;
		explode gun1 type FALL | SMOKE | FIRE | EXPLODE_ON_HIT | BITMAP1;
		explode base type BITMAPONLY | BITMAP2;
		explode barrel1 type FALL | SMOKE | FIRE | EXPLODE_ON_HIT | BITMAP3;
		explode gun1 type SHATTER | BITMAP4;
		return (0);
	}
	corpsetype = 3;
	explode gun1 type FALL | SMOKE | FIRE | EXPLODE_ON_HIT | BITMAP1;
	explode base type BITMAPONLY | BITMAP2;
	explode barrel1 type FALL | SMOKE | FIRE | EXPLODE_ON_HIT | BITMAP3;
	explode gun1 type SHATTER | BITMAP4;
}