#e
#Title[u@-O-v]
#ScriptVersion[2]
#Player[FREE]
#Text[̊ԂɂoĂgXe]
#Image[.\snap_uu5.bmp]
#BackGround[User]

script_enemy_main
{
let GC=GetCurrentScriptDirectory;
 let frame=0;
  @Initialize
	{
	PlayMusic("bgm\uu5");
	LoadGraphic(GC~".\uu5.png");
	SetTexture(GC~".\uu5.png");
	SetGraphicRect(0,0,32,40);
	SetX(GetCenterX);
	SetY(GetClipMinY+60);
	SetLife(1);
	SetTimer(66);
	SetDamageRate(0,0);
//------------XyJ̉--------------
	SetScore(100000);//
	CutIn(KOUMA,"u@-O-v",0,0,0,0,0);
	SetDurableSpellCard();	
	MagicCircle(false);
//------------------------------------
	Tmain;
	}

  @MainLoop
	{
	frame=frame+1;
	yield;
	}
  @DrawLoop
	{
	DrawGraphic(GetX,GetY,);
	}

  @Finalize
	{
	AddScore(100000);
	loop(30){CreateItem(ITEM_SCORE,GetX+rand(-100,100),GetY+rand(-50,50));}
	if(GotSpellCardBonus==true){CreateItem(ITEM_BOMB,GetX,GetY);}
	DeleteGraphic(GC~"..\img\}.bmp");
	}

task Tmain
{
Concentration01(80);
loop(80){yield};
Tyuyu;
loop
	{
	yield;
	}
}

task Tyuyu
{
let laser=3;
loop
	{
	let left=1;
	loop(1)
		{
		let angle=90+90/laser;
		loop(laser)
			{
			Tlaser(angle,PURPLE04,1);
			Tlaser(angle+180/laser,BLUE04,-1);
			angle=(angle+360/laser)%360;
			}
		}	
	loop(1)
		{
		let way=44;
		let angle=0;
		loop(6)
			{
			loop(way)
				{
				let speed=2;
				loop(3)
					{
					CreateShotA(0,GetX,GetY,0);
					SetShotDataA(0,0,1,angle,0,0,1,BLUE22);
					SetShotDataA(0,50,1,angle,0,(speed-1)/60,speed,BLUE22);
					FireShot(0);
					speed=speed+1;
					}
				angle=angle+360/way;
				}
			angle=angle+180/way;
			loop(6){yield;}
			}
		}
	loop(100){yield;}
	left=1;
	let count=0;
	loop(4)
		{
		let angle=GetAngleToPlayer;
		let way=48;
		loop(way)
			{
			let speed=3;
			loop(3)
				{
				CreateShotA(0,GetX,GetY,20);
				SetShotDataA(0,0,2,angle,0.4*left,0,2,PURPLE22);
				SetShotDataA(0,100+count*10,2,NULL,0,(speed-2)/30,speed,PURPLE22);
				FireShot(0);
				speed=speed+1;
				}
			angle=(angle+360/way)%360;
			}
		left=left*-1;
		count=count+1;
		loop(30){yield;}
		}
	loop(60){yield;}
	yield;
	laser=laser+1;
	Tflow;
	}
}

task Tlaser(angle,type,left)
{
angle=angle-90*left;
let id=Obj_Create(OBJ_LASER);
ObjShot_SetGraphic(id,type);
ObjShot_SetDelay(id,80);
ObjLaser_SetLength(id,350);
ObjLaser_SetWidth(id,12);
loop(60)
	{
	angle=angle+1.5*left;
	Obj_SetPosition(id,GetX+100*cos(angle),GetY+100*sin(angle));
	Obj_SetAngle(id,angle);
	yield;
	}
loop(180){yield;}
Obj_Delete(id);
}

task Tflow
{
SetShotAutoDeleteClip(0,120,0,0);
let angle=270;
let rad=100;
let X=GetX;
let Y=GetY;
loop(20)
	{
	Tfall(GetX+rad*cos(angle),GetY+rad*sin(angle));
	Tfall(GetX+rad*cos(180-angle),GetY+rad*sin(180-angle));
	angle=angle-18;
	loop(3){yield;}
	}
loop(40)
	{
	Tfall(GetX+rad*cos(angle),GetY+rad*sin(angle));
	Tfall(GetX+rad*cos(180-angle),GetY+rad*sin(180-angle));
	angle=angle-3;
	rad=rad+5;
	loop(3){yield;}
	}
}

task Tfall(X,Y)
{
let id=Obj_Create(OBJ_SHOT);
Obj_SetPosition(id,X,Y+rand(-10,10));
Obj_SetAngle(id,rand(0,360));
Obj_SetAlpha(id,180);
ObjShot_SetGraphic(id,PURPLE23);
loop(80+trunc(rand(0,20)))
	{
	Obj_SetY(id,Obj_GetY(id)+1.5);
	Obj_SetAngle(id,Obj_GetAngle(id)+10);
	yield;
	}
ObjShot_FadeDelete(id);
loop(40)
	{
	Obj_SetY(id,Obj_GetY(id)+1.5);
	Obj_SetAngle(id,Obj_GetAngle(id)+10);
	yield;
	}
}




}