script_event REIMU51{

	@Initialize
	{
	LoadGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	LoadGraphic(GetCurrentScriptDirectory~"\img\Yuyuko.png");
	}

	@MainLoop{
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//LN^̉摜ݒ
	SetGraphicRect(LEFT,1,1,255,255);//LN^̕\摜`ݒ
	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	Wait(30);//30t[҂
	TextOut("\c[BLUE]ςˁB\n
	Ȃ񂩁ASB\n
	ǂȂẮH");//`

	SetChar(RIGHT,GetCurrentScriptDirectory~"\img\Yuyuko.png");//ELN^̉摜ݒ
	SetGraphicRect(RIGHT,1,1,255,255);
	MoveChar(LEFT,BACK);//̃LN^Ɉړ
	MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
	Wait(30);//30t[҂
	TextOut("\c[RED]炠AςMȂ̂");//`

	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	MoveChar(RIGHT,BACK);//ẼLN^Ɉړ
	TextOut("\c[BLUE]ĂƂ́AMH");//`

	MoveChar(LEFT,BACK);//̃LN^Ɉړ
	MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
	TextOut("\c[RED]AƎ");//`

	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	MoveChar(RIGHT,BACK);//ẼLN^Ɉړ
	TextOut("\c[BLUE]ǂ悤Ȃ񂾂\n
		܁ABdގdގ");//`

	MoveChar(LEFT,BACK);//̃LN^Ɉړ
	MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
	TextOut("\c[RED]炠AɂȂłĂ̂\n
		łĂdȂ܂");//`

	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	MoveChar(RIGHT,BACK);//ẼLN^Ɉړ
	TextOut("\c[BLUE]ǎ܌墂̂");//`

	MoveChar(LEFT,BACK);//̃LN^Ɉړ
	MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
	TextOut("\c[RED]炻B`");//`

	MoveChar(RIGHT,BACK);//ẼLN^Ɉړ
	TextOut("\c[AQUA]uAHXqH\n
	̉ɗp邩ʂĂȂHv");//`

	MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
	TextOut("\c[RED]ƖBƎ҂ČȂ");//`

	MoveChar(RIGHT,BACK);//ẼLN^Ɉړ
	TextOut("\c[AQUA]uȂA͂Łv");//`

	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	TextOut("\c[BLUE]͎̂Ȃ񂾂珟ȂƌȂ́I");//`
	End();//ŌEnd()͕K{
	}
		
	@Finalize
	{
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Yuyuko.png");
	}
}

script_event REIMU52{

	@Initialize
	{
	LoadGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	LoadGraphic(GetCurrentScriptDirectory~"\img\Yuyuko.png");
	}
		
	@MainLoop
	{
	let choose = Select("Eɐi(Stage6A)","ɐi(Stage6B)");
	SetCommonData("STAGE6_CHOOSE",choose);
	if(choose == 1){
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//LN^̉摜ݒ
	SetGraphicRect(LEFT,1,1,255,255);//LN^̕\摜`ݒ
	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	Wait(30);//30t[҂
	TextOut("\c[BLUE]ӂAAꓹ");//`

	SetChar(RIGHT,GetCurrentScriptDirectory~"\img\Yuyuko.png");//ELN^̉摜ݒ
	SetGraphicRect(RIGHT,1,1,255,255);
	MoveChar(LEFT,BACK);//̃LN^Ɉړ
	MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
	Wait(30);//30t[҂
	TextOut("\c[RED]cs");//`

	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	MoveChar(RIGHT,BACK);//ẼLN^Ɉړ
	TextOut("\c[BLUE]܂AɒĈٕς̎菕Ȃ񂩂̂͂߂Ȃ");//`

	MoveChar(LEFT,BACK);//̃LN^Ɉړ
	MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
	TextOut("\c[RED]AĂc\n
		߂ȂA債ƏoȂ");//`

	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	MoveChar(RIGHT,BACK);//ẼLN^Ɉړ
	TextOut("\c[BLUE]cȂȂˁA܂ǁB\n
		āÅ͉EČĂBsI");//`
	}

	if(choose == 2){
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//LN^̉摜ݒ
	SetGraphicRect(LEFT,1,1,255,255);//LN^̕\摜`ݒ
	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	Wait(30);//30t[҂
	TextOut("\c[BLUE]ӂAAꓹ");//`

	SetChar(RIGHT,GetCurrentScriptDirectory~"\img\Yuyuko.png");//ELN^̉摜ݒ
	SetGraphicRect(RIGHT,1,1,255,255);
	MoveChar(LEFT,BACK);//̃LN^Ɉړ
	MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
	Wait(30);//30t[҂
	TextOut("\c[RED]cs");//`

	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	MoveChar(RIGHT,BACK);//ẼLN^Ɉړ
	TextOut("\c[BLUE]܂AɒĈٕς̎菕Ȃ񂩂̂͂߂Ȃ");//`

	MoveChar(LEFT,BACK);//̃LN^Ɉړ
	MoveChar(RIGHT,FRONT);//ẼLN^OɈړ
	TextOut("\c[RED]AĂc\n
		߂ȂA債ƏoȂ");//`

	MoveChar(LEFT,FRONT);//̃LN^OɈړ
	MoveChar(RIGHT,BACK);//ẼLN^Ɉړ
	TextOut("\c[BLUE]cȂȂˁA܂ǁB\n
		āÅ͍ČĂBsI");//`
	}
	End();//ŌEnd()͕K{
	}

	@Finalize
	{
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Yuyuko.png");
	}
}