#Title[enm7_2 spell02 extra]
#Text[sAVeEpXJ
אuxcwƃjKMv]
#Player[FREE]
#BackGround[Default]
#ScriptVersion[2]

script_enemy_main{
	let csd			= GetCurrentScriptDirectory;
	let imgEffect	= csd~".\enm7_2eff\bossEfect.png";
	let imgSPNB		= csd~".\enm7_2eff\spellEfect.png";
	let t5			= csd~".\enm7_2se\timer1.wav";
	let t10			= csd~".\enm7_2se\timer2.wav";
	let tan			= csd~".\enm7_2se\shot1.wav";
	let kira		= csd~".\enm7_2se\shot2.wav";
	let Gspel		= csd~".\enm7_2se\echo5.wav";
	let laser		= csd~".\enm7_2se\Laser2.wav";
	let power		= csd~".\enm7_2se\enemy_powereffect.wav";
	let powerl		= csd~".\enm7_2se\power_logo.wav";
	let gekiha		= csd~".\enm7_2se\BossEnd.wav";
	let powerla		= csd~".\enm7_2se\power_logo.wav";
	let kaku		= csd~".\enm7_2se\j.wav";
	let frame		= 0;
	let GetAngle	= 0;
	let angle		= 0;
	let angle2		= 0;
	let angleBase	= 0;
	let count		= 0;
	let timer		= 0;
	let shotdir		= csd ~ "kshotData.txt";
	let MinX		= GetClipMinX;
	let MaxX		= GetClipMaxX;
	let CenX		= GetCenterX;
	let MinY		= GetClipMinY;
	let MaxY		= GetClipMaxY;
	let CenY		= GetCenterY;
	let T_count		= 0;
	let Damage		= 0;
	let a			= 0;
	let S_count		= 0;
	let endc		= 0;
	let i			= 0;

	@Initialize{
		SetX(MinX);
		SetY(MinY-100);
		SetLife(1000);
		SetDamageRate(0,0);
		SetInvincibility(120);
		
		CreateCommonDataArea("anime");
		SetCommonDataEx("anime","anime_flag",false);

		//e폜@(l64)
		SetShotAutoDeleteClip(30,30,30,30);
		LoadUserShotData(shotdir);
		SetMovePosition03(CenX,CenY-100,10,8);
		LoadGraphic(imgEffect);
		LoadGraphic(imgSPNB);
		Aura(8,255,255,0);
		MagicCircle(false);
		SetRateScoreSystemEnable(false);
		hpb(1,0,0);
		Timer(1,60);
		EnemyTexture03(true);
		SetEffectForZeroLife(0,0,0);
		VSname(0,2);
		RedMagicCircle(1,0);//1o 2ިڲ

		SetCommonData("ANGLE","LEFT");
		SpellPracticeSave("extra",1);
	}

	@MainLoop{
		yield;
		SetCollisionA(GetX, GetY, 30);
		SetCollisionB(GetX, GetY, 16);

		//ԏ
		if(GetTimer<=10 && GetTimer>=0){T_count++;}
		alternative(T_count)
		case(1,60,120,180,240){PlaySE(t10);}
		case(300,360,420,480,540){PlaySE(t5);}

		//{Agp莞ԃ_[W
		if(OnBomb==true){SetDamageRate(30,20);Damage=0;}
		if(OnBomb==false){Damage++;}
		if(Damage>=100){SetDamageRate(30,20);}

		//XyJ[hؐ錾
		if(S_count==60){
			CutinSP("TIREI",20,-50,8000000,60,GetCurrentScriptDirectory~".\enm7_2img\face301ct.png",0,0,384,512);
			CutinSP2(-275,-10,GetCurrentScriptDirectory~".\enm7_2spell\enm7_2_sn02.png",0,0,384,32,255,255,255);
			BackGroundEffect03;
		}
		if(S_count==50){
			//Concentration(50,powerla);
		}

		a++;	
		frame++;
		count++;
		S_count++;
		timer++;
		if(frame==70){
			Concentration(50,powerla);
		}
		if(frame==170){
			let ss1 = [0.3,0.3];
			let ss2 = [0.3,0.3];
			let st1 = [kPURPLE42,kYELLOW42];
			let st2 = [kYELLOW42,kPURPLE42];
			loop(4){
				ArmillarySphereOfIkarugaDera(0+GetAngle*2,rand(0,180),st1[angleBase],200-GetAngle/2,-1,"LEFT",ss1[angleBase]);
				ArmillarySphereOfIkarugaDera(0+GetAngle*2,rand(180,360),st1[angleBase],200-GetAngle/2,-1,"LEFT",ss1[angleBase]);
				ArmillarySphereOfIkarugaDera(0+GetAngle*2,rand(0,360),st2[angleBase],200-GetAngle/2,-1,"LEFT",ss2[angleBase]);
				ArmillarySphereOfIkarugaDera(0+GetAngle*2,rand(0,360),st2[angleBase],200-GetAngle/2,-1,"LEFT",ss2[angleBase]);
			}
			GetAngle+=10;
			PlaySE(kira);
			frame=165;
		}
		if(count==260){
			Concentration(70,powerla);
			frame=count;
		}
		if(timer==260){
			Concentration(70,powerla);
			NuclearShot(3,MaxX,MinY,150,3,0.8,0,0,"PURPLE",300,true,1);
			PlaySE(kaku);
		}
		if(timer==520){
			Concentration(70,powerla);
			NuclearShot(3,MinX,MinY,30,3,0.8,0,0,"PURPLE",300,true,0);
			PlaySE(kaku);
			timer=trunc(rand(0,-120));
		}
		
		let tact = GetCommonDataEx("title","act");
		let tsst = GetCommonDataEx("title","start_stage");
		if(tact==11){
		if(OnPlayerMissed==true){
		SetCommonDataEx("title","start_stage",false);
		VanishEnemy;
		}
		}
	
		if(GetEnemyLife<=10){
		SetMovePosition03(CenX-30,CenY-120,10,5);
		SetDamageRate(0,0);
		endc++;
		}
		if(endc==1){
		DeleteAllEnemyWithoutBoss;
		DefeatExplosion(GetEnemyX,GetEnemyY);
		}

	}//MainLoop")"łB

	@DrawLoop{}

	@Finalize{
		let tact = GetCommonDataEx("title","act");
		if(tact==11){
			SetCommonDataEx("title","start_stage",false);
		}
		if(tact!=11){
			CreateItem(ITEM_BOMB,CenX,CenY);
		}
	}

	#include_function".\Obj_Control.txt"
	#include_function".\lib_kshot.txt"
}