	let BGMNum=91;
	let BGMSet=[".\bgm\Regular\OhI[vjO.MP3",
		 ".\bgm\Regular\͂Ɋ肢.MP3",
		 ".\bgm\Regular\stage\s[ic.MP3",
                 ".\bgm\Regular\boss\{XƂ̐킢.MP3",
@@@@@@@@ ".\bgm\Regular\stage\O[vK[f.MP3",
		 ".\bgm\Regular\stage\n̖؁X.MP3",
		 ".\bgm\Regular\stage\LfBR.MP3",
		 ".\bgm\Regular\stage\̓no[hEb.MP3",
		 ".\bgm\Regular\boss\wr[uX^[.MP3",
		 ".\bgm\Regular\stage\̓no[hE͓.MP3",
		 ".\bgm\Regular\boss\ogEBhEY.MP3",
		 ".\bgm\Regular\stage\RRAA.MP3",
		 ".\bgm\Regular\boss\{XƂ̐킢.MP3",
		 ".\bgm\Regular\stage\MNeBbNEm@.MP3",
		 ".\bgm\Regular\boss\VS.}N.MP3",
		 ".\bgm\Regular\}N̖].MP3",
		 ".\bgm\Regular\M̃e[}.MP3",
		 ".\bgm\Regular\GfBO.MP3",
		 ".\bgm\Regular\F̐ɂȂ.MP3",
		 ".\bgm\Extra\stage\fffR.MP3",
		 ".\bgm\Extra\boss\sCJu[[.MP3",
		 ".\bgm\Extra\stage\Sׂ̈̃Zvebg.MP3",
		 ".\bgm\Extra\boss\U.N.I[G͔ޏȂ̂?.MP3",
		 ".\bgm\Extra\stage\Ɖ΃}g.MP3",
		 ".\bgm\Extra\boss\m̑zM`NuclearFusion.MP3",
		 ".\bgm\Extra\stage\GNXehAbV`Hl.MP3",
		 ".\bgm\Extra\boss\܂œ͂As̉.MP3",
		 ".\bgm\Extra\stage\n̓AP̍.MP3",
 		 ".\bgm\Extra\stage\䉾̍̋S`MissingPower.MP3",
		 ".\bgm\Extra\boss\lCeButFCX.MP3",
		 ".\bgm\Extra\boss\LVρ`WonderfulHeaven.MP3",
		 ".\bgm\Extra\stage\v]iE_CA.MP3",
		 ".\bgm\Extra\boss\NgK[].MP3",
		 ".\bgm\Extra\stage\䒌̕`GraveofBeing.MP3",
		 ".\bgm\Extra\boss\_тÐ`SuwaFoughtenField.MP3",
		 ".\bgm\Extra\stage\F}X^[Xp[N.MP3",
		 ".\bgm\Extra\boss\Yzȁ`DreamBattle.MP3",
		 ".\bgm\Extra\boss\ĂΗ.MP3",
		 ".\bgm\Extra\cPlɎ邩.MP3",
		 ".\bgm\Phantasm\nB̋N.MP3",
		 ".\bgm\Phantasm\ETeC.MP3",
		 ".\bgm\Phantasm\stage\@B̕SN.MP3",
		 ".\bgm\Phantasm\boss\ds.MP3",
		 ".\bgm\Phantasm\stage\Another\Cgف|ChineseTea.MP3",
		 ".\bgm\Phantasm\boss\PVN̏CAX.MP3",
		 ".\bgm\Phantasm\stage\Another\L̋`DeepMountain.MP3",
		 ".\bgm\Phantasm\stage\Hyc`PhantomEnsemble.MP3",
		 ".\bgm\Phantasm\stage\dX绁`WhodoneitH.MP3",
		 ".\bgm\Phantasm\multi\Hɍ炩An̍`BorderofLife.MP3",
		 ".\bgm\Phantasm\boss\lNt@^WA.MP3",
		 ".\bgm\Phantasm\stage\Another\i̕񂢁`ImperoshableNight.MP3",
		 ".\bgm\Phantasm\stage\̂Ȃ.MP3",
		 ".\bgm\Phantasm\multi\C̓`InvinsibleFullMoon.MP3",
		 ".\bgm\Phantasm\boss\Nz`HistoryoftheMoon.MP3",
		 ".\bgm\Phantasm\stage\Another\݂̒.MP3",
		 ".\bgm\Phantasm\stage\̌z`FlowerLand.MP3",
		 ".\bgm\Phantasm\multi\|CYh[`ForsakenDoll.MP3",
		 ".\bgm\Phantasm\stage\ފ݋Aq`RiversideView.MP3",
		 ".\bgm\Phantasm\boss\Z\Nڂ̓ٔ`FateofSixtyYears.MP3",
		 ".\bgm\Phantasm\stage\Another\_l̒ʂ蓹`DarkRoad.MP3",
		 ".\bgm\Phantasm\stage\^̃_[NTCh.MP3",
		 ".\bgm\Phantasm\stage\H열V͓̉.MP3",
		 ".\bgm\Phantasm\multi\tH[IutH[`H߂.MP3",
		 ".\bgm\Phantasm\boss\M͙Rlׂ̈.MP3",
		 ".\bgm\Phantasm\stage\Reincarnation.MP3",
		 ".\bgm\Phantasm\boss\Complete_Darkness.MP3",
		 ".\bgm\Phantasm\stage\Another\؂̂Â]R.MP3",
		 ".\bgm\Phantasm\stage\Xg[g.MP3",
		 ".\bgm\Phantasm\boss\Èł̕.MP3",
		 ".\bgm\Phantasm\boss\ꂽd`LostPlace.MP3",
		 ".\bgm\Phantasm\boss\Ί̃WFV[.MP3",
		 ".\bgm\Phantasm\boss\̗s`Beofgoodcheer!.MP3",
		 ".\bgm\Phantasm\boss\Ƃ`3rdeye.MP3",
		 ".\bgm\Phantasm\boss\Another\ng}̗d.MP3",
		 ".\bgm\Phantasm\boss\ȏȌ.MP3",
		 ".\bgm\Phantasm\boss\NuPɂӂ.MP3",
		 ".\bgm\Phantasm\boss\eƃnCJ.MP3",
		 ".\bgm\Phantasm\lastboss\vCGCWA.MP3",
		 ".\bgm\Phantasm\lastboss\G_Free~Final_Dream.MP3",
		 ".\bgm\Phantasm\boss\͍ŋ̐m.MP3",
		 ".\bgm\Phantasm\lastboss\VS.}XNhfff.MP3",
		 ".\bgm\Phantasm\NA߂łƂ.MP3",
		 ".\bgm\Phantasm\ending\}WXLMAGIC.MP3",
		 ".\bgm\Phantasm\ending\Another\_В.MP3",
		 ".\bgm\Phantasm\ending\Another\F.MP3",
		 ".\bgm\Phantasm\ending\Another\KeeptheFaith.MP3",
		 ".\bgm\Phantasm\ending\Another\FƗ[Ɓc.MP3",
		 ".\bgm\Phantasm\ending\Another\͖̕.MP3",
		 ".\bgm\Phantasm\O[X-!-.MP3",
		 ".\bgm\Phantasm\O[X-sށc-.MP3",
		 ".\bgm\Phantasm\SďW߂!.MP3"];
	let hiddenBGM="???";
	let nowpoint=0;
	let event=false;
	let point=[50,150,300,500,750,1050,1400,1800,2250,2750,3300,3900,4550,5250,6000];
	let IsClear=false;
	let bPoint=0;
	let bGraze=0;
	let bSpellGetNumber=0;
	let AnotherBonus=0;
	let TotalBonus=0;
	let pointstate=0;
	let TotalPoint=0;
	let grazestate=0;
	let TotalGraze=0;
	let stagenum=1;
	let NoMissBonus=10000;
	let NoContinueBonus=5000;
	let contcount=GetAllowedContinueCount;
	let misscountforstage=0;
	let misscount=0;
	let TotalMissCount=0;
	let bombcountforstage=0;
	let bombcount=0;
	let TotalBombCount=0;
	let EventSkip=false;
	
	SetCommonData("SPELLGET",0);
	SetCommonData("EventSkipFlag",EventSkip);
	SetCommonData("LUNATICFlag",false);
	SetCommonData("PROFESSIONALFlag",false);
	SetCommonData("EXTRAFlag",false);
	SetCommonData("PHANTASMFlag",false);
	SetCommonData("ADVENTFlag",false);
	SetCommonData("ClearPercentage",0);
	SetCommonData("ExtendItemFlag",0);

	let ECharaNum=3;
	let EventCharacters=["REIMU","MARISA","Sanae.txt"];
	let initialzanki=truncate(absolute(zanki)%6);
	let initialbomb=truncate(absolute(bomb)%6);

	let flag=0;
	let bgrt=0;
	let alp=0;
	let view=60;