Spring RTS Engine

Code: Select all

RestoreAfterDelay() // restore function to turn the turret and so forth back to start
{
sleep 3000;
turn turret to y-axis <0> speed <60>;
turn barrel1 to x-axis <0> speed <30>;  
} 

AimWeapon1(heading, pitch) // single weapon with 2 fires this tell sit what to do while aiming 
{ 

    if ( get IN_WATER(0) == 1 )
    {
     return (0);
    }

signal SIG_AIM;
set-signal-mask SIG_AIM;
turn turret to y-axis heading speed <500>;
turn barrel1 to x-axis <0> - pitch speed <300>;
wait-for-turn turret around y-axis;
wait-for-turn barrel1 around x-axis;
start-script RestoreAfterDelay();
return (1);
}

FireWeapon1() // what do while firing, fires 1 barrel then the next , and resets 
{
emit-sfx shot from firepoint1;
} 

AimFromWeapon1(piecenum) // where it aims the weapon from 
{
piecenum = barrel1;
} 

QueryWeapon1(piecenum) // where the shot is called from
{
piecenum = firepoint1;
}

AimWeapon2(heading, pitch) // single weapon with 2 fires this tell sit what to do while aiming
{

    if ( get IN_WATER(0) == 0 )
    {
     return (0);
    }

signal SIG_AIM_2;
set-signal-mask SIG_AIM_2; 
turn turret to y-axis heading speed <500>;
turn barrel1 to x-axis <0> - pitch speed <300>;
wait-for-turn turret around y-axis;
wait-for-turn barrel1 around x-axis;
start-script RestoreAfterDelay(); 
return (1);
}

FireWeapon2() // what do while firing, fires 1 barrel then the next , and resets
{
emit-sfx shot from firepoint1;
}

AimFromWeapon2(piecenum) // where it aims the weapon from
{ 
piecenum = barrel1;
}

QueryWeapon2(piecenum) // where the shot is called from 
{
piecenum = firepoint1;
}

Code: Select all

Create() // tells it what to do on creation
{
      shooting_num=1;
}

RestoreAfterDelay()
{
   sleep 3000;
   turn turret to y-axis <0.000000> speed <35.005495>;
   turn barrel1 to x-axis <0.000000> speed <15.000000>;
}

AimWeapon1(heading, pitch) // single weapon with 2 fires this tell sit what to do while aiming
{
signal SIG_AIM;
set-signal-mask SIG_AIM;
turn turret to y-axis heading speed <255>; 
turn barrel1 to x-axis <0> - pitch speed <150>;
wait-for-turn turret around y-axis;
wait-for-turn barrel1 around x-axis;
start-script RestoreAfterDelay();
return (1);
}

FireWeapon1() // what do while firing, fires 1 barrel then the next , and resets
{

         if(shooting_num==1)
         {
            emit-sfx 1024 from firepoint2;
         }

         if(shooting_num==2)
         {
            emit-sfx 1024 from firepoint1;
         }

   shooting_num=shooting_num+1;

            if( shooting_num == 3)
            {  
               shooting_num=1;
            }
}

AimFromWeapon1(piecenum) // where it aims the weapon from
{
piecenum = barrel1;
}

QueryWeapon1(piecenum) // where the shot is called from
{
if (shooting_num==1)
     {
      piecenum=firepoint1;
     }

     if (shooting_num==2)
     {
      piecenum=firepoint2;
     }
}

Code: Select all

local flare1, flare2 = piece("flare1", "flare2")
local currBarrel = 1

function script.QueryWeapon1()
  if (currBarrel == 1) then 
    return flare1
  else 
    return flare2
  end
end

function script.FireWeapon1()
  -- do recoil movements and fx here first
  currBarrel = currBarrel + 1
  if currBarrel == 3 then currBarrel = 1 end
end

Code: Select all

local flares = {piece("flare1"), piece("flare2")}
local currBarrel = 1

function script.QueryWeapon1()
  return flares[currBarrel]
end

function script.FireWeapon1()
  -- fx here again, but you can avoid if blocks by using the table again
  currBarrel = currBarrel + 1
  if currBarrel == 3 then currBarrel = 1 end
end

Code: Select all

	function script.FireWeapon1()
		if currBarrel == 1 then
			EmitSfx(flare2, orc_machinegun_flash)
			EmitSfx(flare2, orc_machinegun_muzzle)	
		end
		if currBarrel == 2 then
			EmitSfx(flare1, orc_machinegun_flash)
			EmitSfx(flare1, orc_machinegun_muzzle)	
		end
		currBarrel = currBarrel + 1
		if currBarrel == 3 then currBarrel = 1 end
	       Sleep(30)
	end

Code: Select all

function script.FireWeapon1()
  EmitSfx(flares[currBarrel], orc_machinegun_flash)
  EmitSfx(flares[currBarrel], orc_machinegun_muzzle)   
  currBarrel = currBarrel + 1
  if currBarrel == 3 then currBarrel = 1 end
end