Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #TouhouDanmakufu[Single]
- #ScriptVersion[3]
- #Title["Rumia Spell 7"]
- #Text["."]
- #include"./Functions/Index.txt"
- #include"script/Rumia Boss/ZUNShot_Const.txt"
- #include"script/Default_system/Default_Effect.Txt"
- let objBoss;
- let fam1;
- let fam2;
- let frame=0;
- let GCSD=GetCurrentScriptDirectory~"";
- let stgx=GetStgFrameWidth()/2;
- let stgy=GetStgFrameHeight()/2;
- let waitframe;
- @Initialize{
- mainTask;
- let objScene = GetEnemyBossSceneObjectID();
- ObjEnemyBossScene_StartSpell(objScene);
- }
- @Event{
- alternative(GetEventType)
- case(EV_REQUEST_LIFE){
- SetScriptResult(3500)
- }
- case(EV_REQUEST_TIMER){
- SetScriptResult(30)
- }
- }
- @MainLoop{
- frame++;
- ObjEnemy_SetIntersectionCircleToPlayer(objBoss,ObjMove_GetX(objBoss),ObjMove_GetY(objBoss),25);
- ObjEnemy_SetIntersectionCircleToShot(objBoss,ObjMove_GetX(objBoss),ObjMove_GetY(objBoss),27);
- if(IsPlayerSpellActive){
- ObjEnemy_SetDamageRate(objBoss,0,0);
- }else{
- ObjEnemy_SetDamageRate(objBoss,100,100);
- }
- yield;
- if(ObjEnemy_GetInfo(objBoss,INFO_LIFE)<=0){
- TExplosionA(GetEnemyX,GetEnemyY,10,10);
- Obj_Delete(objBoss);
- DeleteShotAll(TYPE_ALL,TYPE_ITEM);
- wait(128);
- DeleteShotAll(TYPE_ALL,TYPE_ITEM);
- CloseScript(GetOwnScriptID());
- return;
- }
- }
- task mainTask{
- TDrawBoss;
- TEnemyHitboxStart;
- Cutin("Fluttering Illusions\"Semi-Invisible Shadows -Night-\"",14);
- TShoot01;
- yield;
- }
- task TShoot01{
- TMove03(objBoss,stgx,GetStgFrameHeight()/4,10,5);
- wait(70);
- fam1=FDrawFamiliar(GetEnemyX,GetEnemyY,0,0,0,2.5,255,255,255,255);
- fam2=FDrawFamiliar(GetEnemyX,GetEnemyY,0,0,0,-2.5,255,255,255,255);
- TMove03(fam1,stgx/6,stgy/3,15,3);
- while(ObjEnemy_GetInfo(objBoss,INFO_LIFE)>=0){
- yield;
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment