stage

#TouhouDanmakufu[Stage]
#ScriptVersion[3]
#Title["Atlantic Barrier DisasterSt"]
#Background["./BG.txt"]
#System["./System/Default_System.txt"]
//#include "./stageenemy/stageenemy1.txt"
let objBoss;
let objScene = [];
let midboss;
let boss;
let bgm;
let dir = GetCurrentScriptDirectory();
@Initialize
{
    SetCommonData("StageID", GetOwnScriptID());
    objScene = [ObjEnemyBossScene_Create()];
    ObjEnemyBossScene_Add(objScene[0], 0, dir ~ "Nonspell1.txt");
    ObjEnemyBossScene_Add(objScene[0], 0, dir ~ "Spell1.txt");
    ObjEnemyBossScene_Add(objScene[0], 1, dir ~ "Nonspell2.txt");
    ObjEnemyBossScene_Add(objScene[0], 1, dir ~ "Spell2.txt");
    ObjEnemyBossScene_Add(objScene[0], 2, dir ~ "Nonspell3.txt");
    ObjEnemyBossScene_Add(objScene[0], 2, dir ~ "Spell3.txt");
    ObjEnemyBossScene_Add(objScene[0], 3, dir ~ "Nonspell4.txt");
    ObjEnemyBossScene_Add(objScene[0], 3, dir ~ "Spell4.txt");
    ObjEnemyBossScene_Add(objScene[0], 4, dir ~ "Nonspell5.txt");
    ObjEnemyBossScene_Add(objScene[0], 4, dir ~ "Spell5.txt");
    ObjEnemyBossScene_Add(objScene[0], 5, dir ~ "Spell6.txt");
    ObjEnemyBossScene_Add(objScene[0], 6, dir ~ "Spell7.txt");
    ObjEnemyBossScene_LoadInThread(objScene[0]);
    TStage();
    NotifyEventAll(EV_USER,0);
    SetPlayerLife(GetAreaCommonData("Config","Lifes",3));
    SaveCommonDataAreaA1("Config");
    SetPlayerPower(100);
}
@MainLoop
{
    yield;
}
@Finalize
{
}
task TStage
{

    //NotifyEvent(GetCommonData("SystemID", GetOwnScriptID()),EV_USER_STAGE+300,[dir~"stage.ogg","2","Provincial Makai City Esoteria"]);

    loop(300){yield;}
    //NotifyEvent(GetCommonData("SystemID", GetOwnScriptID()),EV_USER_STAGE+301,77);
    SetCommonData("IsBoss",true);
    SetCommonData("IsTBoss",true);
    //NotifyEvent(GetCommonData("SystemID", GetOwnScriptID()),EV_USER_STAGE+300,[dir~"nazare.ogg","2","Perversely, Cleverly, Slyly ~ Crafty Tiny Gray"]);
    ObjEnemyBossScene_Regist(objScene[0]);
     while(!Obj_IsDeleted(objScene[0]) && GetPlayerState() != STATE_END){
        yield;
    }
    SetCommonData("IsTBoss",false);
    SetCommonData("IsBoss",false);
    loop(240){yield;}
    CloseStgScene();
}
function Load1Script(path1){
    let dir = GetCurrentScriptDirectory();
    let path = dir ~ path1;
    let idScript = LoadScriptInThread(path);
    return idScript;
}
function RunScript(scriptID){
    loop(60){yield;}
    StartScript(scriptID);
    while(!IsCloseScript(scriptID) && GetPlayerState() != STATE_END)
    {
        yield;
    }
}
function StageBGM(obj,ID){
    ObjSound_SetRestartEnable(obj, true);
    ObjSound_SetLoopEnable(obj, true);
    ObjSound_SetLoopTime(obj, 79, 153);
    if(ID == 1){ObjSound_SetLoopTime(obj, 2, 120);}
    if(ID == 2){ObjSound_SetLoopTime(obj, 0, 9999);}
    return obj;
}