#東方弾幕風
#Title[渦巻き弾]
#Text[形を崩さず量を二倍にした]
#ScriptVersion[2]

script_enemy_main {
	let imgBoss = "script\img\ExRumia.png";

	@Initialize {
		SetX(GetCenterX);
		SetY(GetClipMinY + 120);
		SetLife(2000);

		LoadGraphic(imgBoss);
		SetTexture(imgBoss);
		SetGraphicRect(0, 0, 63, 63);
		shot;
	}

	@MainLoop {
		SetCollisionA(GetX, GetY, 24);
		SetCollisionB(GetX, GetY, 24);
		yield;
	}

	@DrawLoop {
		DrawGraphic(GetX, GetY);
	}

	@Finalize {
		DeleteGraphic(imgBoss);
	}

	task shot{
		yield;
		let angle=90;
		loop{
			CreateShot01(GetX,GetY,2,angle,RED01,0);
			angle+=7;
			obj_shot(GetX,GetY,1,angle,RED01);
			angle+=7;
			yield;
		}
	}

	task obj_shot(let set_x,let set_y,let speed,let angle,let color){
		let obj=Obj_Create(OBJ_SHOT);
		ObjShot_SetGraphic(obj,color);
		Obj_SetPosition(obj,set_x,set_y);
		Obj_SetSpeed(obj,speed);
		Obj_SetAngle(obj,angle);
		yield;
		Obj_SetSpeed(obj,speed+1);
	}
}