Stage Script

#TouhouDanmakufu[Stage]
#Title[Reimu Boss ~Easy~]
#Text[MotK Contest Entry by
Ultima124 aka InfiniteWave]
#Image[]
#Background[]
#BGM[]
#Player[FREE]
#ScriptVersion[2]

script_stage_main{
let csd = GetCurrentScriptDirectory;
#include_function=".\include\Difficulty.txt"

let depth_buffer_enable = true;
let imagefile3 = csd~ ".\Backgrounds\Back_2.png";
let imagefile = csd~ ".\Backgrounds\Back.png";
let imagefile2 = csd~ ".\Backgrounds\Back_2.png";
let f = 0;
let ff = 6;
let e = 0;
let ee = 2;
let mov1  =0;
let mov2  =0;
let angle = 300;
let alpha = 0;
function WaitForNoEvent { while(OnEvent) { yield; } }
function Wait(let frames){loop(frames){yield;}
}
function WaitForZeroEnemy{
while(GetEnemyNum != 0){yield;}
}
task stage{

Wait(120);
CreateEnemyBossFromFile(GetCurrentScriptDirectory~"Reimu BossE.txt", 50, 0, 0, 0, 0);
WaitForZeroEnemy;
Clear;
}

          @Initialize{

    LoadGraphic(imagefile);
     LoadGraphic(imagefile2);
     LoadGraphic(imagefile3);

         stage;
          }
         @MainLoop{

      //   angle++;
          mov1++;
          mov2++;
           yield;

       if(angle<=1100){
       angle += 1;
       }
       if(alpha<=80){
       alpha += 1;
              }
          }
          @BackGround{
      WriteZBuffer(depth_buffer_enable);
      UseZBuffer(depth_buffer_enable);
      SetViewTo(0, 0, 0);
      SetViewFrom(50, 0, 0);
SetAlpha(255);
 SetColor(255,200,200);
SetTexture(imagefile);
SetGraphicRect(0, 0, 3*512, 3*128+f);
SetGraphicScale(1, 1);
SetGraphicAngle(10, 270, 0);
DrawGraphic3D(-angle, 0, 0);

 SetAlpha(255);
 SetColor(255,255,255);
SetTexture(imagefile2);
SetGraphicRect(0, 0-f, 6*512, 256);
SetGraphicScale(1, 1);
SetGraphicAngle(0, -270, 0);
DrawGraphic3D(-100, 0, 0);


SetAlpha(255);
 SetColor(255,255,255);
SetTexture(imagefile3);
SetGraphicRect(0, 0, 512*6, 256+f);
SetGraphicScale(1, 1);
SetGraphicAngle(0, -270, 0);
DrawGraphic3D(-100, 0, 0);


yield;
f+=ff;
e+=ee;
          }
          @Finalize{

          }

        }