

  let csd = GetCurrentScriptDirectory;
  let cx=GetCenterX();
  let cy=GetCenterY();
  let minx=GetClipMinX();
  let miny=GetClipMinY();
  let maxx=GetClipMaxX();
  let maxy=GetClipMaxY();

  let seshot1 = csd~ "..\se\enemyshot01.wav";               
  let counter = csd~ "..\se\counter.wav";                     
  let break2 = csd~ "..\se\barrierbreak02.wav";          
  let push = csd~ "..\se\Push.wav";                        
  let pi1 = csd~ "..\se\Pi01.wav";                     
  let pi2 = csd~ "..\se\Pi02.wav";                       
  let pi3 = csd~ "..\se\Pi03.wav";                         
  let pi4 = csd~ "..\se\Pi04.wav";                         
  let pi5 = csd~ "..\se\Pi05.wav";                        
  let cancel = csd~ "..\se\cancel.wav";

 let EnemyBlue = csd~"img\enemy\faily_blue.png"; 
 let EnemyRed = csd~"img\enemy\faily_red.png";
 let EnemyGreen = csd~"img\enemy\faily_green.png";
 let EnemyYellow = csd~"img\enemy\faily_yellow.png";
 let EnemyEx1 = csd~"img\enemy\faily_ex1.png";
 let EnemyEx2 = csd~"img\enemy\faily_ex2.png";
 let EnemyOther = csd~"img\enemy\other.png";

 let Title = csd~"img\word\Title.png";
 let Menu = csd~"img\word\Menu.png";
 let OutText = csd~"img\word\OutText.png";
 let spell1 = csd~"img\word\spell001_010.png";
 let White = csd~"img\word\White.png";
 

  let arg = GetArgument;
  let difficult = GetCommonDataDefaultEx("","dif",0); 
  let sgrnum = 0;

  Graph;   GraphicTurn;

  task Graph{
  let second = 0;
  loop{
   alternative(sgrnum)
    case(-1){break;}
    case(0){SetGraphicRect(0,0,32,32); second = 0;}
    case(1){
  if(0 <= second && second < 20){SetGraphicRect(32*7,0,32*8,32); second++;}
  else if(20 <= second && second < 40){SetGraphicRect(32*8,0,32*9,32); second++;}
  else if(40 <= second && second < 60){SetGraphicRect(32*9,0,32*10,32); second++;}
  else if(60 <= second && second < 80){SetGraphicRect(32*8,0,32*9,32); second++;}
  else{second = 0;}
      }   
    case(2){
  if(0 <= second && second < 15){SetGraphicRect(32*10,0,32*11,32); second++;}
  else if(15 <= second && second < 30){SetGraphicRect(32*11,0,32*12,32); second++;}
  else if(30 <= second && second < 45){SetGraphicRect(32*12,0,32*13,32); second++;}
  else if(45 <= second && second < 60){SetGraphicRect(32*13,0,32*14,32); second++;}
  else if(60 <= second && second < 75){SetGraphicRect(32*12,0,32*13,32); second++;}
  else{second = 15;}
      }
    case(3){
  if(0 <= second && second < 20){SetGraphicRect(0,32+48,48,32+48*2); second++;}
  else if(20 <= second && second < 40){SetGraphicRect(48,32+48,48*2,32+48*2); second++;}
  else if(40 <= second && second < 60){SetGraphicRect(48*2,32+48,48*3,32+48*2); second++;}
  else if(60 <= second && second < 80){SetGraphicRect(48,32+48,48*2,32+48*2); second++;}
  else{second = 0;}
      }   
    case(4){
  if(0 <= second && second < 15){SetGraphicRect(48*3,32+48,48*4,32+48*2); second++;}
  else if(15 <= second && second < 30){SetGraphicRect(48*4,32+48,48*5,32+48*2); second++;}
  else if(30 <= second && second < 45){SetGraphicRect(48*5,32+48,48*6,32+48*2); second++;}
  else if(45 <= second && second < 60){SetGraphicRect(48*6,32+48,48*7,32+48*2); second++;}
  else if(60 <= second && second < 75){SetGraphicRect(48*5,32+48,48*6,32+48*2); second++;}
  else{second = 15;}
      }
  case(5){
  if(0 <= second && second < 20){SetGraphicRect(0,32+48*3,48,32+48*4); second++;}
  else if(20 <= second && second < 40){SetGraphicRect(48,32+48*3,48*2,32+48*4); second++;}
  else if(40 <= second && second < 60){SetGraphicRect(48*2,32+48*3,48*3,32+48*4); second++;}
  else if(60 <= second && second < 80){SetGraphicRect(48,32+48*3,48*2,32+48*4); second++;}
  else{second = 0;}
      }   
    case(6){
  if(0 <= second && second < 15){SetGraphicRect(48*3,32+48*3,48*4,32+48*4); second++;}
  else if(15 <= second && second < 30){SetGraphicRect(48*4,32+48*3,48*5,32+48*4); second++;}
  else if(30 <= second && second < 45){SetGraphicRect(48*5,32+48*3,48*6,32+48*4); second++;}
  else if(45 <= second && second < 60){SetGraphicRect(48*6,32+48*3,48*7,32+48*4); second++;}
  else if(60 <= second && second < 75){SetGraphicRect(48*5,32+48*3,48*6,32+48*4); second++;}
  else{second = 15;}
      }
   case(7){
  if(0 <= second && second < 20){SetGraphicRect(0,32*3+48*4,64,32*3+48*5); second++;}
  else if(20 <= second && second < 40){SetGraphicRect(64,32*3+48*4,64*2,32*3+48*5); second++;}
  else if(40 <= second && second < 60){SetGraphicRect(64*2,32*3+48*4,64*3,32*3+48*5); second++;}
  else if(60 <= second && second < 80){SetGraphicRect(64,32*3+48*4,64*2,32*3+48*5); second++;}
  else{second = 0;}
      }   
    case(8){
  if(0 <= second && second < 15){SetGraphicRect(64*3,32*3+48*4,64*4,32*3+48*5); second++;}
  else if(15 <= second && second < 30){SetGraphicRect(64*4,32*3+48*4,64*5,32*3+48*5); second++;}
  else if(30 <= second && second < 45){SetGraphicRect(64*5,32*3+48*4,64*6,32*3+48*5); second++;}
  else if(45 <= second && second < 60){SetGraphicRect(64*6,32*3+48*4,64*7,32*3+48*5); second++;}
  else if(60 <= second && second < 75){SetGraphicRect(64*5,32*3+48*4,64*6,32*3+48*5); second++;}
  else{second = 15;}
      }
   others{second = 0;}
   wait(1);
    }
  }

  task GraphicTurn{
    loop{
  if(sgrnum == -1){break;}
    let x = GetX;
   wait(1);
   if(GetX < x){SetGraphicScale(-1,1);}
   else if(GetX > x){SetGraphicScale(1,1);}
   else{}
             }
          }