#東方弾幕風[Stage]
#ScriptVersion[3]
#Title["Vs Remilia-Yuyuko"]
#Player["./player/player.txt"]
#Text["LOCAA4 Entry by Gusano2314[r]AKA Pig Vader"]
#System["./system/Default_System.txt"]
@Initialize
{
	TStage();
SetPlayerLife(7);
	SetPlayerSpell(2);
Back(15);
}

@MainLoop
{
	yield;
}

@Finalize
{
}


task TStage
{
	let dir = GetCurrentScriptDirectory();

	//ボス再生
	let path = dir ~ "#1plural.txt";
	let idScript = LoadScriptInThread(path);
	loop(60){yield;}//1秒くらいあれば、コンパイル完了すると思われる。
	StartScript(idScript);

	//敵ボスシーンが終了するまで待機
	while(!IsCloseScript(idScript) && GetPlayerState() != STATE_END)
	{
		yield;
	}
	path = dir ~ "#2plural.txt";
	idScript = LoadScriptInThread(path);
	//loop(60){yield;}//1秒くらいあれば、コンパイル完了すると思われる。
	StartScript(idScript);
LoadSound(dir ~ "bgm/bgm.ogg");
PlayBGM(dir ~ "bgm/bgm.ogg",0,0);
	//敵ボスシーンが終了するまで待機
	while(!IsCloseScript(idScript) && GetPlayerState() != STATE_END)
	{
		yield;
	}
	//〜〜〜敵の出現やボスの出現を繰り返す。

	loop(240){yield;}

    //ステージ終了
	CloseStgScene();
}

task Back(Size){
    let SFobj = ObjPrim_Create(OBJ_SPRITE_3D);
    let SFimg = GetCurrentScriptDirectory ~ "gbg1.png";
     let move = 0;
    LoadTexture(SFimg);
    ObjPrim_SetTexture(SFobj,SFimg);
    ObjSprite3D_SetSourceRect(SFobj,0,0,256*Size,256*Size);
    ObjSprite3D_SetDestRect(SFobj,-128*Size,-128*Size,128*Size,128*Size);
  
    ObjRender_SetAngleXYZ(SFobj,-100,75,0);
     
    SetCameraRadius(700);
     
    //SetFogEnable(false);
    //SetFogParam(1100,1500,255,255,255);
     
    Obj_SetRenderPriorityI(SFobj,20);
     
    while(!Obj_IsDeleted(SFobj)){
  ObjSprite3D_SetSourceDestRect(SFobj,0*Size,0*Size,256*Size,256*Size+move);
move += 15.231;
    yield;
    }
}