
#Title[tUq]
#ScriptVersion[2]
#Player[FREE]
#Text[]
#BackGround[User(.\back.png,0,0)]

script_enemy_main
{
let GC=GetCurrentScriptDirectory;
@Initialize
{
LoadGraphic(GC~".\main.png");
SetTexture(GC~".\main.png");
SetGraphicRect(0,0,32,40);
LoadUserShotData(GC~".\burret01.txt");
PlayMusic("bgm\fran");
SetDamageRate(10,10);
SetLife(10000);
SetTimer(30);

Tmain;
Twing;
Tbat;
}
@MainLoop
{
SetCollisionA(GetX,GetY,24);
SetCollisionB(GetX,GetY,12);
yield;
}
@DrawLoop
{
DrawGraphic(GetX,GetY);
}
@Finalize
{
AddScore(10000);
//loop(20){CreateItem(ITEM_SCORE,GetX+rand(-50,50),GetY+rand(-30,30))};
DeleteGraphic(GC~".\main.png");
}

task Tmain
{
loop(120){yield;}
SetDamageRate(500,250);
Tattack;
loop
	{
	let X=GetX;
	let Y=GetClipMinY+rand(60,150);
	if(GetX<GetPlayerX)
		{
		pattern(1);
		X=X+80;
		if(X>=GetClipMaxX)
			{
			pattern(2);
			X=X-160;
			}
		
		}
	else
		{
		pattern(2);
		X=X-80;
		if(X<=GetClipMinX)
			{
			pattern(1);
			X=X+160;
			}
		}
	SetMovePosition03(X,Y,15,3.2);
	loop(70){yield;}
	pattern(0);
	loop(15){yield;}
	}
}

task Tattack
{
loop
	{
	DeleteSE("se\seShot");
	PlaySE("se\seShot");
	N_around(36,4.5,0,-0.1,1.5,34,5);
	N_around(36,5,0,-0.1,2,34,5);
	loop(28){yield;}
	}
}

#include_function ".\function.txt"

}