#“Ś•ű’e–‹•—[Single]
#ScriptVersion[3]
#Title["e"]
#Text["e"]
#Background["script/default_system/Default_Background_IceMountain.txt"]

#include"script/default_system/Default_ShotConst.txt"

let objEnemy;
let objPlayer;
let frame = 0;

@Event{
	alternative(GetEventType())
	case(EV_REQUEST_LIFE){
		SetScriptResult(500);
	}
}

@Initialize{
	objPlayer = GetPlayerObjectID();

	objEnemy = ObjEnemy_Create(OBJ_ENEMY_BOSS);
	ObjEnemy_Regist(objEnemy);

	let imgExRumia = GetCurrentScriptDirectory ~ "ExRumia.png";
	ObjPrim_SetTexture(objEnemy, imgExRumia);
	ObjSprite2D_SetSourceRect(objEnemy, 64, 1, 127, 64);
	ObjSprite2D_SetDestCenter(objEnemy);

	let cx = GetStgFrameWidth() / 2;
	ObjMove_SetDestAtFrame(objEnemy, cx, 120, 60);

	ekkusu();
}

function ekkusu(){
	PatternX();
	PatternY();
}

@MainLoop{
	ObjEnemy_SetIntersectionCircleToShot(objEnemy, ObjMove_GetX(objEnemy), ObjMove_GetY(objEnemy), 32);
	ObjEnemy_SetIntersectionCircleToPlayer(objEnemy, ObjMove_GetX(objEnemy), ObjMove_GetY(objEnemy), 24);

	if(ObjEnemy_GetInfo(objEnemy, INFO_LIFE) <= 0){
		Obj_Delete(objEnemy);
		CloseScript(GetOwnScriptID());
		return;
	}

	yield;
}

task PatternX(){
	loop{
		let px = ObjMove_GetX(objPlayer);
		let py = ObjMove_GetY(objPlayer);
		let ex = ObjMove_GetX(objEnemy);
		let ey = ObjMove_GetY(objEnemy);
		let angleToPlayer = atan2(py - ey, px - ex);
		let erien = rand(-3, +3);
		let angle=0+erien;
		while(angle<=360+erien){
			let obj1 = CreateShotA1(ex, ey, 3, angle, DS_BALL_SS_WHITE, 15);
			ObjMove_AddPatternA1(obj1, 10, 3, angle);
			angle+=10;
		}
		loop(30){yield;}
	}
}

task PatternY(){
	loop{
		let px = ObjMove_GetX(objPlayer);
		let py = ObjMove_GetY(objPlayer);
		let ex = ObjMove_GetX(objEnemy);
		let ey = ObjMove_GetY(objEnemy);
		let angleToPlayer = atan2(py - ey, px - ex);
		let angle=-40;
		while(angle<=40){
			let obj1 = CreateShotA1(ex, ey, 0, 0, DS_RICE_M_GREEN, 15);
			ObjMove_AddPatternA1(obj1, 0, rand(1.5, 2), angle+angleToPlayer);
			angle+=5;
		}
		loop(70){yield;}
	}
}