#e[Player]	//@XNvgł邱Ƃ܂
#ScriptVersion[2]	//XNvgo[W2K{ł
#Menu[Bc]		//@Iʂŕ\郁j[ł
#Text[Ver.1.01
CFM͒e
Tu@F`̖n`
{@Fu䈢]v
UЗ́F
Ú͈F
xF
ᑬxF
\́FjƋĽ
{ĂȂɁA
@e̐gƂȂB
OCYƓ_Ń{[B
]	//@Iʂŕ\eLXgł
#Image[.\img\image_AQU.png]
#ReplayName[AQU]	//vCIɕ\镶łB8ȓłB

script_player_main
{
	let current = GetCurrentScriptDirectory();//JgfBNg擾
	let imgAQU = current~"img\AQU.png";
	let CutAQU = current~"img\cutin_AQU.png";
	let shotCount = -1;//eAŔ˂邽߂̕ϐ
	let bNextShot = false;//񉟂łeA˂邽߂̕ϐ(Â炢)
	let SubShot = false;
	let IDOU = 0;
	let imgAngle = 0;
	let imgAlpha = 0;
	let imgSize = 0;
	let count = 0;
	let GpointA1 = 0;
	let GpointB1 = 0;
	let GpointA2 = 0;
	let GpointB2 = 0;
	let GpointC = 0;
	let Flag = false;

	@Initialize
	{	
		SetPlayerLifeImage(imgAQU,4,0,27,31);
		LoadGraphic(imgAQU);
		SetSpeed(3,1);
		SetInitialBombCount(2);
		LoadPlayerShotData(current~"AQUShotData.txt");
		SetItemCollectLine(200);
		SetRateScoreSystemEnable(false);
	}
	
	@MainLoop
	{


		if(GpointC<100&&Flag==false)
		{
			GpointA2=GetGraze-GpointA1;
			GpointB2=GetPoint-GpointB1;
			GpointC=GpointA2+GpointB2;
		} else if(GpointC>=100&&Flag==false)
		{
			GpointA1=GetGraze;
			GpointB1=GetPoint;
			GpointA2=0;
			GpointB2=0;
			GpointC=0;
			AddBomb(1);
		PlaySE("seSuperNaturalBorder2.wav");
		}
		if(GetPlayerBomb>2)
		{
			GpointC=0;
			Flag=true;
		} else {Flag=false;}

		if((GetKeyState(VK_SHOT)==KEY_PUSH||GetKeyState(VK_SHOT)==KEY_HOLD||bNextShot==true)&&shotCount==-1)
		{
			shotCount = 0;
			bNextShot = false;
		}
		if(GetKeyState(VK_SHOT)==KEY_HOLD&&shotCount>0)
		{
			bNextShot = true;
		}

	    if(!OnMissed&&!OnEvent){
		if(GetKeyState(VK_SLOWMOVE)==KEY_PUSH||GetKeyState(VK_SLOWMOVE)==KEY_HOLD)
		{	//ᑬړ̎e
			if(shotCount%4==0)
			{
				PlaySE("sePlayerShot01.wav");
				MainShot(rand(265,275));
			}
		}
		else
		{	//ړ̎e
			if(shotCount%4==0)
			{
				PlaySE("sePlayerShot01.wav");
				MainShot(rand(260,280));
			}
		}

		if(shotCount>=0)
		{
			shotCount++;
		}
		if(shotCount==40)
		{
			shotCount=-1;
		}
		} else {shotCount=-1;}

		if(GetPlayerBomb>3){AddBomb(-1);}
		if(GetPlayerLife>5){ExtendPlayer(-1);}

		if(OnBomb)
		{
			imgAngle=imgAngle+4;
			if(count<100){imgAlpha=imgAlpha+5;}
			if(count<100){imgSize=imgSize+0.08;}
			if(imgAngle>=360){imgAngle=0;}
			if(imgAlpha>=250){imgAlpha=250;}
			if(imgSize>=2){imgSize=2;}
			if(count>=152){imgAlpha=imgAlpha-5;}
			if(count>=150){imgSize=imgSize-0.04;}
			count++;
		} else {
			count=0;
			imgAlpha=0;
			imgSize=0;}

		SetIntersectionCircle(GetPlayerX,GetPlayerY,1.5);//蔻o^
		yield;
	}

task MainShot(angle){
	let obj = Obj_Create(OBJ_SHOT);
	Obj_SetPosition(obj,GetPlayerX,GetPlayerY-20);
	Obj_SetSpeed(obj,7);
	Obj_SetAngle(obj,angle);
	ObjShot_SetDamage(obj,3);
	ObjShot_SetPenetration(obj,1);
	ObjShot_SetGraphic(obj,1);
	Obj_SetAlpha(obj,155);

	while(!Obj_BeDeleted(obj)){
		if(Obj_IsIntersected(obj)){
			SubShot2(Obj_GetX(obj),Obj_GetY(obj));
			Obj_Delete(obj);
			}
		yield;
		}
	}

task SubShot2(x,y){
	let obj = Obj_Create(OBJ_SHOT);
	let alpha = 255;
	Obj_SetPosition(obj,x+rand(-5,5),y+rand(-25,5));
	ObjShot_SetDamage(obj,0.3);
	ObjShot_SetPenetration(obj,100);
	ObjShot_SetGraphic(obj,rand_int(2,3));
	Obj_SetAlpha(obj,255);

	loop(51){
		alpha=alpha-5;
		Obj_SetAlpha(obj,alpha);
		yield;
		}
	Obj_Delete(obj);
	}

	@Missed{
		GpointA1=GetGraze;
		GpointB1=GetPoint;
		GpointA2=0;
		GpointB2=0;
		GpointC=0;
		if(GetPlayerBomb>0){CallSpellCard;}
		}

	@SpellCard
	{
	if(IsLastSpell||OnMissed){
		UseSpellCard("reza",0);
        	CutIn(KOUMA,"u䈢]v",CutAQU);
		} else {AddBomb(1);}
	}
	
	@DrawLoop
	{
		if(GetPlayerX()<150&&GetPlayerY()>410){SetAlpha(100);} else {SetAlpha(255);}

		SetTexture(imgAQU);
		SetGraphicAngle(0,0,0);
		SetRenderState(ALPHA);
		SetGraphicRect(4,164,103,172);
		SetGraphicScale(GpointC*0.01,1);
		DrawGraphic(307+GpointC/2,455);
		SetGraphicRect(1,149,106,161);
		SetGraphicScale(1,1);
		SetColor(255,255,255);
		DrawGraphic(357,455);

		SetAlpha(imgAlpha);
		SetColor(255,0,128);
		SetRenderState(ALPHA);
		SetGraphicAngle(0,0,imgAngle);
		SetGraphicScale(imgSize,imgSize);
		SetTexture(imgAQU);
		SetGraphicRect(32,0,95,63);
		DrawGraphic(GetPlayerX(), GetPlayerY());
		SetRenderState(ALPHA);
		SetGraphicAngle(0,0,-imgAngle);
		SetGraphicScale(4-imgSize,4-imgSize);
		DrawGraphic(GetPlayerX(),GetPlayerY());

		SetAlpha(255);
		SetColor(255,255,255);
		SetRenderState(ALPHA);
		SetGraphicAngle(0,0,IDOU);
		SetGraphicScale(1,1);
		SetTexture(imgAQU);
		SetGraphicRect(0,0,31,31);
		if(GetKeyState(VK_LEFT)==KEY_PUSH||GetKeyState(VK_LEFT)==KEY_HOLD)
		{
		if(IDOU>=-20){IDOU=IDOU-1;}
		}
		else if(GetKeyState(VK_RIGHT)==KEY_PUSH||GetKeyState(VK_RIGHT)==KEY_HOLD)
		{
		if(IDOU<=20){IDOU=IDOU+1;}
		}
		else 
		{
		if(IDOU>0)
		{IDOU=IDOU-1;} else if(IDOU<0){IDOU=IDOU+1;}
		}
		DrawGraphic(GetPlayerX(), GetPlayerY());	
	}
	
	@Finalize
	{
		DeleteGraphic(imgAQU);
	}
}

script_spell reza
{
	@Initialize
	{
		SetPlayerInvincibility(250);
		shoot;
	}
	@MainLoop
	{
		CollectItems;
		yield;
	}
	@Finalize
	{
	}

	task shoot{
		loop(200){yield;}
		PlaySE("seSuperNaturalBorder1.wav");
		DeleteEnemyShotToItem(SHOT);
		loop(50){yield;}
		End;
		}
	}
}