//汎用

function RealToIntString(let num){
   if(num<0){num=0;}
   let stringarray=["0","1","2","3","4","5","6","7","8","9"];
   let lp=floor(log10(num))+1;
   let lp1=lp;
   if(lp<=0){result="0"}
   else{
      result = "";
      loop(lp){
         result=result~ stringarray[(num%(10^lp1)-num%(10^(lp1-1)))/(10^(lp1-1))];
         lp1--;
      }
   }
}

function wait(w) {
   loop(w) { yield; }
}

task Tclear{
	clear=true;
	PlayMusic(bgmclear);
	wait(60);
	loop(30){clearhyouzi += 10;yield;}
	SetCommonData("score",GetCommonData("score")+stage*20000000);

	loop(160){clearhyouzi += 0.3;yield;}
	loop(110){clearhyouzi += 10;yield;}

	if(stageselect==true){Clear;}

	phase=0;
	stage++;
	SetCommonData("bgx",0);
	SetCommonData("bgy",0);
	time=0;
	clear=false;
	clearhyouzi = 0;
	DeleteMusic(bgmclear);
}
task Tclear2{
	clear=true;
	PlayMusic(bgmclear);
	wait(150);
	loop(30){clearhyouzi += 10;yield;}
	SetCommonData("score",GetCommonData("score")+stage*20000000);

	loop(160){clearhyouzi += 0.3;yield;}
	loop(110){clearhyouzi += 10;yield;}

	if(stageselect==true){Clear;}

	if(GetCommonData("ex")==0){
		SetCommonData("ex",1);
		SetCommonData("ruikei",GetCommonData("ruikei")*2);
		phase=0;
		stage=1;SetCommonData("bgy",0);
		clear=false;
	}
	else{Clear;}
	clearhyouzi = 0;
	DeleteMusic(bgmclear);
}
task Tclear3{
	clear=true;
	PlayMusic(bgmclear);
	wait(150);
	loop(30){clearhyouzi += 10;yield;}
	SetCommonData("score",GetCommonData("score")+stage*20000000);

	loop(160){clearhyouzi += 0.3;yield;}
	loop(110){clearhyouzi += 10;yield;}

	clearhyouzi = 0;
	wait(100);
	DeleteMusic(bgmclear);
	ForbidBomb(true);
	while(GetPlayerLife>1){
	   ExtendPlayer(-1);
	   SetCommonData("score",GetCommonData("score")+100000000);
	   PlaySE("se1UP.wav");
	   wait(60);
	}
	while(GetPlayerBomb>0){
	   AddBomb(-1);
	   SetCommonData("score",GetCommonData("score")+10000000);
	   PlaySE("se1UP.wav");
	   wait(60);
	}
	wait(120);
	AddScore(-GetScore);
	AddScore(GetCommonData("score")/100);
	Clear;
}

task Tzakoheli1(let p,let r,let w,let n,let rank){//ヘリ p=0追尾1Ｕターン　位置　間隔　数　ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakoheli1, 224-cos(a*110)*60+100*r, 0, rank, 90, p);
      wait(w);
      a++;
   }
}

task Tzakoheli2(let w,let n,let rank){//空中敵群　ｘ　ｙ　角度　間隔　数　ランク
	let a=0;
	loop(n){
		let x=cos(a*110)*100;
		let b=-1;
		if(x<0){b=1;}
		CreateEnemyFromFile( zakoheli2, 224+x, -10, rank, 0, b);
		wait(w);
		a++;
	}
}
task Tzakoheli2a(let angle,let w,let n,let rank){//空中敵群　ｘ　ｙ　角度　間隔　数　ランク
   let a=0;
   let x=224+cos(angle+180)*240;
   let y=240+sin(angle+180)*320;
   loop(n){
      CreateEnemyFromFile( zakoheli2, x+cos(angle+90+sin(a*80)*20)*(sin(a*110)*40), y+sin(angle+90+sin(a*80)*20)*(sin(a*110)*40), rank, angle, 0);
      wait(w);
      a++;
   }
}
task Tzakoheli3(let x,let y,let angle,let w,let n,let rank){//空中敵群　ｘ　ｙ　角度　間隔　数　ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakoheli3, x+cos(angle+(90+sin(a*65)*10)+sin(a*80)*20)*(sin(a*110)*80), y+sin(angle+(90+sin(a*65)*10)+sin(a*80)*20)*(sin(a*110)*80), rank, angle, 0);
      wait(w);
      a++;
   }
}
task Tzakoair1(let x1,let x2,let y1, let y2, let angle, let arg, let w, let n, let rank){//空中敵群　x y パターン　左右　間隔　数　ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakoair1, x1+a*x2, y1+a*y2, rank, angle, arg);
      wait(w);
      a++;
   }
}
task Tzakoair1a(let x1,let x2,let y1, let y2, let angle, let arg, let w, let n, let rank){//空中敵群　x y パターン　左右　間隔　数　ランク
   let a=0;
   loop(n){
      if(GetCommonData("haya")==1){
         CreateEnemyFromFile( zakoair1, x1+a*x2, y1+a*y2, rank, angle, arg);
      }
      wait(w);
      a++;
   }
}

task Tzakoair2(let x1,let x2, let w, let n, let rank){//空中敵群　x y 角度　間隔　数　ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakoair2, x1+a*x2, 0, rank, 90, 0);
      wait(w);
      a++;
   }
}
task Tzakoair2a(let r,let w,let n,let rank){//空中敵群　位置　間隔　数　ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakoair2, 224-cos(a*110)*60+100*r, 0, rank, 90, 0);
      wait(w);
      a++;
   }
}
task Tzakoair2b(let r,let w,let n,let rank){//空中敵群　位置　間隔　数　ランク
   let a=0;
   loop(n){
      if(GetCommonData("haya")==1){
      	CreateEnemyFromFile( zakoair2, 224-cos(a*110)*60+100*r, 0, rank, 90, 0);
      }
      wait(w);
      a++;
   }
}
task Tzakotank1(let x, let y,let angle, let n, let rank){//ザコ戦車一列　x y 角度　数 ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakotank1, x, y, rank, angle, 1000);
      wait(80);
      a++;
   }
}
task Tzakotank2(let x, let y,let angle, let n, let rank){//ザコ戦車一列　x y 角度　数 ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakotank2, x, y, rank, angle, 1000);
      wait(80);
      a++;
   }
}
task Tzakohune1(let x, let y,let angle, let n, let rank){//ザコ船一列　x y 角度　数 ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakohune1, x, y, rank, angle, 1000);
      wait(80);
      a++;
   }
}

task Tzakocannon1a(let x,let y,let r,let n,let rank,){//砲台ジグザグ　x  y  向き　数　ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakocannon1, x+30*a, y-a%2*40*r, rank, 0, 0);
      wait(30);
      a++;
   }
}

task Tzakocannon1b(let x,let y,let angle,let n,let rank,){//砲台直線　x  y　角度　数　ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( zakocannon1, x+cos(angle)*50*a, y+sin(angle)*50*a, rank, 0, 0);
      wait(5);
      a++;
   }
}

task Tclone1(let x, let y,let angle, let n, let rank){//クローン　x y 角度　数 ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( clone1, x, y, rank, angle, 1000);
      wait(100);
      a++;
   }
}

task Tclone2(let x, let y,let angle, let n, let rank){//クローン　x y 角度　数 ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( clone2, x, y, rank, angle, 1000);
      wait(50);
      a++;
   }
}


task Tclone3(let x, let y,let angle, let n, let rank){//クローン　x y 角度　数 ランク
   let a=0;
   loop(n){
      CreateEnemyFromFile( clone3, x, y, rank, angle, 1000);
      wait(29);
      a++;
   }
}

/////////////////////////ステージ１//////////////////////////
task Tzakogun101{//左から
   let a=0;
   loop(200){
      if(a==0){CreateEnemyFromFile( zakotank1, 224-240, 340, 0, 0, 240);}
      if(a==50){CreateEnemyFromFile( zakotank1, 224-240, 380, 0, 0, 200);}
      if(a==90){CreateEnemyFromFile( zakotank1, 224-240, 340, 0, 0, 160);}
      if(a==140){CreateEnemyFromFile( zakotank1, 224-240, 380, 0, 0, 120);}
      wait(1);
      a++;
   }
}

task Tzakogun102{//右から
   let a=0;
   loop(200){
      if(a==0){CreateEnemyFromFile( zakotank1, 224+240, 340, 0, 180, 200);}
      if(a==50){CreateEnemyFromFile( zakotank1, 224+240, 380, 0, 180, 160);}
      if(a==110){CreateEnemyFromFile( zakotank2, 224+240, 355, 0, 180, 100);}
      wait(1);
      a++;
   }
}
task Tzakogun103{//右から
   let a=0;
   loop(200){
      if(a==0){CreateEnemyFromFile( zakotank1, 224+240, 970, 0, 148, 300);}
      if(a==30){CreateEnemyFromFile( zakotank1, 224+240, 920, 0, 148, 280);}
      if(a==80){CreateEnemyFromFile( zakotank1, 224+240, 970, 0, 148, 230);}
      if(a==100){CreateEnemyFromFile( zakotank1, 224+240, 920, 0, 148, 210);}
      if(a==160){CreateEnemyFromFile( zakotank2, 224+240, 940, 0, 148, 160);}
      wait(1);
      a++;
   }
}
task Tzakogun104{//左から
   let a=0;
   loop(400){
      if(a==0){CreateEnemyFromFile( zakotank1, 224-240, 1370, 0, 32, 300);}
      if(a==80){CreateEnemyFromFile( zakotank1, 224-240, 1370, 0, 32, 230);}
      if(a==160){CreateEnemyFromFile( zakotank1, 224-240, 1370, 0, 32, 160);}
      if(a==140){CreateEnemyFromFile( zakotank1, 224-240, 1420, 0, 32, 300);}
      if(a==220){CreateEnemyFromFile( zakotank1, 224-240, 1420, 0, 32, 230);}
      if(a==300){CreateEnemyFromFile( zakotank1, 224-240, 1420, 0, 32, 160);}
      wait(1);
      a++;
   }
}
task Tzakogun105{//左から
   let a=0;
   loop(400){
      if(a==0){CreateEnemyFromFile( zakotank2, 224-240, 2710, 0, 32, 300);}
      if(a==80){CreateEnemyFromFile( zakotank2, 224-240, 2710, 0, 32, 230);}
      if(a==160){CreateEnemyFromFile( zakotank2, 224-240, 2710, 0, 32, 160);}
      if(a==60){CreateEnemyFromFile( zakotank1, 224-240, 2660, 0, 32, 300);}
      if(a==140){CreateEnemyFromFile( zakotank1, 224-240, 2660, 0, 32, 230);}
      if(a==220){CreateEnemyFromFile( zakotank1, 224-240, 2660, 0, 32, 160);}
      wait(1);
      a++;
   }
}
task Tzakogun106{//左から
   let a=0;
   loop(6){
      CreateEnemyFromFile( zakotank1, 224-240, 2730, 0, 106, 0);
      wait(80);
      a++;
   }
}
task Tzakogun107{//門から
   let a=0;
   loop(8){
      CreateEnemyFromFile( zakotank1, 224-30, 3090, 0, 107, 0);
      wait(40);
      if(a>0){CreateEnemyFromFile( zakotank2, 224+30, 3090, 0, 107, 0);}
      wait(40);
      a++;
   }
}


/////////////////////////ステージ２//////////////////////////

task Thunebig(x,y,angle,rank){//hunebig用　x y 角度　ランク
   CreateEnemyFromFile( hunebig1, x, y, rank, angle, 2000);
   CreateEnemyFromFile( zakocannon3, x+30, y-25, rank, angle, 2000);
   CreateEnemyFromFile( zakocannon3, x+50, y+25, rank, angle, 2000);
   CreateEnemyFromFile( zakocannon3, x+80, y-45, rank, angle, 2000);
   CreateEnemyFromFile( zakocannon3, x+110, y+5, rank, angle, 2000);
   CreateEnemyFromFile( zakocannon3, x+140, y-30, rank, angle, 2000);
}
task Tzakogun201{//上から
   let a=0;
   loop(400){
      if(a==10){CreateEnemyFromFile( zakotank1, 224+190, 320, 1, 127, 250);}
      if(a==80){CreateEnemyFromFile( zakotank1, 224+190, 320, 1, 127, 190);}
      if(a==150){CreateEnemyFromFile( zakotank1, 224+190, 320, 1, 127, 130);}
      if(a==0){CreateEnemyFromFile( zakotank2, 224+140, 340, 0, 127, 250);}
      if(a==70){CreateEnemyFromFile( zakotank2, 224+140, 340, 0, 127, 190);}
      if(a==140){CreateEnemyFromFile( zakotank2, 224+140, 340, 0, 127, 130);}
      wait(1);
      a++;
   }
}
task Tzakogun202{//左から門出て左
   let a=0;
   loop(7){
      CreateEnemyFromFile( zakotank1, 224-240, 580, 1, 202, 0);
      wait(80);
      a++;
   }
}
task Tzakogun203{//右から門入って下
   let a=0;
   loop(12){
      CreateEnemyFromFile( zakotank1, 224+240, 840, 1, 203, 0);
      wait(80);
      a++;
   }
}
task Tzakogun204{//左から船
   let a=0;
   loop(400){
      if(a==0){CreateEnemyFromFile( zakohune1, 224-240, 1520, 1, 18, 290);}
      if(a==80){CreateEnemyFromFile( zakohune1, 224-240, 1520, 1, 18, 220);}
      if(a==160){CreateEnemyFromFile( zakohune1, 224-240, 1520, 1, 18, 150);}
      if(a==60){CreateEnemyFromFile( zakohune1, 224-240, 1460, 1, 18, 230);}
      if(a==140){CreateEnemyFromFile( zakohune1, 224-240, 1460, 1, 18, 160);}
      wait(1);
      a++;
   }
}


/////////////////////////ステージ５//////////////////////////

task Tzakogun501(let r,let n){//正面から
   let a=0;
	loop(n){
		if(a%3==1){
      	CreateEnemyFromFile( zakotank2, 224+r*(23+a%2*46), GetCommonData("bgy")+80, 4, 90, 1000);
		}
		else{
      	CreateEnemyFromFile( zakotank1, 224+r*(23+a%2*46), GetCommonData("bgy")+80, 4, 90, 1000);
		}
		wait(25);
		a++;
	}
}

task Tzakogun502(let r,let n){//門から
   let a=0;
	loop(n){
		if(a%3==1){
      	CreateEnemyFromFile( zakotank2, 224+r*(23+a%2*46), 1660, 4, 90, 1000);
		}
		else{
      	CreateEnemyFromFile( zakotank1, 224+r*(23+a%2*46), 1660, 4, 90, 1000);
		}
		wait(50);
		a++;
	}
}

task Tzakogun503(let y,let r,let n){//建物から
	let a=0;
   loop(n){
      CreateEnemyFromFile( zakotank1, 224+95*r, y, 4, 503*r, 0);
      wait(80);
      a++;
   }
}
task Tzakogun504(let y,let r,let n){//建物から
	let a=0;
   loop(n){
      CreateEnemyFromFile( zakotank1, 224+140*r, y, 4, 504*r, 0);
      wait(80);
      a++;
   }
}

task Tzakogun505{//右から
   let a=0;
   loop(200){
      if(a==0){CreateEnemyFromFile( zakotank1, 224+240, 2100, 4, 180, 280);}
      if(a==80){CreateEnemyFromFile( zakotank1, 224+240, 2100, 4, 180, 210);}
      if(a==160){CreateEnemyFromFile( zakotank1, 224+240, 2100, 4, 180, 140);}
      if(a==40){CreateEnemyFromFile( zakotank2, 224+240, 2160, 4, 180, 240);}
      if(a==120){CreateEnemyFromFile( zakotank2, 224+240, 2160, 4, 180, 170);}
      wait(1);
      a++;
   }
}
task Tzakogun506{//左から
   let a=0;
   loop(200){
      if(a==0){CreateEnemyFromFile( zakotank1, 224-240, 2030, 4, 0, 200);}
      if(a==80){CreateEnemyFromFile( zakotank1, 224-240, 2030, 4, 0, 130);}
      if(a==30){CreateEnemyFromFile( zakotank1, 224-240, 2080, 4, 0, 200);}
      if(a==110){CreateEnemyFromFile( zakotank1, 224-240, 2080, 4, 0, 130);}
      if(a==60){CreateEnemyFromFile( zakotank2, 224-240, 2130, 4, 0, 200);}
      if(a==140){CreateEnemyFromFile( zakotank2, 224-240, 2130, 4, 0, 130);}
      wait(1);
      a++;
   }
}

task Tzakogun507{//右から
   let a=0;
   loop(200){
      if(a==0){CreateEnemyFromFile( zakotank2, 224+240, 2980, 4, 180, 280);}
      if(a==80){CreateEnemyFromFile( zakotank2, 224+240, 2980, 4, 180, 210);}
      if(a==160){CreateEnemyFromFile( zakotank2, 224+240, 2980, 4, 180, 140);}
      if(a==40){CreateEnemyFromFile( zakotank1, 224+240, 3020, 4, 180, 240);}
      if(a==120){CreateEnemyFromFile( zakotank1, 224+240, 3020, 4, 180, 170);}
      wait(1);
      a++;
   }
}
task Tzakogun508(){//上から
	let a=0;
   loop(15){
      CreateEnemyFromFile( zakotank1, -170, 3440, 4, 508, 0);
      wait(40);
      CreateEnemyFromFile( zakotank1, -110, 3490, 4, 508, 0);
      wait(40);
      a++;
   }
	let a=0;
   loop(4){
      CreateEnemyFromFile( zakotank2, -170, 3440, 4, 90, 330-a*70-50);
      wait(40);
      CreateEnemyFromFile( zakotank2, -110, 3490, 4, 90, 330-a*70);
      wait(40);
      a++;
   }
}

task Tzakogun509(){//左から
	let a=0;
   loop(9){
      CreateEnemyFromFile( zakotank1, GetCommonData("bgx")-30, 3160, 4, 0, 1000);
      wait(30);
      CreateEnemyFromFile( zakotank1, GetCommonData("bgx")-30, 3110, 4, 0, 1000);
      wait(30);
      a++;
   }
}
task Tzakogun510(){//建物から右
	let a=0;
   loop(4){
      CreateEnemyFromFile( tank2, 105, 2400, 4, 501, 0);
      wait(80);
      a++;
   }
   loop(3){
      CreateEnemyFromFile( tank2, 105, 2400, 4, 501, 0);
      wait(70);
      CreateEnemyFromFile( tank2, 105, 2400, 4, 502, 0);
      wait(90);
      a++;
   }
}
task Tzakogun511(){//建物から左
	let a=0;
   loop(3){
      CreateEnemyFromFile( tank2, -135, 2820, 4, -501, 0);
      wait(80);
      a++;
   }
   loop(3){
      CreateEnemyFromFile( tank2, -135, 2820, 4, -502, 0);
      wait(90);
      CreateEnemyFromFile( tank2, -135, 2820, 4, -501, 0);
      wait(70);
      a++;
   }
}
task Tzakogun512(let x, let n){//建物から
	let a=0;
   loop(n){
      CreateEnemyFromFile( zakotank1, x+140, 1970, 4, 504, 0);
      wait(60);
      CreateEnemyFromFile( zakotank1, x+95, 1970, 4, 503, 0);
      wait(20);
      a++;
   }
}
task Tzakogun513(){//建物から右
	let a=0;
   loop(5){
      CreateEnemyFromFile( tank2, 105, 3230, 4, 501, 0);
      wait(80);
      a++;
   }
}
task Tzakogun514(){//竪穴前
	let a=0;
   loop(15){
      CreateEnemyFromFile( tank2, 1200, 3260, 4, 514, 0);
      wait(100);
      a++;
   }
}

task Tzakogun515(){//クローン開幕
	let a=0;
	loop(210){
		//正面
		if(a%40==0){
			CreateEnemyFromFile( clone3, 816+224-25, 2570, 2, 90, 170-a*30/40);
			CreateEnemyFromFile( clone3, 816+224+25, 2570, 2, 90, 170-a*30/40);
		}
		//左右
		if(a==0){
			CreateEnemyFromFile( clone3, 816+224-240, 2300, 2, 0, 100);
			CreateEnemyFromFile( clone3, 816+224+240, 2300, 2, 180, 100);
		}
		else if(a==40){
			CreateEnemyFromFile( clone3, 816+224-240, 2300, 2, 0, 75);
			CreateEnemyFromFile( clone3, 816+224+240, 2300, 2, 180, 75);
		}
		else if(a==80){
			CreateEnemyFromFile( clone3, 816+224-240, 2300, 2, 0, 50);
			CreateEnemyFromFile( clone3, 816+224+240, 2300, 2, 180, 50);
		}
		//影
		else if(a==60){
			CreateEnemyFromFile( clone3, 816+224-180, 2400, 2, 60, 30);
			CreateEnemyFromFile( clone3, 816+224+180, 2400, 2, 120, 30);
			CreateEnemyFromFile( clone3, 816+224-120, 2410, 2, 60, 30);
			CreateEnemyFromFile( clone3, 816+224+120, 2410, 2, 120, 30);
		}
		wait(1);
		a++;
	}
	let a=0;
	loop(110){
		//正面
		if(a%40==0){
			CreateEnemyFromFile( clone3, 816+224-75, 2570, 2, 90, 170-(a+80)*30/40);
			CreateEnemyFromFile( clone3, 816+224+75, 2570, 2, 90, 170-(a+80)*30/40);
		}
		wait(1);
		a++;
	}
}

task Tzakogun516(){//クローン開幕2
	let a=0;
	loop(300){
		//左右
		if(a==180){
			let b=0;
			loop(3){
				CreateEnemyFromFile( clone3, 816+224-240, 2505+b*50, 2, 0, 70);
				CreateEnemyFromFile( clone3, 816+224+240, 2505+b*50, 2, 180, 70);
				b++;
			}
		}
		if(a==210){
			let b=0;
			loop(3){
				CreateEnemyFromFile( clone3, 816+224-240, 2505+b*50, 2, 0, 45);
				CreateEnemyFromFile( clone3, 816+224+240, 2505+b*50, 2, 180, 45);
				b++;
			}
		}
		//斜め
		if(a%50==0){
			CreateEnemyFromFile( clone2, 816+224-240, 2540+a*0.6, 2, 20, 1000);
			CreateEnemyFromFile( clone2, 816+224+240, 2540+a*0.6, 2, 160, 1000);
		}
		wait(1);
		a++;
	}
}

task Tzakogun517(){//クローン開幕3
	let a=0;
	loop(300){
		//橋
		if(a%40==0&&a<160){
			CreateEnemyFromFile( clone3, 816+224-240, 2650, 2, 0, 135-a*30/40);
			CreateEnemyFromFile( clone3, 816+224+240, 2650, 2, 180, 135-a*30/40);
		}
		if(a%40==0&&a>=160){
			CreateEnemyFromFile( clone3, 816+224-240, 2690, 2, 0, 135+120-a*30/40);
			CreateEnemyFromFile( clone3, 816+224+240, 2690, 2, 180, 135+120-a*30/40);
		}
		wait(1);
		a++;
	}
}

task Tzakogun518(){//クローン開幕4
	let a=0;
	loop(6){
		//左右
			CreateEnemyFromFile( clone3, 816+224-175, 3100, 2, 90, 220-a*30);
			CreateEnemyFromFile( clone3, 816+224-125, 3100, 2, 90, 220-a*30);
			CreateEnemyFromFile( clone3, 816+224+125, 3100, 2, 90, 220-a*30);
			CreateEnemyFromFile( clone3, 816+224+170, 3100, 2, 90, 220-a*30);
		
		wait(60);
		a++;
	}
}

task Tzakogun519(){//クローン開幕5
	let a=0;
	loop(4){
		//正面
			CreateEnemyFromFile( clone3, 816+224-25, 3115, 2, 90, 170-a*30);
			CreateEnemyFromFile( clone3, 816+224+25, 3115, 2, 90, 170-a*30);
		
		wait(40);
		a++;
	}
	
	wait(80);
	
	let a=0;
	loop(2){
		//後ろ
			CreateEnemyFromFile( clone3, 816+224-25, 2720, 2, 270, 50-a*30);
			CreateEnemyFromFile( clone3, 816+224+25, 2720, 2, 270, 50-a*30);
			CreateEnemyFromFile( clone3, 816+224-75, 2730, 2, 270, 50-a*30);
			CreateEnemyFromFile( clone3, 816+224+75, 2730, 2, 270, 50-a*30);
		
		wait(40);
		a++;
	}
}

task Tzakogun520(){//クローン開幕5
	let a=0;
	loop(12){
		//正面
		CreateEnemyFromFile( clone2, 816+224-240, 3030, 2, 0, 1000);
		CreateEnemyFromFile( clone2, 816+224+240, 3030, 2, 180, 1000);
		
		wait(30);
		a++;
	}
}

task Tzakogun531(){//クローン中盤1
	let a=0;
	loop(5){
		//正面
		CreateEnemyFromFile( clone3, 816+224-75, 3550, 2, 90, 185-a*30);
		CreateEnemyFromFile( clone3, 816+224-24, 3550, 2, 90, 185-a*30);
		CreateEnemyFromFile( clone3, 816+224+24, 3550, 2, 90, 185-a*30);
		CreateEnemyFromFile( clone3, 816+224+75, 3550, 2, 90, 185-a*30);
		
		wait(80);
		a++;
	}
}
task Tzakogun532(){//クローン中盤2
	let a=0;
	loop(6){
		//左右
		CreateEnemyFromFile( clone2, 816+224-240, 3370, 2, 20, 1000);
		CreateEnemyFromFile( clone2, 816+224+240, 3370, 2, 160, 1000);
		
		wait(80);
		a++;
	}
}
task Tzakogun533(){//クローン中盤2
	let a=0;
	loop(2){
		//左右
		CreateEnemyFromFile( clone3, 816+224-240, 3350, 2, 0, 75-a*30);
		CreateEnemyFromFile( clone3, 816+224-240, 3400, 2, 0, 75-a*30);
		CreateEnemyFromFile( clone3, 816+224+240, 3350, 2, 180, 75-a*30);
		CreateEnemyFromFile( clone3, 816+224+240, 3400, 2, 180, 75-a*30);
		
		wait(40);
		a++;
	}
}
task Tzakogun534(){//クローン中盤3
	let a=0;
	loop(3){
		//正面
		let b=0;
		loop(5){
			CreateEnemyFromFile( clone3, 816+224+25+50*b, 3800, 2, 90, 110-a*30);
			CreateEnemyFromFile( clone3, 816+224-25-50*b, 3800, 2, 90, 110-a*30);
			b++;
		}
		
		wait(60);
		a++;
	}
}

task Tzakogun535(){//クローン終盤1
	let a=0;
	loop(1300){
		//正面
		if(a%120==0&&a>300){
			CreateEnemyFromFile( tank2, 816+224, 4620, 2, 90, 1000);
		}
		if(a%50==0){
			CreateEnemyFromFile( clone3, 816+224+75, 4620, 2, -1, 0);
			CreateEnemyFromFile( clone3, 816+224-75, 4620, 2, 1, 0);
		}
		wait(1);
		a++;
	}
}

task Tzakogun540(){//クローン終盤
	let a=0;
	loop(3){
		CreateEnemyFromFile( clone1, 816+224-140, 4700, 2, 90, 1000);
		wait(80);
		CreateEnemyFromFile( clone1, 816+224+140, 4700, 2, 90, 1000);
		wait(80);
		a++;
	}
}

task Tzakogun541(){//クローン終盤回転1
	let a=0;
	CreateEnemyFromFile( izumi, 816+224-90, 4780, 0, 0, 1);
	loop(6){
		CreateEnemyFromFile( clone1, 816+224-90, 4780, 2, a*60, 0);
		a++;
	}
	wait(200);
	
	a=0;
	CreateEnemyFromFile( izumi, 816+224+90, 4900, 0, 0, 1);
	loop(6){
		CreateEnemyFromFile( clone1, 816+224+90, 4900, 2, a*60, 0);
		a++;
	}
	wait(200);
	
	a=0;
	CreateEnemyFromFile( izumi, 816+224-90, 5020, 0, 0, 1);
	loop(6){
		CreateEnemyFromFile( clone1, 816+224-90, 5020, 2, a*60, 0);
		a++;
	}
	wait(350);
	
	a=0;
	CreateEnemyFromFile( izumi, 816+224, 5240, 0, 0, 1);
	loop(6){
		CreateEnemyFromFile( clone1, 816+224, 5240, 2, a*60, 0);
		a++;
	}
	a=0;
	loop(12){
		CreateEnemyFromFile( clone1, 816+224, 5240, 2, 360+a*30, 0);
		a++;
	}
}

task Tzakogun542(let y,let r){//クローン終盤左右
	let a=0;
	loop(14){
		
		CreateEnemyFromFile( clone3, 816+224+240*r, y, 2, 2*r, 0);
		
		wait(40);
		a++;
	}
}

