#TouhouDanmakufu
#Title[Marisa N1]
#Text[Simplify]
#ScriptVersion[2]

script_enemy_main {

  #include_function".\lib\lib_anime_Marisa.txt";

  let CSD = GetCurrentScriptDirectory; // Declare Variable

  let ImgBoss = CSD ~ "Image\boss_marisa.png";

  let frame = 0;

  @Initialize {

      LoadGraphic(ImgBoss);
      SetLife(1600);
      SetDamageRate(50,200);
      SetTimer(45);
      SetX(GetCenterX);
      SetY(GetCenterY-100);
      LoadUserShotData(CSD~"Image\Shot\supershot.txt"); Expert;


  }

  @MainLoop {

      SetCollisionA(GetX, GetY, 32);
      SetCollisionB(GetX, GetY, 16);
      yield;
      frame++;
      if(frame==5){
           SetAction(ACT_MOVE,30);


      }

      if(frame==200){
                CreateShotA(200, GetX, GetY, 20);
                SetShotDataA(200, 20, 60, 1.5, 1.0, 20, 70, 200);
                SetShotDataA_XY(200, 0, 10, 30, 20, 1.5, 15, 35, 200);
                AddShot(30,200,134);
                FireShot(200);
                SetAction(ACT_SHOT_A4,120);
                }

       if(frame==320){
                SetMovePositionRandom01(60,rand(0,0),3,GetCenterX-100,50,GetCenterX+100,140);
                SetAction(ACT_MOVE_L);


                    }

       if(frame==480){
                CreateShot01(GetX,GetY,0,48,20);
                CreateShot01(GetX,120,GetAngleToPlayer,48,0);
                CreateShot02(GteX,GetY,
                SetAction(ACT_SHOT_A);
                 }
          }

    }


    @DrawLoop {

        DrawBoss(ImgBoss);
        SetTexture(ImgBoss);
        SetGraphicRect(0, 0, 63, 63);
        SetGraphicScale(1,1);
        SetRenderState(ALPHA);

	if(GetSpeedX()>0){SetAction(ACT_MOVE,0)}
	if(GetSpeedX()<0){SetAction(ACT_MOVE,0)}

   }


    @Finalize {

    DeleteGraphic(ImgBoss);

    }