#東方弾幕風
#Title[テストスクリプト]
#Text[テストスクリプト]
#ScriptVersion[2]

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

        LoadGraphic("script\img\ExRumia.png");
        SetTexture("script\img\ExRumia.png");
        SetGraphicRect(0, 0, 63, 63);




	task Main
	{

	loop
		{
		loop(50){yield;}
		ascent(let i in 0..1) loop
			{
			let obj = Obj_Create(OBJ_LASER);
			Obj_SetX(obj,GetCenterX-200);
			Obj_SetY(obj,GetCenterY-220);
			Obj_SetAngle(obj,0);
			ObjShot_SetGraphic(obj,RED01);
			ObjShot_SetDelay(obj,0);
			ObjLaser_SetLength(obj,200);
			ObjLaser_SetWidth(obj,10);
			ObjLaser_SetSource(obj,false);

			loop(10){yield;}
			Obj_Delete(obj);

			let obj = Obj_Create(OBJ_LASER);
			Obj_SetX(obj,GetCenterX-200);
			Obj_SetY(obj,GetCenterY-220);
			Obj_SetAngle(obj,0);
			ObjShot_SetGraphic(obj,RED01);
			ObjShot_SetDelay(obj,0);
			ObjLaser_SetLength(obj,190);
			ObjLaser_SetWidth(obj,10);
			ObjLaser_SetSource(obj,false);

			loop(10){yield;}
			Obj_Delete(obj);

			let obj = Obj_Create(OBJ_LASER);
			Obj_SetX(obj,GetCenterX-200);
			Obj_SetY(obj,GetCenterY-220);
			Obj_SetAngle(obj,0);
			ObjShot_SetGraphic(obj,RED01);
			ObjShot_SetDelay(obj,0);
			ObjLaser_SetLength(obj,150);
			ObjLaser_SetWidth(obj,10);
			ObjLaser_SetSource(obj,false);

			loop(10){yield;}
			Obj_Delete(obj);

			let obj = Obj_Create(OBJ_LASER);
			Obj_SetX(obj,GetCenterX-200);
			Obj_SetY(obj,GetCenterY-220);
			Obj_SetAngle(obj,0);
			ObjShot_SetGraphic(obj,RED01);
			ObjShot_SetDelay(obj,0);
			ObjLaser_SetLength(obj,110);
			ObjLaser_SetWidth(obj,10);
			ObjLaser_SetSource(obj,false);

			loop(10){yield;}
			Obj_Delete(obj);

			let obj = Obj_Create(OBJ_LASER);
			Obj_SetX(obj,GetCenterX-200);
			Obj_SetY(obj,GetCenterY-220);
			Obj_SetAngle(obj,0);
			ObjShot_SetGraphic(obj,RED01);
			ObjShot_SetDelay(obj,0);
			ObjLaser_SetLength(obj,100);
			ObjLaser_SetWidth(obj,10);
			ObjLaser_SetSource(obj,false);

			loop(10){yield;}
			Obj_Delete(obj);

			}
		}
	}
	Main;
}


@MainLoop{SetCollisionA(GetX, GetY, 24);SetCollisionB(GetX, GetY, 24);yield;}
@DrawLoop{DrawGraphic(GetX, GetY);}
@Finalize{DeleteGraphic("script\img\ExRumia.png");}
}