#TouhouDanmakufu[Plural]
#ScriptVersion[3]
#Title["England"]
#Text["An Extra Stage boss fight against Arthur Kirland aka England aka Britain aka The United Kingdom of Great Britain and Northern Ireland"]
#System["./default_system/Default_System.txt"]

let music = GetCurrentScriptDirectory~"boss.ogg";
let m = 0;
	@Loading{
		LoadSound(music);
		}

	@Initialize
	{
		TPlural();
	}

	@MainLoop
	{
		yield;
	}

	@Finalize
	{
	}

	task TPlural
	{
		let dir = GetCurrentScriptDirectory();
		//Creates the boss scene
		let obj = ObjEnemyBossScene_Create();
		ObjEnemyBossScene_Add(obj, 0, dir ~ "mid-non-spell.txt");
		ObjEnemyBossScene_Add(obj, 1, dir ~ "mid-non-spell2.txt");
		ObjEnemyBossScene_Add(obj, 2, dir ~ "mid-spell1.txt");
		ObjEnemyBossScene_LoadInThread(obj);
		ObjEnemyBossScene_Regist(obj);
		
		let objTxt = ObjText_Create();
		ObjText_SetText(objTxt,"Spain and Romano");
		ObjText_SetHorizontalAlignment(objTxt,ALIGNMENT_LEFT);
		ObjText_SetFontSize(objTxt,16);
		ObjText_SetFontColorTop(objTxt,220,220,80);
		ObjText_SetFontColorBottom(objTxt,250,190,100);
		ObjText_SetFontBorderType(objTxt,BORDER_FULL);
		ObjText_SetFontBorderColor(objTxt,0,0,0);
		ObjText_SetFontBorderWidth(objTxt,2);
		ObjRender_SetPosition(objTxt,0,12,0);

		//Stands by until the boss scene is finished
		while(!Obj_IsDeleted(obj))
		{
			yield;
		}
		m = 1;
		//The end of the script
		Obj_Delete(objTxt);
		CloseScript(GetOwnScriptID());
	}