#e
#Title[C(LVE)]
#Text[Akagi]
#Image[.\..\img\Select\Select05.png]
#Player[FREE]
#ScriptVersion[2]
#BackGround[User(.\..\BG\Map1\O2.png,0,-2)]

script_enemy_main {
#include_function ".\..\txt\ShotEx.txt"
	let csd = GetCurrentScriptDirectory;
	let Img = [
		csd~"..\img\Akagi.png",
		csd~"..\img\System.png",
		];
	let ERW=csd~"..\enemy\EnemyRW.txt";
	let count = 0;
	let Moct = 0;
	let nx=68;
	let ny=107;
	let vg = 20;
	
	@Initialize{
		SetX(GetCenterX);
		SetY(GetCenterY-120);
		
		SetLife(5000);
		SetDamageRate(100,0);
		SetTimer(60);
		SetScore(4500);
		
		LoadData;
		ShotData;
		PlayMusic(BGM[3]);
	}
	
	@MainLoop {
		SetCollisionA(GetX,GetY,20);
		SetCollisionB(GetX,GetY,20);
		MagicCircle(false);
		
		alternative(Moct)
		case(80,100,120){ShotA;}
		case(550,556,562,568,574,580,586,592,598){ShotB;}
		
		if(Moct>160&&Moct<245||Moct>450&&Moct<540){
			if(count%5==0){ShotD;}
			}
		if(Moct>255&&Moct<465||Moct>650&&Moct<740){
			if(count%15==0){ShotC;}
			if(count%10==0){ShotE;}
			}
		Move;
		if(Moct==750){Moct=0;}
		count++;Moct++;
		yield;
	}
	
	@DrawLoop {
		if((Moct>255&&Moct<460)||(Moct>650&&Moct<740)){
		BossImg(x[1],y[0],x[2],y[1]);}
		else if(int(GetSpeedX)==0){BossImg(x[0],y[0],x[1],y[1]);}
		else if(GetSpeedX>0){BossImg(x[0],y[1],x[1],y[2]);}
		else if(GetSpeedX<0){BossImg(x[1],y[1],x[2],y[2]);}
		LifeDraw(5000);
		yield;
	}
	
	@Finalize {
		DeleteData;
	}
	task ShotA{//(ԐA)42 4
		let way =-50;
		loop(8){
			CreateShotA(1,GetX+16,GetY,10);
			SetShotDataA(1, 0,6,way+GetAngleToPlayer,0,0,0,42);
			SetShotDataA(1, 20,4,GetAngleToPlayer,0,0,0,4);
			FireShot(1);
			way+=15;
		}
	}
	task ShotB{//(ԐB)52 4
		ArrowShot(GetX+16,GetY,GetAngleToPlayer,4,52,10,ERW,7,GetAngleToPlayer);
	}
	task ShotC{//C
		let sg = 10;
		let sa = 0;
		loop(5){
			CreateShot01(GetX-10,GetY+sg,7, 10-sa,12,5);
			CreateShot01(GetX-20,GetY+sg,7,170+sa,12,5);
			sg-=10;
			sa-=10;
			}
	}
	task ShotD{//C
		CreateShot01(GetX-10,GetY+vg,rand(3,6), 60-vg*rand(2,3),12,5);
		CreateShot01(GetX-20,GetY+vg,rand(3,6),120+vg*rand(2,3),12,5);
		vg-=10;
		if(vg== -30){vg= 20;}
	}
	task ShotE{//Ԑ͔
		EnemyShot(ERW,GetClipMinX+rand(30,100),GetClipMinY,7,GetAngleToPlayer);
		EnemyShot(ERW,GetClipMaxX-rand(30,100),GetClipMinY,7,GetAngleToPlayer);
	}
		task Move{//224,140
		alternative(Moct)
		case( 90){SetMovePosition03(324,120,15,4);}
		case(180){SetMovePosition03(124,120,15,4);}
		case(270,650){SetMovePosition03(224,240,15,4);}
		case(470){SetMovePosition03(124,100,15,4);}
		case(560){SetMovePosition03(324,100,15,4);}
		yield;	
	}
#include_function ".\..\txt\ImageObj.txt"
#include_function ".\..\txt\LoadData.txt"
#include_function ".\..\txt\System.txt"
#include_function ".\..\txt\MusicData.txt"
}