#TouhouDanmakufu[Plural]
#ScriptVersion[3]
#Title["Marisa!"]
#Text[" Difficulty : Moderate(***)                (Between Normal and Hard)"]
#BGM["./Magician2.mp3"]
#Background["./BG.txt"]
#include"script/Marisa/Shot/ZUNShot_Const.txt"
#System["./system/Default_System.txt"]
#Player["./MoF_Reimu/Reimu.txt"]
let dirCurrent = GetCurrentScriptDirectory();
@Initialize{
	TPlural;
	SetPlayerLife(6);
}

@MainLoop{
	yield;
}

task TPlural
{
	let dir=GetCurrentScriptDirectory();
	let obj=ObjEnemyBossScene_Create();
	Sound(Sound(dir~"Magician.mp3"));
	ObjEnemyBossScene_Add(obj,0,dir~"Non-Spell1.txt");
	ObjEnemyBossScene_Add(obj,0,dir~"Spell1.txt");
	ObjEnemyBossScene_Add(obj,1,dir~"Non-Spell2.txt");
	ObjEnemyBossScene_Add(obj,1,dir~"Spell2.txt");
	ObjEnemyBossScene_Add(obj,2,dir~"Non-Spell3.txt");
	ObjEnemyBossScene_Add(obj,2,dir~"Spell3.txt");
	ObjEnemyBossScene_Add(obj,3,dir~"Non-Spell4.txt");
	ObjEnemyBossScene_Add(obj,3,dir~"Spell4.txt");
	ObjEnemyBossScene_Add(obj,4,dir~"Spell6.txt");
	ObjEnemyBossScene_Add(obj,5,dir~"Spell5.txt");
	ObjEnemyBossScene_LoadInThread(obj);
	ObjEnemyBossScene_Regist(obj);
	while(!Obj_IsDeleted(obj))
	{
		yield;
	}
	CloseScript(GetOwnScriptID());
}

function Sound(path){
	let obj = ObjSound_Create;
	ObjSound_Load(obj,path);
	ObjSound_SetSoundDivision(obj, SOUND_BGM);
	ObjSound_SetRestartEnable(obj, true);
	ObjSound_SetLoopEnable(obj, true);
	ObjSound_SetLoopTime(obj, 0,300);
	ObjSound_Play(obj);
	ObjSound_SetVolumeRate(obj,95);
	return obj;
	}