#e
#Title[(AR)]
#Text[Ayako]
#Image[.\..\img\Select\Select03.png]
#Player[FREE]
#ScriptVersion[2]
#BackGround[User(.\..\BG\Map1\O1.png,0,-2)]

script_enemy_main {
	let csd = GetCurrentScriptDirectory;
	let Img = [
		csd~"..\img\KanAyako.png",
		csd~"..\img\System.png",
		];
	let count = 0;
	let Moct = 0;
	let nx=93;
	let ny=84;
	
	let Angle = 90;
	
	@Initialize{
		SetX(GetCenterX);
		SetY(GetCenterY-120);
		
		SetLife(5500);
		SetDamageRate(100,100);
		SetTimer(90);
		SetScore(4000);
		
		LoadData;
		ShotData;
		PlayMusic(BGM[8]);
	}
	
	@MainLoop {
		SetCollisionA(GetX,GetY,20);
		SetCollisionB(GetX,GetY,20);
		MagicCircle(false);
		
		alternative(GetTimer)
		case(16,59){Concentration01(40);}
		
		if(GetTimer>60){
			if(GetPlayerY>GetY+50){
				ShotA;
				MoveA;
			}
			else if(GetPlayerY<GetY+50){
				if(count%15==0){ShotB;}
				MoveB;
			}
		}
		else if(GetTimer>17&&GetTimer<58){
			if(Moct>50&&Moct<90||Moct>160&&Moct<200||Moct>270&&Moct<310){
				if(count%10==0){ShotC;}
			}
			MoveC;
		}
		else if(GetTimer<15){
			if(count%15==0){ShotD;}
			SetMovePosition03(224,140,15,9);
		}
		if(count==60){count=0;}
		if(Moct==361){Moct=0;}
		count++;Moct++;
		yield;
	}
	
	@DrawLoop {
		if(GetTimer>60){
			if(int(GetSpeedX)==0){BossImg(x[0],y[0],x[1],y[1]);}
			else if(GetSpeedX>0||GetSpeedX<0){
			BossImg(x[1],y[0],x[2],y[1]);
			}
		}
		else if(GetTimer>17&&GetTimer<58){
			if(int(GetSpeedX)==0){BossImg(x[0],y[1],x[1],y[2]);}
			else if(GetSpeedX>0){BossImg(x[0],y[2],x[1],y[3]);}
			else if(GetSpeedX<0){BossImg(x[1],y[2],x[2],y[3]);}
		}
		else{
			BossImg(x[1],y[1],x[2],y[2]);
		}
		LifeDraw(5500);
		yield;
	}
	
	@Finalize {
		DeleteData;
	}
	task ShotA{//e
		alternative(count)
		case(3,6,9,12,15){CreateShot01(GetX-20,GetY+5,8,GetAngleToPlayer-5,25,10);}
		}
	task ShotB{//C
		let way = -25+GetAngleToPlayer;
			loop(6){
				CreateShot01(GetX+6,GetY-10,5,way,23,5);
			way+=10;
			}
		}
	task ShotC{//RAVbgA
		let way = -25+GetAngleToPlayer;
		loop(5){
			CreateShot01(GetX,GetY-4,9,way+rand(0,10),
			[14,15][rand_int(0, 1)],10);
			way+=10;
			}
		}
	task ShotD{//RAVbgB
		let way = -30+GetAngleToPlayer;
			loop(7){
				CreateShot01(GetX,GetY-4,10,way,23,5);
			way+=10;
			}
		}
	task ShotE{//ATgt@C^[

		}
	task MoveA{//224,140
		alternative(Moct)
		case(60,120,180,240,300,360){SetMovePosition03(GetPlayerX,160,15,4);}
		yield;	
	}
	task MoveB{//224,140
		alternative(Moct)
		case(0,110,220,330){SetMovePosition03(GetPlayerX,GetPlayerY+20,15,4);}
		yield;
	}	
	task MoveC{//224,140
		alternative(Moct)
		case(0,110,220,330){SetMovePosition03(GetPlayerX,GetPlayerY,20,6);}
		yield;
	}
#include_function ".\..\txt\ImageObj.txt"
#include_function ".\..\txt\LoadData.txt"
#include_function ".\..\txt\System.txt"
#include_function ".\..\txt\MusicData.txt"
}