//Spawn A Weapon on the Death of Another Weapon
//'Replace on Death'
//By ZoriaRPG
//19th March, 2019

//v0.1 : Initial
//v0.2 : Fixed compile. Fixed weapon orientations.


lweapon script ReplaceOnDeath
{
	void run(int newWeaponType, int requireItem, int requireCounter, int CounterAmount, bool flipOnDeath, bool newDirOnDeath, int newDir, int newScript) //could be flags here
	{
		
		itemdata bomb; bool found; bool super; int x; int y; int pow;
		if ( requireItem > 0 )
		{
			bomb = Game->LoadItemData(Link->ItemA);
			if ( bomb->ID == requireItem ) found = true;
			if ( !found )
			{
				bomb = Game->LoadItemData(Link->ItemB);
				if ( bomb->Family == IC_BOMB ) { found = true; }
			}
			if ( !found ) Quit(); //quit if bombs not in a slot
		}
		
		pow = bomb->Power;
		if ( requireCounter )
		{
			if ( Game->Counter[requireCounter] < CounterAmount ) Quit(); //quit if not enough bombs
				else Game->Counter[requireCounter] -=CounterAmount;
		}
		
		
		while(this->isValid()) 
		{ 
			x = this->X; y = this->Y; 
			
			if ( this->DeadState != WDS_ALIVE ) //When the arrow itself dies, make an explosion. 
			{
				lweapon boom = Screen->CreateLWeapon(newWeaponType);
				boom->Damage = pow;
				boom->X = x;
				boom->Y = y;
				boom->Step = this->Step;
				boom->Dir = this->Dir;
				if ( flipOnDeath ) { boom->Dir = reversedirection(this->Dir); boom->Flip = AdjustFlip(this); } //ReflectWeapon(boom, this->Angular);
				else if ( newDirOnDeath ) { boom->Dir = newDir; boom->Flip = AdjustFlip(this); }
				boom->Damage = this->Damage; //need a new damage attribute; reduce param count to accomplish this
				if ( Abs(newScript) < 511 ) boom->Script = newScript;
				Quit(); //Spawn only one weapon. 
			}
			
			Waitframe(); 
		}
		
	}
	//Returns the reverse f any of the eight cardinal directions.
	int reversedirection(int dir) 
	{
		switch(dir)
		{
			case DIR_UP: return DIR_DOWN; break;
			case DIR_DOWN: return DIR_UP; break;
			case DIR_LEFT: return DIR_RIGHT; break;
			case DIR_RIGHT: return DIR_LEFT; break;
		}
		//if ( dir == DIR_LEFT) return DIR_RIGHT;
		//if ( dir == DIR_DOWN) return DIR_UP;
		//if ( dir == DIR_UP) return DIR_DOWN;
		//if ( dir == DIR_RIGHT) return DIR_LEFT;
		///if ( dir == DIR_LEFTUP) return DIR_RIGHTDOWN;
		//if ( dir == DIR_RIGHTDOWN) return DIR_LEFTUP;
		//if ( dir == DIR_LEFTDOWN) return DIR_RIGHTUP;
		//if ( dir == DIR_RIGHTUP) return DIR_LEFTDOWN;
	}
	/*
	int FlipRev(lweapon l){
		if ( l->Dir == DIR_DOWN || l->Dir == DIR_UP && !l->Flip ) return 2;
		if ( l->Dir == DIR_DOWN || l->Dir == DIR_UP && l->Flip ) return 0; 
		if ( l->Dir == DIR_LEFT || l->Dir == DIR_RIGHT && !l->Flip ) return 1;
		if ( l->Dir == DIR_LEFT || l->Dir == DIR_RIGHT && l->Flip ) return 0;
		return -1;
	}
	*/
	int AdjustFlip(lweapon l)
	{
		switch(l->Dir)
		{
			case DIR_DOWN: return 0; break;
			case DIR_UP: return 2; break;
			case DIR_LEFT: return 4; break;
			case DIR_RIGHT: return 7; break;
		}
	}
	lweapon ReflectWeapon(lweapon l, bool angular)
	{
		l->Dir = reversedirection(l->Dir);
		//l->Flip = FlipRev(l);
		l->Angular = angular;
		if ( angular ) 
		{
			if (l->Angle >= 180 ) l->Angle -= 180;
			else l->Angle += 180;
		}
	}
}