script_event REIMU21{

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

	@MainLoop{
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//左側キャラクタの画像を設定
	SetGraphicRect(LEFT,1,1,255,255);//左側キャラクタの表示画像矩形を設定
	MoveChar(LEFT,FRONT);//左側のキャラクタを前に移動
	Wait(30);//30フレーム待つ
	TextOut("\c[BLUE]良かったわ〜…雨が上がって晴れてきた。\n
	それにしても、異変の原因はどっちにあるのかしら？皆目検討がつかないわ");//文字描画

	SetChar(RIGHT,GetCurrentScriptDirectory~"\img\Alice.png");//右側キャラクタの画像を設定
	SetGraphicRect(RIGHT,1,1,255,255);
	MoveChar(LEFT,BACK);//左側のキャラクタを後に移動
	MoveChar(RIGHT,FRONT);//右側のキャラクタを前に移動
	Wait(30);//30フレーム待つ
	TextOut("\c[RED]あら、巫女がやってきたのね");//文字描画

	MoveChar(LEFT,FRONT);//左側のキャラクタを前に移動
	MoveChar(RIGHT,BACK);//右側のキャラクタを後に移動
	TextOut("\c[BLUE]あ、アリス。丁度良かったわ、異変気付いてるんでしょ？");//文字描画

	MoveChar(LEFT,BACK);//左側のキャラクタを後に移動
	MoveChar(RIGHT,FRONT);//右側のキャラクタを前に移動
	TextOut("\c[RED]ええ、気付いてるわよ");//文字描画

	MoveChar(LEFT,FRONT);//左側のキャラクタを前に移動
	MoveChar(RIGHT,BACK);//右側のキャラクタを後に移動
	TextOut("\c[BLUE]じゃあ、その元凶の場所教えて");//文字描画

	MoveChar(LEFT,BACK);//左側のキャラクタを後に移動
	MoveChar(RIGHT,FRONT);//右側のキャラクタを前に移動
	TextOut("\c[RED]おことわり");//文字描画

	MoveChar(LEFT,FRONT);//左側のキャラクタを前に移動
	MoveChar(RIGHT,BACK);//右側のキャラクタを後に移動
	TextOut("\c[BLUE]あんたも喧嘩売るつもり？");//文字描画

	MoveChar(LEFT,BACK);//左側のキャラクタを後に移動
	MoveChar(RIGHT,FRONT);//右側のキャラクタを前に移動
	TextOut("\c[RED]フフ、そのつもりだけど判らない？");//文字描画

	MoveChar(LEFT,FRONT);//左側のキャラクタを前に移動
	MoveChar(RIGHT,BACK);//右側のキャラクタを後に移動
	TextOut("\c[BLUE]何か、様子が変ね…仕方ないわね、買うわ、その喧嘩！");//文字描画
	End();//最後にEnd()は必須
	}
		
	@Finalize
	{
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	DeleteGraphic(GetCurrentScriptDirectory~"\img\Alice.png");
	}
}

script_event REIMU22{

	@Initialize
	{
	LoadGraphic(GetCurrentScriptDirectory~"\img\Reimu.png");
	}
		
	@MainLoop
	{
	SetChar(LEFT,GetCurrentScriptDirectory~"\img\Reimu.png");//左側キャラクタの画像を設定
	SetGraphicRect(LEFT,1,1,255,255);//左側キャラクタの表示画像矩形を設定
	MoveChar(LEFT,FRONT);//左側のキャラクタを前に移動
	Wait(30);//30フレーム待つ
	TextOut("\c[BLUE]買った喧嘩には勝ったけど、\n
	それにしてもアリスが何でこんな風に？\n
	うーん…もしかすると…");//文字描画
	TextOut("\c[BLUE]私、かなり大掛かりな異変に首つっこもうとしているのかも");//文字描画
	End();//最後にEnd()は必須
	}

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