function Stage3{
   if(phase==0){
      SetCommonData("bgx",0);
      SetCommonData("bgy",0);
      PlayMusic( bgmst3 );
      phase=1;
      time=0;
      haikei=true;
   }
   if(phase==1){







      if(time>=200&&time<1160){SetCommonData("bgx",(time-200)*0.6);}
      if(time>=1500&&time<1820){SetCommonData("bgx",576-(time-1500)*0.6);}
      if(time<3000){SetCommonData("bgy",time*0.6);}
      if(time==5550){phase=2;time=0;}

   }
   if(phase==2){


      if(time<100){SetCommonData("bgy",2740-time*0.2);}
      if(time>=100&&time<200){SetCommonData("bgy",2720-(time-100)*0.6);}
      if(time>=200&&time<600){SetCommonData("bgy",2660-(time-200)*1.2);}
      if(time>=600&&time<2100){SetCommonData("bgy",2180-(time-600)*0.2);}
      if(time>=2100&&time<2700){SetCommonData("bgy",1880-(time-2100)*0.6);}
      if(time>=2700&&time<2800){SetCommonData("bgy",1520-(time-2700)*0.2);}
      if(time==2800){phase=3;time=0;}
   }
   if(phase==3){




      if(time==3400&&GetCommonData("ex")==0){CreateEnemyBossFromFile( st3boss, 224, 200, 0, 0, 0);}
      if(time==3400&&GetCommonData("ex")==1){CreateEnemyBossFromFile( st3exboss, 224, 200, 0, 0, 0);}

      if(time==3200){DeleteMusic(bgmst3);PlaySE( se4 );}
      if(time==3400){PlayMusic(bgmlastboss);}

      if(time<100){SetCommonData("bgy",1500+time*0.2);}
      if(time>=100&&time<3400){SetCommonData("bgy",1520+(time-100)*0.4);}


      if(time>3500&&GetCommonData("bossphase")==0){DeleteMusic(bgmlastboss);}
      if(time>3500&&IsBossExisting==false&&clear==false){
         if(GetCommonData("ex")==0){Tclear2}
         else{phase=4;time=0;}
      }
      if(time>3500&&GetCommonData("ex")==1&&GetCommonData("bossphase")==1){
         phase=4;time=0;
      }
      
   }
   if(phase==4){
      if(GetCommonData("ex")==0){
         SetCommonData("bgy",2840);
      }
      else{


      if(speed==1){
         if(time>=780){time-=300;}
         if(GetCommonData("bossphase")==0){DeleteMusic(bgmlastboss);}
         if(IsBossExisting==false&&clear==false){
            if(stageselect==true){Tclear;}
            else{
               speed=12;
               CreateEnemyBossFromFile( trueboss, 224, 400, 0, 0, 0);
               PlayMusic(bgmtruelastboss);
            }
         }
      }
      if(speed>1){
         if(GetCommonData("bossphase")==0){DeleteMusic(bgmtruelastboss);}
         if(IsBossExisting==false&&clear==false){
            Tclear3;
         }
      }
      SetCommonData("bgy",2840+time);
      time+=-1+speed/2;



      }
   }
}