#title "Autorocket"
#author "me_mantis"

#include meteor2


// tell M2 which functions it can use
export OnMapStart;
export Toolbar;
export AutoRocket;
void OnMapStart()
{
	SC_GameMessage("Augh! the Bog!!");
	SC_SetObjectHidden(3,1);
	SC_CreateToolbar( 0, "Things to do", 400, 0, 0, 1);
	SC_AddToolbarButton( 0, "fire autorocket", "buttons\\attack.pcx","run AutoRocket",1 );
	StaticFlags[0] = 0;
}

void Toolbar()
{
	
}

void AutoRocket()
{
	SC_GameMessage("Bamo! Autorocket");
	if(SC_GetItemCount("Rocket") > 1 )
	{
		SC_GiveItem("Rocket",-1);
		//get object id
		int x, y, p, id, doomed, ps, i;
		p = SC_GetPlayerObjectId();
		// get player coordinates
		SC_GetObjectCoords( p, &x, &y);
		//create rocket
		id = SC_AddObject("bird.ob", x, y, 0, AI_ROAMING, 1, "doom bird", 1, 0, 0);
		//get object side
		ps = SC_GetObjectSide(p);
		
		//scan for closest enemy
		for( i=1; i<1000; ++i)
		{
			if(SC_GetObjectSide(i) != ps)
			{
			SC_SetObjectFollow(id, i);
			SC_GameMessage("Tracking %d", i);
			}
		}
		//seek through everything
		//track to nearest enemy
		//sit there yay!
	}
	else
    {
		SC_GameMessage("You don't have rockets");
    }	
}

// Player stuff
int AX;
int AY;
SC_GetObjectCoords(p,AX,BX);

// (Potentional) Enemy stuff
int BX;
int BY;

// Stuff we're gonna need for the theory
int W;
int H;
int Hyp;

// Vars that remember who the "winner" is
int LowestHyp = 9999999;
int Lowest;

for(i=1;i<1000;++i)
{
if(SC_GetObjectSide(i) != ps)
{
SC_GetObjectCoords(i,BX,BY);
W = BX - AX;
H = BY - AY;

// Yay Pythagoras!
Hyp = SQUARE(QUADRATE(W) + QUADRATE(H));

if(Hyp < LowestHyp)
{
LowestHyp = Hyp;
Lowest = i;
} 
}
}

// And the winner is...
SC_setObjectFollow(id,Lowest);