#e[Stage]
#Title[Extra]
#Text[ӊOƊȒPEEECyɂǂ]
#Image[.\img\sakuya-top.bmp]
#PlayLevel[Extra]
#BackGround[Default]
#Player[FREE]
#ScriptVersion[2]

script_stage_main
{
	SetAllowedContinueCount(0);
	let Music1 = GetCurrentScriptDirectory~".\BGM\th06_11.wav";
	let Music2 = GetCurrentScriptDirectory~".\BGM\th06_14.wav";
	let point = 50;
	
	let cx=GetCenterX();//STGV[̒SxW擾
	task StageTask
	{//Xe[W^XN
		function WaitForZeroEnemy()
		{//G0ɂȂ܂őҋ@֐
			while(GetEnemyNum() != 0){yield;}
		}	
		PlayMusic(Music2);
		Wait(300);//60t[҂
		WaitForZeroEnemy();//G܂Œ~
		zako(8,10,1);
		zako(8,10,2);
		zako(8,10,1);
		zako(8,10,2);
		zako(8,10,1);
		zako(8,10,2);
		Wait(180);
		zako(1,0,3);
		zako(1,0,4);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);
		zako(1,0,5);
		zako(1,0,6);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);
		zako(1,0,3);
		zako(1,0,4);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);
		zako(1,0,5);
		zako(1,0,6);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);
		zako(8,10,7);
		zako(8,10,8);
		zako(8,10,7);
		zako(8,10,8);
		WaitForZeroEnemy();//G܂Œ~
		Wait(120);//120t[҂
		CreateEventFromScript("Event1");//Event1Ăяo
		CreateEnemyBossFromFile(GetCurrentScriptDirectory~"Xy.txt",cx,0,0,0,0);
		WaitForZeroEnemy();//G܂Œ~
		Wait(180);//240t[҂
		zako(1,0,10);
		zako(1,0,12);
		zako(1,0,14);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);
		zako(1,0,9);
		zako(1,0,11);
		zako(1,0,13);
		zako(1,0,15);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);
		zako(1,0,9);
		zako(1,0,10);
		zako(1,0,12);
		zako(1,0,14);
		zako(1,0,15);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);
		zako(1,0,9);
		zako(1,0,10);
		zako(1,0,11);
		zako(1,0,13);
		zako(1,0,14);
		zako(1,0,15);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);
		zako(1,0,9);
		zako(1,0,10);
		zako(1,0,11);
		zako(1,0,12);
		zako(1,0,13);
		zako(1,0,14);
		zako(1,0,15);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);
		zako(1,0,16);
		WaitForZeroEnemy();//G܂Œ~
		FadeOutMusic(Music1,20);
		CreateEventFromScript("Event2");//Event2Ăяo
		PlayMusic(Music1);
		CreateEnemyBossFromFile(GetCurrentScriptDirectory~"Xy.txt",cx,0,0,0,0);
		WaitForZeroEnemy();//G܂Œ~
		Wait(60);//60t[҂
		DrawText("TOTAL SCORE",60,300,24,255);
		let score = GetScore;
		DrawText (NumToString(score), 200, 300, 24, 255);
		Wait(300);//60t[҂
		Clear();//Xe[WNA
	}
	@Initialize()
	{
		
		StageTask();//Xe[W^XNN
	}
	
	@MainLoop()
	{
		yield;//t[^XNA
	}
	
	@Finalize()
	{
		DeleteMusic(Music1);
		DeleteMusic(Music2);
	}
/*
	@BackGround()
	{
	 //@BackGround݂
	 //#BackGround[Default]D悳ĕ`悳
	}
*/
#include_function ".\֐.txt"	
}

script_event Event1
	{
		@Initialize
		{
			LoadGraphic(GetCurrentScriptDirectory~".\img\cutReimu.png");
			LoadGraphic(GetCurrentScriptDirectory~".\img\cutMarisa.png");
			LoadGraphic(GetCurrentScriptDirectory~".\img\cutChina.png");
		}
		
		@MainLoop
		{
			if(GetPlayerType==REIMU_A || GetPlayerType==REIMU_B)
			{SetChar(LEFT,GetCurrentScriptDirectory~".\img\cutReimu.png");}//LN^̉摜ݒ
			if(GetPlayerType==MARISA_A || GetPlayerType==MARISA_B)
			{SetChar(LEFT,GetCurrentScriptDirectory~".\img\cutMarisa.png");}//LN^̉摜ݒ
			SetGraphicRect(LEFT,1,1,128,256);//LN^̕\摜`ݒ
			MoveChar(LEFT,FRONT);//̃LN^OɈړ
			Wait(30);//30t[҂
			TextOutB(180,"Ch͓l̖ʓ|Ȃ̂B\n
				SAl炢ŁB\n
				zSOƂɂȂ̂B\n
				āA̒B");//`
		
			SetChar(RIGHT,GetCurrentScriptDirectory~".\img\cutChina.png");//ELN^̉摜ݒ
			SetGraphicRect(RIGHT,0,0,256,256);
			MoveChar(LEFT,BACK);//̃LN^Ɉړ
			MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
			Wait(30);//30t[҂
			TextOutB(180,"ƁA͒Ȃ!\n񌾂番!");//`
			TextOutB(180,"AiɂЂꕚȂI");//`
			End();//ŌEnd()͕K{
		}
		
		@Finalize
		{
			DeleteGraphic(GetCurrentScriptDirectory~".\img\cutReimu.png");
			DeleteGraphic(GetCurrentScriptDirectory~".\img\cutMarisa.png");
			DeleteGraphic(GetCurrentScriptDirectory~".\img\cutChina.png");
		}
	}

script_event Event2
	{
		@Initialize
		{
			LoadGraphic(GetCurrentScriptDirectory~".\img\cutReimu.png");
			LoadGraphic(GetCurrentScriptDirectory~".\img\cutMarisa.png");
			LoadGraphic(GetCurrentScriptDirectory~".\img\cutSakuya.png");
		}
		
		@MainLoop
		{
			if(GetPlayerType==REIMU_A || GetPlayerType==REIMU_B)
			{SetChar(LEFT,GetCurrentScriptDirectory~".\img\cutReimu.png");}//LN^̉摜ݒ
			if(GetPlayerType==MARISA_A || GetPlayerType==MARISA_B)
			{SetChar(LEFT,GetCurrentScriptDirectory~".\img\cutMarisa.png");}//LN^̉摜ݒ
			SetChar(RIGHT,GetCurrentScriptDirectory~".\img\cutSakuya.png");//ELN^̉摜ݒ
			SetGraphicRect(LEFT,0,0,128,256);//LN^̕\摜`ݒ
			SetGraphicRect(LEFT,0,0,128,256);//ELN^̕\摜`ݒ
			MoveChar(LEFT,FRONT);//̃LN^OɈړ
			Wait(30);//30t[҂
			TextOutB(180,"AgȂCh");//`
			SetGraphicRect(RIGHT,1,1,255,255);
			MoveChar(LEFT,BACK);//̃LN^Ɉړ
			MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
			Wait(30);//30t[҂
			TextOutB(180,"Ȃ艽H");//`
			MoveChar(RIGHT,BACK);
			MoveChar(LEFT,FRONT);
			TextOutB(180,"̋zSӌz\nĂ̂B");//`
			TextOutB(180,"ɗ킯B");//`
			MoveChar(LEFT,BACK);
			MoveChar(RIGHT,FRONT);
			TextOutB(180,"ʂɂȂAOɏo邮炢");//`
			MoveChar(LEFT,FRONT);
			MoveChar(RIGHT,BACK);
			TextOutB(180,"̂ˁAioĂȂȂ\nOɏoĂȂĉƎvłH");
			MoveChar(LEFT,BACK);
			MoveChar(RIGHT,FRONT);
			TextOutB(180,"ʂɎvȂ");//`
			MoveChar(LEFT,FRONT);//̃LN^Ɉړ
			MoveChar(RIGHT,BACK);//ẼLN^OɈړ
			TextOutB(180,"ꂾ͓݂̂");
			TextOutB(180,"傤ȂA͍sg");
			MoveChar(LEFT,BACK);//̃LN^Ɉړ
			MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
			TextOutB(180,"ȂɂꂪłāH");//`
			End();//ŌEnd()͕K{
		}
		
		@Finalize
		{
			DeleteGraphic(GetCurrentScriptDirectory~".\img\cutReimu.png");
			DeleteGraphic(GetCurrentScriptDirectory~".\img\cutMarisa.png");
			DeleteGraphic(GetCurrentScriptDirectory~".\img\cutSakuya.png");
		}
	}
