script_event REIMU101{

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

	@MainLoop{
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//LN^̉摜ݒ
	SetGraphicRect(LEFT,1,1,255,255);//LN^̕\摜`ݒ
	MoveChar(LEFT,FRONT);//vC[LOɈړ
	Wait(30);//30t[҂
	TextOut("\c[BLUE]`A̋@g͂");//`
	TextOut("\c[BLUE]Ȃɂ̂ˁAgƂc");//`
	TextOut("\c[BLUE]cāA܂̉̂cH");//`
	MoveChar(LEFT,BACK);//vC[LɈړ
	TextOut("\c[GREEN]얲́Ax̓AɍsĂ݂邱ƂɂB");//`
	TextOut("\c[GREEN]ʂāA얲̌ủvɂ́AĂ̂낤cH");//`
	TextOut("\c[GREEN]얲@Normal Ending\n
	c@܂܂UʂNAƁcH");//`
	End();//ŌEnd()͕K{
	}
		
	@Finalize
	{
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	}
}

script_event REIMU102{

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

	@MainLoop{
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//LN^̉摜ݒ
	SetGraphicRect(LEFT,1,1,255,255);//LN^̕\摜`ݒ
	MoveChar(LEFT,FRONT);//vC[LOɈړ
	Wait(30);//30t[҂
	TextOut("\c[BLUE]`AȓzɂȂāB");//`
	TextOut("\c[BLUE]vԂɉˁAāc");//`
	TextOut("\c[BLUE]x̓{R{RɂĂ邩AoȂI");//`
	MoveChar(LEFT,BACK);//vC[LɈړ
	TextOut("\c[GREEN]얲́Ax̓AɍsĂ݂邱ƂɂB");//`
	TextOut("\c[GREEN]ʂāA얲͍ケٕςł̂B");//`
	TextOut("\c[GREEN]얲@Bad Ending\n
	Normalȍ~Ńm[RڎwI");//`
	End();//ŌEnd()͕K{
	}
		
	@Finalize
	{
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	}
}

script_event REIMU103{

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

	@MainLoop{
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//LN^̉摜ݒ
	SetGraphicRect(LEFT,1,1,255,255);//LN^̕\摜`ݒ
	MoveChar(LEFT,FRONT);//vC[LOɈړ
	Wait(30);//30t[҂
	TextOut("\c[BLUE]`A̋͂");//`
	TextOut("\c[BLUE]Ȃɂ̂ˁAgƂc");//`
	TextOut("\c[BLUE]cāA܂̉̂cH");//`
	MoveChar(LEFT,BACK);//vC[LɈړ
	TextOut("\c[GREEN]얲́Ax̓AɍsĂ݂邱ƂɂB");//`
	TextOut("\c[GREEN]ʂāA얲̌ủvɂ́AĂ̂낤cH");//`
	TextOut("\c[GREEN]얲@Normal Ending\n
	c@܂܂UʂNAƁcH");//`
	End();//ŌEnd()͕K{
	}
		
	@Finalize
	{
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	}
}

script_event REIMU104{

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

	@MainLoop{
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//LN^̉摜ݒ
	SetGraphicRect(LEFT,1,1,255,255);//LN^̕\摜`ݒ
	MoveChar(LEFT,FRONT);//vC[LOɈړ
	Wait(30);//30t[҂
	TextOut("\c[BLUE]`AȓzɂȂāB");//`
	TextOut("\c[BLUE]vԂɉˁAāc");//`
	TextOut("\c[BLUE]x̓{R{RɂĂ邩AoȂI");//`
	MoveChar(LEFT,BACK);//vC[LɈړ
	TextOut("\c[GREEN]얲́Ax̓AɍsĂ݂邱ƂɂB");//`
	TextOut("\c[GREEN]ʂāA얲͍ケٕςł̂B");//`
	TextOut("\c[GREEN]얲@Bad Ending\n
	Normalȍ~Ńm[RڎwI");//`
	End();//ŌEnd()͕K{
	}
		
	@Finalize
	{
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	}
}

script_event REIMU105{

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

	@MainLoop{
	TextOut("\c[GREEN]_");//`
	TextOut("\c[GREEN]ޏ͓AAĂāAƈꏏɂ܂肵ĂBB\n
	ƁÂc");//`
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//LN^̉摜ݒ
	SetGraphicRect(LEFT,1,1,255,255);//LN^̕\摜`ݒ
	MoveChar(LEFT,FRONT);//vC[LOɈړ
	Wait(30);//30t[҂
	TextOut("\c[BLUE]nB");//`
	TextOut("\c[RED]₨cAɍ󂠂܂");//`
	TextOut("\c[BLUE]cIH󂳂łAsĂ݂܂I");//`
	MoveChar(LEFT,BACK);//vC[LɈړ
	TextOut("\c[GREEN]얲́Ax̓AɍsĂ݂邱ƂɂB");//`
	TextOut("\c[GREEN]ʂāA얲̌uvɂ́AĂ̂낤cH");//`
	TextOut("\c[GREEN]얲@Good Ending\n
	Extra Stagey݂ɁI");//`
	End();//ŌEnd()͕K{
	}

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