##########################################################
# Jedi Knight Cog Script  (JK)
#---------------------------------------------------------
# TIEBOMBER_CLSTR01.COG
# ===================
# TIEBOMBER TEMPLATE:
# ===================
# _movething        _walkstruct        move=physics surfdrag=0.0 airdrag=0.0 mass=0.0 height=0.05 physflags=0x425d thingflags=0x48
# tiebomber_02      _movething         size=.742893 movesize=0.001      3d=tieb.3do
#---------------------------------------------------------
# Written By DSLS_DeathSythe
# This COG is NOT supported by LucasArts Entertainment Co.
##########################################################
symbols
#---------------------------------------------------------
message     startup
message     timer
message     pulse
#--------------------#
flex        fly_delay=60.0
thing       Pos_A=-1
thing       Pos_B=-1
thing       Pos_C=-1
template    bomb_tpl=08tiebomb
template    tiebomber_tpl
sound       tiebomber_snd
flex        move_speed=4.0
flex        bomb_spread=2.5
int         bomb_num=8
#--------------------#
thing       tiebomber=-1                                  local
vector      look_dir                                      local
vector      move_dir                                      local
int         next_pos=0                                    local
int         a=0                                           local
vector      randVec                                       local
flex        randSpread=0.0                                local
int         channel=-1                                    local
#---------------------------------------------------------
end
#=========================================================
code
#---------------------------------------------------------
startup:
Sleep(1.0);   {could this be the prob?}
//Print("tie cog started");
	SetTimer(fly_delay);
	look_dir = GetThingPos(Pos_B);
	look_dir = VectorSet(VectorX(look_dir), VectorY(look_dir), -1.0);
	look_dir = VectorSub(look_dir, GetThingPos(Pos_B));
	SetThingLook(Pos_B, look_dir);
return;
#---------------------------------------------------------
timer:
//Print("timer up");
	//- Create the tiebomber
	tiebomber = CreateThing(tiebomber_tpl, Pos_A);
	SetCollideType(tiebomber, 0);

	//- Start the bomber sound
	if(channel == -1)
		channel = PlaySoundThing(tiebomber_snd, tiebomber, 1.0, -1, 100, 0x181);

	//- Make the tiebomber look at Pos_B
	look_dir = VectorSub(GetThingPos(Pos_B), GetThingPos(tiebomber));
	SetThingLook(tiebomber, look_dir);

	//- Start the tiebomber moving to Pos_B
	move_dir = VectorScale(VectorNorm(look_dir), move_speed);
	SetThingVel(tiebomber, move_dir);

	//- Update the pos and start checking for arrival
	next_pos = 1;
	SetPulse(0.1);
return;
#---------------------------------------------------------
pulse:
	if((next_pos == 1) && (VectorDist(GetThingPos(Pos_B), GetThingPos(tiebomber)) < 0.25))
		{
//Print("Arrived at pos_b");
		//- Drop the bombs
		for(a=0; a<bomb_num; a=a+1)
			{
			// Get random bomb spread
			randVec = VectorSet(((Rand() - 0.5) * 5.0), (Rand() - 0.5) * 5.0, 0.0);
			randSpread = (Rand() - 0.5) * bomb_spread;
			FireProjectile(Pos_B, bomb_tpl, -1, -1, '0 0 0', randVec, randSpread, 0x1, 0.0, 0.0);
			}

		//- Make the tiebomber look at Pos_C
		look_dir = VectorSub(GetThingPos(Pos_C), GetThingPos(tiebomber));
		SetThingLook(tiebomber, look_dir);

		//- Start the tiebomber moving to Pos_C
		move_dir = VectorScale(VectorNorm(look_dir), move_speed);
		SetThingVel(tiebomber, move_dir);
		next_pos = 2;
		return;
		}

if((next_pos == 2) && (VectorDist(GetThingPos(Pos_C), GetThingPos(tiebomber)) < 0.25))
		{
//Print("Arrived at pos_c");
		StopThing(tiebomber);
		if(channel != -1)
			{
			StopSound(channel, 0.0);
			channel = -1;
			}
		if(tiebomber != -1)
			{
			DestroyThing(tiebomber);
			tiebomber = -1;
			}
		SetPulse(0.0);
		SetTimer(fly_delay);
		}
return;
##########################################################

#Level master COG
#Generated by JED 0.951 beta

symbols
message   startup
message timer
int       player    local
end

code

startup:
  // Register COG as master COG
  SetMasterCOG(GetSelfCOG());
  player = GetLocalPlayerThing();
  // Initialise Goals
  SetInv(player, 99, 1000);
  // Give player weapons and ammo
  SetInv(player, 1, 1);   // fists
  SetInv(player, 2, 1);   // briar
  SetInv(player, 11, 100);   // Energy
  // Initialize weapon.
  SetFireWait(player, -1);
  SetMountWait(player, 0);
  SetCurInvWeapon(player, 0);
  SelectWeapon(player, AutoSelectWeapon(player, 1));

SetTimer(15);
timer:
  // Force ranking
  SetInv(player, 20, 0);
  SetInv(player, 14, 4*50);

jkSyncForcePowers();
  Return;

end