event_script Dialogue{
	let MariAngry=GetCurrentScriptDirectory~"img\MariAngry.png";
	let MariDefeated=GetCurrentScriptDirectory~"img\MariDefeated.png";
	let MariNorm=GetCurrentScriptDirectory~"img\MariNorm.png";
	let MariSmug=GetCurrentScriptDirectory~"img\MariSmug.png";
	let MariSweatdrop=GetCurrentScriptDirectory~"img\MariSweatdrop.png";
	let MariYes=GetCurrentScriptDirectory~"img\MariYes.png";
	@Initialize{
		LoadGraphic(MariAngry);
		LoadGraphic(MariDefeated);
		LoadGraphic(MariNorm);
		LoadGraphic(MariSmug);
		LoadGraphic(MariSweatdrop);
		LoadGraphic(MariYes);
	}
	@MainLoop{
		SetNameFromText(RIGHT,TEXT_RED,"Marisa Kirisame","Ordinary Witch");
		SetChar(RIGHT,MariAngry);SetGraphicRect(RIGHT,0,0,128,256);
		MoveChar(RIGHT,FRONT);
		TextOutA("\c[RED]Jeez, finally.\nTook you a while, ze.");
		MoveChar(RIGHT,BACK);
		SetNameFromText(LEFT,TEXT_BLUE,"Player Character","*Insert Title Here*");
		TextOutA("\c[BLUE]So what was all that\n ruckus about?");
		TextOutA("\c[BLUE]I mean, it's like 3 in the\nmorning...");
		SetChar(RIGHT,MariNorm);SetGraphicRect(RIGHT,0,0,128,256);
		MoveChar(RIGHT,FRONT);
		TextOutA("\c[RED]Oh, just a little practice.");
		MoveChar(RIGHT,BACK);
		TextOutA("\c[BLUE]Wait, what?");
		MoveChar(RIGHT,FRONT);
		TextOutA("\c[RED]That's right.\nI'll perform some tests on you now.");
		MoveChar(RIGHT,BACK);
		TextOutA("\c[BLUE]So I look like a guinea pig to you now?");
		SetChar(RIGHT,MariSweatdrop);SetGraphicRect(RIGHT,0,0,128,256);
		MoveChar(RIGHT,FRONT);
		TextOutA("\c[RED]Actually, yes.\nYou need to lose a little weight.");
		MoveChar(RIGHT,BACK);
		TextOutA("\c[BLUE]W-What!?\nI'll make you pay for this!");
		SetChar(RIGHT,MariSmug);SetGraphicRect(RIGHT,0,0,128,256);
		MoveChar(RIGHT,BACK);
		TextOutA("\c[RED]Well, there we go.");
		SetChar(RIGHT,MariYes);SetGraphicRect(RIGHT,0,0,128,256);
		TextOutA("\c[RED]Revive your past,\nface the future head on!");
		End;
	}
	@Finalize{
	}
}
event_script End1{
	let MariAngry=GetCurrentScriptDirectory~"img\MariAngry.png";
	let MariDefeated=GetCurrentScriptDirectory~"img\MariDefeated.png";
	let MariNorm=GetCurrentScriptDirectory~"img\MariNorm.png";
	let MariSmug=GetCurrentScriptDirectory~"img\MariSmug.png";
	let MariSweatdrop=GetCurrentScriptDirectory~"img\MariSweatdrop.png";
	let MariYes=GetCurrentScriptDirectory~"img\MariYes.png";
	@Initialize{
		LoadGraphic(MariAngry);
		LoadGraphic(MariDefeated);
		LoadGraphic(MariNorm);
		LoadGraphic(MariSmug);
		LoadGraphic(MariSweatdrop);
		LoadGraphic(MariYes);

	}
	@MainLoop{
		SetChar(RIGHT,MariSmug);SetGraphicRect(RIGHT,0,0,199,299);
		MoveChar(RIGHT,FRONT);
		TextOutA("\c[RED]So, how did you like\nmy new spells?");
		MoveChar(RIGHT,BACK)
		TextOutA("\c[BLUE]I think my hair's\non fire.");
		TextOutA("\c[BLUE]I guess that means your\nspells were good.");
		MoveChar(RIGHT,FRONT)
		TextOutA("\c[RED]Excellent! I knew you'd like them~");
		MoveChar(RIGHT,BACK);
		TextOutA("\c[BLUE]I didn-");
		MoveChar(RIGHT,FRONT);
		TextOutA("\c[RED]Time to test them out on someone else~!");
		SetChar(RIGHT,MariSmug);SetGraphicRect(RIGHT,0,0,0,0);
		MoveChar(RIGHT,BACK);
		TextOutA("\c[BLUE]Jeez, she's insane...");
		End;
	}
	@Finalize{
	}
}

event_script End2{
	let MariAngry=GetCurrentScriptDirectory~"img\MariAngry.png";
	let MariDefeated=GetCurrentScriptDirectory~"img\MariDefeated.png";
	let MariNorm=GetCurrentScriptDirectory~"img\MariNorm.png";
	let MariSmug=GetCurrentScriptDirectory~"img\MariSmug.png";
	let MariSweatdrop=GetCurrentScriptDirectory~"img\MariSweatdrop.png";
	let MariYes=GetCurrentScriptDirectory~"img\MariYes.png";
	@Initialize{
		LoadGraphic(MariAngry);
		LoadGraphic(MariDefeated);
		LoadGraphic(MariNorm);
		LoadGraphic(MariSmug);
		LoadGraphic(MariSweatdrop);
		LoadGraphic(MariYes);
	}
	@MainLoop{	
		TextOutA("\c[RED]K-Kyah~!");
		SetChar(RIGHT,MariDefeated);SetGraphicRect(RIGHT,0,0,199,299);
		MoveChar(RIGHT,BACK);
		TextOutA("\c[BLUE]Your spells are too lazy.");
		TextOutA("\c[BLUE]Try not to copy stuff from other people.");
		MoveChar(RIGHT,FRONT)
		TextOutA("\c[RED]You think I'd write a book on other\npeople's spells for nothing?");
		MoveChar(RIGHT,BACK);MoveChar(LEFT,FRONT);
		TextOutA("\c[BLUE]Books are for reading, not for crazy\nspell experiments.");
		MoveChar(RIGHT,FRONT);MoveChar(LEFT,BACK);
		TextOutA("\c[RED]Damn...");
		End;
	}
	@Finalize{
	}
}