#東方弾幕風[Stage]
#Title[岩男東方風 ROCKGIRL十字]
#Text[カプ○ンとは何の関係もありません

え、何　ロックマン？
イレギュラー乙

ｱｶﾙｲﾐﾗｲｦｰ!
]
#Image[]
#BackGround[Default]
#Player[ player\エックス\十字2.txt player\ゼロ\零2.txt]
#ScriptVersion[2]

script_stage_main
{  let was=0;
       let myu=50;
       let ST=51;
       let FA=52;
       let IC=53;
       let BM=54;
       let EL=55;
       let CM=56;
       let OC=57;
       let AM=58;
       let ULTX=61;
       let ULTZ=62;
       let poin=69;
       let gokusi=49;
       let crea=0;
       let ope=0;
       let TEST=1;
       let T=1;
       let sto=0;
       let stoo=0;
     let aaaaa=0;
     let scl=0;
	let imgExRumiaBack=GetCurrentScriptDirectory~".\ExRumiaBack.png";
	let imgCAME=GetCurrentScriptDirectory~".\11_1.png";
        let imgPEN=GetCurrentScriptDirectory~".\11_6.png";
        let imgTAKO=GetCurrentScriptDirectory~".\11_4.png";
        let imgALMA=GetCurrentScriptDirectory~".\04.png";
        let imgWASI=GetCurrentScriptDirectory~".\11_3.png";
        let imgMANMO=GetCurrentScriptDirectory~".\11_23.png";
        let imgMANDO=GetCurrentScriptDirectory~".\05.png";
        let imgKUWA=GetCurrentScriptDirectory~".\113_1.png";
	let TESTBack=GetCurrentScriptDirectory~".\06.png";
        let TESTBack2=GetCurrentScriptDirectory~".\062.png";
                let buki=GetCurrentScriptDirectory~"\PLAYER\ゼロ\アイテムST.txt";
               LoadCommonDataEx("gokusi",buki);      
		let cx=GetCenterX();
Expert;

/*	変数宣言に追加した行　ここから	*/

	let title=true;//タイトル中ならtrue　　①
	let titleimg=GetCurrentScriptDirectory~".\タイトル2.png";
        let cursol=1;//カーソルの初期位置を１にする　　③
	let cursol=1;//カーソルの初期位置を１にする　　③

/*	変数宣言に追加した行　ここまで	*/

	let cx=GetCenterX();//STGシーンの中心x座標を取得
         sub op{
SetRateScoreSystemEnable(false);
 loop(2000*3-438*3){yield;sto=sto+1/3;if(GetKeyState(VK_SHOT)==KEY_PUSH){break;}}sto=2000-438;stoo=1;}
          
	task StageTask
	{
yield;
SetCommonDataEx("gokusi",TEST,0); 
SetCommonDataEx("gokusi",ST,0);
SetCommonDataEx("gokusi",FA,0);
SetCommonDataEx("gokusi",IC,0);
SetCommonDataEx("gokusi",BM,0);
SetCommonDataEx("gokusi",EL,0);
SetCommonDataEx("gokusi",CM,0);
SetCommonDataEx("gokusi",OC,0);
SetCommonDataEx("gokusi",AM,0);
SetCommonDataEx("gokusi",poin,0);
op;

PlayMusic("\bgm\03-IntroStage.mid");
aaaaa=0;

//ステージタスク
/*	StageTaskに追加した行　ここから	*/

		loop//無限ループにして毎フレーム判定を行う　　①
		{
			if(title==true)//タイトル画面中か調べる
			{//タイトル画面中だった
				yield;//タスク復帰
			}
			else
			{

//ゲーム中だった場合は残りの部分を再生する

/*	StageTaskに追加した行　ここまで	*/

				function Wait(let frame)
				{//待機関数
					loop(frame){yield};
				}
				function WaitForZeroEnemy()
				{//敵数が0になるまで待機する関数
					while(GetEnemyNum() != 0){yield;}
				}	
  if(GetCommonDataEx("gokusi",ST)+GetCommonDataEx("gokusi",FA)+GetCommonDataEx("gokusi",CM)+GetCommonDataEx("gokusi",OC)+GetCommonDataEx("gokusi",BM)+GetCommonDataEx("gokusi",IC)+GetCommonDataEx("gokusi",EL)+GetCommonDataEx("gokusi",AM)<1&&aaaaa==0&&ope==0){
CreateEventFromScript("opev");
ope=1;
loop{yield;   if(OnEvent()==false){break;}}
}
yield;


       

/*	StageTaskに追加した行　ここから	*/
			}
		}
/*	StageTaskに追加した行　ここまで	*/

	}
	@Initialize()
	{
/*	@Initializeに追加した行　ここから	*/

		LoadGraphic(titleimg);//タイトル画面中に表示する画像を読み込む　　③


/*	@Initializeに追加した行　ここまで	*/

		StageTask();//ステージタスク起動
	}
	
	@MainLoop()
	{

/*	@MainLoopに追加した行　ここから	*/

		if(title==true)//タイトル画面中か調べる　　①
		{//タイトル画面中だった
			ForbidShot(true);//ショット禁止　　②
			ForbidBomb(true);//ボム禁止　　②
			SetPlayerX(GetCenterX);//プレイヤーのX位置を固定　　②
			SetPlayerY(GetClipMaxY/3+GetCenterY);//プレイヤーのY位置固定　
   if(stoo==1){           
			if(GetKeyState(VK_UP)==KEY_PUSH || GetKeyState(VK_DOWN)==KEY_PUSH)//上下キーが押されたか調べる　　③
			{//押された
				if(cursol==1)//カーソルが１か調べる　　③
				{//1だった場合
					cursol=cursol+1;//カーソルの値を２にする　　③
				}
				
			else{//2だった場合
					cursol=1;//カーソルの値を１にする　　③
				}

			} 
			else if(GetKeyState(VK_SHOT)==KEY_PUSH)//ショットキーが押されたか調べる　　③
			{//押された
				if(cursol==1)//カーソルが１か調べる　　③
				{//1だった場合



SetCommonDataEx("gokusi",TEST,0); 

if(GetPlayerScriptName=="十字2.txt"){SetCommonDataEx("gokusi",myu,1);}
if(GetPlayerScriptName=="零2.txt"){SetCommonDataEx("gokusi",myu,2);}

PlayMusic("\bgm\DrCain.mid");

aaaaa=1;

					title=false;

				}
				if(cursol==2){
 LoadCommonDataEx("gokusi","script\ロククロ\中断.txt");
if(GetPlayerScriptName=="十字2.txt"&&GetCommonDataEx("gokusi",myu)==2){ClearStage();}
if(GetPlayerScriptName=="零2.txt"&&GetCommonDataEx("gokusi",myu)==1){ClearStage();}
PlayMusic("\bgm\DrCain.mid");
AddScore(GetCommonDataEx("gokusi",poin));
AddBomb(100);
aaaaa=1;

				title=false;
				}
}
                               


			}
		}
		else//タイトル画面中では無かった場合　　①
		{

			ForbidShot(false);//ショット使用許可　　②
			ForbidBomb(false);//ボム使用許可　　②

		}


/*	@MainLoopに追加した行　ここまで	*/

		yield;//毎フレームタスク復帰
if(OnEvent()==false){
if(GetCommonDataEx("gokusi",ST)+GetCommonDataEx("gokusi",FA)+GetCommonDataEx("gokusi",CM)+GetCommonDataEx("gokusi",OC)+GetCommonDataEx("gokusi",BM)+GetCommonDataEx("gokusi",IC)+GetCommonDataEx("gokusi",EL)+GetCommonDataEx("gokusi",AM)>=8&&GetCommonDataEx("gokusi",TEST)==0){

SetCommonDataEx("gokusi",TEST,9);SetCommonDataEx("gokusi",ST,2); 
#include_function"script\某アゴ\ラストステージ.txt"last;
 }
}
	if(GetCommonDataEx("gokusi",1)==1){if(OnEvent()==true){break;};yield;if(aaaaa==0){#include_function"script\某カメレオン\カメレオンステージ.txt"CAMEREON;}  aaaaa=1;
	}
if(GetCommonDataEx("gokusi",1)==2){if(OnEvent()==true){break;};yield;if(aaaaa==0){#include_function"script\某ペンギン\ペンギンステージ.txt"PENGIN;}  aaaaa=1;
	}
if(GetCommonDataEx("gokusi",1)==3){if(OnEvent()==true){break;};yield;if(aaaaa==0){#include_function"script\某タコ\タコステージ.txt"TAKOO;}  aaaaa=1;
	}
if(GetCommonDataEx("gokusi",1)==4){if(OnEvent()==true){break;};yield;if(aaaaa==0){#include_function"script\某アルマジロ\アルマジロステージ.txt"ALMAZI;}  aaaaa=1;
        }
if(GetCommonDataEx("gokusi",1)==5){if(OnEvent()==true){break;};yield;if(aaaaa==0){scl=0;#include_function"script\某鷲\ワシステージ.txt"WASI;}  aaaaa=1;
	}
if(GetCommonDataEx("gokusi",1)==6){if(OnEvent()==true){break;};yield;if(aaaaa==0){#include_function"script\某マンモス\マンモスステージ.txt"MANMOS;}  aaaaa=1;
	}
if(GetCommonDataEx("gokusi",1)==7){if(OnEvent()==true){break;};yield;if(aaaaa==0){#include_function"script\某マンドリル\マンドリルステージ.txt"MANDORILL;}  aaaaa=1;
	}
if(GetCommonDataEx("gokusi",1)==8){if(OnEvent()==true){break;};yield;if(aaaaa==0){#include_function"script\某クワガタ\クワガタステージ.txt"KUWAGATA;}  aaaaa=1;
	}

	}
	
	@Finalize()
	{
/*	@Finalizeに追加した行　ここから	*/

		DeleteGraphic(titleimg);//タイトル画面の画像を破棄　　③

/*	@Finalizeに追加した行　ここまで	*/	
	}
	@BackGround
	{yield;
	if(GetCommonDataEx("gokusi",1)==0){
if(aaaaa==1){
			CreateEnemyFromFile(GetCurrentScriptDirectory~"zako0.txt",cx+45,270,0,0,0);
			CreateEnemyFromFile(GetCurrentScriptDirectory~"PENS.txt",cx+45,60,0,0,0);
			CreateEnemyFromFile(GetCurrentScriptDirectory~"TAKOS.txt",cx-45,60,0,0,0);  
		        CreateEnemyFromFile(GetCurrentScriptDirectory~"ALMAS.txt",cx-135,90,0,0,0); 
		        CreateEnemyFromFile(GetCurrentScriptDirectory~"WASIS.txt",cx-135,240,0,0,0); 
		        CreateEnemyFromFile(GetCurrentScriptDirectory~"MANMOS.txt",cx+135,90,0,0,0); 
		        CreateEnemyFromFile(GetCurrentScriptDirectory~"MANDOS.txt",cx-45,270,0,0,0);          
		        CreateEnemyFromFile(GetCurrentScriptDirectory~"KUWAS.txt",cx+135,240,0,0,0); 
SetCommonDataEx("gokusi",poin,GetScore);  
SaveCommonDataEx("gokusi","script\ロククロ\中断.txt");}
  LoadGraphic(TESTBack);
		SetGraphicRect(512,62,1024,574);
               SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
		SetTexture(TESTBack);
		DrawGraphic(cx,240);
                  aaaaa=0;}
	if(GetCommonDataEx("gokusi",1)==1){
 LoadGraphic(imgCAME);
SetGraphicRect(0,0-scl,384,448-scl);
SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+3;
		SetTexture(imgCAME);
		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==2){
 LoadGraphic(imgPEN);
SetGraphicRect(0,0-scl,384,448-scl);
SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+3;
		SetTexture(imgPEN);
		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==3){
 LoadGraphic(imgTAKO);
SetGraphicRect(0,0-scl,384,448-scl);
SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+3;
		SetTexture(imgTAKO);
		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==4){
 LoadGraphic(imgALMA);
SetGraphicRect(0,0-scl,384,448-scl);
SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+4;
		SetTexture(imgALMA);
		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==5){
 LoadGraphic(imgWASI);
SetGraphicRect(0+scl*0.5,1024-449-scl*0.1,388+scl*0.5,1024-scl*0.1);
SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+1.5;
if(was==1){scl=scl-1.5;}
		SetTexture(imgWASI);

		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==6){
 LoadGraphic(imgMANMO);
SetGraphicRect(0,0-scl,384,448-scl);
SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+10;
		SetTexture(imgMANMO);
		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==7){
 LoadGraphic(imgMANDO);
SetGraphicRect(0,0-scl,450,450-scl);
SetAlpha(150);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+3;
		SetTexture(imgMANDO);
		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==8){
 LoadGraphic(imgKUWA);
SetGraphicRect(0,0-scl,450,450-scl);
SetAlpha(250);
SetGraphicScale(1,1);

scl=scl+8;
		SetTexture(imgKUWA);
		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==9){if(OnEvent()==true){break;}yield;
 LoadGraphic(imgMANMO);
SetGraphicRect(0,0-scl,450,450-scl);
SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+8;
		SetTexture(imgMANMO);
		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==10){if(OnEvent()==true){break;}
 LoadGraphic(TESTBack2);
	SetGraphicRect(0,0,512,512);
SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+8;
		SetTexture(TESTBack2);
		DrawGraphic(cx,240);	}
if(GetCommonDataEx("gokusi",1)==11){if(OnEvent()==true){break;}
 LoadGraphic(imgExRumiaBack);
	SetGraphicRect(0,0,384,448);
SetAlpha(250);
SetGraphicScale(1,1);
SetGraphicAngle(0,0,0);
scl=scl+8;
		SetTexture(imgExRumiaBack);
		DrawGraphic(cx,240);	}
		
	}	

/*	以下　追加した行がだらだらと	*/
	@DrawTopObject
	{
		if(title==true)//タイトル画面中か調べる
		{

			SetTexture(titleimg);
			SetGraphicRect(0,0+sto,384,448+sto);
			DrawGraphic(GetCenterX,GetCenterY);
                        if(stoo==1){  
			DrawText("⇒",100,275+45*cursol,18,255);}                 
                 }


              
	}
/*	追加した行　ここまで	*/

}
#include_script"script\某ペンギン\BOSS ICfin.txt"
#include_script"script\某カメレオン\BOSS CMfin.txt"
#include_script"script\某鷲\BOSS STfin.txt"
#include_script"script\某マンモス\BOSS FAfin.txt"
#include_script"script\某タコ\BOSS OCfin.txt"
#include_script"script\某アルマジロ\BOSS AMfin.txt"
#include_script"script\某クワガタ\BOSS BMfin.txt"
#include_script"script\某マンドリル\BOSS ELfin.txt"
#include_script"script\vava\BOSS VAfin.txt"
#include_script"script\vava\BOSS VA2fin.txt"
#include_script"script\某犬\BOSS BELafin.txt"
#include_script"script\某犬\BOSS BELfin.txt"
#include_script"script\某アゴ\BOSS Σ2.txt"
#include_script"script\某アゴ\BOSS Σfin.txt"
#include_script"script\某アゴ\END.txt"
#include_script"script\某アゴ\FINALMISSON.txt"
#include_script"script\某アゴ\FINALMISSONs.txt"
#include_script"script\某アゴ\FINALMISSONs2.txt"
#include_script"script\某アゴ\MISSON中盤.txt"
#include_script"script\ロククロ\ステージイベント.txt"
#include_script"script\ロククロ\OP.txt"
script_event Get
	{
		@Initialize
		{let STEZE=0;

		}
		
		@MainLoop
		{

if(GetCommonDataEx("gokusi",50)==1){

	if(GetCommonDataEx("gokusi",1)==1){TextOut("\c[BLUE]「カメレオンスティング」ＧＥＴ！");
TextOut("\c[BLUE]消費1　敵を貫通する3WAYレーザー\nクセが無く扱いやすい武器");}
	if(GetCommonDataEx("gokusi",1)==2){TextOut("\c[BLUE]「ショットガンアイス」ＧＥＴ！");
TextOut("\c[BLUE]消費1　途中で拡散する氷弾を発射する\n威力は低いが攻撃範囲は広い");}
	if(GetCommonDataEx("gokusi",1)==3){TextOut("\c[BLUE]「ホーミングトーピード」ＧＥＴ！");
TextOut("\c[BLUE]消費1　単発のホーミング弾を発射する\n雑魚、ボス戦問わず頼りにできる武器");}
	if(GetCommonDataEx("gokusi",1)==4){TextOut("\c[BLUE]「ローリングシールド」ＧＥＴ！");
TextOut("\c[BLUE]消費10　敵弾をかき消す事ができる\nボタン押しっぱなしで身にまとう事も可能");}
	if(GetCommonDataEx("gokusi",1)==5){TextOut("\c[BLUE]「ストームトルネード」ＧＥＴ！");
TextOut("\c[BLUE]消費10　縦方向に竜巻を発生させる\n威力も消費もデカい、ご利用は計画的に");}
	if(GetCommonDataEx("gokusi",1)==6){TextOut("\c[BLUE]「バーニングウェーブ」ＧＥＴ！");
TextOut("\c[BLUE]消費1　前方に火炎放射で攻撃する\n広い攻撃範囲とオート連射機能を持つ");}
	if(GetCommonDataEx("gokusi",1)==7){TextOut("\c[BLUE]「エレクトリックスパーク」ＧＥＴ！");
TextOut("\c[BLUE]消費1　電撃で前後同時に攻撃\n実は左右にも撃てる");}
	if(GetCommonDataEx("gokusi",1)==8){TextOut("\c[BLUE]「ブーメランカッター」ＧＥＴ！");
TextOut("\c[BLUE]消費2　必ず手元に戻ってくるブーメラン\n使い方は様々");}
}
if(GetCommonDataEx("gokusi",50)==2){

	if(GetCommonDataEx("gokusi",1)==1){TextOut("\c[BLUE]「延刃突」を覚えた！");
TextOut("\c[BLUE]低速↑X　伸びるセイバーで一突き\nリーチが長く斜めにも撃てる");}
	if(GetCommonDataEx("gokusi",1)==2){TextOut("\c[BLUE]「氷連突」を覚えた！");
TextOut("\c[BLUE]高速↑X　氷のセイバーで連続突き\n密接して当てるとすごい威力");}
	if(GetCommonDataEx("gokusi",1)==3){TextOut("\c[BLUE]「無双滅閃光」を覚えた！");
TextOut("\c[BLUE]C　画面を覆いつくすエネルギー光弾攻撃\n相手は死ぬ");}
	if(GetCommonDataEx("gokusi",1)==4){TextOut("\c[BLUE]「破弾剣」を覚えた！");
TextOut("\c[BLUE]セイバー溜め　セイバーで弾を消せる\n何度も使えるがチャージは遅い");}
	if(GetCommonDataEx("gokusi",1)==5){TextOut("\c[BLUE]「風陣剣」を覚えた！");
TextOut("\c[BLUE]低速↓X　セイバーで回転斬り。\nX押しっぱなしで回転し続ける");}
	if(GetCommonDataEx("gokusi",1)==6){TextOut("\c[BLUE]「火斬弾」を覚えた！");
TextOut("\c[BLUE]低速横X　セイバーと火炎弾の同時攻撃。\n若干隙はできるが使い勝手のいい技");}
	if(GetCommonDataEx("gokusi",1)==7){TextOut("\c[BLUE]「光絶閃」を覚えた！");
TextOut("\c[BLUE]高速横X　高速で移動してから斬る\n移動中は敵弾をかわせる");}
	if(GetCommonDataEx("gokusi",1)==8){TextOut("\c[BLUE]「飛月」を覚えた！");
TextOut("\c[BLUE]セイバーで斬撃を飛ばす\n威力は低いが意外と便利");}
}



End();
        
		



	
}
		}
		
		@Finalize
		{

		}
	}


