#strict

local shooter;
local Speed;
local a;
local counterpart;
local main;
local mx,my,cx,cy,ox,oy,lsx,lsy;
local target;
local bonded;
local maxdist;


public func Launch(int iAngle, int iSpeed, object pShooter, object counterp, bM, int max)
{

	if(pShooter)
	  shooter = pShooter;
     Speed = iSpeed;
	a=iAngle;
     counterpart=counterp;
	main=bM;
	maxdist=max;
	bonded=false;
	mx=0; my=0; cx=0; cy=0; ox=0; oy=0;
	SetXDir(+Sin(iAngle,iSpeed));
	SetYDir(-Cos(iAngle,iSpeed));
	SetAction("Travel");
	SetR(iAngle);
	SetVisibility(VIS_Owner);
}


private func Traveling()
{
	if(!bonded) if(GetXDir()!=Sin(a,Speed) || GetYDir()!=-Cos(a,Speed)) Hit();
	if(main)
{
	if(!bonded)
	{
		if(shooter->GetAction() ne "Pray")
		{
			Remove();
		}
		{
			if(!counterpart) Remove();
			mx=GetX();
			my=GetY();
			cx=counterpart->GetX();
			cy=counterpart->GetY();
			//if(Distance(mx,my,cx,cy)>maxdist) Remove();
			DrawPseudoParticleLine(10);
		}
	}
	else
	{
		if(!target)
		{
			DrawPseudoParticleLine(32);
			for(var pEnemy in FindObjects(
				Find_OnLine(0,0,cx-mx,cy-my),
				Find_Hostile(GetOwner()),
				Find_NoContainer(),
				Find_OCF(OCF_Alive())))
			{
				target=pEnemy;
				ox=target->GetX();
				oy=target->GetY();
				SetVisibility(VIS_All);
				cx=target->GetX();
				cy=target->GetY();
			}
		}
		else
		{
			DrawPseudoParticleLine(40);
			var x=target->GetX();
			var y=target->GetY();
			if(Distance(x,y,ox,oy)>25) Remove();
			ox=x; oy=y;
			target->Jump();
			target->SetXDir(0);
			target->SetYDir(0);
			if(!target->Stuck())
			{
				lsx=x;	lsy=y;
			}

			var angle=Angle(x,y,mx,my);
			target->SetPosition(x+Sin(angle,8+(Distance(x,y,ox,oy)/15)),y-Cos(angle,8+(Distance(x,y,ox,oy)/15)));
			if(Distance(x,y,mx,my)<15)
			{
				if(target->Stuck())
					target->SetPosition(lsx,lsy);
				Remove();
			}

		}
	}
}
}

func DrawPseudoParticleLine(size)
{
	var angle=Angle(mx,my,cx,cy);
	var d=0;
	while(d<Distance(cx,cy,mx,my))
	var d+=Random(Distance(cx,cy,mx,my)/2);
	CreateParticle("PSpark",Sin(angle,d),-Cos(angle,d),0,0,size+Random(size),RGBa(128,200,255,Random(128)),this);
}

private func Remove()
{
	if(!main) this->RemoveObject();
	if(!bonded)
	{
		CastParticles("PSpark",64,30,mx,my,32,64,RGBa(128,200,255,0),RGBa(128,200,255,128));
		CastParticles("PSpark",64,30,cx,cy,32,64,RGBa(128,200,255,0),RGBa(128,200,255,128));
	}
	if(counterpart)
 	counterpart->RemoveObject();
  RemoveObject();
}


private func Hit()
{
SetXDir();
SetYDir();
if(!counterpart->GetXDir() && !counterpart->GetYDir())
if(main)
	CreateBond();


}

func CreateBond()
{
	if(!counterpart) Remove();
	mx=GetX();
	my=GetY();
	cx=counterpart->GetX();
	cy=counterpart->GetY();
	counterpart->RemoveObject();
	bonded=true;
	shooter->ControlUpDouble();
}