utyighhhhhh

#TouhouDanmakufu[Stage]
#Title[Stage5]
#Text[complete!1]
#Player[REIMU]
#PlayLevel[lunetik]
#ScriptVersion[2]

script_stage_main{
let D = GetCurrentScriptDirectory;
let bgm = D ~ "bgm\dreem batlle.wav";
let ha = D ~ "system\ha.png";

 function Wait(let frames){loop(frames){yield;}}
 function WaitForZeroEnemy{while(GetEnemyNum != 0){yield;}}

task hi{

Wait(1);
	let obj=Obj_Create(OBJ_EFFECT);



	let counter = 0;


	ObjEffect_SetRenderState(obj, ALPHA);

	ObjEffect_SetTexture(obj, ha);


	Obj_SetPosition(obj, GetCenterX, GetCenterY);


	ObjEffect_SetScale(obj, 1, 1);

	ObjEffect_SetLayer(obj, 8);


	ObjEffect_SetPrimitiveType(obj, PRIMITIVE_TRIANGLESTRIP);

	ObjEffect_CreateVertex(obj, 4);


	ObjEffect_SetVertexXY(obj, 0, -320, -240);

	ObjEffect_SetVertexXY(obj, 1, 320, -240);

	ObjEffect_SetVertexXY(obj, 2, -320, 240);

	ObjEffect_SetVertexXY(obj, 3, 320, 240);


	ObjEffect_SetVertexUV(obj, 0, 0, 0);

	ObjEffect_SetVertexUV(obj, 1, 640, 0);

	ObjEffect_SetVertexUV(obj, 2, 0, 480);

	ObjEffect_SetVertexUV(obj, 3, 640, 480);


	while(!Obj_BeDeleted(obj)) {

	if(counter==240){Obj_Delete(obj);}

		counter++;

		yield;

	}

}

 task stage{
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy.txt", GetCenterX+200, GetCenterY-80, 2, 180, 0);
  Wait(120);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy 2.txt", GetCenterX-190, GetCenterY-240, 2, 45, 0);
  Wait(120);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy.txt", GetCenterX+200, GetCenterY-80, 2, 180, 0);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy 3.txt", GetCenterX+200, GetCenterY-125, 2, 180, 0);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy 3.txt", GetCenterX-200, GetCenterY-125, 2, 0, 0);
  Wait(90);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy.txt", GetCenterX+200, GetCenterY-80, 2, 180, 0);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy 2.txt", GetCenterX-200, GetCenterY-125, 2, 0, 0);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy 2.txt", GetCenterX-200, GetCenterY-125, 2, 0, 0);
  Wait(90);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy.txt", GetCenterX+200, GetCenterY-80, 2, 180, 0);
  Wait(90);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy.txt", GetCenterX+200, GetCenterY-80, 2, 180, 0);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy 3.txt", GetCenterX+200, GetCenterY-125, 2, 180, 0);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy 3.txt", GetCenterX-200, GetCenterY-125, 2, 0, 0);
  Wait(90);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"enemy.txt", GetCenterX+200, GetCenterY-80, 2, 180, 0);
  Wait(90);
  PlayMusic(bgm);
  Wait(40);
  CreateEnemyBossFromFile(GetCurrentScriptDirectory~"Bos.txt", 0, 0, 0, 0, 0);
  WaitForZeroEnemy;
  Wait(360);
  CreateEnemyBossFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard.txt", 0, 0, 0, 0, 0);
  Wait(180);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 3.txt",0, 0, 0, 0, 0);
  Wait(60);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(60);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(60);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(60);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 3.txt", 0, 0, 0, 0, 0);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(60);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(60);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(30);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(30);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(30);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(30);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"fiynull spppppelkard 2.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  Wait(10);
  WaitForZeroEnemy;
  Wait(760);
  //hi;
  Wait(240);
  CreateEnemyFromFile(GetCurrentScriptDirectory~"odur fainal spel!.txt", GetCenterX-200, GetCenterY-50, 1.8, 0, 0);
  WaitForZeroEnemy;
  Wait(50);
  Clear;
 }
 @Initialize{
 stage;
LoadMusic(bgm);
LoadGraphic(ha);
  }
 @MainLoop{yield;}
 @Background{}
 @Finalize{DeleteMusic(bgm); DeleteGraphic(ha);}
}