#e[Player]	
#ScriptVersion[2]
#Menu[FlyingShark]
#Text[
wĎLx@̃CN

:[Vbg][{o[]

]
#Image[.\Select.png]
#ReplayName[FS]
script_player_main{
	let Cut = GetCurrentScriptDirectory;
	let Img = [//摜
		Cut~".\PlayerImg.png",//@
		Cut~".\Bomb.png",//{o[
		];
	let SE = [
		Cut~".\se2.wav",//Vbg
		Cut~".\se7.wav",//{o[
		Cut~".\se12.wav",
		];
	let nx=66;
	let ny=66;
	let KeyHold = 0;
	let counter = 0;
	let ShotType =0;
	let Option = false;
	LoadPlayerShotData(Cut~".\ShotData.txt");
	
	@Initialize{
		KeyCheck;
		ascent(n in 0..length(Img)){LoadGraphic(Img[n]);}
		ascent(n in 0..length(SE)){LoadSE(SE[n]);}
		SetSpeed(4,2);
		SetGrazeCircle(60);
		SetAutoEffect(false);
	}
	@MainLoop{
		SetIntersectionCircle(GetPlayerX,GetPlayerY, 8);
		Clock;
		MainShot;
		counter++;
		yield;
	}
	@Missed{MainLoop;}
	@SpellCard{
		//UseSpellCard("QuadrupleBorder",[Img[1],SE[1]]);
		UseSpellCard("Bomber",[Img[1],SE[1]]);
		PlaySE(SE[2]);
	}
	
	@DrawLoop{
		if(Right){
			if(KeyHold>30){PI(4,5);}
			else{PI(3,4);}
		}
		else if(Left){
			if(KeyHold>30){PI(0,1);}
			else{PI(1,2);}
		}
		else{
			PI(2,3);
			KeyHold=0;
		}
		if(RapSlow){HI;}
		SPI;
		KeyHold++;
		yield;
	}
	@Finalize{
		ascent(n in 0..length(Img)){DeleteGraphic(Img[n]);}
		ascent(n in 0..length(SE)){DeleteSE(SE[n]);}
	}

	#include_function".\Ability.txt"
	#include_function".\KeyObj.txt"
	#include_function".\PlayerCore.txt"
}
#include_script".\Bomber.txt"
//#include_script".\Spell.txt"