Last Word Test

#TouhouDanmakufu[Stage]
#Title[Last Word Test]
#Text[...]
#PlayLevel[Last Word]
#Player[FREE]
#ScriptVersion[2]

script_stage_main {

	let CSD = GetCurrentScriptDirectory;


	function wait(w) {
		loop(w){ yield; }
	}
	function WaitForZeroEnemy {
		while(GetEnemyNum != 0){ yield; }
	}
	function WaitForNoEvent {
		while(OnEvent == true){ yield; }
	}
	function WaitForCapture {
		while(GetCommonData("repeat")==true) {
			if(GetEnemyNum == 0) {
			AddScore(-GetScore);
			AddGraze(-GetGraze);
			CreateEnemyBossFromFile(CSD ~ "Stage 3\Spell Test.txt", 0, 0, 0, 0, 0);
			}
			yield;
		}
	}
	task stage {
		PlayMusic(CSD ~ "Last Word Theme.mp3");
		SetRateScoreSystemEnable(false);
		SetCommonData("repeat",true);
		CreateEnemyBossFromFile(CSD ~ "Stage 3\Spell Test.txt", 0, 0, 0, 0, 0);
		WaitForCapture;
		wait(90);
		Clear;
	}
	@Initialize {
		stage;
	}
	@MainLoop {
	yield;
	}
	@Finalize {
	}
}