diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..e43b0f9
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1 @@
+.DS_Store
diff --git a/bgm/castle.mp3 b/bgm/castle.mp3
new file mode 100644
index 0000000..149140b
Binary files /dev/null and b/bgm/castle.mp3 differ
diff --git a/bgm/dungeon.mp3 b/bgm/dungeon.mp3
new file mode 100644
index 0000000..6643128
Binary files /dev/null and b/bgm/dungeon.mp3 differ
diff --git a/bgm/field.mp3 b/bgm/field.mp3
new file mode 100644
index 0000000..d2f5b90
Binary files /dev/null and b/bgm/field.mp3 differ
diff --git a/bgm/puyo.mp3 b/bgm/puyo.mp3
new file mode 100644
index 0000000..15a0a04
Binary files /dev/null and b/bgm/puyo.mp3 differ
diff --git a/bgm/star4.mp3 b/bgm/star4.mp3
new file mode 100644
index 0000000..8c7c438
Binary files /dev/null and b/bgm/star4.mp3 differ
diff --git a/loadg.cpp b/loadg.cpp
new file mode 100644
index 0000000..f346f05
--- /dev/null
+++ b/loadg.cpp
@@ -0,0 +1,244 @@
+#include "DxLib.h"
+
+void end();
+
+extern int ma,t,tt;
+extern int grap[161][8],mgrap[51];
+int x1;
+extern int oto[151];
+
+extern int anx[160],any[160];
+extern int ne[40],nf[40];
+
+void loadg(void){
+
+for (t=0;t<7;t++){
+mgrap[t]=0;
+}
+
+/*
+for (t=0;t<161;t++){
+for (tt=0;tt<8;tt++){
+grap[t][tt]=0;
+}}
+*/
+
+//ma-=100;//mb==5000;
+//end();
+
+
+//画像読み込み
+
+// 透過色を変更
+SetTransColor( 9*16+9 , 255 , 255 ) ;
+
+//プレイヤー
+mgrap[0] = LoadGraph( "res/player.png" ) ;
+//ブロック
+mgrap[1] = LoadGraph( "res/brock.png" ) ;
+//アイテム
+mgrap[2] = LoadGraph( "res/item.png" ) ;
+//敵
+mgrap[3] = LoadGraph( "res/teki.png" ) ;
+//背景
+mgrap[4] = LoadGraph( "res/haikei.png" ) ;
+//ブロック2
+mgrap[5] = LoadGraph( "res/brock2.png" ) ;
+//おまけ
+mgrap[6] = LoadGraph( "res/omake.png" ) ;
+//おまけ2
+mgrap[7] = LoadGraph( "res/omake2.png" ) ;
+//タイトル
+mgrap[30] = LoadGraph( "res/syobon3.PNG" ) ;
+
+
+//プレイヤー読み込み
+grap[40][0] = DerivationGraph( 0, 0, 30, 36, mgrap[0]) ;
+grap[0][0] = DerivationGraph( 31*4, 0, 30, 36, mgrap[0]) ;
+grap[1][0] = DerivationGraph( 31*1, 0, 30, 36, mgrap[0]) ;
+grap[2][0] = DerivationGraph( 31*2, 0, 30, 36, mgrap[0]) ;
+grap[3][0] = DerivationGraph( 31*3, 0, 30, 36, mgrap[0]) ;
+grap[41][0] = DerivationGraph( 50, 0, 51, 73, mgrap[6]) ;
+
+x1=1;
+//ブロック読み込み
+for (t=0;t<=6;t++){
+grap[t][x1] = DerivationGraph( 33*t, 0, 30, 30, mgrap[x1]) ;
+grap[t+30][x1] = DerivationGraph( 33*t, 33, 30, 30, mgrap[x1]) ;
+grap[t+60][x1] = DerivationGraph( 33*t, 66, 30, 30, mgrap[x1]) ;
+}
+grap[8][x1] = DerivationGraph( 33*7, 0, 30, 30, mgrap[x1]) ;
+grap[16][x1] = DerivationGraph( 33*6, 0, 24, 27, mgrap[2]);
+grap[10][x1] = DerivationGraph( 33*9, 0, 30, 30, mgrap[x1]) ;
+grap[40][x1] = DerivationGraph( 33*9, 33, 30, 30, mgrap[x1]) ;
+grap[70][x1] = DerivationGraph( 33*9, 66, 30, 30, mgrap[x1]) ;
+
+//ブロック読み込み2
+x1=5;
+for (t=0;t<=6;t++){
+grap[t][x1] = DerivationGraph( 33*t, 0, 30, 30, mgrap[x1]) ;
+}
+grap[10][5] = DerivationGraph( 33*1, 33, 30, 30, mgrap[x1]) ;
+grap[11][5] = DerivationGraph( 33*2, 33, 30, 30, mgrap[x1]) ;
+grap[12][5] = DerivationGraph( 33*0, 66, 30, 30, mgrap[x1]) ;
+grap[13][5] = DerivationGraph( 33*1, 66, 30, 30, mgrap[x1]) ;
+grap[14][5] = DerivationGraph( 33*2, 66, 30, 30, mgrap[x1]) ;
+
+//アイテム読み込み
+x1=2;
+for (t=0;t<=5;t++){
+grap[t][x1] = DerivationGraph( 33*t, 0, 30, 30, mgrap[x1]) ;
+}
+
+//敵キャラ読み込み
+x1=3;
+grap[0][x1] = DerivationGraph( 33*0, 0, 30, 30, mgrap[x1]) ;
+grap[1][x1] = DerivationGraph( 33*1, 0, 30, 43, mgrap[x1]) ;
+grap[2][x1] = DerivationGraph( 33*2, 0, 30, 30, mgrap[x1]) ;
+grap[3][x1] = DerivationGraph( 33*3, 0, 30, 44, mgrap[x1]) ;
+grap[4][x1] = DerivationGraph( 33*4, 0, 33, 35, mgrap[x1]);
+grap[5][x1] = DerivationGraph( 0, 0, 37, 55, mgrap[7]) ;
+grap[6][x1] = DerivationGraph( 38*2, 0, 36, 50, mgrap[7]);
+grap[150][x1] = DerivationGraph( 38*2+37*2, 0, 36, 50, mgrap[7]);
+grap[7][x1] = DerivationGraph( 33*6+1, 0, 32, 32, mgrap[x1]);
+grap[8][x1] = DerivationGraph( 38*2+37*3, 0, 37, 47, mgrap[7]);
+grap[151][x1] = DerivationGraph( 38*3+37*3, 0, 37, 47, mgrap[7]);
+grap[9][x1] = DerivationGraph( 33*7+1, 0, 26, 30, mgrap[x1]);
+grap[10][x1] = DerivationGraph( 214, 0, 46, 16, mgrap[6]);
+
+//モララー
+grap[30][x1] = DerivationGraph( 0,56, 30, 36, mgrap[7]);
+grap[155][x1] = DerivationGraph( 31*3,56, 30, 36, mgrap[7]);
+grap[31][x1] = DerivationGraph( 50, 74, 49, 79, mgrap[6]) ;
+
+
+grap[80][x1] = DerivationGraph( 151, 31, 70, 40, mgrap[4]);
+grap[81][x1] = DerivationGraph( 151, 72, 70, 40, mgrap[4]);
+grap[130][x1] = DerivationGraph( 151+71, 72, 70, 40, mgrap[4]);
+grap[82][x1] = DerivationGraph( 33*1, 0, 30, 30, mgrap[5]);
+grap[83][x1] = DerivationGraph( 0, 0, 49, 48, mgrap[6]);
+grap[84][x1] = DerivationGraph( 33*5+1, 0, 30, 30, mgrap[x1]);
+grap[86][x1] = DerivationGraph( 102, 66, 49, 59, mgrap[6]);
+grap[152][x1] = DerivationGraph( 152, 66, 49, 59, mgrap[6]);
+
+grap[90][x1] = DerivationGraph( 102, 0, 64, 63, mgrap[6]);
+
+grap[100][x1] = DerivationGraph( 33*1, 0, 30, 30, mgrap[2]) ;
+grap[101][x1] = DerivationGraph( 33*7, 0, 30, 30, mgrap[2]) ;
+grap[102][x1] = DerivationGraph( 33*3, 0, 30, 30, mgrap[2]) ;
+
+//grap[104][x1] = DerivationGraph( 33*2, 0, 30, 30, mgrap[5]) ;
+grap[105][x1] = DerivationGraph( 33*5, 0, 30, 30, mgrap[2]) ;
+grap[110][x1] = DerivationGraph( 33*4, 0, 30, 30, mgrap[2]) ;
+
+
+//背景読み込み
+x1=4;
+grap[0][x1] = DerivationGraph( 0, 0, 150, 90, mgrap[x1]) ;
+grap[1][x1] = DerivationGraph( 151, 0, 65, 29, mgrap[x1]) ;
+grap[2][x1] = DerivationGraph( 151, 31, 70, 40, mgrap[x1]) ;
+grap[3][x1] = DerivationGraph( 0, 91, 100, 90, mgrap[x1]) ;
+grap[4][x1] = DerivationGraph( 151, 113, 51, 29,mgrap[x1]) ;
+grap[5][x1] = DerivationGraph( 222, 0, 28, 60,mgrap[x1]) ;
+grap[6][x1] = DerivationGraph( 151, 143, 90, 40,mgrap[x1]);
+
+//中間フラグ
+grap[20][x1] = DerivationGraph( 40, 182, 40, 60, mgrap[x1]) ;
+
+
+//グラ
+x1=5;
+grap[0][x1] = DerivationGraph( 167, 0, 45, 45, mgrap[6]) ;
+
+
+
+
+
+
+
+
+
+//敵サイズ収得
+//int GrHandle=0;
+x1=3;
+for (t=0;t<=140;t++){
+GetGraphSize(grap[t][x1] ,&anx[t] ,&any[t]);
+anx[t]*=100;any[t]*=100;
+}
+anx[79]=120*100;any[79]=15*100;
+anx[85]=25*100;any[85]=30*10*100;
+
+//背景サイズ収得
+x1=4;
+for (t=0;t<40;t++){
+GetGraphSize(grap[t][x1] ,&ne[t] ,&nf[t]);
+//ne[t]*=100;nf[t]*=100;
+}
+
+/*
+anx[0]=30;any[0]=30;
+anx[1]=30;any[1]=43;
+anx[2]=30;any[2]=30;
+anx[3]=30;any[3]=44;
+*/
+
+
+
+
+
+
+
+
+
+//wav読み込み
+//try{
+//oto[2] = LoadSoundMem( "SE/1.WAV" ) ;
+SetCreateSoundDataType(DX_SOUNDDATATYPE_MEMPRESS);
+oto[100]=LoadSoundMem( "BGM/field.mp3" ) ;
+ChangeVolumeSoundMem(50, oto[100]);
+oto[103]=LoadSoundMem( "BGM/dungeon.mp3" ) ;
+ChangeVolumeSoundMem(50, oto[103]);
+oto[104]=LoadSoundMem( "BGM/star4.mp3");
+oto[105]=LoadSoundMem( "BGM/castle.mp3");
+ChangeVolumeSoundMem(50, oto[105]);
+oto[106]=LoadSoundMem( "BGM/puyo.mp3");
+oto[107]=LoadSoundMem( "BGM/last.mp3");
+ChangeVolumeSoundMem(50, oto[107]);
+
+SetCreateSoundDataType(DX_SOUNDDATATYPE_MEMNOPRESS);
+oto[1] = LoadSoundMem( "SE/jump.mp3" );
+//oto[2] = LoadSoundMem("SE/brockcoin.mp3");
+oto[3] = LoadSoundMem("SE/brockbreak.mp3");
+oto[4] = LoadSoundMem("SE/coin.mp3");
+oto[5] = LoadSoundMem("SE/humi.mp3");
+oto[6] = LoadSoundMem("SE/koura.mp3");
+oto[7] = LoadSoundMem("SE/dokan.mp3");
+oto[8] = LoadSoundMem("SE/brockkinoko.mp3");
+oto[9] = LoadSoundMem("SE/powerup.mp3");
+oto[10] = LoadSoundMem("SE/kirra.mp3");
+oto[11] = LoadSoundMem("SE/goal.mp3");
+oto[12] = LoadSoundMem("SE/death.mp3");
+oto[13] = LoadSoundMem("SE/Pswitch.mp3");
+oto[14] = LoadSoundMem("SE/jumpBlock.mp3");
+oto[15] = LoadSoundMem("SE/hintBlock.mp3");
+oto[16] = LoadSoundMem("SE/4-clear.mp3");
+oto[17] = LoadSoundMem("SE/allclear.mp3");
+oto[18] = LoadSoundMem("SE/tekifire.mp3");
+
+//}catch( int num){end();}
+
+
+x1=40;
+ChangeVolumeSoundMem( 255 * x1 / 100, oto[103] ) ;
+
+
+//ループ設定-20000-20秒
+//SetLoopPosSoundMem( 1,oto[104]) ;
+//SetLoopSamplePosSoundMem(44100,oto[104]);
+//SetLoopSamplePosSoundMem(22050,oto[104]);
+
+
+
+
+
+}
\ No newline at end of file
diff --git a/main.cpp b/main.cpp
new file mode 100644
index 0000000..8a56a86
--- /dev/null
+++ b/main.cpp
@@ -0,0 +1,5552 @@
+#include "DxLib.h"
+#include <stdio.h>
+#include <math.h>
+
+void loadg();
+
+//String 使用
+#include <string>
+using namespace std;
+
+
+//プログラム中
+//main-10
+//タイトル-100
+int main=100,maintm=0;
+
+//ステージ
+int stagecolor=0;
+int sta=1,stb=4,stc=0;
+
+//クイック
+int fast=1;
+
+//トラップ表示
+int trap=1;
+
+//中間ゲート
+int tyuukan=0;
+
+
+//スタッフロール
+int ending=0;
+
+
+//ステージ読み込みループ(いじらない)
+int stagerr,stagepoint;
+//オーバーフローさせる
+int over=0;
+
+//ステージスイッチ
+int stageonoff=0;
+
+
+//メインプログラム
+void Mainprogram();
+void rpaint();
+int maint;
+
+
+//サブクラス
+//(ウエイト系
+void wait(int interval);
+void wait2(long stime, long etime,int FLAME_TIME);
+int rand(int Rand);
+void end();
+
+//描画
+int color;
+void setfont(int a);
+void setcolor(int red, int green, int blue);
+void setc0();
+void setc1();
+void drawpixel(int a,int b);
+void drawline(int a,int b,int c,int d);
+void drawrect(int a,int b,int c,int d);
+void fillrect(int a,int b,int c,int d);
+void drawarc(int a,int b,int c,int d);
+void fillarc(int a,int b,int c,int d);
+int grap[161][8],mgrap[51];
+int loadimage(string b);
+int loadimage(int a,int x,int y,int r,int z);
+int mirror;
+void drawimage(int mx,int a,int b);
+void drawimage(int mx,int a,int b,int c,int d,int e,int f);
+void setre();
+void setre2();
+void setno();
+int oto[151];
+void ot(int x);void bgmchange(int x);
+
+//文字
+void str(string c,int a,int b);
+
+
+//)
+
+void stagecls();
+void stage();
+void stagep();
+
+
+
+
+
+//1-ステージ
+//10-ステージ前
+//
+
+
+
+//ループ
+int t,tt,t1,t2,t3,t4;
+
+
+//初期化
+int zxon,zzxon;
+
+//キーコンフィグ
+int key,keytm;
+
+//三角関数
+double pai=3.1415926535;
+
+
+//地面
+#define smax 31
+int sx,sco;
+int sa[smax],sb[smax],sc[smax],sd[smax],stype[smax],sxtype[smax],sr[smax];
+int sgtype[smax];
+
+
+
+//プレイヤー
+int mainmsgtype;
+int ma,mb,mnobia,mnobib,mhp;
+int mc,md,macttype,atkon,atktm,mactsok,msstar,nokori=2,mactp,mact;
+
+int mtype,mxtype,mtm,mzz;
+int mzimen,mrzimen,mkasok,mmuki,mmukitm,mjumptm,mkeytm,mcleartm;
+int mmutekitm,mmutekion;
+int mztm,mztype;
+int actaon[7];
+//メッセージ
+int mmsgtm,mmsgtype;
+
+int mascrollmax=21000;//9000
+
+
+
+
+//ブロック
+void tyobi(int x,int y,int type);
+void brockbreak(int t);
+#define tmax 641
+int tco;
+int ta[tmax],tb[tmax],tc[tmax],td[tmax],thp[tmax],ttype[tmax];
+int titem[tmax],txtype[tmax];
+
+//メッセージブロック
+int tmsgtm,tmsgtype,tmsgx,tmsgy,tmsgnobix,tmsgnobiy,tmsg;
+void ttmsg();void txmsg(string x,int a);
+void setfont(int x,int y);
+
+//効果を持たないグラ
+void eyobi(int xa,int xb,int xc,int xd,int xe,int xf,int xnobia,int xnobib,int xgtype,int xtm);
+#define emax 201
+int eco;
+int ea[emax],eb[emax],enobia[emax],enobib[emax],ec[emax],ed[emax];
+int ee[emax],ef[emax],etm[emax];
+int egtype[emax];
+
+
+
+//敵キャラ
+void ayobi(int xa,int xb,int xc,int xd,int xnotm,int xtype,int xxtype);
+void tekizimen();
+#define amax 24
+int aco;
+int aa[amax],ab[amax],anobia[amax],anobib[amax],ac[amax],ad[amax];
+int ae[amax],af[amax],abrocktm[amax];
+int aacta[amax],aactb[amax],azimentype[amax],axzimen[amax];
+int atype[amax],axtype[amax],amuki[amax],ahp[amax];
+int anotm[amax],anx[160],any[160];
+int atm[amax],a2tm[amax];
+int amsgtm[amax],amsgtype[amax];
+
+//敵出現
+#define bmax 81
+int bco;
+int ba[bmax],bb[bmax],btm[bmax];
+int btype[bmax],bxtype[bmax],bz[bmax];
+
+
+//背景
+#define nmax 41
+int nxxmax,nco;
+int na[nmax],nb[nmax],nc[nmax],nd[nmax],ntype[nmax];
+int ne[nmax],nf[nmax],ng[nmax],nx[nmax];
+
+
+//リフト
+#define srmax 21
+int srco;
+int sra[srmax],srb[srmax],src[srmax],srd[srmax],sre[srmax],srf[srmax];
+int srtype[srmax],srgtype[srmax],sracttype[srmax],srsp[srmax];
+int srmuki[srmax],sron[srmax],sree[srmax];
+int srsok[srmax],srmovep[srmax],srmove[srmax];
+
+
+
+
+
+//スクロール範囲
+int fx=0,fy=0,fzx,fzy,scrollx,scrolly;
+//全体のポイント
+int fma=0,fmb=0;
+//強制スクロール
+int kscroll=0;
+//画面サイズ(ファミコンサイズ×2)(256-224)
+int fxmax=48000,fymax=42000;
+
+
+
+//ステージ
+byte stagedate[17][2001];
+
+//画面黒
+int blacktm=1,blackx=0;
+
+
+
+//自由な値
+int xx[91];
+double xd[11];
+string xs[31];
+
+
+//タイマー測定
+long stime;
+
+
+
+// プログラムは WinMain から始まります
+int WINAPI WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance,LPSTR lpCmdLine, int nCmdShow ){
+
+  //画面サイズ設定
+  SetGraphMode( fxmax/100 , fymax/100 , 16 ) ;
+  //
+  SetWindowIconID(127);
+  //最大化の防止
+  ChangeWindowMode(TRUE ) ;
+  //タイトルの変更
+  SetMainWindowText( "しょぼんのアクション" ) ;
+  //applog無効
+  SetOutApplicationLogValidFlag(false);
+
+
+  // ＤＸライブラリ初期化処理(エラーが起きたら直ちに終了)
+  if( DxLib_Init() == -1 )return -1 ;
+
+  // 点を打つ
+  //DrawPixel( 320 , 240 , 0xffff ) ;
+
+  // キー入力待ち
+  //WaitKey();
+
+
+  //全ロード
+  loadg();
+
+  //フォント
+  SetFontSize(16) ;
+  SetFontThickness(4) ;
+
+  //ループ
+  //for (maint=0;maint<=2;maint++){
+  while( ProcessMessage() == 0 && CheckHitKey( KEY_INPUT_ESCAPE ) == 0){
+
+    maint=0;Mainprogram();
+    if (maint==3)break;
+  }
+
+
+
+  //ＤＸライブラリ使用の終了処理
+  DxLib_End() ;				
+
+  // ソフトの終了 
+  return 0 ;				
+}
+
+
+
+//メイン描画
+void rpaint(){
+
+  //ダブルバッファリング
+  SetDrawScreen(DX_SCREEN_BACK);
+
+  ClearDrawScreen();
+
+  setcolor(0,0,0);
+  //if (stagecolor==1)setcolor(170,170,255);
+  if (stagecolor==1)setcolor(160,180,250);
+  if (stagecolor==2)setcolor(10,10,10);
+  if (stagecolor==3)setcolor(160,180,250);
+  if (stagecolor==4)setcolor(10,10,10);
+  fillrect(0,0,fxmax,fymax);
+
+
+  /*
+  //文字を書く
+  setcolor(0,0,120);
+
+  xs[1]="";
+  char num_str[255];
+  sprintf_s(num_str, sizeof(num_str),"%d",mjumptm);
+
+  xs[3]=xs[1]+num_str;
+  str(xs[3],10,10);
+  */
+
+
+  if (main==1 && zxon>=1){
+
+
+    //背景
+    for (t=0;t<nmax;t++){
+      xx[0]=na[t]-fx;xx[1]=nb[t]-fy;
+      xx[2]=ne[ntype[t]]*100;xx[3]=nf[ntype[t]]*100;
+      xx[2]=16000;xx[3]=16000;
+
+      if (xx[0]+xx[2]>=-10 && xx[0]<=fxmax && xx[1]+xx[3]>=-10 && xx[3]<=fymax){
+
+        if (ntype[t]!=3)
+          drawimage(grap[ntype[t]][4],xx[0]/100,xx[1]/100);
+
+        if (ntype[t]==3)
+          drawimage(grap[ntype[t]][4],xx[0]/100-5,xx[1]/100);
+
+        //51
+        if (ntype[t]==100){
+          DrawFormatString(xx[0]/100+fma,xx[1]/100+fmb,GetColor(255,255,255),"51");
+        }
+
+        if (ntype[t]==101)
+          DrawFormatString(xx[0]/100+fma,xx[1]/100+fmb,GetColor(255,255,255),"ゲームクリアー");
+        if (ntype[t]==102)
+          DrawFormatString(xx[0]/100+fma,xx[1]/100+fmb,GetColor(255,255,255),"プレイしてくれてありがとー");
+
+      }}//t
+
+
+
+      //グラ
+      for (t=0;t<emax;t++){
+        xx[0]=ea[t]-fx;xx[1]=eb[t]-fy;
+        xx[2]=enobia[t]/100;xx[3]=enobib[t]/100;
+        if (xx[0]+xx[2]*100>=-10 && xx[1]<=fxmax && xx[1]+xx[3]*100>=-10-8000 && xx[3]<=fymax){
+
+          //コイン
+          if (egtype[t]==0)
+            drawimage(grap[0][2],xx[0]/100,xx[1]/100);
+
+          //ブロックの破片
+          if (egtype[t]==1){
+            if (stagecolor<=1 || stagecolor==3)setcolor(9*16,6*16,3*16);
+            if (stagecolor==2)setcolor(0,120,160);
+            if (stagecolor==4)setcolor(192,192,192);
+
+            fillarc(xx[0]/100,xx[1]/100,7,7);
+            setcolor(0,0,0);
+            drawarc(xx[0]/100,xx[1]/100,7,7);
+          }
+
+          //リフトの破片
+          if (egtype[t]==2 || egtype[t]==3){
+            if (egtype[t]==3)mirror=1;
+            drawimage(grap[0][5],xx[0]/100,xx[1]/100);
+            mirror=0;
+          }
+
+          //ポール
+          if (egtype[t]==4){
+            setc1();
+            fillrect((xx[0])/100+10,(xx[1])/100, 10, xx[3]);
+            setc0();
+            drawrect((xx[0])/100+10,(xx[1])/100, 10, xx[3]);
+            setcolor(250,250,0);
+            fillarc((xx[0])/100+15-1,(xx[1])/100,10,10);
+            setc0();
+            drawarc((xx[0])/100+15-1,(xx[1])/100,10,10);
+          }//4
+
+          //if (egtype[t]==1){
+          //drawimage(image[0],xx[0]/100+fma+5,xx[1]/100+fmb+5,0,0,10,10);
+          //おもしろ
+          //drawimage(image[2],xx[0]/100+fma,xx[1]/100+fmb,0,0,20,20);
+          //}
+          //if (egtype[t]==2)
+          //drawimage(image[11],xx[0]/100+fma,xx[1]/100+fmb,0,0,25,16);
+
+
+        }
+        /*
+        //
+        if (egtype[t]==100){
+        for (t3=0;t3<=2;t3++){ 
+        setcolor(60,60,60);
+        if (t3==2)setcolor(250,250,250);
+        t2=t3*2;if (t2==4)t2=1;
+        //str("ステージ  クリアー",xx[0]/100+t2+fx/100,xx[1]/100+t2+fy/100);
+        str("ステージ  クリアー",60+t2,90+t2);
+        }
+        }//100
+        */
+      }
+
+
+
+
+
+
+      //リフト
+      for (t=0;t<srmax;t++){
+        xx[0]=sra[t]-fx;xx[1]=srb[t]-fy;
+        if (xx[0]+src[t]>=-10 && xx[1]<=fxmax+12100 && src[t]/100>=1){
+          xx[2]=14;if (srsp[t]==1){xx[2]=12;}
+
+          if (srsp[t]<=9 || srsp[t]>=20){
+            setcolor(220,220,0);
+            if (srsp[t]==2){setcolor(0,220,0);}
+            if (srsp[t]==21){setcolor(180,180,180);}
+            fillrect((sra[t]-fx)/100,(srb[t]-fy)/100,src[t]/100,xx[2]);
+
+            setcolor(180,180,0);
+            if (srsp[t]==2){setcolor(0,180,0);}
+            if (srsp[t]==21){setcolor(150,150,150);}
+            drawrect((sra[t]-fx)/100,(srb[t]-fy)/100,src[t]/100,xx[2]);
+          }
+          else if (srsp[t]<=14){
+            if (src[t]>=5000){
+              setcolor(0,200,0);
+              fillrect((sra[t]-fx)/100,(srb[t]-fy)/100,src[t]/100,30);
+              setcolor(0,160,0);
+              drawrect((sra[t]-fx)/100,(srb[t]-fy)/100,src[t]/100,30);
+
+              setcolor(180,120,60);
+              fillrect((sra[t]-fx)/100+20,(srb[t]-fy)/100+30,src[t]/100-40,480);
+              setcolor(100,80,20);
+              drawrect((sra[t]-fx)/100+20,(srb[t]-fy)/100+30,src[t]/100-40,480);
+
+            }}
+          if (srsp[t]==15){
+            for (t2=0;t2<=2;t2++){
+              xx[6]=1+0;drawimage(grap[xx[6]][1],(sra[t]-fx)/100+t2*29,(srb[t]-fy)/100);
+            }
+          }//15
+
+
+
+          /*
+             if (srtype[t]==0){
+             setc1();
+             if (srgtype[t]==0){setcolor(200,120,0);}
+             if (srgtype[t]==1){setcolor(40,40,240);}
+             if (srgtype[t]>=2 && srgtype[t]<=6)setcolor(240,240,40);
+             if (srgtype[t]==7)setcolor(0,240,0);
+             fillrect(xx[0]/100+fma,xx[1]/100+fmb, src[t]/100, srd[t]/100);
+             setc0();
+             if (srgtype[t]==0){setcolor(160,80,0);}
+             if (srgtype[t]==1){setcolor(0,0,200);}
+             if (srgtype[t]>=2 && srgtype[t]<=6)setcolor(200,200,0);
+             if (srgtype[t]==7)setcolor(0,210,0);
+             drawrect(xx[0]/100+fma,xx[1]/100+0+fmb, src[t]/100, srd[t]/100);
+             }}
+
+          //(トゲ)
+          if (srtype[t]==1 || srtype[t]==2){
+          if (srtype[t]==2)setre2();
+          //drawimage(image[6],xx[0]/100+fma,xx[1]/100+fmb,0,0,src[t]/100, srd[t]/100+2);
+
+          xx[20]=2000;
+          for (tt=0;tt<=src[t]/xx[20];tt++){
+          xx[6]=xx[20]/100;xx[7]=xx[20]/100;if (src[t]/xx[20]==tt){xx[7]=(src[t]%xx[20])/100;}
+          if (xx[6]<=0)xx[6]=1;if (xx[7]<=0)xx[7]=1;
+          //drawimage(im[0],xx[0]/100+fma+tt*(xx[6]),xx[1]/100+fmb,5,0,xx[7],10);
+          drawimage(image[6],xx[0]/100+fma+tt*(xx[6]),xx[1]/100+fmb,0,0,xx[7], srd[t]/100+2);
+          }
+
+*/
+      }
+      //t=xx[21];//if (xx[22]>spmax)t=spmax+1;
+
+      //setno();
+      }//t
+
+
+
+
+
+
+
+
+
+
+
+
+      //プレイヤー描画
+      setcolor(0,0,255);
+      //mirror=1;
+
+      if (mactp>=2000){mactp-=2000;if (mact==0){mact=1;}else{mact=0;}}
+      if (mmuki==0)mirror=1;
+
+      if (mtype!=200 && mtype!=1){
+        if (mzimen==1){
+          // 読みこんだグラフィックを拡大描画
+          //DrawExtendGraph(ma/100,mb/100,ma/100+100,mb/100+100,grap[0][0], TRUE ) ;
+          if (mact==0)drawimage(grap[0][0],ma/100,mb/100);
+          if (mact==1)drawimage(grap[1][0],ma/100,mb/100);
+        }
+        if (mzimen==0){
+          drawimage(grap[2][0],ma/100,mb/100);
+        }
+      }
+      //巨大化
+      else if (mtype==1){
+        drawimage(grap[41][0],ma/100,mb/100);
+      }
+
+      else if (mtype==200){
+        drawimage(grap[3][0],ma/100,mb/100);
+      }
+
+      mirror=0;
+
+      //drawrect(ma/100,mb/100,30,36);
+
+
+      //g.setFlipMode(Graphics.FLIP_NONE);
+      //}//muteki
+
+
+
+
+      //for (t=0;t<bmax;t++){DrawFormatString((ba[t]-fx)/100+40,(bb[t]-fy)/100,GetColor(250,250,250),"%d",t);}
+
+      //敵キャラ
+      for (t=0;t<amax;t++){
+
+        xx[0]=aa[t]-fx;xx[1]=ab[t]-fy;
+        xx[2]=anobia[t]/100;xx[3]=anobib[t]/100;xx[14]=3000;xx[16]=0;
+        if (xx[0]+xx[2]*100>=-10-xx[14] && xx[1]<=fxmax+xx[14] && xx[1]+xx[3]*100>=-10 && xx[3]<=fymax){
+          //if (atype[t]>=100)amuki[t]=0;
+          if (amuki[t]==1){mirror=1;}
+          if (atype[t]==3 && axtype[t]==1){DrawRotaGraph(xx[0]/100+13,xx[1]/100+15, 1.0f ,pai/ 1 , grap[atype[t]][3], TRUE ) ;xx[16]=1;}
+          if (atype[t]==9 && ad[t]>=1){DrawRotaGraph(xx[0]/100+13,xx[1]/100+15, 1.0f ,pai/ 1 , grap[atype[t]][3], TRUE ) ;xx[16]=1;}
+          if (atype[t]>=100 && amuki[t]==1)mirror=0;
+
+          //tekikaki(atype[t]);
+
+          //if (atype[t]>=100)
+          //drawrect(xx[0]/100,xx[1]/100,30,30);
+
+
+          //DrawFormatString(xx[0]/100+40,xx[1]/100,GetColor(0,0,0),"%d",axzimen[t]);
+          //drawstring(grap[atype[t]][3],xx[0]/100,xx[1]/100);
+
+
+          //メイン
+          if (atype[t]<200 && xx[16]==0 && atype[t]!=6 && atype[t]!=79 && atype[t]!=86 && atype[t]!=30){
+            if (!((atype[t]==80 || atype[t]==81) && axtype[t]==1)){
+              drawimage(grap[atype[t]][3],xx[0]/100,xx[1]/100);
+            }}
+
+
+          //デフラグさん
+          if (atype[t]==6){
+            if (atm[t]>=10 && atm[t]<=19 || atm[t]>=100 && atm[t]<=119 || atm[t]>=200){
+              drawimage(grap[150][3],xx[0]/100,xx[1]/100);
+            }else{
+              drawimage(grap[6][3],xx[0]/100,xx[1]/100);
+            }
+          }
+
+          //モララー
+          if (atype[t]==30){
+            if (axtype[t]==0)drawimage(grap[30][3],xx[0]/100,xx[1]/100);
+            if (axtype[t]==1)drawimage(grap[155][3],xx[0]/100,xx[1]/100);
+          }
+
+
+
+          //ステルス雲
+          if ((atype[t]==81) && axtype[t]==1){
+            drawimage(grap[130][3],xx[0]/100,xx[1]/100);
+          }
+
+          if (atype[t]==79){
+            setcolor(250,250,0);
+            fillrect(xx[0]/100,xx[1]/100,xx[2],xx[3]);
+            setc0();
+            drawrect(xx[0]/100,xx[1]/100,xx[2],xx[3]);
+          }
+
+          if (atype[t]==82){
+
+            if (axtype[t]==0){
+              xx[9]=0;if (stagecolor==2){xx[9]=30;}if (stagecolor==4){xx[9]=60;}
+              xx[6]=5+xx[9];drawimage(grap[xx[6]][1],xx[0]/100,xx[1]/100);
+            }
+
+            if (axtype[t]==1){
+              xx[9]=0;if (stagecolor==2){xx[9]=30;}if (stagecolor==4){xx[9]=60;}
+              xx[6]=4+xx[9];drawimage(grap[xx[6]][1],xx[0]/100,xx[1]/100);
+            }
+
+            if (axtype[t]==2){
+              drawimage(grap[1][5],xx[0]/100,xx[1]/100);
+            }
+
+          }
+          if (atype[t]==83){
+
+            if (axtype[t]==0){
+              xx[9]=0;if (stagecolor==2){xx[9]=30;}if (stagecolor==4){xx[9]=60;}
+              xx[6]=5+xx[9];drawimage(grap[xx[6]][1],xx[0]/100+10,xx[1]/100+9);
+            }
+
+            if (axtype[t]==1){
+              xx[9]=0;if (stagecolor==2){xx[9]=30;}if (stagecolor==4){xx[9]=60;}
+              xx[6]=4+xx[9];drawimage(grap[xx[6]][1],xx[0]/100+10,xx[1]/100+9);
+            }
+
+          }
+
+          //偽ポール
+          if (atype[t]==85){
+            setc1();
+            fillrect((xx[0])/100+10,(xx[1])/100, 10, xx[3]);
+            setc0();
+            drawrect((xx[0])/100+10,(xx[1])/100, 10, xx[3]);
+            setcolor(0,250,200);
+            fillarc((xx[0])/100+15-1,(xx[1])/100,10,10);
+            setc0();
+            drawarc((xx[0])/100+15-1,(xx[1])/100,10,10);
+
+          }//85
+
+
+          //ニャッスン
+          if (atype[t]==86){
+            if (ma>=aa[t]-fx-mnobia-4000 && ma<=aa[t]-fx+anobia[t]+4000){
+              drawimage(grap[152][3],xx[0]/100,xx[1]/100);
+            }
+            else{
+              drawimage(grap[86][3],xx[0]/100,xx[1]/100);
+            }}
+
+
+
+
+          if (atype[t]==200)
+            drawimage(grap[0][3],xx[0]/100,xx[1]/100);
+
+
+          mirror=0;
+
+        }}
+
+
+
+        //ブロック描画
+        for (t=0;t<tmax;t++){
+          xx[0]=ta[t]-fx;xx[1]=tb[t]-fy;
+          xx[2]=32;xx[3]=xx[2];
+          if (xx[0]+xx[2]*100>=-10 && xx[1]<=fxmax){
+
+            xx[9]=0;
+            if (stagecolor==2){xx[9]=30;}
+            if (stagecolor==4){xx[9]=60;}
+
+            if (ttype[t]<100){
+              xx[6]=ttype[t]+xx[9];drawimage(grap[xx[6]][1],xx[0]/100,xx[1]/100);
+            }
+
+            if(txtype[t] != 10){
+
+              if (ttype[t]==100 || ttype[t]==101 || ttype[t]==102 || ttype[t]==103 ||  ttype[t]==104 && txtype[t]==1 || ttype[t]==114 && txtype[t]==1 || ttype[t]==116){
+                xx[6]=2+xx[9];drawimage(grap[xx[6]][1],xx[0]/100,xx[1]/100);
+              }
+
+              if (ttype[t]==112 || ttype[t]==104 && txtype[t]==0 || ttype[t]==115 && txtype[t]==1){
+                xx[6]=1+xx[9];drawimage(grap[xx[6]][1],xx[0]/100,xx[1]/100);
+              }
+
+              if (ttype[t]==111 || ttype[t]==113 || ttype[t]==115 && txtype[t]==0 || ttype[t]==124){
+                xx[6]=3+xx[9];drawimage(grap[xx[6]][1],xx[0]/100,xx[1]/100);
+              }
+
+            }
+
+            if (ttype[t]==117 && txtype[t]==1){
+              drawimage(grap[4][5],xx[0]/100,xx[1]/100);
+            }
+
+            if (ttype[t]==117 && txtype[t]>=3){
+              drawimage(grap[3][5],xx[0]/100,xx[1]/100);
+            }
+
+            if (ttype[t]==115 && txtype[t]==3){
+              xx[6]=1+xx[9];drawimage(grap[xx[6]][1],xx[0]/100,xx[1]/100);
+              //xx[6]=5+xx[9];drawimage(grap[xx[6]][1],xx[0]/100,xx[1]/100);
+            }
+
+            //ジャンプ台
+            if (ttype[t]==120 && txtype[t]!=1){
+              drawimage(grap[16][1],xx[0]/100+3,xx[1]/100+2);
+            }
+
+            //ON-OFF
+            if (ttype[t]==130)drawimage(grap[10][5],xx[0]/100,xx[1]/100);
+            if (ttype[t]==131)drawimage(grap[11][5],xx[0]/100,xx[1]/100);
+
+            if (ttype[t]==140)drawimage(grap[12][5],xx[0]/100,xx[1]/100);
+            if (ttype[t]==141)drawimage(grap[13][5],xx[0]/100,xx[1]/100);
+            if (ttype[t]==142)drawimage(grap[14][5],xx[0]/100,xx[1]/100);
+
+
+            if (ttype[t]==300 || ttype[t]==301)
+              drawimage(grap[1][5],xx[0]/100,xx[1]/100);
+
+            //Pスイッチ
+            if (ttype[t]==400){drawimage(grap[2][5],xx[0]/100,xx[1]/100);}
+
+            //コイン
+            if (ttype[t]==800){drawimage(grap[0][2],xx[0]/100+2,xx[1]/100+1);}
+
+            //if (stagecolor==1)t-=30;
+          }}
+
+
+
+
+
+
+
+
+
+
+          //地面(壁)//土管も
+          for (t=0;t<smax;t++){
+            if (sa[t]-fx+sc[t]>=-10 && sa[t]-fx<=fxmax+1100){
+
+              if (stype[t]==0){
+                setcolor(40,200,40);
+                fillrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb, sc[t]/100, sd[t]/100);
+                drawrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb, sc[t]/100, sd[t]/100);
+              }
+              //土管
+              if (stype[t]==1){
+                setcolor(0,230,0);
+                fillrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb, sc[t]/100, sd[t]/100);
+                setc0();
+                drawrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb, sc[t]/100, sd[t]/100);
+              }
+              //土管(下)
+              if (stype[t]==2){
+                setcolor(0,230,0);
+                fillrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb+1, sc[t]/100, sd[t]/100);
+                setc0();
+                drawline((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb, (sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb+sd[t]/100);
+                drawline((sa[t]-fx)/100+fma+sc[t]/100,(sb[t]-fy)/100+fmb, (sa[t]-fx)/100+fma+sc[t]/100,(sb[t]-fy)/100+fmb+sd[t]/100);
+              }
+
+              //土管(横)
+              if (stype[t]==5){
+                setcolor(0,230,0);
+                fillrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb+1, sc[t]/100, sd[t]/100);
+                setc0();
+                drawline((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb, (sa[t]-fx)/100+fma+sc[t]/100,(sb[t]-fy)/100+fmb);
+                drawline((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb+sd[t]/100, (sa[t]-fx)/100+fma+sc[t]/100,(sb[t]-fy)/100+fmb+sd[t]/100);
+              }
+
+
+              //落ちてくるブロック
+              if (stype[t]==51){
+                if (sxtype[t]==0){
+                  for (t3=0;t3<=sc[t]/3000;t3++){
+                    drawimage(grap[1][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+fmb);
+                  }}
+                if (sxtype[t]==1 || sxtype[t]==2){
+                  for (t3=0;t3<=sc[t]/3000;t3++){
+                    drawimage(grap[31][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+fmb);
+                  }}
+                if (sxtype[t]==3 || sxtype[t]==4){
+                  for (t3=0;t3<=sc[t]/3000;t3++){for (t2=0;t2<=sd[t]/3000;t2++){
+                    drawimage(grap[65][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+29*t2+fmb);
+                  }}}
+
+                if (sxtype[t]==10){
+                  for (t3=0;t3<=sc[t]/3000;t3++){
+                    drawimage(grap[65][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+fmb);
+                  }}
+
+              }//51
+
+
+              //落ちるやつ
+              if (stype[t]==52){
+                xx[29]=0;if (stagecolor==2){xx[29]=30;}if (stagecolor==4){xx[29]=60;}
+
+                for (t3=0;t3<=sc[t]/3000;t3++){
+                  if (sxtype[t]==0){
+                    drawimage(grap[5+xx[29]][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+fmb);
+                    if (stagecolor!=4){drawimage(grap[6+xx[29]][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+fmb+29);}
+                    else{drawimage(grap[5+xx[29]][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+fmb+29);}
+                  }
+                  if (sxtype[t]==1){
+                    for (t2=0;t2<=sd[t]/3000;t2++){
+                      drawimage(grap[1+xx[29]][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+fmb+29*t2);
+                    }}
+
+                  if (sxtype[t]==2){
+                    for (t2=0;t2<=sd[t]/3000;t2++){
+                      drawimage(grap[5+xx[29]][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+fmb+29*t2);
+                    }
+                  }
+
+                }}
+
+
+                //ステージトラップ
+                if (trap==1){
+                  if (stype[t]>=100 && stype[t]<=299){
+                    if (stagecolor<=1 || stagecolor==3)setc0();
+                    if (stagecolor==2 || stagecolor==4)setc1();
+                    drawrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb, sc[t]/100, sd[t]/100);
+                  }}
+
+                //ゴール
+                if (stype[t]==300){
+                  setc1();
+                  fillrect((sa[t]-fx)/100+10,(sb[t]-fy)/100, 10, sd[t]/100-8);
+                  setc0();
+                  drawrect((sa[t]-fx)/100+10,(sb[t]-fy)/100, 10, sd[t]/100-8);
+                  setcolor(250,250,0);
+                  fillarc((sa[t]-fx)/100+15-1,(sb[t]-fy)/100,10,10);
+                  setc0();
+                  drawarc((sa[t]-fx)/100+15-1,(sb[t]-fy)/100,10,10);
+                }
+
+                //中間
+                if (stype[t]==500){
+                  drawimage(grap[20][4],(sa[t]-fx)/100,(sb[t]-fy)/100);
+                }
+            }}//t
+
+
+          //描画上書き(土管)
+          for (t=0;t<smax;t++){
+            if (sa[t]-fx+sc[t]>=-10 && sa[t]-fx<=fxmax+1100){
+
+              //入る土管(右)
+              if (stype[t]==40){
+                setcolor(0,230,0);
+                fillrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb+1, sc[t]/100, sd[t]/100);
+                setc0();
+                drawrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb+1, sc[t]/100, sd[t]/100);
+              }
+
+              //とぶ土管
+              if (stype[t]==50){
+                setcolor(0,230,0);
+                fillrect((sa[t]-fx)/100+fma+5,(sb[t]-fy)/100+fmb+30, 50, sd[t]/100-30);
+                setc0();
+                drawline((sa[t]-fx)/100+5+fma,(sb[t]-fy)/100+fmb+30, (sa[t]-fx)/100+fma+5,(sb[t]-fy)/100+fmb+sd[t]/100);
+                drawline((sa[t]-fx)/100+5+fma+50,(sb[t]-fy)/100+fmb+30, (sa[t]-fx)/100+fma+50+5,(sb[t]-fy)/100+fmb+sd[t]/100);
+
+                setcolor(0,230,0);
+                fillrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb+1, 60, 30);
+                setc0();
+                drawrect((sa[t]-fx)/100+fma,(sb[t]-fy)/100+fmb+1, 60, 30);
+              }
+
+              //地面(ブロック)
+              if (stype[t]==200){
+                for (t3=0;t3<=sc[t]/3000;t3++){for (t2=0;t2<=sd[t]/3000;t2++){
+                  drawimage(grap[65][1],(sa[t]-fx)/100+fma+29*t3,(sb[t]-fy)/100+29*t2+fmb);
+                }}
+              }
+
+            }}//t
+
+
+
+
+
+          //ファイアバー
+          for (t=0;t<amax;t++){
+
+            xx[0]=aa[t]-fx;xx[1]=ab[t]-fy;
+            //xx[2]=anobia[t]/100;xx[3]=anobib[t]/100;
+            xx[14]=12000;xx[16]=0;
+            if (atype[t]==87 || atype[t]==88){
+              if (xx[0]+xx[2]*100>=-10-xx[14] && xx[1]<=fxmax+xx[14] && xx[1]+xx[3]*100>=-10 && xx[3]<=fymax){
+
+                for (tt=0;tt<=axtype[t]%100;tt++){
+                  xx[26]=18;
+                  xd[4]=tt*xx[26]*cos(atm[t]*pai/180/2);
+                  xd[5]=tt*xx[26]*sin(atm[t]*pai/180/2);
+                  xx[24]=(int)xd[4];
+                  xx[25]=(int)xd[5];
+                  setcolor(230,120,0);
+                  xx[23]=8;
+                  if (atype[t]==87){
+                    fillarc(xx[0]/100+xx[24],xx[1]/100+xx[25],xx[23],xx[23]);
+                    setcolor(0,0,0);
+                    drawarc(xx[0]/100+xx[24],xx[1]/100+xx[25],xx[23],xx[23]);
+                  }else{
+                    fillarc(xx[0]/100-xx[24],xx[1]/100+xx[25],xx[23],xx[23]);
+                    setcolor(0,0,0);
+                    drawarc(xx[0]/100-xx[24],xx[1]/100+xx[25],xx[23],xx[23]);
+                  }
+                }
+
+              }
+            }}
+
+
+
+
+
+
+
+            //プレイヤーのメッセージ
+            setc0();
+            if (mmsgtm>=1){
+              mmsgtm--;
+              xs[0]="";
+
+              if (mmsgtype==1)xs[0]="お、おいしい!!";
+              if (mmsgtype==2)xs[0]="毒は無いが……";
+              if (mmsgtype==3)xs[0]="刺さった!!";
+              if (mmsgtype==10)xs[0]="食べるべきではなかった!!";
+              if (mmsgtype==11)xs[0]="俺は燃える男だ!!";
+              if (mmsgtype==50)xs[0]="体が……焼ける……";
+              if (mmsgtype==51)xs[0]="たーまやー!!";
+              if (mmsgtype==52)xs[0]="見事にオワタ";
+              if (mmsgtype==53)xs[0]="足が、足がぁ!!";
+              if (mmsgtype==54)xs[0]="流石は摂氏800度!!";
+              if (mmsgtype==55)xs[0]="溶岩と合体したい……";
+              //if (mmsgtype==56)xs[0]="";
+
+              //if (stagecolor<=1 || stagecolor==3)setc0();
+              //if (stagecolor==2)setc1();
+
+              //str(xs[0],(ma+mnobia+300)/100,mb/100);
+
+              setc0();
+              str(xs[0],(ma+mnobia+300)/100-1,mb/100-1);
+              str(xs[0],(ma+mnobia+300)/100+1,mb/100+1);
+              setc1();
+              str(xs[0],(ma+mnobia+300)/100,mb/100);
+
+            }//mmsgtm
+
+
+            //敵キャラのメッセージ
+            setc0();
+            for (t=0;t<amax;t++){
+              if (amsgtm[t]>=1){
+                amsgtm[t]--;//end();
+
+                xs[0]="";
+
+                //if (amsgtype[t]==1001)xs[0]="";
+                if (amsgtype[t]==1001)xs[0]="ヤッフー!!";
+                if (amsgtype[t]==1002)xs[0]="え?俺勝っちゃったの?";
+                if (amsgtype[t]==1003)xs[0]="貴様の死に場所はここだ!";
+                if (amsgtype[t]==1004)xs[0]="二度と会う事もないだろう";
+                if (amsgtype[t]==1005)xs[0]="俺、最強!!";
+                if (amsgtype[t]==1006)xs[0]="一昨日来やがれ!!";
+                if (amsgtype[t]==1007)xs[0]="漢に後退の二文字は無い!!";
+                if (amsgtype[t]==1008)xs[0]="ハッハァ!!";
+
+                if (amsgtype[t]==1011)xs[0]="ヤッフー!!";
+                if (amsgtype[t]==1012)xs[0]="え?俺勝っちゃったの?";
+                if (amsgtype[t]==1013)xs[0]="貴様の死に場所はここだ!";
+                if (amsgtype[t]==1014)xs[0]="身の程知らずが……";
+                if (amsgtype[t]==1015)xs[0]="油断が死を招く";
+                if (amsgtype[t]==1016)xs[0]="おめでたい奴だ";
+                if (amsgtype[t]==1017)xs[0]="屑が!!";
+                if (amsgtype[t]==1018)xs[0]="無謀な……";
+
+                if (amsgtype[t]==1021)xs[0]="ヤッフー!!";
+                if (amsgtype[t]==1022)xs[0]="え?俺勝っちゃったの?";
+                if (amsgtype[t]==1023)xs[0]="二度と会う事もないだろう";
+                if (amsgtype[t]==1024)xs[0]="身の程知らずが……";
+                if (amsgtype[t]==1025)xs[0]="僕は……負けない!!";
+                if (amsgtype[t]==1026)xs[0]="貴様に見切れる筋は無い";
+                if (amsgtype[t]==1027)xs[0]="今死ね、すぐ死ね、骨まで砕けろ!!";
+                if (amsgtype[t]==1028)xs[0]="任務完了!!";
+
+                if (amsgtype[t]==1031)xs[0]="ヤッフー!!";
+                if (amsgtype[t]==1032)xs[0]="え?俺勝っちゃったの?";
+                if (amsgtype[t]==1033)xs[0]="貴様の死に場所はここだ!";
+                if (amsgtype[t]==1034)xs[0]="身の程知らずが……";
+                if (amsgtype[t]==1035)xs[0]="油断が死を招く";
+                if (amsgtype[t]==1036)xs[0]="おめでたい奴だ";
+                if (amsgtype[t]==1037)xs[0]="屑が!!";
+                if (amsgtype[t]==1038)xs[0]="無謀な……";
+
+                if (amsgtype[t]==15)xs[0]="鉄壁!!よって、無敵!!";
+                if (amsgtype[t]==15)xs[0]="丸腰で勝てるとでも?";
+                if (amsgtype[t]==15)xs[0]="パリイ!!";
+                if (amsgtype[t]==18)xs[0]="自業自得だ";
+                if (amsgtype[t]==20)xs[0]="Zzz";
+                if (amsgtype[t]==21)xs[0]="ク、クマー";
+                if (amsgtype[t]==24)xs[0]="?";
+                if (amsgtype[t]==25)xs[0]="食べるべきではなかった!!";
+                if (amsgtype[t]==30)xs[0]="うめぇ!!";
+                if (amsgtype[t]==31)xs[0]="ブロックを侮ったな?";
+                if (amsgtype[t]==32)xs[0]="シャキーン";
+
+                if (amsgtype[t]==50)xs[0]="波動砲!!";
+                if (amsgtype[t]==85)xs[0]="裏切られたとでも思ったか?";
+                if (amsgtype[t]==86)xs[0]="ポールアターック!!";
+
+
+
+                //if (stagecolor<=1 || stagecolor==3)setc0();
+                //if (stagecolor==2)setc1();
+
+                if (amsgtype[t]!=31){
+                  //str(xs[0],(aa[t]+anobia[t]+300-fx)/100,(ab[t]-fy)/100);
+                  xx[5]=(aa[t]+anobia[t]+300-fx)/100;xx[6]=(ab[t]-fy)/100;
+                }
+                else{
+                  xx[5]=(aa[t]+anobia[t]+300-fx)/100;xx[6]=(ab[t]-fy-800)/100;
+                }
+
+                //setc0();
+                //str(xs[0],xx[5]-1,xx[6]-1);str(xs[0],xx[5]+1,xx[6]+1);
+                ChangeFontType(DX_FONTTYPE_EDGE);
+                setc1();
+                str(xs[0],xx[5],xx[6]);
+                ChangeFontType(DX_FONTTYPE_NORMAL);
+
+
+              }//amsgtm
+            }//amax
+
+
+
+            //メッセージブロック
+            if (tmsgtm>0){
+              ttmsg();
+              if (tmsgtype==1){
+                xx[0]=1200;
+                tmsgy+=xx[0];
+                if (tmsgtm==1){tmsgtm=80000000;tmsgtype=2;}
+              }//1
+
+              else if (tmsgtype==2){
+                tmsgy=0;tmsgtype=3;tmsgtm=15+1;
+              }
+
+              else if (tmsgtype==3){
+                xx[0]=1200;
+                tmsgy+=xx[0];
+                if (tmsgtm==15)WaitKey();
+                if (tmsgtm==1){tmsgtm=0;tmsgtype=0;tmsgy=0;}
+              }//1
+
+              tmsgtm--;
+            }//tmsgtm
+
+
+            //メッセージ
+            if (mainmsgtype>=1){
+              setfont(20,4);
+              if (mainmsgtype==1){DrawFormatString(126,100,GetColor(255,255,255),"WELCOME TO OWATA ZONE");}
+              if (mainmsgtype==1){for (t2=0;t2<=2;t2++)DrawFormatString(88+t2*143,210,GetColor(255,255,255),"1");}
+              setfont(20,5);
+            }//mainmsgtype>=1
+
+
+            //画面黒
+            if (blacktm>0){
+              blacktm--;
+              fillrect(0,0,fxmax,fymax);
+              if (blacktm==0){
+                if (blackx==1){zxon=0;}
+              }
+
+            }//blacktm
+
+            //DrawFormatString(10,10,GetColor(255,255,255),"X … %d",anobib[0]);
+
+}//if (main==1){
+
+
+if (main==2){
+
+  setcolor(255,255,255);
+  str("制作・プレイに関わった方々",240-13*20/2,xx[12]/100);
+  str("ステージ１　プレイ",240-9*20/2,xx[13]/100);
+  str("先輩　Ⅹ～Ｚ",240-6*20/2,xx[14]/100);
+  str("ステージ２　プレイ",240-9*20/2,xx[15]/100);
+  str("友人　willowlet ",240-8*20/2,xx[16]/100);
+  str("ステージ３　プレイ",240-9*20/2,xx[17]/100);
+  str("友人　willowlet ",240-8*20/2,xx[18]/100);
+  str("ステージ４　プレイ",240-9*20/2,xx[19]/100);
+  str("友人２　ann ",240-6*20/2,xx[20]/100);
+  str("ご協力",240-3*20/2,xx[21]/100);
+  str("Ｔ先輩",240-3*20/2,xx[22]/100);
+  str("Ｓ先輩",240-3*20/2,xx[23]/100);
+  str("動画技術提供",240-6*20/2,xx[24]/100);
+  str("Ｋ先輩",240-3*20/2,xx[25]/100);
+  str("動画キャプチャ・編集・エンコード",240-16*20/2,xx[26]/100);
+  str("willowlet ",240-5*20/2,xx[27]/100);
+  str("プログラム・描画・ネタ・動画編集",240-16*20/2,xx[28]/100);
+  str("ちく",240-2*20/2,xx[29]/100);
+
+  str("プレイしていただき　ありがとうございました～",240-22*20/2,xx[30]/100);
+}
+
+
+
+if (main==10){
+
+  setc0();
+  fillrect(0,0,fxmax,fymax);
+
+  SetFontSize(16) ;
+  SetFontThickness(4) ;
+
+  drawimage(grap[0][0],190,190);
+  DrawFormatString(230,200,GetColor(255,255,255)," × %d",nokori);
+
+
+}//if (main==10){
+
+
+//タイトル
+if (main==100){
+
+  setcolor(160,180,250);
+  fillrect(0,0,fxmax,fymax);
+
+  drawimage(mgrap[30],240-380/2,60);
+
+  drawimage(grap[0][4],12*30,10*29-12);
+  drawimage(grap[1][4],6*30,12*29-12);
+
+  //プレイヤー
+  drawimage(grap[0][0],2*30,12*29-12-6);
+  for (t=0;t<=16;t++){
+    drawimage(grap[5][1],29*t,13*29-12);
+    drawimage(grap[6][1],29*t,14*29-12);
+  }
+
+
+  setcolor(0,0,0);
+  str("Enterキーを押せ!!",240-8*20/2,250);
+
+}//if (main==100){
+
+
+
+//DrawFormatString(230,200,GetColor(255,255,255)," × %d,%d,%d",sta,stb,stc);
+
+ScreenFlip();
+
+}//rpaint()
+
+
+
+
+
+
+
+//メインプログラム
+void Mainprogram(){
+
+  stime=long(GetNowCount());
+
+
+  if (ending==1)main=2;
+
+
+  //キー
+  key = GetJoypadInputState(DX_INPUT_KEY_PAD1);
+
+
+  if (main==1 && tmsgtype==0){
+
+
+    if (zxon==0){
+      zxon=1;
+      mainmsgtype=0;
+
+      stagecolor=1;
+      ma=5600;mb=32000;mmuki=1;mhp=1;
+      mc=0;md=0;
+      mnobia=3000;mnobib=3600;
+
+      mtype=0;
+      //if (stc==1)end();
+
+      fx=0;fy=0;
+      fzx=0;
+      stageonoff=0;
+
+
+
+
+      //チーターマン　入れ
+      bgmchange(oto[100]);
+
+      stagecls();
+
+      stage();
+
+
+      //ランダムにさせる
+      if (over==1){
+        //for (t=0;t<;t++){na[t]=rand(300000);nb[t]=rand(3000);}
+        for (t=0;t<tmax;t++){if (rand(3)<=1){ta[t]=(rand(500)-1)*29*100;tb[t]=rand(14)*100*29-1200;ttype[t]=rand(142);if (ttype[t]>=9 && ttype[t]<=99){ttype[t]=rand(8);}txtype[t]=rand(4);}}
+        for (t=0;t<bmax;t++){if (rand(2)<=1){ba[t]=(rand(500)-1)*29*100;bb[t]=rand(15)*100*29-1200-3000;if (rand(6)==0){btype[t]=rand(9);}}}
+
+        srco=0;
+        t=srco;sra[t]=ma+fx;srb[t]=(13*29-12)*100;src[t]=30*100;srtype[t]=0;sracttype[t]=0;sre[t]=0;srsp[t]=0;srco++;
+
+        if (rand(4)==0)stagecolor=rand(4);
+        //if (rand(6)==0)bgmchange(oto[rand(6)+100]);
+      }
+
+
+
+      StopSoundMem(oto[0]);
+
+
+      //メインBGM
+      PlaySoundMem(oto[0],DX_PLAYTYPE_LOOP) ;
+      //PlayMusic("BGM/titerman.mp3",DX_PLAYTYPE_LOOP) ;
+
+
+    }//zxon
+
+    //xx[1]=rand(100);
+
+
+
+
+
+
+
+    //プレイヤーの移動
+    xx[0]=0;actaon[2]=0;actaon[3]=0;
+    if (mkeytm<=0){
+      if (( key & PAD_INPUT_LEFT) && keytm<=0){actaon[0]=-1;mmuki=0;actaon[4]=-1;}	
+      if (( key & PAD_INPUT_RIGHT) && keytm<=0){actaon[0]=1;mmuki=1;actaon[4]=1;}
+      if (key & PAD_INPUT_DOWN){actaon[3]=1;}
+    }
+
+    //if (CheckHitKey(KEY_INPUT_F1)==1){end();}
+    if (CheckHitKey(KEY_INPUT_F1)==1){main=100;}
+    //if (CheckHitKey(KEY_INPUT_Q)==1){mkeytm=0;}
+    if (CheckHitKey(KEY_INPUT_O)==1){if (mhp>=1)mhp=0;if (stc>=5){stc=0;stagepoint=0;}}
+
+
+    if (mkeytm<=0){
+      if (key & PAD_INPUT_UP || CheckHitKey(KEY_INPUT_Z)==1){//end();
+        if (actaon[1]==10){actaon[1]=1;xx[0]=1;}
+        actaon[2]=1;
+      }}
+
+    if (key & PAD_INPUT_UP || CheckHitKey(KEY_INPUT_Z)==1){
+      if (mjumptm==8 && md>=-900){
+        md=-1300;
+        //ダッシュ中
+        xx[22]=200;if (mc>=xx[22] || mc<=-xx[22]){md=-1400;}
+        xx[22]=600;if (mc>=xx[22] || mc<=-xx[22]){md=-1500;}
+      }
+      // && xx[0]==0 && md<=-10
+
+      //if (mjumptm==7 && md>=-900){}
+      if (xx[0]==0)actaon[1]=10;
+    }
+
+
+
+
+    //if (( key & PAD_INPUT_UP) && keytm<=0){actaon[0]=-1;mmuki=0;}	
+
+    //xx[0]=200;
+    //if (actaon[0]==-1){ma-=xx[0];}
+    //if (actaon[0]==1){ma+=xx[0];}
+
+
+    //加速による移動
+    xx[0]=40;xx[1]=700;xx[8]=500;xx[9]=700;
+    xx[12]=1;xx[13]=2;
+
+    //すべり補正
+    if (mrzimen==1){xx[0]=20;xx[12]=9;xx[13]=10;}
+
+
+    //if (mzimen==0){xx[0]-=15;}
+    if (actaon[0]==-1){
+      if (!(mzimen==0 && mc<-xx[8])){
+        if (mc>=-xx[9]){mc-=xx[0];if (mc<-xx[9]){mc=-xx[9]-1;}}
+        if (mc<-xx[9] && atktm<=0)mc-=xx[0]/10;
+      }
+      if (mrzimen!=1){
+        if (mc>100 && mzimen==0){mc-=xx[0]*2/3;}
+        if (mc>100 && mzimen==1){mc-=xx[0];if (mzimen==1){mc-=xx[0]*1/2;}}actaon[0]=3;
+        mkasok+=1;
+      }}
+
+      if (actaon[0]==1){
+        if (!(mzimen==0 && mc>xx[8])){
+          if (mc<=xx[9]){mc+=xx[0];if (mc>xx[9]){mc=xx[9]+1;}}
+          if (mc>xx[9] && atktm<=0)mc+=xx[0]/10;
+        }
+        if (mrzimen!=1){
+          if (mc<-100 && mzimen==0){mc+=xx[0]*2/3;}
+          if (mc<-100 && mzimen==1){mc+=xx[0];if (mzimen==1){mc+=xx[0]*1/2;}}actaon[0]=3;mkasok+=1;
+        }}
+        if (actaon[0]==0 && mkasok>0){mkasok-=2;}if (mkasok>8){mkasok=8;}
+
+        //すべり補正初期化
+        if (mzimen!=1)mrzimen=0;
+
+
+        //ジャンプ
+        if (mjumptm>=0)mjumptm--;
+        if (actaon[1]==1 && mzimen==1){
+          mb-=400;md=-1200;mjumptm=10;
+
+          //PlaySound( "jump.mp3" , DX_PLAYTYPE_NORMAL ) ;
+
+          //PlayMusic( "SE/jump.mp3" , DX_PLAYTYPE_NORMAL ) ;
+
+          //PlaySoundMem( oto[1], DX_PLAYTYPE_NORMAL ) ;
+
+          //PlaySoundMem( oto[1], DX_PLAYTYPE_BACK) ;
+          ot(oto[1]);
+
+          /*
+             md=-1040;
+             xx[1]=600;if (mc>xx[1] || mc<=-xx[1]){md=-1400;}
+             xx[1]=7;xx[2]=400;
+             if (mkasok>xx[1] && (mc>xx[2] || mc<=-xx[2])){
+             md=-1600;
+             if (mc>=800 || mc<=-800){md=-1800;}
+             }
+             */
+
+          mzimen=0;
+
+        }
+        if (actaon[1]<=9)actaon[1]=0;
+
+        //if (actaon[1]==1){my+=xx[1];actaon[1]=0;}
+
+        //}//陸地
+
+
+        if (mmutekitm>=-1)mmutekitm--;
+
+
+        //HPがなくなったとき
+        if (mhp<=0 && mhp>=-9){
+          mkeytm=12;mhp=-20;mtype=200;mtm=0;ot(oto[12]);StopSoundMem(oto[0]);StopSoundMem(oto[11]);StopSoundMem(oto[16]);
+        }//mhp
+        //if (mhp<=-10){
+        if (mtype==200){
+          if (mtm<=11){mc=0;md=0;}
+          if (mtm==12){md=-1200;}
+          if (mtm>=12){mc=0;}
+          if (mtm>=100 || fast==1){zxon=0;main=10;mtm=0;mkeytm=0;nokori--;if (fast==1)mtype=0;}//mtm>=100
+        }//mtype==200
+
+
+
+
+        //音符によるワープ
+        if (mtype==2){
+          mtm++;
+
+          mkeytm=2;
+          md=-1500;
+          if (mb<=-6000){blackx=1;blacktm=20;stc+=5;stagerr=0;StopSoundMem(oto[0]);mtm=0;mtype=0;mkeytm=-1;}
+        }//2
+
+        //ジャンプ台アウト
+        if (mtype==3){
+          md=-2400;
+          if (mb<=-6000){mb=-80000000;mhp=0;}
+        }
+
+
+        //mtypeによる特殊的な移動
+        if (mtype>=100){mtm++;
+
+          //普通の土管
+          if (mtype==100){
+            if (mxtype==0){
+              mc=0;md=0;t=28;
+              if (mtm<=16){mb+=240;mzz=100;}
+              if (mtm==17){mb=-80000000;}
+              if (mtm==23){sa[t]-=100;}
+              if (mtm>=44 && mtm<=60){
+                if (mtm%2==0)sa[t]+=200;
+                if (mtm%2==1)sa[t]-=200;
+              }
+              if (mtm>=61 && mtm<=77){
+                if (mtm%2==0)sa[t]+=400;
+                if (mtm%2==1)sa[t]-=400;
+              }
+              if (mtm>=78 && mtm<=78+16){
+                if (mtm%2==0)sa[t]+=600;
+                if (mtm%2==1)sa[t]-=600;
+              }
+              if (mtm>=110){sb[t]-=mzz;mzz+=80;if (mzz>1600)mzz=1600;}
+              if (mtm==160){mtype=0;mhp--;}
+
+            }
+
+            //ふっとばし
+            else if (mxtype==10){
+              mc=0;md=0;
+              if (mtm<=16){ma+=240;}//mzz=100;}
+              if (mtm==16)mb-=1100;
+              if (mtm==20)ot(oto[10]);
+
+              if (mtm>=24){ma-=2000;mmuki=0;}
+              if (mtm>=48){mtype=0;mhp--;}
+
+          }else{
+            mc=0;md=0;
+            if (mtm<=16 && mxtype!=3){mb+=240;}//mzz=100;}
+            if (mtm<=16 && mxtype==3){ma+=240;}
+            if (mtm==19 && mxtype==2){mhp=0;mtype=2000;mtm=0;mmsgtm=30;mmsgtype=51;}
+            if (mtm==19 && mxtype==5){mhp=0;mtype=2000;mtm=0;mmsgtm=30;mmsgtype=52;}
+            if (mtm==20){
+              if(mxtype == 6){
+                stc += 10;
+              }else{
+                stc++;
+              }
+              mb=-80000000;
+              mxtype=0;
+              blackx=1;
+              blacktm=20;
+              stagerr=0;StopSoundMem(oto[0]);
+            }}
+}//00
+
+
+if (mtype==300){
+  mkeytm=3;
+  if (mtm<=1){mc=0;md=0;}
+  if (mtm>=2 && mtm<=42){md=600;mmuki=1;}
+  if (mtm>43 && mtm<=108){mc=300;}
+  if (mtm==110){mb=-80000000;mc=0;}
+  if (mtm==250){
+    stb++;stc=0;zxon=0;tyuukan=0;main=10;maintm=0;
+  }
+}//mtype==300
+
+if (mtype==301 || mtype==302){
+  mkeytm=3;
+
+  if (mtm<=1){mc=0;md=0;}
+
+  if (mtm>=2 && (mtype==301 && mtm<=102 || mtype==302 && mtm<=60)){
+    xx[5]=500;
+    ma-=xx[5];fx+=xx[5];fzx+=xx[5];
+  }
+
+  if ((mtype==301 || mtype==302) && mtm>=2 && mtm<=100){
+    mc=250;mmuki=1;
+  }
+
+  if (mtm==200){
+    ot(oto[17]);
+    if(mtype==301){
+      na[nco]=117*29*100-1100;nb[nco]=4*29*100;ntype[nco]=101;nco++;if (nco>=nmax)nco=0;
+      na[nco]=115*29*100-1100;nb[nco]=6*29*100;ntype[nco]=102;nco++;if (nco>=nmax)nco=0;
+    }else{
+      na[nco]=157*29*100-1100;nb[nco]=4*29*100;ntype[nco]=101;nco++;if (nco>=nmax)nco=0;
+      na[nco]=155*29*100-1100;nb[nco]=6*29*100;ntype[nco]=102;nco++;if (nco>=nmax)nco=0;
+    }
+  }
+  //スタッフロールへ
+
+  if (mtm==440){
+    if(mtype==301){
+      ending = 1;
+    }else{
+      sta++;stb=0;stc=0;
+    }
+  }
+
+
+  /*
+     if (mtm<=1){mc=0;md=0;}
+     if (mtm>=2 && mtm<=42){md=600;mmuki=1;}
+     if (mtm>43 && mtm<=108){mc=300;}
+     if (mtm==110){mb=-80000000;mc=0;}
+     if (mtm==250)end();
+     */
+}//mtype==301
+
+}//mtype>=100
+
+
+
+
+//移動
+if (mkeytm>=1){mkeytm--;}//mc=0;}
+ma+=mc;mb+=md;
+if (mc<0)mactp+=(-mc);
+if (mc>=0)mactp+=mc;
+
+if (mtype<=9 || mtype==200 || mtype==300 || mtype==301 || mtype==302)md+=100;
+
+
+//走る際の最大値
+if (mtype==0){
+  xx[0]=800;xx[1]=1600;
+  if (mc>xx[0] && mc<xx[0]+200){mc=xx[0];}
+  if (mc>xx[0]+200){mc-=200;}
+  if (mc<-xx[0] && mc>-xx[0]-200){mc=-xx[0];}
+  if (mc<-xx[0]-200){mc+=200;}
+  if (md>xx[1]){md=xx[1];}
+}
+
+//プレイヤー
+//地面の摩擦
+if (mzimen==1 && actaon[0]!=3){
+  if ((mtype<=9) || mtype==300 || mtype==301 || mtype==302){
+    if (mrzimen==0){
+      xx[2]=30;xx[1]=60;xx[3]=30;
+      if (mc>=-xx[3] && mc<=xx[3]){mc=0;}
+      if (mc>=xx[2]){mc-=xx[1];}
+      if (mc<=-xx[2]){mc+=xx[1];}
+    }
+    if (mrzimen==1){
+      xx[2]=5;xx[1]=10;xx[3]=5;
+      if (mc>=-xx[3] && mc<=xx[3]){mc=0;}
+      if (mc>=xx[2]){mc-=xx[1];}
+      if (mc<=-xx[2]){mc+=xx[1];}
+    }
+  }}
+
+
+//地面判定初期化
+mzimen=0;
+
+//場外
+if (mtype<=9 && mhp>=1){
+  if (ma<100){ma=100;mc=0;}
+  if (ma+mnobia>fxmax){ma=fxmax-mnobia;mc=0;}
+}
+//if (mb>=42000){mb=42000;mzimen=1;}
+if (mb>=38000 && mhp>=0 && stagecolor==4){mhp=-2;mmsgtm=30;mmsgtype=55;}
+if (mb>=52000 && mhp>=0){mhp=-2;}
+
+
+
+
+
+
+//ブロック
+//1-れんが、コイン、無し、土台、7-隠し
+
+xx[15]=0;
+for (t=0;t<tmax;t++){
+  xx[0]=200;xx[1]=3000;xx[2]=1000;xx[3]=3000;//xx[2]=1000
+  xx[8]=ta[t]-fx;xx[9]=tb[t]-fy;//xx[15]=0;
+  if (ta[t]-fx+xx[1]>=-10-xx[3] && ta[t]-fx<=fxmax+12000+xx[3]){
+    if (mtype!=200 && mtype!=1 && mtype!=2){
+      if (ttype[t]<1000 && ttype[t]!=800 && ttype[t]!=140 && ttype[t]!=141){// && ttype[t]!=5){
+
+        //if (!(mztm>=1 && mztype==1 && actaon[3]==1)){
+        if (!(mztype==1)){
+          xx[16]=0;xx[17]=0;
+
+          //上
+          if (ttype[t]!=7 && ttype[t]!=110 && !(ttype[t]==114)){
+            if (ma+mnobia>xx[8]+xx[0]*2+100 && ma<xx[8]+xx[1]-xx[0]*2-100 && mb+mnobib>xx[9] && mb+mnobib<xx[9]+xx[1] && md>=-100){
+              if (ttype[t]!=115 && ttype[t]!=400 && ttype[t]!=117 && ttype[t]!=118 && ttype[t]!=120){
+                mb=xx[9]-mnobib+100;md=0;mzimen=1;xx[16]=1;
+              }
+              else if (ttype[t]==115){
+                ot(oto[3]);
+                eyobi(ta[t]+1200,tb[t]+1200,300,-1000,0,160,1000,1000,1,120);
+                eyobi(ta[t]+1200,tb[t]+1200,-300,-1000,0,160,1000,1000,1,120);
+                eyobi(ta[t]+1200,tb[t]+1200,240,-1400,0,160,1000,1000,1,120);
+                eyobi(ta[t]+1200,tb[t]+1200,-240,-1400,0,160,1000,1000,1,120);
+                brockbreak(t);
+              }
+              //Pスイッチ
+              else if (ttype[t]==400){
+                md=0;ta[t]=-8000000;ot(oto[13]);
+                for (tt=0;tt<tmax;tt++){if (ttype[tt]!=7){ttype[tt]=800;}}
+                StopSoundMem(oto[0]);
+              }
+
+              //音符+
+              else if (ttype[t]==117){
+                ot(oto[14]);
+                md=-1500;mtype=2;mtm=0;
+                if (txtype[t]>=2 && mtype==2){mtype=0;md=-1600;txtype[t]=3;}
+                if (txtype[t]==0)txtype[t]=1;
+              }
+
+              //ジャンプ台
+              else if (ttype[t]==120){
+                //txtype[t]=0;
+                md=-2400;mtype=3;mtm=0;
+              }
+
+            }}
+        }//!
+
+
+        //sstr=""+mjumptm;
+        //ブロック判定の入れ替え
+        if (!(mztm>=1 && mztype==1)){
+          xx[21]=0;xx[22]=1;//xx[12]=0;
+          if (mzimen==1 || mjumptm>=10){xx[21]=3;xx[22]=0;}
+          for (t3=0;t3<=1;t3++){
+
+            //下
+            if (t3==xx[21] && mtype!=100 && ttype[t]!=117){// && xx[12]==0){
+              if (ma+mnobia>xx[8]+xx[0]*2+800 && ma<xx[8]+xx[1]-xx[0]*2-800 && mb>xx[9]-xx[0]*2 && mb<xx[9]+xx[1]-xx[0]*2 && md<=0){xx[16]=1;xx[17]=1;
+                mb=xx[9]+xx[1]+xx[0];if (md<0){md=-md*2/3;}//}
+                //壊れる
+                if (ttype[t]==1 && mzimen==0){
+                  ot(oto[3]);
+                  eyobi(ta[t]+1200,tb[t]+1200,300,-1000,0,160,1000,1000,1,120);
+                  eyobi(ta[t]+1200,tb[t]+1200,-300,-1000,0,160,1000,1000,1,120);
+                  eyobi(ta[t]+1200,tb[t]+1200,240,-1400,0,160,1000,1000,1,120);
+                  eyobi(ta[t]+1200,tb[t]+1200,-240,-1400,0,160,1000,1000,1,120);
+                  brockbreak(t);
+                }
+                //コイン
+                if (ttype[t]==2 && mzimen==0){
+                  ot(oto[4]);
+                  eyobi(ta[t]+10,tb[t],0,-800,0,40,3000,3000,0,16);
+                  ttype[t]=3;
+                }
+                //隠し
+                if (ttype[t]==7){
+                  ot(oto[4]);
+                  eyobi(ta[t]+10,tb[t],0,-800,0,40,3000,3000,0,16);
+                  mb=xx[9]+xx[1]+xx[0];ttype[t]=3;if (md<0){md=-md*2/3;}
+                }
+                // トゲ
+                if (ttype[t]==10){
+                  mmsgtm=30;
+                  mmsgtype=3;
+                  mhp--;
+                }
+            }}
+
+
+            //左右
+            if (t3==xx[22] && xx[15]==0){
+              if (ttype[t]!=7 && ttype[t]!=110 && ttype[t]!=117){
+                if (!(ttype[t]==114)){// && txtype[t]==1)){
+                  if (ta[t]>=-20000){
+                    //if (ma+mnobia>xx[8] && ma<xx[8]+xx[2] && mb+mnobib>xx[9]+xx[1]/2-xx[0] &&){
+                    if (ma+mnobia>xx[8] && ma<xx[8]+xx[2] && mb+mnobib>xx[9]+xx[1]/2-xx[0] && mb<xx[9]+xx[2] && mc>=0){
+                      ma=xx[8]-mnobia;mc=0;xx[16]=1;
+                      //if (ttype[t]!=4){ma=xx[8]-mnobia;mc=0;xx[16]=1;}
+                      //if (ttype[t]==4){ma=xx[8]-mnobia;mc=-mc*4/4;}
+                    }
+                    if (ma+mnobia>xx[8]+xx[2] && ma<xx[8]+xx[1] && mb+mnobib>xx[9]+xx[1]/2-xx[0] && mb<xx[9]+xx[2] && mc<=0){
+                      ma=xx[8]+xx[1];mc=0;xx[16]=1;//end();
+                      //if (ttype[t]!=4){ma=xx[8]+xx[1];mc=0;xx[16]=1;}
+                      //if (ttype[t]==4){ma=xx[8]+xx[1];mc=-mc*4/4;}
+                    }
+                  }}}
+                }
+
+              }//t3
+            }//!
+
+          }// && ttype[t]<50
+
+          if (ttype[t]==800){
+            //if (xx[0]+xx[2]>=-xx[14] && xx[0]<=fxmax+xx[14] && xx[1]+xx[3]>=-10-9000 && xx[1]<=fymax+10000){
+            if (mb>xx[9]-xx[0]*2-2000 && mb<xx[9]+xx[1]-xx[0]*2+2000 && ma+mnobia>xx[8]-400 && ma<xx[8]+xx[1]){
+              ta[t]=-800000;ot(oto[4]);
+            }}
+
+            //剣とってクリア
+            if (ttype[t]==140){
+              if (mb>xx[9]-xx[0]*2-2000 && mb<xx[9]+xx[1]-xx[0]*2+2000 && ma+mnobia>xx[8]-400 && ma<xx[8]+xx[1]){
+                ta[t]=-800000;//ot(oto[4]);
+                sracttype[20]=1;sron[20]=1;
+                StopSoundMem(oto[0]);mtype=301;mtm=0;ot(oto[16]);
+
+              }}
+
+
+            //特殊的
+            if (ttype[t]==100){//xx[9]+xx[1]+3000<mb && // && mb>xx[9]-xx[0]*2
+              if (mb>xx[9]-xx[0]*2-2000 && mb<xx[9]+xx[1]-xx[0]*2+2000 && ma+mnobia>xx[8]-400 && ma<xx[8]+xx[1] && md<=0){
+                if (txtype[t]==0)tb[t]=mb+fy-1200-xx[1];
+              }
+
+              if (txtype[t]==1){
+                if (xx[17]==1){
+                  if (ma+mnobia>xx[8]-400 && ma<xx[8]+xx[1]/2-1500){ta[t]+=3000;}
+                  else if (ma+mnobia>=xx[8]+xx[1]/2-1500 && ma<xx[8]+xx[1]){ta[t]-=3000;}
+                }}
+
+              if (xx[17]==1 && txtype[t]==0){
+                ot(oto[4]);
+                eyobi(ta[t]+10,tb[t],0,-800,0,40,3000,3000,0,16);
+                ttype[t]=3;
+              }
+            }//100
+
+            //敵出現
+            if (ttype[t]==101){//xx[9]+xx[1]+3000<mb && // && mb>xx[9]-xx[0]*2
+              if (xx[17]==1){
+                ot(oto[8]);
+                ttype[t]=3;
+                abrocktm[aco]=16;
+                if (txtype[t]==0)ayobi(ta[t],tb[t],0,0,0,0,0);
+                if (txtype[t]==1)ayobi(ta[t],tb[t],0,0,0,4,0);
+                if (txtype[t]==3)ayobi(ta[t],tb[t],0,0,0,101,0);
+                if (txtype[t]==4){abrocktm[aco]=20;ayobi(ta[t]-400,tb[t]-1600,0,0,0,6,0);}
+                if (txtype[t]==10)ayobi(ta[t],tb[t],0,0,0,101,0);
+              }
+            }//101
+
+            //おいしいきのこ出現
+            if (ttype[t]==102){
+              if (xx[17]==1){
+                ot(oto[8]);
+                ttype[t]=3;abrocktm[aco]=16;
+                if (txtype[t]==0)ayobi(ta[t],tb[t],0,0,0,100,0);
+                if (txtype[t]==2)ayobi(ta[t],tb[t],0,0,0,100,2);
+                if (txtype[t]==3)ayobi(ta[t],tb[t],0,0,0,102,1);
+              }}//102
+
+            //まずいきのこ出現
+            if (ttype[t]==103){
+              if (xx[17]==1){
+                ot(oto[8]);
+                ttype[t]=3;abrocktm[aco]=16;ayobi(ta[t],tb[t],0,0,0,100,1);
+              }}//103
+
+
+            //悪スター出し
+            if (ttype[t]==104){
+              if (xx[17]==1){
+                ot(oto[8]);
+                ttype[t]=3;abrocktm[aco]=16;ayobi(ta[t],tb[t],0,0,0,110,0);
+              }}//104
+
+
+
+
+            //毒きのこ量産
+            if (ttype[t]==110){
+              if (xx[17]==1){
+                ttype[t]=111;thp[t]=999;
+              }}//110
+            if (ttype[t]==111 && ta[t]-fx>=0){
+              thp[t]++;if (thp[t]>=16){thp[t]=0;
+                ot(oto[8]);
+                abrocktm[aco]=16;ayobi(ta[t],tb[t],0,0,0,102,1);
+              }}
+
+
+            //コイン量産
+            if (ttype[t]==112){
+              if (xx[17]==1){
+                ttype[t]=113;thp[t]=999;titem[t]=0;
+              }}//110
+            if (ttype[t]==113 && ta[t]-fx>=0){
+              if (titem[t]<=19)thp[t]++;
+              if (thp[t]>=3){thp[t]=0;titem[t]++;
+                ot(oto[4]);
+                eyobi(ta[t]+10,tb[t],0,-800,0,40,3000,3000,0,16);
+                //ttype[t]=3;
+              }}
+
+
+              //隠し毒きのこ
+              if (ttype[t]==114){
+                if (xx[17]==1){
+                  if (txtype[t]==0){
+                    ot(oto[8]);ttype[t]=3;
+                    abrocktm[aco]=16;ayobi(ta[t],tb[t],0,0,0,102,1);
+                  }
+                  if (txtype[t]==2){ot(oto[4]);eyobi(ta[t]+10,tb[t],0,-800,0,40,3000,3000,0,16);ttype[t]=115;txtype[t]=0;}
+                  if (txtype[t]==10){
+                    if (stageonoff==1){ttype[t]=130;stageonoff=0;ot(oto[13]);txtype[t]=2;for (t=0;t<amax;t++){if (atype[t]==87 || atype[t]==88){if (axtype[t]==105){axtype[t]=110;}}}}
+                    else{ot(oto[4]);eyobi(ta[t]+10,tb[t],0,-800,0,40,3000,3000,0,16);ttype[t]=3;}
+                  }
+
+                }
+              }//114
+
+
+              //もろいブロック
+              if (ttype[t]==115){
+
+              }//115
+
+
+              //Pスイッチ
+              if (ttype[t]==116){
+                if (xx[17]==1){
+                  ot(oto[8]);
+                  //ot(oto[13]);
+                  ttype[t]=3;//abrocktm[aco]=18;ayobi(ta[t],tb[t],0,0,0,104,1);
+                  tyobi(ta[t]/100,(tb[t]/100)-29,400);
+                }}//116
+
+
+              //ファイアバー強化
+              if (ttype[t]==124){
+                if (xx[17]==1){
+                  ot(oto[13]);
+                  for (t=0;t<amax;t++){if (atype[t]==87 || atype[t]==88){if (axtype[t]==101){axtype[t]=120;}}}
+                  ttype[t]=3;
+                }}
+
+              //ONスイッチ
+              if (ttype[t]==130){
+                if (xx[17]==1){
+                  if (txtype[t]!=1){
+                    stageonoff=0;ot(oto[13]);
+                  }}}
+              else if (ttype[t]==131){
+                if (xx[17]==1 && txtype[t]!=2){
+                  stageonoff=1;ot(oto[13]);
+                  if (txtype[t]==1){
+                    for (t=0;t<amax;t++){if (atype[t]==87 || atype[t]==88){if (axtype[t]==105){axtype[t]=110;}}}
+                    bxtype[3]=105;
+                  }
+                }}
+
+              //ヒント
+              if (ttype[t]==300){
+                if (xx[17]==1){
+                  ot(oto[15]);
+                  if (txtype[t]<=100){
+                    tmsgtype=1;tmsgtm=15;tmsgy=300+(txtype[t]-1);tmsg=(txtype[t]);
+                  }
+                  if (txtype[t]==540){
+                    tmsgtype=1;tmsgtm=15;tmsgy=400;tmsg=100;txtype[t]=541;
+                  }}
+              }//300
+
+
+              if (ttype[t]==301){
+                if (xx[17]==1){
+                  ot(oto[3]);
+                  eyobi(ta[t]+1200,tb[t]+1200,300,-1000,0,160,1000,1000,1,120);eyobi(ta[t]+1200,tb[t]+1200,-300,-1000,0,160,1000,1000,1,120);eyobi(ta[t]+1200,tb[t]+1200,240,-1400,0,160,1000,1000,1,120);eyobi(ta[t]+1200,tb[t]+1200,-240,-1400,0,160,1000,1000,1,120);
+                  brockbreak(t);
+                }}//300
+
+
+          }
+          else if (mtype==1){
+            if (ma+mnobia>xx[8] && ma<xx[8]+xx[1] && mb+mnobib>xx[9] && mb<xx[9]+xx[1]){
+
+              ot(oto[3]);
+              eyobi(ta[t]+1200,tb[t]+1200,300,-1000,0,160,1000,1000,1,120);
+              eyobi(ta[t]+1200,tb[t]+1200,-300,-1000,0,160,1000,1000,1,120);
+              eyobi(ta[t]+1200,tb[t]+1200,240,-1400,0,160,1000,1000,1,120);
+              eyobi(ta[t]+1200,tb[t]+1200,-240,-1400,0,160,1000,1000,1,120);
+              brockbreak(t);
+
+            }}
+
+
+          //ONOFF
+          if (ttype[t]==130 && stageonoff==0){ttype[t]=131;}
+          if (ttype[t]==131 && stageonoff==1){ttype[t]=130;}
+
+          //ヒント
+          if (ttype[t]==300){
+            if (txtype[t]>=500 && ta[t]>=-6000){// && ta[t]>=-6000){
+              if (txtype[t]<=539)txtype[t]++;
+              if (txtype[t]>=540){ta[t]-=500;}
+            }}//300
+
+
+          }}//ブロック
+
+
+
+
+
+
+
+          //壁
+          for (t=0;t<smax;t++){
+            if (sa[t]-fx+sc[t]>=-12000 && sa[t]-fx<=fxmax){
+              xx[0]=200;xx[1]=2400;xx[2]=1000;xx[7]=0;
+
+              xx[8]=sa[t]-fx;xx[9]=sb[t]-fy;
+              if ((stype[t]<=99 || stype[t]==200) && mtype<10){
+
+                //おちるブロック
+                if (stype[t]==51){
+                  if (ma+mnobia>xx[8]+xx[0]+3000 && ma<xx[8]+sc[t]-xx[0] && mb+mnobib>xx[9]+3000 && sgtype[t]==0){
+                    if (sxtype[t]==0){
+                      sgtype[t]=1;sr[t]=0;
+                    }}
+                  if (ma+mnobia>xx[8]+xx[0]+1000 && ma<xx[8]+sc[t]-xx[0] && mb+mnobib>xx[9]+3000 && sgtype[t]==0){
+                    if ((sxtype[t]==10) && sgtype[t]==0){
+                      sgtype[t]=1;sr[t]=0;
+                    }}
+
+                  if ((sxtype[t]==1) && sb[27]>=25000 && sa[27]>ma+mnobia && t!=27 && sgtype[t]==0){
+                    sgtype[t]=1;sr[t]=0;
+                  }
+                  if (sxtype[t]==2 && sb[28]>=48000 && t!=28 && sgtype[t]==0 && mhp>=1){
+                    sgtype[t]=1;sr[t]=0;
+                  }
+                  if ((sxtype[t]==3 && mb>=30000 || sxtype[t]==4 && mb>=25000) && sgtype[t]==0 && mhp>=1 && ma+mnobia>xx[8]+xx[0]+3000-300 && ma<xx[8]+sc[t]-xx[0]){
+                    sgtype[t]=1;sr[t]=0;
+                    if (sxtype[t]==4)sr[t]=100;
+                  }
+
+                  if (sgtype[t]==1 && sb[t]<=fymax+18000){
+                    sr[t]+=120;if (sr[t]>=1600){sr[t]=1600;}
+                    sb[t]+=sr[t];
+                    if (ma+mnobia>xx[8]+xx[0] && ma<xx[8]+sc[t]-xx[0] && mb+mnobib>xx[9] && mb<xx[9]+sd[t]+xx[0]){
+                      mhp--;xx[7]=1;
+                    }}
+                }
+
+                //おちるブロック2
+                if (stype[t]==52){
+                  if (sgtype[t]==0 && ma+mnobia>xx[8]+xx[0]+2000 && ma<xx[8]+sc[t]-xx[0]-2500 && mb+mnobib>xx[9]-3000){
+                    sgtype[t]=1;sr[t]=0;
+                  }
+                  if (sgtype[t]==1){
+                    sr[t]+=120;if (sr[t]>=1600){sr[t]=1600;}
+                    sb[t]+=sr[t];
+                  }
+                }
+
+
+
+                //通常地面
+                if (xx[7]==0){
+                  if (ma+mnobia>xx[8]+xx[0] && ma<xx[8]+sc[t]-xx[0] && mb+mnobib>xx[9] && mb+mnobib<xx[9]+xx[1] && md>=-100){mb=sb[t]-fy-mnobib+100;md=0;mzimen=1;}
+                  if (ma+mnobia>xx[8]-xx[0] && ma<xx[8]+xx[2] && mb+mnobib>xx[9]+xx[1]*3/4 && mb<xx[9]+sd[t]-xx[2]){ma=xx[8]-xx[0]-mnobia;mc=0;}
+                  if (ma+mnobia>xx[8]+sc[t]-xx[0] && ma<xx[8]+sc[t]+xx[0] && mb+mnobib>xx[9]+xx[1]*3/4 && mb<xx[9]+sd[t]-xx[2]){ma=xx[8]+sc[t]+xx[0];mc=0;}
+                  if (ma+mnobia>xx[8]+xx[0]*2 && ma<xx[8]+sc[t]-xx[0]*2 && mb>xx[9]+sd[t]-xx[1] && mb<xx[9]+sd[t]+xx[0]){
+                    mb=xx[9]+sd[t]+xx[0];if (md<0){md=-md*2/3;}
+                  }
+                }//xx[7]
+
+                //入る土管
+                if (stype[t]==50){
+                  if (ma+mnobia>xx[8]+2800 && ma<xx[8]+sc[t]-3000 && mb+mnobib>xx[9]-1000 && mb+mnobib<xx[9]+xx[1]+3000 && mzimen==1 && actaon[3]==1 && mtype==0){
+                    //飛び出し
+                    if (sxtype[t]==0){
+                      mtype=100;mtm=0;ot(oto[7]);mxtype=0;
+                    }
+                    //普通
+                    if (sxtype[t]==1){
+                      mtype=100;mtm=0;ot(oto[7]);mxtype=1;
+                    }
+                    //普通
+                    if (sxtype[t]==2){
+                      mtype=100;mtm=0;ot(oto[7]);mxtype=2;
+                    }
+                    if (sxtype[t]==5){
+                      mtype=100;mtm=0;ot(oto[7]);mxtype=5;
+                    }
+                    // ループ
+                    if (sxtype[t]==6){
+                      mtype=100;mtm=0;ot(oto[7]);mxtype=6;
+                    }
+                  }}//50
+
+                //入る土管(左から)
+                if (stype[t]==40){
+                  if (ma+mnobia>xx[8]-300 && ma<xx[8]+sc[t]-1000 && mb>xx[9]+1000 && mb+mnobib<xx[9]+xx[1]+4000 && mzimen==1 && actaon[4]==1 && mtype==0){//end();
+                    //飛び出し
+                    if (sxtype[t]==0){
+                      mtype=500;mtm=0;ot(oto[7]);//mxtype=1;
+                      mtype=100;mxtype=10;
+                    }
+
+                    if (sxtype[t]==2){
+                      mxtype=3;
+                      mtm=0;ot(oto[7]);//mxtype=1;
+                      mtype=100;
+                    }
+                    // ループ
+                    if (sxtype[t]==6){
+                      mtype=3;mtm=0;ot(oto[7]);mxtype=6;
+                    }
+                  }}//40
+
+
+
+
+              }//stype
+              else{
+                if (ma+mnobia>xx[8]+xx[0] && ma<xx[8]+sc[t]-xx[0] && mb+mnobib>xx[9] && mb<xx[9]+sd[t]+xx[0]){
+                  if (stype[t]==100){
+                    if (sxtype[t]==0 || sxtype[t]==1 && ttype[1]!=3){
+                      ayobi(sa[t]+1000,32000,0,0,0,3,0);sa[t]=-800000000;ot(oto[10]);
+                    }
+                  }
+                  if (stype[t]==101){ayobi(sa[t]+6000,-4000,0,0,0,3,1);sa[t]=-800000000;ot(oto[10]);}
+                  if (stype[t]==102){
+                    if (sxtype[t]==0){
+                      for (t3=0;t3<=3;t3++){ayobi(sa[t]+t3*3000,-3000,0,0,0,0,0);}
+                    }
+                    if (sxtype[t]==1 && mb>=16000){ayobi(sa[t]+1500,44000,0,-2000,0,4,0);}
+                    else if (sxtype[t]==2){ayobi(sa[t]+4500,30000,0,-1600,0,5,0);ot(oto[10]);sxtype[t]=3;sa[t]-=12000;}
+                    else if (sxtype[t]==3){sa[t]+=12000;sxtype[t]=4;}
+                    else if (sxtype[t]==4){ayobi(sa[t]+4500,30000,0,-1600,0,5,0);ot(oto[10]);sxtype[t]=5;sxtype[t]=0;}
+
+                    else if (sxtype[t]==7){mainmsgtype=1;}
+                    else if (sxtype[t]==8){ayobi(sa[t]-5000-3000*1,26000,0,-1600,0,5,0);ot(oto[10]);}
+                    else if (sxtype[t]==9){for (t3=0;t3<=2;t3++){ayobi(sa[t]+t3*3000+3000,48000,0,-6000,0,3,0);}}
+                    if (sxtype[t]==10){sa[t]-=5*30*100;stype[t]=101;}
+
+                    if (sxtype[t]==12){
+                      for (t3=1;t3<=3;t3++){ayobi(sa[t]+t3*3000-1000,40000,0,-2600,0,9,0);}
+                    }
+
+                    //スクロール消し
+                    if (sxtype[t]==20){
+                      scrollx=0;
+                    }
+
+                    //クリア
+                    if (sxtype[t]==30){sa[t]=-80000000;md=0;
+                      StopSoundMem(oto[0]);mtype=302;mtm=0;ot(oto[16]);
+                    }
+
+                    if (sxtype[t]!=3 && sxtype[t]!=4 && sxtype[t]!=10){sa[t]=-800000000;}
+                  }
+
+                  if (stype[t]==103){
+                    if (sxtype[t]==0){
+                      amsgtm[aco]=10;amsgtype[aco]=50;ayobi(sa[t]+9000,sb[t]+2000,0,0,0,79,0);sa[t]=-800000000;
+                    }
+
+                    if (sxtype[t]==1 && ttype[6]<=6){
+                      amsgtm[aco]=10;amsgtype[aco]=50;ayobi(sa[t]-12000,sb[t]+2000,0,0,0,79,0);sa[t]=-800000000;
+                      txtype[9]=500;//ttype[9]=1;
+                    }
+                  }//103
+
+                  if (stype[t]==104){
+                    if (sxtype[t]==0){
+                      ayobi(sa[t]+12000,sb[t]+2000+3000,0,0,0,79,0);
+                      ayobi(sa[t]+12000,sb[t]+2000+3000,0,0,0,79,1);
+                      ayobi(sa[t]+12000,sb[t]+2000+3000,0,0,0,79,2);
+                      ayobi(sa[t]+12000,sb[t]+2000+3000,0,0,0,79,3);
+                      ayobi(sa[t]+12000,sb[t]+2000+3000,0,0,0,79,4);
+                      sa[t]=-800000000;
+                    }}
+
+                  if (stype[t]==105 && mzimen==0 && md>=0){ta[1]-=1000;ta[2]+=1000;sxtype[t]++;if (sxtype[t]>=3)sa[t]=-8000000;}
+
+
+                  if (stype[t]==300 && mtype==0 && mb<xx[9]+sd[t]+xx[0]-3000 && mhp>=1){StopSoundMem(oto[0]);mtype=300;mtm=0;ma=sa[t]-fx-2000;ot(oto[11]);}
+
+                  //中間ゲート
+                  if (stype[t]==500 && mtype==0 && mhp>=1){
+                    tyuukan+=1;
+                    sa[t]=-80000000;
+                  }
+
+                }
+
+                if (stype[t]==180){
+                  sr[t]++;
+                  if (sr[t]>=sgtype[t]){sr[t]=0;
+                    ayobi(sa[t],30000,rand(600)-300,-1600-rand(900),0,84,0);
+                  }
+                }
+
+              }
+            }}//壁
+
+
+
+
+
+
+
+
+
+
+          //キー入力初期化
+          //for (t=0;t<=6;t++)
+          actaon[0]=0;actaon[4]=0;
+
+
+
+
+
+          //リフト
+          for (t=0;t<srmax;t++){
+            xx[10]=sra[t];xx[11]=srb[t];xx[12]=src[t];xx[13]=srd[t];
+            xx[8]=xx[10]-fx;xx[9]=xx[11]-fy;
+            if (xx[8]+xx[12]>=-10-12000 && xx[8]<=fxmax+12100){
+              xx[0]=500;xx[1]=1200;xx[2]=1000;xx[7]=2000;
+              if (md>=100){xx[1]=900+md;}
+
+              //if (srtype[t]==1){xx[0]=600;}
+              if (md>xx[1])xx[1]=md+100;
+              //xx[18]=0;
+
+              srb[t]+=sre[t];
+              sre[t]+=srf[t];
+              //if (srf[t]>=500)srf[t]=0;
+
+
+
+
+              //動き
+              switch(sracttype[t]){
+
+                case 1:
+                  if (sron[t]==1)srf[t]=60;
+                  break;
+
+
+                case 2:
+                  /*
+                     if (sra[t]<=srmovep[t]-srmove[t])srmuki[t]=1;
+                     if (sra[t]>=srmovep[t]+srmove[t])srmuki[t]=0;
+                     */
+                  break;
+
+                case 3:
+                  /*
+                     if (srb[t]<=srmovep[t]-srmove[t])srmuki[t]=1;
+                     if (srb[t]>=srmovep[t]+srmove[t])srmuki[t]=0;
+                     */
+                  break;
+
+                  /*
+                     case 4:
+                     if (srmove[t]==0){srmuki[t]=0;}else{srmuki[t]=1;}
+                     if (sra[t]-fx<-1100-src[t]){sra[t]=fymax+fx+scrollx;}
+                     if (sra[t]-fx>24000+scrollx){sra[t]=-1100-src[t]+fx;}
+                     break;
+                     */
+
+                case 5:
+                  if (srmove[t]==0){srmuki[t]=0;}else{srmuki[t]=1;}
+                  if (srb[t]-fy<-2100){srb[t]=fymax+fy+scrolly+2000;}
+                  if (srb[t]-fy>fymax+scrolly+2000){srb[t]=-2100+fy;}
+                  break;
+
+                case 6:
+                  if (sron[t]==1)srf[t]=40;
+                  break;
+
+                case 7:
+                  break;
+
+
+              }//sw
+
+              //if (srtype[t]==1){sre[10]=300;sre[11]=300;}
+
+              //乗ったとき
+              if (!(mztm>=1 && mztype==1 && actaon[3]==1) && mhp>=1){
+                if (ma+mnobia>xx[8]+xx[0] && ma<xx[8]+xx[12]-xx[0] && mb+mnobib>xx[9] && mb+mnobib<xx[9]+xx[1] && md>=-100){
+                  mb=xx[9]-mnobib+100;
+                  //if (sracttype[t]!=7)mzimen=1;
+
+                  if (srtype[t]==1){sre[10]=900;sre[11]=900;}
+
+                  if (srsp[t]!=12){
+                    mzimen=1;md=0;
+                  }else {
+                    //すべり
+                    //md=0;mrzimen=1;mzimen=1;
+                    md=-800;
+                  }
+
+
+                  /*
+                     md=0;
+                     if ((sracttype[t]==1 || sracttype[t]==6) && sron[t]==1)mb+=sre[t];
+
+                     if (sracttype[t]==2 || sracttype[t]==4){
+                     if (srmuki[t]==0)ma-=srsok[t];
+                     if (srmuki[t]==1)ma+=srsok[t];
+                     }
+                     */
+
+                  //落下
+                  if ((sracttype[t]==1) && sron[t]==0)sron[t]=1;
+
+                  if (sracttype[t]==1 && sron[t]==1 || sracttype[t]==3 || sracttype[t]==5){
+                    mb+=sre[t];
+                    //if (srmuki[t]==0)
+                    //if (srf[t]<0)
+                    //if (srmuki[t]==1)
+                    //if (srf[t]>0)
+                    //mb+=srsok[t];
+                  }
+
+                  if (sracttype[t]==7){
+                    if (actaon[2]!=1){md=-600;mb-=810;}
+                    if (actaon[2]==1){mb-=400;md=-1400;mjumptm=10;}
+                  }
+
+
+                  //特殊
+                  if (srsp[t]==1){
+                    ot(oto[3]);
+                    eyobi(sra[t]+200,srb[t]-1000,-240,-1400,0,160,4500,4500,2,120);
+                    eyobi(sra[t]+4500-200,srb[t]-1000,240,-1400,0,160,4500,4500,3,120);
+                    sra[t]=-70000000;
+                  }
+
+
+
+
+
+                  if (srsp[t]==2){
+                    mc=-2400;srmove[t]+=1;
+                    if (srmove[t]>=100){mhp=0;mmsgtype=53;mmsgtm=30;srmove[t]=-5000;}
+                  }
+
+
+                  //if (srtype[t]==1){md=-600;mb-=610;mhp-=1;if (mmutekion!=1)mmutekitm=40;}
+                }//判定内
+
+
+                //疲れ初期化
+                if (srsp[t]==2 && mc!=-2400 && srmove[t]>0){srmove[t]--;}
+
+                if (srsp[t]==11){
+                  if (ma+mnobia>xx[8]+xx[0]-2000 && ma<xx[8]+xx[12]-xx[0]){sron[t]=1;}// && mb+mnobib>xx[9]-1000 && mb+mnobib<xx[9]+xx[1]+2000)
+                  if (sron[t]==1){srf[t]=60;srb[t]+=sre[t];}
+                }
+
+
+                //トゲ(下)
+                if (ma+mnobia>xx[8]+xx[0] && ma<xx[8]+xx[12]-xx[0] && mb>xx[9]-xx[1]/2 && mb<xx[9]+xx[1]/2){
+                  if (srtype[t]==2){if (md<0){md=-md;}mb+=110;if (mmutekitm<=0)mhp-=1;if (mmutekion!=1)mmutekitm=40;}
+                }
+                //落下
+                if (sracttype[t]==6){
+                  if (ma+mnobia>xx[8]+xx[0] && ma<xx[8]+xx[12]-xx[0]){sron[t]=1;}
+                }
+
+              }//!
+
+              /*
+              //ジャンプ台
+              if (sracttype[t]==7){
+              if (ma+mnobia>xx[8]+xx[0] && ma<xx[8]+xx[12]-xx[0] && mb+mnobib>xx[9]+xx[1]/2 && mb+mnobib<xx[9]+xx[1]*3/2 && md>=-100){
+              if (actaon[2]!=1){md=-600;mb-=810;}
+              if (actaon[2]==1){mb-=400;md=-1400;mjumptm=10;}
+              }}
+              */
+
+
+              if (sracttype[t]==2 || sracttype[t]==4){
+                if (srmuki[t]==0)sra[t]-=srsok[t];
+                if (srmuki[t]==1)sra[t]+=srsok[t];
+              }
+              if (sracttype[t]==3 || sracttype[t]==5){
+                if (srmuki[t]==0)srb[t]-=srsok[t];
+                if (srmuki[t]==1)srb[t]+=srsok[t];
+              }
+
+
+
+
+
+
+              //敵キャラ適用
+              for (tt=0;tt<amax;tt++){
+                if (azimentype[tt]==1){
+                  if (aa[tt]+anobia[tt]-fx>xx[8]+xx[0] && aa[tt]-fx<xx[8]+xx[12]-xx[0] && ab[tt]+anobib[tt]>xx[11]-100 && ab[tt]+anobib[tt]<xx[11]+xx[1]+500 && ad[tt]>=-100){
+                    ab[tt]=xx[9]-anobib[tt]+100;ad[tt]=0;axzimen[tt]=1;
+                  }}}
+
+
+            }}//リフト
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+            //グラ
+            for (t=0;t<emax;t++){
+              xx[0]=ea[t]-fx;xx[1]=eb[t]-fy;
+              xx[2]=enobia[t]/100;xx[3]=enobib[t]/100;
+              if (etm[t]>=0)etm[t]--;
+              if (xx[0]+xx[2]*100>=-10 && xx[1]<=fxmax && xx[1]+xx[3]*100>=-10-8000 && xx[3]<=fymax && etm[t]>=0){
+                ea[t]+=ec[t];eb[t]+=ed[t];
+                ec[t]+=ee[t];ed[t]+=ef[t];
+
+              }else{ea[t]=-9000000;}
+
+            }//emax
+
+
+
+
+
+
+            //敵キャラの配置
+            for (t=0;t<bmax;t++){
+              if (ba[t]>=-80000){
+
+                if (btm[t]>=0){btm[t]=btm[t]-1;}
+
+                for (tt=0;tt<=1;tt++){
+                  xx[0]=0;xx[1]=0;
+
+
+                  if (bz[t]==0 && btm[t]<0 && ba[t]-fx>=fxmax+2000 && ba[t]-fx<fxmax+2000+mc && tt==0){xx[0]=1;amuki[aco]=0;}// && mmuki==1
+                  if (bz[t]==0 && btm[t]<0 && ba[t]-fx>=-400-anx[btype[t]]+mc && ba[t]-fx<-400-anx[btype[t]] && tt==1){xx[0]=1;xx[1]=1;amuki[aco]=1;}// && mmuki==0
+                  if (bz[t]==1 && ba[t]-fx>=0-anx[btype[t]] && ba[t]-fx<=fxmax+4000 && bb[t]-fy>=-9000 && bb[t]-fy<=fymax+4000 && btm[t]<0){xx[0]=1;bz[t]=0;}// && xza<=5000// && tyuukan!=1
+                  //if (bz[t]==2){xx[0]=0;xx[1]=0;}
+                  //if (btype[t]>=100){bz[t]=2;}
+
+                  if (xx[0]==1){//400
+                    btm[t]=401;xx[0]=0;//if (btype[t]>=20 && btype[t]<=23){btm[t]=90000;}
+                    if (btype[t]>=10){btm[t]=9999999;}
+
+
+                    //10
+                    ayobi(ba[t],bb[t],0,0,0,btype[t],bxtype[t]);
+
+                  }
+
+                }//tt
+
+              }}//t
+
+
+
+
+
+            //敵キャラ
+            for (t=0;t<amax;t++){
+              xx[0]=aa[t]-fx;xx[1]=ab[t]-fy;
+              xx[2]=anobia[t];xx[3]=anobib[t];xx[14]=12000*1;
+              if (anotm[t]>=0)anotm[t]--;
+              if (xx[0]+xx[2]>=-xx[14] && xx[0]<=fxmax+xx[14] && xx[1]+xx[3]>=-10-9000 && xx[1]<=fymax+20000){
+                aacta[t]=0;aactb[t]=0;
+
+                xx[10]=0;
+
+                switch(atype[t]){
+                  case 0:
+                    xx[10]=100;
+                    break;
+
+                    //こうらの敵
+                  case 1:
+                    xx[10]=100;
+                    break;
+
+                    //こうら
+                  case 2:
+                    xx[10]=0;xx[17]=800;
+                    if (axtype[t]>=1)xx[10]=xx[17];
+                    //if (axtype[t]==1)xx[10]=xx[17];
+                    //if (axtype[t]==2)xx[10]=-xx[17];
+                    //他の敵を倒す
+                    if (axtype[t]>=1){
+                      for (tt=0;tt<amax;tt++){
+                        xx[0]=250;xx[5]=-800;xx[12]=0;xx[1]=1600;
+                        xx[8]=aa[tt]-fx;xx[9]=ab[tt]-fy;
+                        if (t!=tt){
+                          if (aa[t]+anobia[t]-fx>xx[8]+xx[0]*2 && aa[t]-fx<xx[8]+anobia[tt]-xx[0]*2 && ab[t]+anobib[t]-fy>xx[9]+xx[5] && ab[t]+anobib[t]-fy<xx[9]+xx[1]*3+xx[12]+1500){
+                            aa[tt]=-800000;ot(oto[6]);
+                          }}}
+                    }
+
+                    break;
+
+                    //あらまき
+                  case 3:
+                    azimentype[t]=0;//end();
+                    if (axtype[t]==0){
+                      ab[t]-=800;
+                    }
+                    if (axtype[t]==1)
+                      ab[t]+=1200;
+
+                    //xx[10]=100;
+                    break;
+
+                    //スーパージエン
+                  case 4:
+                    xx[10]=120;
+                    xx[0]=250;
+                    xx[8]=aa[t]-fx;
+                    xx[9]=ab[t]-fy;
+                    if (atm[t]>=0)atm[t]--;
+                    if (abs(ma+mnobia-xx[8]-xx[0]*2) < 9000 &&
+                        abs(ma<xx[8]-anobia[t]+xx[0]*2) < 3000 &&
+                        md<=-600 && atm[t]<=0){
+                      if (axtype[t]==1 && mzimen==0 && axzimen[t]==1){
+                        ad[t]=-1600;atm[t]=40;ab[t]-=1000;
+                      }
+                    }// 
+                    break;
+
+                    //クマー
+                  case 5:
+                    xx[10]=160;
+                    //azimentype[t]=2;
+                    break;
+
+                    //デフラグさん
+                  case 6:
+                    if (azimentype[t]==30){ad[t]=-1600;ab[t]+=ad[t];}
+
+                    xx[10]=120;
+                    if (atm[t]>=10){
+                      atm[t]++;
+                      if (mhp>=1){
+                        if (atm[t]<=19){ma=xx[0];mb=xx[1]-3000;mtype=0;}
+                        xx[10]=0;
+                        if (atm[t]==20){mc=700;mkeytm=24;md=-1200;mb=xx[1]-1000-3000;amuki[t]=1;if (axtype[t]==1){mc=840;axtype[t]=0;}}
+                        if (atm[t]==40){amuki[t]=0;atm[t]=0;}
+                      }}
+
+                      //ポール捨て
+                      if (axtype[t]==1){
+                        for (tt=0;tt<smax;tt++){
+                          if (stype[tt]==300){
+                            //sa[sco]=xx[21]*100;sb[sco]=xx[22]*100;sc[sco]=3000;sd[sco]=(12-t)*3000;stype[sco]=300;sco++;
+                            if (aa[t]-fx>=-8000 && aa[t]>=sa[tt]+2000 && aa[t]<=sa[tt]+3600 && axzimen[t]==1){sa[tt]=-800000;atm[t]=100;}
+                          }}
+
+                        if (atm[t]==100){
+                          eyobi(aa[t]+1200-1200,ab[t]+3000-10*3000-1500,0,0,0,0,1000,10*3000-1200,4,20);
+                          if (mtype==300){mtype=0;StopSoundMem(oto[11]);bgmchange(oto[100]);PlaySoundMem(oto[0],DX_PLAYTYPE_LOOP);}
+                          for (t1=0;t1<smax;t1++){if (stype[t1]==104)sa[t1]=-80000000;}
+                        }
+                        if (atm[t]==120){eyobi(aa[t]+1200-1200,ab[t]+3000-10*3000-1500,600,-1200,0,160,1000,10*3000-1200,4,240);amuki[t]=1;}
+                        //mc=700;mkeytm=24;md=-1200;mb=xx[1]-1000-3000;amuki[t]=1;if (axtype[t]==1){mc=840;axtype[t]=0;}}
+                        if (atm[t]==140){amuki[t]=0;atm[t]=0;}
+                }
+                if (atm[t]>=220){atm[t]=0;amuki[t]=0;}
+
+                //他の敵を投げる
+                for (tt=0;tt<amax;tt++){
+                  xx[0]=250;xx[5]=-800;xx[12]=0;xx[1]=1600;
+                  xx[8]=aa[tt]-fx;xx[9]=ab[tt]-fy;
+                  if (t!=tt && atype[tt]>=100){
+                    if (aa[t]+anobia[t]-fx>xx[8]+xx[0]*2 && aa[t]-fx<xx[8]+anobia[tt]-xx[0]*2 && ab[t]+anobib[t]-fy>xx[9]+xx[5] && ab[t]+anobib[t]-fy<xx[9]+xx[1]*3+xx[12]+1500){
+                      //aa[tt]=-800000;
+                      amuki[tt]=1;aa[tt]=aa[t]+300;ab[tt]=ab[t]-3000;abrocktm[tt]=120;//aa[tt]=0;
+                      atm[t]=200;amuki[t]=1;
+                    }}}
+
+                  break;
+
+                  //ジエン大砲
+                case 7:
+                  azimentype[t]=0;
+                  xx[10]=0;xx[11]=400;
+                  if (axtype[t]==0)xx[10]=xx[11];
+                  if (axtype[t]==1)xx[10]=-xx[11];
+                  if (axtype[t]==2)ab[t]-=xx[11];
+                  if (axtype[t]==3)ab[t]+=xx[11];
+                  break;
+
+                  //スーパーブーン
+                case 8:
+                  azimentype[t]=0;
+                  xx[22]=20;
+                  if (atm[t]==0){af[t]+=xx[22];ad[t]+=xx[22];}
+                  if (atm[t]==1){af[t]-=xx[22];ad[t]-=xx[22];}
+                  if (ad[t]>300)ad[t]=300;
+                  if (ad[t]<-300)ad[t]=-300;
+                  if (af[t]>=1200)atm[t]=1;
+                  if (af[t]<-0)atm[t]=0;
+                  ab[t]+=ad[t];
+                  //atype[t]=151;
+                  break;
+                  //ノーマルブーン
+                case 151:
+                  azimentype[t]=2;
+                  break;
+
+                  //ファイアー玉
+                case 9:
+                  azimentype[t]=5;
+                  ab[t]+=ad[t];ad[t]+=100;
+                  if (ab[t]>=fymax+1000){ad[t]=900;}
+                  if (ab[t]>=fymax+12000){
+                    ab[t]=fymax;ad[t]=-2600;
+                  }
+                  break;
+
+                  //ファイアー
+                case 10:
+                  azimentype[t]=0;
+                  xx[10]=0;xx[11]=400;
+                  if (axtype[t]==0)xx[10]=xx[11];
+                  if (axtype[t]==1)xx[10]=-xx[11];
+                  break;
+
+
+                  //モララー
+                case 30:
+                  atm[t]+=1;
+                  if (axtype[t]==0){
+                    if (atm[t]==50 && mb>=6000){ac[t]=300;ad[t]-=1600;ab[t]-=1000;}
+
+                    for (tt=0;tt<amax;tt++){
+                      xx[0]=250;xx[5]=-800;xx[12]=0;xx[1]=1600;
+                      xx[8]=aa[tt]-fx;xx[9]=ab[tt]-fy;
+                      if (t!=tt && atype[tt]==102){
+                        if (aa[t]+anobia[t]-fx>xx[8]+xx[0]*2 && aa[t]-fx<xx[8]+anobia[tt]-xx[0]*2 && ab[t]+anobib[t]-fy>xx[9]+xx[5] && ab[t]+anobib[t]-fy<xx[9]+xx[1]*3+xx[12]+1500){
+                          aa[tt]=-800000;axtype[t]=1;ad[t]=-1600;
+                          amsgtm[t]=30;amsgtype[t]=25;
+                        }}}
+                  }
+                  if (axtype[t]==1){
+                    azimentype[t]=0;
+                    ab[t]+=ad[t];ad[t]+=120;
+                  }
+                  break;
+
+                  //レーザー
+                case 79:
+                  azimentype[t]=0;
+                  xx[10]=1600;
+                  if (axtype[t]==1){xx[10]=1200;ab[t]-=200;}
+                  if (axtype[t]==2){xx[10]=1200;ab[t]+=200;}
+                  if (axtype[t]==3){xx[10]=900;ab[t]-=600;}
+                  if (axtype[t]==4){xx[10]=900;ab[t]+=600;}
+                  break;
+
+                  //雲の敵
+                case 80:
+                  azimentype[t]=0;
+                  //xx[10]=100;
+                  break;
+                case 81:
+                  azimentype[t]=0;
+                  break;
+                case 82:
+                  azimentype[t]=0;
+                  break;
+                case 83:
+                  azimentype[t]=0;
+                  break;
+
+                case 84:
+                  azimentype[t]=2;
+                  break;
+
+                case 85:
+                  xx[23]=400;
+                  if (axtype[t]==0){axtype[t]=1;amuki[t]=1;}
+                  if (mb>=30000 && ma>=aa[t]-3000*5-fx && ma<=aa[t]-fx && axtype[t]==1){axtype[t]=5;amuki[t]=0;}
+                  if (mb>=24000 && ma<=aa[t]+3000*8-fx && ma>=aa[t]-fx && axtype[t]==1){axtype[t]=5;amuki[t]=1;}
+                  if (axtype[t]==5)xx[10]=xx[23];
+                  break;
+
+                case 86:
+                  azimentype[t]=4;
+                  xx[23]=1000;
+                  if (ma>=aa[t]-fx-mnobia-xx[26] && ma<=aa[t]-fx+anobia[t]+xx[26]){atm[t]=1;}
+                  if (atm[t]==1){ab[t]+=1200;}
+                  break;
+
+                  //ファイアバー
+                case 87:
+                  azimentype[t]=0;
+                  if (aa[t]%10!=1)atm[t]+=6;
+                  else{atm[t]-=6;}
+                  xx[25]=2;
+                  if (atm[t]>360*xx[25])atm[t]-=360*xx[25];
+                  if (atm[t]<0)atm[t]+=360*xx[25];
+
+                  for (tt=0;tt<=axtype[t]%100;tt++){
+                    xx[26]=18;
+                    xd[4]=tt*xx[26]*cos(atm[t]*pai/180/2);xd[5]=tt*xx[26]*sin(atm[t]*pai/180/2);
+
+                    xx[4]=1800;xx[5]=800;
+                    xx[8]=aa[t]-fx+int(xd[4])*100-xx[4]/2;xx[9]=ab[t]-fy+int(xd[5])*100-xx[4]/2;
+
+                    if (ma+mnobia>xx[8]+xx[5] && ma<xx[8]+xx[4]-xx[5] && mb+mnobib>xx[9]+xx[5] && mb<xx[9]+xx[4]-xx[5]){
+                      mhp-=1;
+                      mmsgtype=51;mmsgtm=30;
+                    }
+                  }
+
+                  break;
+
+                case 88:
+                  azimentype[t]=0;
+                  if (aa[t]%10!=1)atm[t]+=6;
+                  else{atm[t]-=6;}
+                  xx[25]=2;
+                  if (atm[t]>360*xx[25])atm[t]-=360*xx[25];
+                  if (atm[t]<0)atm[t]+=360*xx[25];
+
+                  for (tt=0;tt<=axtype[t]%100;tt++){
+                    xx[26]=18;
+                    xd[4]=-tt*xx[26]*cos(atm[t]*pai/180/2);
+                    xd[5]=tt*xx[26]*sin(atm[t]*pai/180/2);
+
+                    xx[4]=1800;
+                    xx[5]=800;
+                    xx[8]=aa[t]-fx+int(xd[4])*100-xx[4]/2;
+                    xx[9]=ab[t]-fy+int(xd[5])*100-xx[4]/2;
+
+                    if (ma+mnobia>xx[8]+xx[5] && ma<xx[8]+xx[4]-xx[5] && mb+mnobib>xx[9]+xx[5] && mb<xx[9]+xx[4]-xx[5]){
+                      mhp-=1;
+                      mmsgtype=51;mmsgtm=30;
+                    }
+                  }
+
+                  break;
+
+
+                case 90:
+                  xx[10]=160;
+                  //azimentype[t]=0;
+                  break;
+
+
+                  //おいしいキノコ
+                case 100:
+                  azimentype[t]=1;
+                  xx[10]=100;
+
+                  //ほかの敵を巨大化
+                  if (axtype[t]==2){
+                    for (tt=0;tt<amax;tt++){
+                      xx[0]=250;xx[5]=-800;xx[12]=0;xx[1]=1600;
+                      xx[8]=aa[tt]-fx;xx[9]=ab[tt]-fy;
+                      if (t!=tt){
+                        if (aa[t]+anobia[t]-fx>xx[8]+xx[0]*2 && aa[t]-fx<xx[8]+anobia[tt]-xx[0]*2 && ab[t]+anobib[t]-fy>xx[9]+xx[5] && ab[t]+anobib[t]-fy<xx[9]+xx[1]*3+xx[12]){
+                          if (atype[tt]==0 || atype[tt]==4){
+                            atype[tt]=90;//ot(oto[6]);
+                            anobia[tt]=6400;anobib[tt]=6300;axtype[tt]=0;
+                            aa[tt]-=1050;ab[tt]-=1050;
+                            ot(oto[9]);aa[t]=-80000000;
+                          }
+                        }}}}
+
+                      break;
+
+                      //毒キノコ
+                case 102:
+                      azimentype[t]=1;
+                      xx[10]=100;
+                      if (axtype[t]==1)xx[10]=200;
+                      break;
+
+                      //悪スター
+                case 110:
+                      azimentype[t]=1;
+                      xx[10]=200;
+                      if (axzimen[t]==1){
+                        ab[t]-=1200;ad[t]=-1400;
+                      }
+                      break;
+
+
+                case 200:
+                      azimentype[t]=1;
+                      xx[10]=100;
+                      break;
+
+                      /*
+                         case 1:
+                         xx[10]=180;
+                         if (axtype[t]==2)xx[10]=0;
+                         if (axzimen[t]==1){
+                         ab[t]-=1000;ad[t]=-1200;
+                         if (axtype[t]==1)ad[t]=-1600;
+                         if (axtype[t]==2){
+                         atm[t]+=1;
+                         if (atm[t]>=2){atm[t]=0;ad[t]=-1600;}else{ad[t]=-1000;}
+                         }
+                         }
+
+                         break;
+
+                         case 2:
+                         xx[10]=160;
+                         if (axtype[t]==1)azimentype[t]=2;xx[10]=100;
+                         if (axtype[t]==2)xx[10]=0;
+                         break;
+
+                         case 3:
+                         xx[10]=180;
+                         if (ae[t]==0)ad[t]+=10;
+                         if (ae[t]==1)ad[t]-=10;
+                         if (ad[t]>=100)ae[t]=1;
+                         if (ad[t]<=-100)ae[t]=0;
+                         ab[t]+=ad[t];//ad[t]+=
+
+                         if (axtype[t]==1){
+                         if (ab[t]<mb){ab[t]+=100;}
+                         }
+                         if (axtype[t]==2)xx[10]=0;
+                         break;
+
+                         case 4:
+                         if (ae[t]==0)ad[t]+=8;
+                         if (ae[t]==1)ad[t]-=8;
+                         if (ad[t]>=80)ae[t]=1;
+                         if (ad[t]<=-80)ae[t]=0;
+                         ab[t]+=ad[t];
+
+                      //sstr=""+atm[t];
+                      if (axtype[t]>=1){
+                      xx[22]=200;xx[21]=3600;
+
+                      if (atm[t]==0){atm[t]=ab[t]%2+1;a2tm[t]=aa[t];if (axtype[t]%2==0)a2tm[t]=ab[t];}
+
+                      if (axtype[t]%2==1){
+                      if (aa[t]<a2tm[t]-xx[21]){atm[t]=2;}
+                      if (aa[t]>a2tm[t]+xx[21]){atm[t]=1;}
+                      if (atm[t]==1){aa[t]-=xx[22];amuki[t]=0;}
+                      if (atm[t]==2){aa[t]+=xx[22];amuki[t]=1;}
+                      }
+                      if (axtype[t]%2==0){
+                      if (ab[t]<a2tm[t]-xx[21]){atm[t]=2;}
+                      if (ab[t]>a2tm[t]+xx[21]){atm[t]=1;}
+                      if (atm[t]==1){ab[t]-=xx[22];}
+                      if (atm[t]==2){ab[t]+=xx[22];}
+                      }
+
+                      }//axtype1
+
+                      break;
+
+                      case 5:
+                      xx[10]=120;atm[t]++;
+                      if (axtype[t]==2){xx[10]=200;azimentype[t]=2;}
+                      if (ma+mnobia>=aa[t]-fx && ma<=aa[t]+anobia[t]-fx && mb+mnobib+1000<ab[t]-fy){
+                      xx[10]=300;
+                      if (axtype[t]>=1){
+                      //xx[10]=240;
+                      if (atm[t]>=16){amuki[t]+=1;if (amuki[t]>=2)amuki[t]=0;atm[t]=0;
+                        //if (axtype[t]==2){ab[t]-=600;ad[t]=-900;}
+                      }}
+              }
+              break;
+
+                case 6:
+              atm[t]+=1;xx[10]=0;
+              if (axtype[t]==1)atm[t]+=(rand(9)-4);
+              if (axtype[t]==2)xx[10]=100;
+              if (atm[t]>=40){
+                xx[22]=360;if (amuki[t]==0)xx[22]=-xx[22];
+                cyobi(aa[t]+amuki[t]*anobia[t],ab[t]+1600,xx[22],0,0,0,0,60);
+                atm[t]=0;
+              }
+
+              if (axtype[t]!=2){
+                if (ma+mnobia/2<=aa[t]+anobia[t]/2-fx){amuki[t]=0;}else{amuki[t]=1;}
+              }
+              break;
+
+
+                case 7:
+              xx[10]=160;
+              if (axtype[t]==1)xx[10]=240;
+              if (axtype[t]==2)xx[10]=60;
+              break;
+
+                case 8:
+              atm[t]+=1;xx[10]=0;
+              xx[15]=12;xx[17]=0;
+              if (axtype[t]==1)xx[15]=8;
+              if (axtype[t]==2){xx[15]=40;xx[17]=3;}
+
+              if (atm[t]>=xx[15]){
+                for (t3=0;t3<=xx[17];t3++){
+                  xx[16]=300;xx[22]=rand(xx[16])*5/4-xx[16]/4;
+                  a2tm[t]+=1;if (a2tm[t]>=1){xx[22]=-xx[22];a2tm[t]=-1;}
+                  cyobi(aa[t]+amuki[t]*anobia[t]/2,ab[t]+600,xx[22],-400-rand(600),0,80,1,60);
+                  //if ((xx[16]==0) || t3==xx[16])atm[t]=0;
+                }//t
+                atm[t]=0;
+              }
+
+              break;
+
+
+              */
+
+
+              }//sw
+
+
+              if (abrocktm[t]>=1)xx[10]=0;
+
+
+
+              if (amuki[t]==0)aacta[t]-=xx[10];
+              if (amuki[t]==1)aacta[t]+=xx[10];
+
+
+
+              //最大値
+              xx[0]=850;xx[1]=1200;
+
+              //if (mc>xx[0]){mc=xx[0];}
+              //if (mc<-xx[0]){mc=-xx[0];}
+              if (ad[t]>xx[1] && azimentype[t]!=5){ad[t]=xx[1];}
+
+
+              //行動
+              aa[t]+=aacta[t];//ab[t]+=aactb[t];
+
+
+
+
+
+
+              if ((azimentype[t]>=1 || azimentype[t]==-1) && abrocktm[t]<=0){
+                //if (atype[t]==4)end();
+
+                //移動
+                aa[t]+=ac[t];
+                if (azimentype[t]>=1 && azimentype[t]<=3){ab[t]+=ad[t];ad[t]+=120;}//ad[t]+=180;
+
+
+                if (axzimen[t]==1){
+                  xx[0]=100;
+                  if (ac[t]>=200){ac[t]-=xx[0];}
+                  else if (ac[t]<=-200){ac[t]+=xx[0];}
+                  else {ac[t]=0;}
+                }
+
+                axzimen[t]=0;
+
+
+
+
+                //地面判定
+                if (azimentype[t]!=2){
+                  tekizimen();
+                }
+
+
+
+              }//azimentype[t]>=1
+
+              //ブロックから出現するさい
+              if (abrocktm[t]>0){
+                abrocktm[t]--;
+                if (abrocktm[t]<100){ab[t]-=180;}
+                if (abrocktm[t]>100){}
+                if (abrocktm[t]==100){ab[t]-=800;ad[t]=-1200;ac[t]=700;abrocktm[t]=0;}
+              }//abrocktm[t]>0
+
+
+
+
+
+              //プレイヤーからの判定
+              xx[0]=250;xx[1]=1600;xx[2]=1000;
+              xx[4]=500;xx[5]=-800;
+
+              xx[8]=aa[t]-fx;xx[9]=ab[t]-fy;
+              xx[12]=0;if (md>=100)xx[12]=md;
+              xx[25]=0;
+
+              if (ma+mnobia>xx[8]+xx[0]*2 && ma<xx[8]+anobia[t]-xx[0]*2 && mb+mnobib>xx[9]-xx[5] && mb+mnobib<xx[9]+xx[1]+xx[12] && (mmutekitm<=0 || md>=100) && abrocktm[t]<=0){
+                if (atype[t]!=4 && atype[t]!=9 && atype[t]!=10 && (atype[t]<=78 || atype[t]==85) && mzimen!=1 && mtype!=200){// && atype[t]!=4 && atype[t]!=7){
+
+                  if (atype[t]==0){
+                    if (axtype[t]==0)
+                      aa[t]=-900000;
+                    if (axtype[t]==1){ot(oto[5]);
+                      mb=xx[9]-900-anobib[t];md=-2100;xx[25]=1;actaon[2]=0;
+                    }
+                  }
+
+                  if (atype[t]==1){
+                    atype[t]=2;anobib[t]=3000;axtype[t]=0;
+                  }
+
+                  //こうら
+                  else if (atype[t]==2 && md>=0){
+                    if (axtype[t]==1 || axtype[t]==2){axtype[t]=0;}
+                    else if (axtype[t]==0){
+                      if (ma+mnobia>xx[8]+xx[0]*2 && ma<xx[8]+anobia[t]/2-xx[0]*4){
+                        axtype[t]=1;amuki[t]=1;
+                      }else{axtype[t]=1;amuki[t]=0;}}
+                  }
+                  if (atype[t]==3){
+                    xx[25]=1;
+                  }
+
+                  if (atype[t]==6){
+                    atm[t]=10;md=0;actaon[2]=0;
+                  }
+
+                  if (atype[t]==7){
+                    aa[t]=-900000;
+                  }
+
+                  if (atype[t]==8){
+                    atype[t]=151;ad[t]=0;
+                  }
+
+                  //if (atype[t]==4){
+                  //xx[25]=1;
+                  //}
+
+                  if (atype[t]!=85){
+                    if (xx[25]==0){ot(oto[5]);mb=xx[9]-1000-anobib[t];md=-1000;}
+                  }
+                  if (atype[t]==85){
+                    if (xx[25]==0){ot(oto[5]);mb=xx[9]-4000;md=-1000;axtype[t]=5;}
+                  }
+
+                  if (actaon[2]==1){md=-1600;actaon[2]=0;}
+                }
+                //if (atype[t]==200){mb=xx[9]-900-anobib[t];md=-2400;}
+                }
+
+                //if (aa[t]+anobia[t]-fx>xx[8]-xx[0] && aa[t]-fx<xx[8]){md=-1000;}//aa[t]=-9000000;
+                // && ab[t]-fy<xx[9]+xx[1]/2 && ab[t]+anobib[t]-fy>xx[9]+mnobib-xx[2]
+
+                xx[15]=-500;
+
+
+                //プレイヤーに触れた時
+                xx[16]=0;
+                if (atype[t]==4 || atype[t]==9 || atype[t]==10)xx[16]=-3000;
+                if (atype[t]==82 || atype[t]==83 || atype[t]==84)xx[16]=-3200;
+                if (atype[t]==85)xx[16]=-anobib[t]+6000;
+                if (ma+mnobia>xx[8]+xx[4] && ma<xx[8]+anobia[t]-xx[4] && mb<xx[9]+anobib[t]+xx[15] && mb+mnobib>xx[9]+anobib[t]-xx[0]+xx[16] && anotm[t]<=0 && abrocktm[t]<=0){
+                  if (mmutekion==1){aa[t]=-9000000;}
+                  if (mmutekitm<=0 && (atype[t]<=99 || atype[t]>=200)){
+                    if (mmutekion!=1 && mtype!=200){
+                      //if (mmutekitm<=0)
+
+                      //ダメージ
+                      if ((atype[t]!=2 || axtype[t]!=0) && mhp>=1){
+                        if (atype[t]!=6){
+                          mhp-=1;
+                          //mmutekitm=40;
+                        }}
+
+
+
+                      if (atype[t]==6){
+                        atm[t]=10;
+                      }
+
+
+                      //せりふ
+                      if (mhp==0){
+
+                        if (atype[t]==0 || atype[t]==7){
+                          amsgtm[t]=60;amsgtype[t]=rand(7)+1+1000+(stb-1)*10;
+                        }
+
+                        if (atype[t]==1){
+                          amsgtm[t]=60;amsgtype[t]=rand(2)+15;
+                        }
+
+                        if (atype[t]==2 && axtype[t]>=1 && mmutekitm<=0){
+                          amsgtm[t]=60;amsgtype[t]=18;
+                        }
+
+                        if (atype[t]==3){
+                          amsgtm[t]=60;amsgtype[t]=20;
+                        }
+
+                        if (atype[t]==4){
+                          amsgtm[t]=60;amsgtype[t]=rand(7)+1+1000+(stb-1)*10;
+                        }
+
+                        if (atype[t]==5){
+                          amsgtm[t]=60;amsgtype[t]=21;
+                        }
+
+                        if (atype[t]==9 || atype[t]==10){
+                          mmsgtm=30;mmsgtype=54;
+                        }
+
+
+
+                        if (atype[t]==31){
+                          amsgtm[t]=30;amsgtype[t]=24;
+                        }
+
+
+                        if (atype[t]==80 || atype[t]==81){
+                          amsgtm[t]=60;amsgtype[t]=30;
+                        }
+
+                        if (atype[t]==82){
+                          amsgtm[t]=20;amsgtype[t]=rand(1)+31;
+                          xx[24]=900;atype[t]=83;aa[t]-=xx[24]+100;ab[t]-=xx[24]-100*0;
+                        }//82
+
+                        if (atype[t]==84){
+                          mmsgtm=30;mmsgtype=50;
+                        }
+
+                        if (atype[t]==85){
+                          amsgtm[t]=60;amsgtype[t]=rand(1)+85;
+                        }
+
+
+                        //雲
+                        if (atype[t]==80){
+                          atype[t]=81;
+                        }
+
+
+                      }//mhp==0
+
+
+                      //こうら
+                      if (atype[t]==2){
+                        //if (axtype[t]==1 || axtype[t]==2){axtype[t]=0;}
+                        if (axtype[t]==0){
+                          if (ma+mnobia>xx[8]+xx[0]*2 && ma<xx[8]+anobia[t]/2-xx[0]*4){
+                            axtype[t]=1;amuki[t]=1;aa[t]=ma+mnobia+fx+mc;mmutekitm=5;
+                          }else{
+                            axtype[t]=1;amuki[t]=0;aa[t]=ma-anobia[t]+fx-mc;mmutekitm=5;
+                          }}else{mhp-=1;}//mmutekitm=40;}
+                    }
+
+
+                  }}
+                  //else if (mmutekitm>=0 && mmutekitm<=2){mmutekitm+=1;}
+                  //アイテム
+                  if (atype[t]>=100 && atype[t]<=199){
+
+                    if (atype[t]==100 && axtype[t]==0){mmsgtm=30;mmsgtype=1;ot(oto[9]);}
+                    if (atype[t]==100 && axtype[t]==1){mmsgtm=30;mmsgtype=2;ot(oto[9]);}
+                    if (atype[t]==100 && axtype[t]==2){mnobia=5200;mnobib=7300;ot(oto[9]);ma-=1100;mb-=4000;mtype=1;mhp=50000000;}
+
+                    if (atype[t]==101){mhp-=1;mmsgtm=30;mmsgtype=11;}
+                    if (atype[t]==102){mhp-=1;mmsgtm=30;mmsgtype=10;}
+
+
+                    //?ボール
+                    if (atype[t]==105){
+                      if (axtype[t]==0){
+                        ot(oto[4]);sgtype[26]=6;
+                      }
+                      if (axtype[t]==1){
+                        txtype[7]=80;
+                        ot(oto[4]);
+
+                        //ayobi(aa[t]-6*3000+1000,-3*3000,0,0,0,110,0);
+                        ayobi(aa[t]-8*3000-1000,-4*3000,0,0,0,110,0);
+                        ayobi(aa[t]-10*3000+1000,-1*3000,0,0,0,110,0);
+
+                        ayobi(aa[t]+4*3000+1000,-2*3000,0,0,0,110,0);
+                        ayobi(aa[t]+5*3000-1000,-3*3000,0,0,0,110,0);
+                        ayobi(aa[t]+6*3000+1000,-4*3000,0,0,0,110,0);
+                        ayobi(aa[t]+7*3000-1000,-2*3000,0,0,0,110,0);
+                        ayobi(aa[t]+8*3000+1000,-2*3000-1000,0,0,0,110,0);
+                        tb[0]+=3000*3;
+                      }
+                    }//105
+
+
+
+                    if (atype[t]==110){mhp-=1;mmsgtm=30;mmsgtype=3;}
+
+                    /*
+                       if (atype[t]==101){mmutekitm=120;mmutekion=1;}
+                       if (atype[t]==102){mhp-=1;mmutekitm=20;}
+                       if (atype[t]==103){
+                    //xx[24]=2400;
+                    eyobi(aa[t]-500,ab[t],0,-600,0,80,2500,1600,2,32);
+                    }
+                    if (atype[t]==104){mztm=120;mztype=1;}
+                    if (atype[t]==105){mztm=160;mztype=2;}
+
+                    if (atype[t]==120){mtype=3;mnobia=3800;mnobib=2300;}
+
+
+                    if (atype[t]==130){msoubi=1;}
+                    if (atype[t]==131){msoubi=2;}
+                    if (atype[t]==132){msoubi=3;}
+                    if (atype[t]==133){msoubi=4;}
+
+*/
+                    aa[t]=-90000000;
+                  }
+
+              }//(ma
+
+
+
+
+
+
+            }
+        else{aa[t]=-9000000;}
+
+      }//t
+
+
+
+
+
+
+
+      //スクロール
+      //xx[0]=xx[0];
+      //x
+      if (kscroll!=1 && kscroll!=2){
+        xx[2]=mascrollmax;xx[3]=0;
+        xx[1]=xx[2];if (ma>xx[1] && fzx<scrollx){xx[5]=ma-xx[1];ma=xx[1];fx+=xx[5];fzx+=xx[5];if (xx[1]<=5000)xx[3]=1;}
+        //if (kscroll!=5){//戻りなし
+        //xx[1]=xx[2]-500;if (ma<xx[1] && fzx>700){xx[5]=xx[1]-ma;ma=xx[1];fx-=xx[5];fzx-=xx[5];}
+        //}
+        //if (xx[3]==1){if (tyuukan==1)tyuukan=1;}
+      }//kscroll
+
+
+
+
+
+      }//if (main==1){
+
+
+      //スタッフロール
+      if (main==2){
+        maintm++;
+
+        xx[7]=46;
+        if (CheckHitKey(KEY_INPUT_1)==1){end();}
+        if (CheckHitKey(KEY_INPUT_SPACE)==1){for (t=0;t<=xx[7];t+=1){xx[12+t]-=300;}}
+
+        if (maintm<=1){
+          maintm=2;bgmchange(oto[106]);PlaySoundMem(oto[0],DX_PLAYTYPE_LOOP);xx[10]=0;
+          for (t=0;t<=xx[7];t+=1){xx[12+t]=980000;}
+          //for (t=0;t<=xx[7];t+=2){xx[12+t]=46000;}
+          xx[12]=460;
+          xx[13]=540;xx[14]=590;
+          xx[15]=650;xx[16]=700;
+          xx[17]=760;xx[18]=810;
+          xx[19]=870;xx[20]=920;
+
+          xx[21]=1000;xx[22]=1050;xx[23]=1100;
+          xx[24]=1180;xx[25]=1230;
+
+          xx[26]=1360;xx[27]=1410;
+          xx[28]=1540;xx[29]=1590;
+
+          xx[30]=1800;
+
+          for (t=0;t<=xx[7];t+=1){xx[12+t]*=100;}
+        }
+
+        xx[10]+=1;
+        for (t=0;t<=xx[7];t+=1){xx[12+t]-=100;}//t
+
+        if (xx[30]==-200){bgmchange(oto[106]);}
+        if (xx[30]<=-400){main=100;nokori=2;maintm=0;ending=0;}
+
+      }//main==2
+
+
+      if (main==10){
+        maintm++;
+
+        if (fast==1)maintm+=2;
+        if (maintm>=30){maintm=0;main=1;zxon=0;}
+      }//if (main==10){
+
+
+      //タイトル
+      if (main==100){
+        maintm++;xx[0]=0;
+        if (maintm<=10){maintm=11;sta=1;stb=1;stc=0;over=0;}
+
+        if (CheckHitKey(KEY_INPUT_1)==1){sta=1;stb=1;stc=0;}
+        if (CheckHitKey(KEY_INPUT_2)==1){sta=1;stb=2;stc=0;}
+        if (CheckHitKey(KEY_INPUT_3)==1){sta=1;stb=3;stc=0;}
+        if (CheckHitKey(KEY_INPUT_4)==1){sta=1;stb=4;stc=0;}
+        if (CheckHitKey(KEY_INPUT_5)==1){sta=2;stb=1;stc=0;}
+        if (CheckHitKey(KEY_INPUT_6)==1){sta=2;stb=2;stc=0;}
+        if (CheckHitKey(KEY_INPUT_7)==1){sta=2;stb=3;stc=0;}
+        if (CheckHitKey(KEY_INPUT_8)==1){sta=2;stb=4;stc=0;}
+        //if (CheckHitKey(KEY_INPUT_9)==1){sta=3;stb=1;stc=0;}
+        if (CheckHitKey(KEY_INPUT_0)==1){xx[0]=1;over=1;}
+
+
+        //if (CheckHitKeyAll() == 0){end();}
+        if (CheckHitKey(KEY_INPUT_RETURN)==1){xx[0]=1;}
+        //if (CheckHitKey(KEY_INPUT_SPACE)==1){xx[0]=1;}
+        if (CheckHitKey(KEY_INPUT_Z)==1){xx[0]=1;}
+
+        if (xx[0]==1){
+          main=10;zxon=0;maintm=0;
+          nokori=2;
+
+          fast=0;trap=0;tyuukan=0;
+        }
+
+      }//100
+
+
+
+      //描画
+      rpaint();
+
+
+      //30-fps
+      xx[0]=30;
+      if (CheckHitKey(KEY_INPUT_SPACE)==1){xx[0]=60;}
+      wait2(stime,long(GetNowCount()),1000/xx[0]);
+      //wait(20);
+
+      }//Mainprogram()
+
+
+      void tekizimen(){
+
+        //壁
+        for (tt=0;tt<smax;tt++){
+          if (sa[tt]-fx+sc[tt]>=-12010 && sa[tt]-fx<=fxmax+12100 && stype[tt]<=99){
+            xx[0]=200;xx[2]=1000;
+            xx[1]=2000;//anobia[t]
+
+            xx[8]=sa[tt]-fx;xx[9]=sb[tt]-fy;
+            if (aa[t]+anobia[t]-fx>xx[8]-xx[0] && aa[t]-fx<xx[8]+xx[2] && ab[t]+anobib[t]-fy>xx[9]+xx[1]*3/4 && ab[t]-fy<xx[9]+sd[tt]-xx[2]){aa[t]=xx[8]-xx[0]-anobia[t]+fx;amuki[t]=0;}
+            if (aa[t]+anobia[t]-fx>xx[8]+sc[tt]-xx[0] && aa[t]-fx<xx[8]+sc[tt]+xx[0] && ab[t]+anobib[t]-fy>xx[9]+xx[1]*3/4 && ab[t]-fy<xx[9]+sd[tt]-xx[2]){aa[t]=xx[8]+sc[tt]+xx[0]+fx;amuki[t]=1;}
+
+            //if (aa[t]+anobia[t]-fx>xx[8]+xx[0] && aa[t]-fx<xx[8]+sc[tt]-xx[0] && ab[t]+anobib[t]-fy>xx[9] && ab[t]+anobib[t]-fy<xx[9]+xx[1] && ad[t]>=-100){ab[t]=sb[tt]-fy-anobib[t]+100+fy;ad[t]=0;}//mzimen=1;}
+            if (aa[t]+anobia[t]-fx>xx[8]+xx[0] && aa[t]-fx<xx[8]+sc[tt]-xx[0] && ab[t]+anobib[t]-fy>xx[9] && ab[t]+anobib[t]-fy<xx[9]+sd[tt]-xx[1] && ad[t]>=-100){ab[t]=sb[tt]-fy-anobib[t]+100+fy;ad[t]=0;axzimen[t]=1;}
+
+            if (aa[t]+anobia[t]-fx>xx[8]+xx[0] && aa[t]-fx<xx[8]+sc[tt]-xx[0] && ab[t]-fy>xx[9]+sd[tt]-xx[1] && ab[t]-fy<xx[9]+sd[tt]+xx[0]){
+              ab[t]=xx[9]+sd[tt]+xx[0]+fy;if (ad[t]<0){ad[t]=-ad[t]*2/3;}//axzimen[t]=1;
+            }
+
+        }}
+
+
+
+
+
+
+      //ブロック
+      for (tt=0;tt<tmax;tt++){
+        xx[0]=200;xx[1]=3000;xx[2]=1000;
+        xx[8]=ta[tt]-fx;xx[9]=tb[tt]-fy;
+        if (ta[tt]-fx+xx[1]>=-12010 && ta[tt]-fx<=fxmax+12000){
+          if (atype[t]!=86 && atype[t]!=90 && ttype[tt]!=140){
+
+            //上
+            if (ttype[tt]!=7){
+              //if (ttype[tt]==117 && txtype[t]==1){ad[t]=-1500;}
+              if (!(ttype[tt]==117)){
+                //if (!(ttype[tt]==120 && txtype[t]==0)){
+                if (aa[t]+anobia[t]-fx>xx[8]+xx[0] && aa[t]-fx<xx[8]+xx[1]-xx[0]*1 && ab[t]+anobib[t]-fy>xx[9] && ab[t]+anobib[t]-fy<xx[9]+xx[1] && ad[t]>=-100){
+                  ab[t]=xx[9]-anobib[t]+100+fy;ad[t]=0;axzimen[t]=1;
+                  //ジャンプ台
+                  if (ttype[tt]==120){ad[t]=-1600;azimentype[t]=30;}
+                  //}
+
+              }
+              }}
+
+
+            //下
+            if (ttype[tt]!=117){
+              if (aa[t]+anobia[t]-fx>xx[8]+xx[0] && aa[t]-fx<xx[8]+xx[1]-xx[0]*1 && ab[t]-fy>xx[9]+xx[1]-xx[1] && ab[t]-fy<xx[9]+xx[1]+xx[0]){
+                ab[t]=xx[9]+xx[1]+xx[0]+fy;if (ad[t]<0){ad[t]=0;}//=-ad[t]*2/3;}
+              //if (ttype[t]==7){
+              //for (t2=0;t2<tmax;t2++){if (ttype[t2]==5){ttype[t2]=6;}else if (ttype[t2]==6){ttype[t2]=5;}}
+              //}
+            }}
+
+            //左右
+            xx[27]=0;
+            if ((atype[t]>=100 || (ttype[tt]!=7 || ttype[tt]==7 && atype[t]==2)) && ttype[tt]!=117){
+              if (aa[t]+anobia[t]-fx>xx[8] && aa[t]-fx<xx[8]+xx[2] && ab[t]+anobib[t]-fy>xx[9]+xx[1]/2-xx[0] && ab[t]-fy<xx[9]+xx[2]){aa[t]=xx[8]-anobia[t]+fx;ac[t]=0;amuki[t]=0;xx[27]=1;}
+              if (aa[t]+anobia[t]-fx>xx[8]+xx[1]-xx[0]*2 && aa[t]-fx<xx[8]+xx[1] && ab[t]+anobib[t]-fy>xx[9]+xx[1]/2-xx[0] && ab[t]-fy<xx[9]+xx[2]){aa[t]=xx[8]+xx[1]+fx;ac[t]=0;amuki[t]=1;xx[27]=1;}
+              //こうらブレイク
+              if (xx[27]==1 && (ttype[tt]==7 || ttype[tt]==1) && atype[t]==2){
+                if (ttype[tt]==7){
+                  ot(oto[4]);ttype[tt]=3;
+                  eyobi(ta[tt]+10,tb[tt],0,-800,0,40,3000,3000,0,16);
+                }
+                else if (ttype[tt]==1){
+                  ot(oto[3]);
+                  eyobi(ta[tt]+1200,tb[tt]+1200,300,-1000,0,160,1000,1000,1,120);
+                  eyobi(ta[tt]+1200,tb[tt]+1200,-300,-1000,0,160,1000,1000,1,120);
+                  eyobi(ta[tt]+1200,tb[tt]+1200,240,-1400,0,160,1000,1000,1,120);
+                  eyobi(ta[tt]+1200,tb[tt]+1200,-240,-1400,0,160,1000,1000,1,120);
+                  brockbreak(tt);
+                }
+
+              }
+            }}
+            if (atype[t]==86 || atype[t]==90){
+              if (aa[t]+anobia[t]-fx>xx[8] && aa[t]-fx<xx[8]+xx[1] && ab[t]+anobib[t]-fy>xx[9] && ab[t]-fy<xx[9]+xx[1]){
+                ot(oto[3]);
+                eyobi(ta[tt]+1200,tb[tt]+1200,300,-1000,0,160,1000,1000,1,120);
+                eyobi(ta[tt]+1200,tb[tt]+1200,-300,-1000,0,160,1000,1000,1,120);
+                eyobi(ta[tt]+1200,tb[tt]+1200,240,-1400,0,160,1000,1000,1,120);
+                eyobi(ta[tt]+1200,tb[tt]+1200,-240,-1400,0,160,1000,1000,1,120);
+                brockbreak(tt);
+
+              }
+            }//90
+
+
+      }
+      //剣とってクリア
+      if (ttype[tt]==140){
+        if (ab[t]-fy>xx[9]-xx[0]*2-2000 && ab[t]-fy<xx[9]+xx[1]-xx[0]*2+2000 && aa[t]+anobia[t]-fx>xx[8]-400 && aa[t]-fx<xx[8]+xx[1]){
+          ta[tt]=-800000;//ot(oto[4]);
+          sracttype[20]=1;sron[20]=1;
+        }}
+      }//tt
+
+      }//tekizimen
+
+
+
+      //スリープ
+      static void wait(int interval){
+        WaitTimer(interval) ;
+      }
+
+      //タイマー測定
+      static void wait2(long stime, long etime,int FLAME_TIME){
+        if (etime-stime<FLAME_TIME)
+          wait(FLAME_TIME-(etime-stime));
+      }
+
+
+      //乱数作成
+      static int rand(int Rand){
+        return GetRand(Rand);
+      }
+
+      //終了
+      void end(){
+        //maint=3;
+        DxLib_End() ;
+      }
+
+
+      //画像関係
+      //{
+      //色かえ(指定)
+      void setcolor(int red, int green, int blue){
+        color=GetColor(red,green,blue) ;
+      }
+      //色かえ(黒)(白)
+      void setc0(){color=GetColor(0,0,0);}
+      void setc1(){color=GetColor(255,255,255);}
+
+      //点
+      void drawpixel(int a,int b){DrawPixel(a,b,color);}
+      //線
+      void drawline(int a,int b,int c,int d){DrawLine(a,b,c,d,color);}
+      //四角形(塗り無し)
+      void drawrect(int a,int b,int c,int d){DrawBox(a,b,a+c,b+d,color,FALSE);}
+      //四角形(塗り有り)
+      void fillrect(int a,int b,int c,int d){DrawBox(a,b,a+c,b+d,color,TRUE);}
+      //円(塗り無し)
+      void drawarc(int a,int b,int c,int d){DrawOval(a,b,c,d,color,FALSE);}
+      //円(塗り有り)
+      void fillarc(int a,int b,int c,int d){DrawOval(a,b,c,d,color,TRUE);}
+
+      //画像の読み込み
+      int loadimage(string x){
+        //mgrap[a]=LoadGraph(b);
+        return LoadGraph(x.c_str());
+      }
+      int loadimage(int a,int x,int y,int r,int z){
+        return DerivationGraph(x,y,r,z,a);
+      }
+
+      //画像表示
+      void drawimage(int mx,int a,int b){
+        if (mirror==0)
+          DrawGraph(a,b,mx,TRUE);
+        if (mirror==1)
+          DrawTurnGraph(a,b,mx,TRUE);
+      }
+      void drawimage(int mx,int a,int b,int c,int d,int e,int f){
+        int m;
+        m=DerivationGraph(c,d,e,f,mx);
+        if (mirror==0)
+          DrawGraph(a,b,m,TRUE);
+        if (mirror==1)
+          DrawTurnGraph(a,b,m,TRUE);
+      }
+
+      //反転
+      void setre(){}//g.setFlipMode(Graphics.FLIP_HORIZONTAL);}
+      void setre2(){}//g.setFlipMode(Graphics.FLIP_VERTICAL);}
+      void setno(){}//g.setFlipMode(Graphics.FLIP_NONE);}
+
+      /*
+      //文字
+      void str(char d[],int a,int b){
+      //char d[]=c;
+      DrawString(a,b,d,color);
+      }
+      */
+
+      //文字
+      void str(string x,int a,int b){
+        //char d[]="あ";
+        DrawString(a,b,x.c_str(),color);
+        //DrawString(10,10,xs[3].c_str(),color);
+
+        xx[2]=4;
+
+
+      }
+
+      /*
+      //数値を文字に変換
+      void strchange(string x,int a){
+      }
+      */
+
+      /*
+      //中央にあわせる//(font)
+      void str1(String c,int r,int b){
+      int a=0,x=0;
+      int d=6;
+
+//x=c.length()*d;//tiny.6
+x=r*d;
+a=120-x/2;
+
+g.drawString(c,a,b);
+}
+*/
+
+
+//string→int
+/*
+   char str[] = "12345";
+   int num;
+
+   num = atoi(str);
+   */
+
+
+//文字ラベル変更
+void setfont(int a){
+  /*
+     if (a==0)g.setFont(Font.getFont(Font.SIZE_TINY));
+     if (a==1)g.setFont(Font.getFont(Font.SIZE_SMALL));
+     if (a==2)g.setFont(Font.getFont(Font.SIZE_MEDIUM));
+     if (a==3)g.setFont(Font.getFont(Font.SIZE_LARGE));
+     */
+}
+
+//音楽再生
+void ot(int x){
+  PlaySoundMem(x, DX_PLAYTYPE_BACK) ;
+}
+
+
+
+void stagecls(){
+  for (t=0;t<smax;t++){sa[t]=-9000000;sb[t]=1;sc[t]=1;sd[t]=1;sgtype[t]=0;stype[t]=0;sxtype[t]=0;}
+  //for (t=0;t<spmax;t++){spa[t]=-9000000;szyunni[t]=t;spb[t]=1;spc[t]=1;spd[t]=1;sptype[t]=0;spgtype[t]=0;}
+  for (t=0;t<tmax;t++){ta[t]=-9000000;tb[t]=1;tc[t]=1;td[t]=1;titem[t]=0;txtype[t]=0;}
+  for (t=0;t<srmax;t++){sra[t]=-9000000;srb[t]=1;src[t]=1;srd[t]=1;sre[t]=0;srf[t]=0;srmuki[t]=0;sron[t]=0;sree[t]=0;srsok[t]=0;srmove[t]=0;srmovep[t]=0;srsp[t]=0;}
+  //for (t=0;t<sqmax;t++){sqa[t]=-9000000;sqb[t]=1;sqc[t]=1;sqd[t]=1;sqgtype[t]=0;sqtype[t]=0;}
+  //for (t=0;t<kmax;t++){ka[t]=-9000000;kmuki[t]=0;ksoka[t]=0;ksokb[t]=0;kxsoka[t]=0;kxsokb[t]=0;}
+  //for (t=0;t<imax;t++){ia[t]=-9000000;ib[t]=1;ic[t]=1;id[t]=1;}
+  for (t=0;t<amax;t++){aa[t]=-9000000;ab[t]=1;ac[t]=0;ad[t]=1;azimentype[t]=0;atype[t]=0;axtype[t]=0;ae[t]=0;af[t]=0;atm[t]=0;a2tm[t]=0;abrocktm[t]=0;amsgtm[t]=0;}
+  for (t=0;t<bmax;t++){ba[t]=-9000000;bb[t]=1;bz[t]=1;btm[t]=0;bxtype[t]=0;}
+  for (t=0;t<emax;t++){ea[t]=-9000000;eb[t]=1;ec[t]=1;ed[t]=1;egtype[t]=0;}
+  for (t=0;t<nmax;t++){na[t]=-9000000;nb[t]=1;nc[t]=1;nd[t]=1;ne[t]=1;nf[t]=1;ng[t]=0;ntype[t]=0;}
+  //for (t=0;t<cmax;t++){ca[t]=-9000000;cb[t]=1;contm[t]=0;ctype[t]=0;ce[t]=0;cf[t]=0;}
+  //for (t=0;t<vmax;t++){va[t]=-9000000;vtype[t]=0;vb[t]=0;vc[t]=1;vd[t]=1;}
+  //for (t=0;t<gmax;t++){ga[t]=-9000000;gx[t]=0;gstring[t]="";}
+
+  sco=0;tco=0;aco=0;bco=0;eco=0;nco=0;
+  //haikeitouroku();
+}//stagecls()
+
+
+
+
+//ステージロード
+void stage(){
+
+  //fzx=6000*100;
+  scrollx=3600*100;
+
+  //byte stagedate[16][801];
+  //byte stagedate2[16][801];
+
+
+  //1-レンガ,2-コイン,3-空,4-土台//5-6地面//7-隠し//
+
+
+
+
+  stagep();
+
+
+
+
+  for (tt=0;tt<=1000;tt++){
+    for (t=0;t<=16;t++){
+      xx[10]=0;
+      if (stagedate[t][tt]>=1 && stagedate[t][tt]<=255)xx[10]=(int)stagedate[t][tt];
+      xx[21]=tt*29;xx[22]=t*29-12;xx[23]=xx[10];
+      if (xx[10]>=1 && xx[10]<=19 && xx[10]!=9){tyobi(tt*29,t*29-12,xx[10]);}
+      if (xx[10]>=20 && xx[10]<=29){sra[srco]=xx[21]*100;srb[srco]=xx[22]*100;src[srco]=3000;srtype[srco]=0;srco++;if (srco>=srmax)srco=0;}
+      if (xx[10]==30){sa[sco]=xx[21]*100;sb[sco]=xx[22]*100;sc[sco]=3000;sd[sco]=6000;stype[sco]=500;sco++;if (sco>=smax)sco=0;}
+      if (xx[10]==40){sa[sco]=xx[21]*100;sb[sco]=xx[22]*100;sc[sco]=6000;sd[sco]=3000;stype[sco]=1;sco++;if (sco>=smax)sco=0;}
+      if (xx[10]==41){sa[sco]=xx[21]*100+500;sb[sco]=xx[22]*100;sc[sco]=5000;sd[sco]=3000;stype[sco]=2;sco++;if (sco>=smax)sco=0;}
+
+      if (xx[10]==43){sa[sco]=xx[21]*100;sb[sco]=xx[22]*100+500;sc[sco]=2900;sd[sco]=5300;stype[sco]=1;sco++;if (sco>=smax)sco=0;}
+      if (xx[10]==44){sa[sco]=xx[21]*100;sb[sco]=xx[22]*100+700;sc[sco]=3900;sd[sco]=5000;stype[sco]=5;sco++;if (sco>=smax)sco=0;}
+
+      //これなぜかバグの原因ｗ
+      if (xx[10]>=50 && xx[10]<=79){
+        ba[bco]=xx[21]*100;bb[bco]=xx[22]*100;btype[bco]=xx[23]-50;bco++;if (bco>=bmax)bco=0;
+      }
+
+      if (xx[10]>=80 && xx[10]<=89){na[nco]=xx[21]*100;nb[nco]=xx[22]*100;ntype[nco]=xx[23]-80;nco++;if (nco>=nmax)nco=0;}
+
+      //コイン
+      if (xx[10]==9){tyobi(tt*29,t*29-12,800);}
+      if (xx[10]==99){sa[sco]=xx[21]*100;sb[sco]=xx[22]*100;sc[sco]=3000;sd[sco]=(12-t)*3000;stype[sco]=300;sco++;if (sco>=smax)sco=0;}
+    }}
+
+  if (tyuukan>=1){
+    xx[17]=0;
+    for (t=0;t<smax;t++){
+      if (stype[t]==500 && tyuukan>=1){
+        fx=sa[t]-fxmax/2;fzx=fx;
+        ma=sa[t]-fx;
+        mb=sb[t]-fy;
+        tyuukan--;xx[17]++;
+
+        sa[t]=-80000000;
+      }}
+    tyuukan+=xx[17];
+  }
+  //tyobi(1,2,3);
+
+
+
+}//stage()
+
+
+
+void stagep(){
+
+
+  //ステージロード
+  //void stage(){
+
+
+
+  //fzx=6000*100;
+  scrollx=3600*100;
+
+  //byte stagedate[16][801];
+  //byte stagedate2[16][801];
+
+
+  //1-レンガ,2-コイン,3-空,4-土台//5-6地面//7-隠し//
+
+  //1-1
+  if (sta==1 && stb==1 && stc==0){
+
+    //new byte stagedate[16][801]={
+
+    //                                                                                                                                                                                     中間                                                                                                                                                                                                                                                           
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,98, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,99, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,98, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,98,98,98, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,98, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,98, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0,98, 0, 0, 0, 1,98, 1, 2, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 1,98, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,98, 0, 0, 0, 0, 0, 0, 1,98, 0, 0, 0, 2, 0, 0, 2, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 2, 1, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0,80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0,40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 4, 0, 7, 7, 7, 7, 7,40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,83, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,41, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0,41, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,40, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,50, 0, 0, 0, 0, 0,50, 0, 0,81,41, 0, 0, 0, 0, 0,81,98, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,81, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,50, 0,50, 0, 0,51, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,81, 0, 0, 0, 4, 4, 4, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0,41, 0, 0, 0, 0, 0,50, 0,50, 0, 0,41, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 4,81, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 5, 5, 5, 5, 5, 5, 5} ,
+      { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    } ;
+
+
+    //追加情報
+    tyobi(8*29,9*29-12,100);
+    txtype[tco]=2;
+    tyobi(13*29,9*29-12,102);
+    txtype[tco]=0;
+    tyobi(14*29,5*29-12,101);
+    tyobi(35*29,8*29-12,110);
+    tyobi(47*29,9*29-12,103);
+    tyobi(59*29,9*29-12,112);
+    tyobi(67*29,9*29-12,104);
+
+
+    sco=0;
+    t=sco;sa[t]=20*29*100+500;sb[t]=-6000;sc[t]=5000;sd[t]=70000;stype[t]=100;sco++;
+    t=sco;sa[t]=54*29*100-500;sb[t]=-6000;sc[t]=7000;sd[t]=70000;stype[t]=101;sco++;
+    t=sco;sa[t]=112*29*100+1000;sb[t]=-6000;sc[t]=3000;sd[t]=70000;stype[t]=102;sco++;
+    t=sco;sa[t]=117*29*100;sb[t]=(2*29-12)*100-1500;sc[t]=15000;sd[t]=3000;stype[t]=103;sco++;
+    t=sco;sa[t]=125*29*100;sb[t]=-6000;sc[t]=9000;sd[t]=70000;stype[t]=101;sco++;
+    //t=sco;sa[t]=77*29*100;sb[t]=(6*29-12)*100-1500;sc[t]=12000;sd[t]=3000;stype[t]=103;sco++;
+    t=28;sa[t]=29*29*100+500;sb[t]=(9*29-12)*100;sc[t]=6000;sd[t]=12000-200;stype[t]=50;sco++;
+    t=sco;sa[t]=49*29*100;sb[t]=(5*29-12)*100;sc[t]=9000-1;sd[t]=3000;stype[t]=51;sgtype[t]=0;sco++;
+    t=sco;sa[t]=72*29*100;sb[t]=(13*29-12)*100;sc[t]=3000*5-1;sd[t]=3000;stype[t]=52;sco++;
+
+    bco=0;
+    t=bco;ba[t]=27*29*100;bb[t]=(9*29-12)*100;btype[t]=0;bxtype[t]=0;bco++;
+    t=bco;ba[t]=103*29*100;bb[t]=(5*29-12+10)*100;btype[t]=80;bxtype[t]=0;bco++;
+    //t=bco;ba[t]=13*29*100;bb[t]=(5*29-12)*100;btype[t]=81;bxtype[t]=0;bco++;
+
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }}
+
+  }//sta1
+
+
+  //1-2(地上)
+  if (sta==1 && stb==2 && stc==0){
+
+    //マリ　地上　入れ
+    //StopSoundMem(oto[0]);
+    bgmchange(oto[100]);
+    //PlaySoundMem(oto[0],DX_PLAYTYPE_LOOP) ;
+
+    scrollx=0*100;
+    //ma=3000;mb=3000;
+
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 7},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0,83, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,44, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 5, 5, 5, 5, 5, 5, 5} ,
+      { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    } ;
+
+
+    tco=0;
+    //ヒント1
+    txtype[tco]=1;tyobi(4*29,9*29-12,300);
+    //tyobi(7*29,9*29-12,300);
+
+    //毒1
+    tyobi(13*29,8*29-12,114);
+
+    //t=28;
+    sco=0;
+    t=sco;sa[t]=14*29*100+500;sb[t]=(9*29-12)*100;sc[t]=6000;sd[t]=12000-200;stype[t]=50;sxtype[t]=1;sco++;
+    t=sco;sa[t]=12*29*100;sb[t]=(11*29-12)*100;sc[t]=3000;sd[t]=6000-200;stype[t]=40;sxtype[t]=0;sco++;
+    t=sco;sa[t]=14*29*100+1000;sb[t]=-6000;sc[t]=5000;sd[t]=70000;stype[t]=100;sxtype[t]=1;sco++;
+
+    //ブロックもどき
+    //t=bco;ba[t]=7*29*100;bb[t]=(9*29-12)*100;btype[t]=82;bxtype[t]=0;bco++;
+
+
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }}
+
+  }//sta2
+
+
+  //1-2-1(地下)
+  if (sta==1 && stb==2 && stc==1){
+
+    //マリ　地下　入れ
+    bgmchange(oto[103]);
+
+    scrollx=4080*100;
+    ma=6000;mb=3000;
+    stagecolor=2;
+
+
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 0, 0},
+      { 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 4, 4, 4, 4, 4, 4, 4, 4, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,98, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,97,44, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,54, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 7, 7, 7, 7, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0,98, 2, 2,98, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 7, 7, 7, 7, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,98, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 4, 4, 4, 4, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 4, 0, 4, 0,51, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 1, 1, 4, 4, 4, 4, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 4, 0, 4, 0, 0, 0, 0, 4, 0, 4, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,40, 0, 0, 0, 0, 0, 0,30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 4, 4, 4, 4, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 1, 0, 7, 0, 0, 0, 0, 0, 0, 0,50, 0,50, 0, 4, 0, 4, 0, 4, 0, 4, 0,50, 0, 0, 4, 0, 4, 0, 4, 0, 4, 0, 0, 0, 0,50,50,50, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,41, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 4, 4, 4, 4, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0},
+      { 5, 5, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 0, 0, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0} ,
+      { 6, 6, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 0, 0, 6, 6, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+    };
+    //{ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6, 0, 6, 6, 6, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+
+
+
+    tco=0;
+    txtype[tco]=2;tyobi(7*29,9*29-12,102);
+    tyobi(10*29,9*29-12,101);
+
+    txtype[tco]=2;
+    tyobi(49*29,9*29-12,114);
+
+    for (t=0;t>=-7;t--){
+      tyobi(53*29,t*29-12,1);
+    }
+
+    txtype[tco]=1;tyobi(80*29,5*29-12,104);
+    txtype[tco]=2;tyobi(78*29,5*29-12,102);
+
+
+
+    //txtype[tco]=1;tyobi(11*29,9*29-12,114);//毒1
+
+    sco=0;
+    t=sco;sa[t]=2*29*100;sb[t]=(13*29-12)*100;sc[t]=3000*1-1;sd[t]=3000;stype[t]=52;sco++;
+    //t=sco;sa[t]=19*29*100;sb[t]=(13*29-12)*100;sc[t]=3000*1-1;sd[t]=3000;stype[t]=52;sco++;
+    t=sco;sa[t]=24*29*100;sb[t]=(13*29-12)*100;sc[t]=3000*1-1;sd[t]=3000;stype[t]=52;sco++;
+    t=sco;sa[t]=43*29*100+500;sb[t]=-6000;sc[t]=3000;sd[t]=70000;stype[t]=102;sxtype[t]=1;sco++;
+    t=sco;sa[t]=53*29*100+500;sb[t]=-6000;sc[t]=3000;sd[t]=70000;stype[t]=102;sxtype[t]=2;sco++;
+    t=sco;sa[t]=129*29*100;sb[t]=(7*29-12)*100;sc[t]=3000;sd[t]=6000-200;stype[t]=40;sxtype[t]=2;sco++;
+    t=sco;sa[t]=154*29*100;sb[t]=3000;sc[t]=9000;sd[t]=3000;stype[t]=102;sxtype[t]=7;sco++;
+
+    //ブロックもどき
+
+    t=27;sa[t]=69*29*100;sb[t]=(1*29-12)*100;sc[t]=9000*2-1;sd[t]=3000;stype[t]=51;sxtype[t]=0;sgtype[t]=0;sco++;
+    t=28;sa[t]=66*29*100;sb[t]=(1*29-12)*100;sc[t]=9000-1;sd[t]=3000;stype[t]=51;sxtype[t]=1;sgtype[t]=0;sco++;
+    t=29;sa[t]=66*29*100;sb[t]=(-2*29-12)*100;sc[t]=9000*3-1;sd[t]=3000;stype[t]=51;sxtype[t]=2;sgtype[t]=0;sco++;
+
+    //26 ファイアー土管
+    t=26;sa[t]=103*29*100-1500;sb[t]=(9*29-12)*100-2000;sc[t]=3000;sd[t]=3000;stype[t]=180;sxtype[t]=0;sr[t]=0;sgtype[t]=48;sco++;
+    t=sco;sa[t]=102*29*100;sb[t]=(9*29-12)*100;sc[t]=6000;sd[t]=12000-200;stype[t]=50;sxtype[t]=2;sco++;
+    t=sco;sa[t]=123*29*100;sb[t]=(9*29-12)*100;sc[t]=3000*5-1;sd[t]=3000*5;stype[t]=52;sxtype[t]=1;sco++;
+
+    t=sco;sa[t]=131*29*100;sb[t]=(1*29-12)*100;sc[t]=4700;sd[t]=3000*8-700;stype[t]=1;sxtype[t]=0;sco++;
+
+    //t=sco;sa[t]=44*29*100;sb[t]=-6000;sc[t]=9000;sd[t]=70000;stype[t]=102;sco++;
+
+    //オワタゾーン
+    t=sco;sa[t]=143*29*100;sb[t]=(9*29-12)*100;sc[t]=6000;sd[t]=12000-200;stype[t]=50;sxtype[t]=5;sco++;
+    t=sco;sa[t]=148*29*100;sb[t]=(9*29-12)*100;sc[t]=6000;sd[t]=12000-200;stype[t]=50;sxtype[t]=5;sco++;
+    t=sco;sa[t]=153*29*100;sb[t]=(9*29-12)*100;sc[t]=6000;sd[t]=12000-200;stype[t]=50;sxtype[t]=5;sco++;
+
+
+
+    bco=0;
+    t=bco;ba[t]=18*29*100;bb[t]=(10*29-12)*100;btype[t]=82;bxtype[t]=1;bco++;
+    //t=bco;ba[t]=52*29*100;bb[t]=(2*29-12)*100;btype[t]=82;bxtype[t]=1;bco++;
+    t=bco;ba[t]=51*29*100+1000;bb[t]=(2*29-12+10)*100;btype[t]=80;bxtype[t]=1;bco++;
+
+    //？ボール
+    t=bco;ba[t]=96*29*100+100;bb[t]=(10*29-12)*100;btype[t]=105;bxtype[t]=0;bco++;
+
+
+    //リフト
+    srco=0;
+    t=srco;sra[t]=111*29*100;srb[t]=(8*29-12)*100;src[t]=90*100;srtype[t]=0;sracttype[t]=5;sre[t]=-300;srco++;
+    t=srco;sra[t]=111*29*100;srb[t]=(0*29-12)*100;src[t]=90*100;srtype[t]=0;sracttype[t]=5;sre[t]=-300;srco++;
+    t=10;sra[t]=116*29*100;srb[t]=(4*29-12)*100;src[t]=90*100;srtype[t]=1;sracttype[t]=5;sre[t]=300;srco++;
+    t=11;sra[t]=116*29*100;srb[t]=(12*29-12)*100;src[t]=90*100;srtype[t]=1;sracttype[t]=5;sre[t]=300;srco++;
+
+
+    //ヒント1
+    //tyobi(4*29,9*29-12,300);
+    //tyobi(7*29,9*29-12,300);
+
+    //毒1
+    //tyobi(13*29,8*29-12,114);
+
+    //t=28;
+    //sco=0;
+    //t=sco;
+    //sa[t]=14*29*100+500;sb[t]=(9*29-12)*100;sc[t]=6000;sd[t]=12000-200;stype[t]=50;sxtype[t]=1;sco++;
+
+
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }}
+    //stagedatex[0][0];
+
+  }//sta1-2-1
+
+
+
+
+  //1-2(地上)
+  if (sta==1 && stb==2 && stc==2){
+
+    //マリ　地上　入れ
+    //StopSoundMem(oto[0]);
+    bgmchange(oto[100]);
+    //PlaySoundMem(oto[0],DX_PLAYTYPE_LOOP) ;
+
+    scrollx=900*100;
+    ma=7500;mb=3000*9;
+
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,99, 0, 0, 0, 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,83, 0, 0,},
+      { 0, 0,40, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0,41, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0 ,0, 0, 0, 0, 81,},
+      { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 5, 5, 5, 5, 5, 5, 5} ,
+      { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    } ;
+
+
+    /*
+    //毒1
+    tyobi(13*29,8*29-12,114);
+
+    //t=28;
+    sco=0;
+    t=sco;sa[t]=14*29*100+500;sb[t]=(9*29-12)*100;sc[t]=6000;sd[t]=12000-200;stype[t]=50;sxtype[t]=1;sco++;
+    t=sco;sa[t]=12*29*100;sb[t]=(11*29-12)*100;sc[t]=3000;sd[t]=6000-200;stype[t]=40;sxtype[t]=0;sco++;
+    t=sco;sa[t]=14*29*100+1000;sb[t]=-6000;sc[t]=5000;sd[t]=70000;stype[t]=100;sxtype[t]=1;sco++;
+    */
+
+    t=sco;sa[t]=5*29*100+500;sb[t]=-6000;sc[t]=3000;sd[t]=70000;stype[t]=102;sxtype[t]=8;sco++;
+    //空飛ぶ土管
+    t=28;sa[t]=44*29*100+500;sb[t]=(10*29-12)*100;sc[t]=6000;sd[t]=9000-200;stype[t]=50;sco++;
+
+    //ポールもどき
+    bco=0;
+    t=bco;ba[t]=19*29*100;bb[t]=(2*29-12)*100;btype[t]=85;bxtype[t]=0;bco++;
+
+
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }}
+
+  }//sta2
+
+
+
+  //必要BGM+SE
+
+  //1-3(地上)
+  if (sta==1 && stb==3 && stc==6){stc=0;}
+  if (sta==1 && stb==3 && stc==0){
+
+    //StopSoundMem(oto[0]);
+    bgmchange(oto[100]);
+    //PlaySoundMem(oto[0],DX_PLAYTYPE_LOOP) ;
+
+    scrollx=3900*100;
+    //ma=3000;mb=3000;
+
+    byte stagedatex[17][1001]={//                                                                                                                                                                                     中間                                                                                                                                                                                                                                                           
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,57, 0, 0, 0,84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,54, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,51, 0, 0, 0,84, 0, 0, 0, 0, 0,99, 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 0, 0,57, 0, 0, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,58, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,56, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0,83, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,83, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,30, 0, 0, 0, 0, 0, 0,85,85, 0, 0, 0, 0, 0, 0, 0,97, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0,81, 0, 0, 0, 0, 0, 0, 0, 0, 0,81, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,81, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0,81, 0, 0, 0, 0,50, 0,50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,81, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0} ,
+      { 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 0, 0, 0, 6, 6, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    };
+
+    tco=0;
+    tyobi(22*29,3*29-12,1);
+    //毒1
+    tyobi(54*29,9*29-12,116);
+    //音符+
+    tyobi(18*29,14*29-12,117);
+    tyobi(19*29,14*29-12,117);
+    tyobi(20*29,14*29-12,117);
+    txtype[tco]=1;tyobi(61*29,9*29-12,101);//5
+    tyobi(74*29,9*29-12,7);//6
+
+    //ヒント2
+    txtype[tco]=2;tyobi(28*29,9*29-12,300);//7
+    //ファイア
+    txtype[tco]=3;tyobi(7*29,9*29-12,101);
+    //ヒント3
+    txtype[tco]=4;tyobi(70*29,8*29-12,300);//9
+
+    //もろいぶろっく×３
+    txtype[tco]=1;tyobi(58*29,13*29-12,115);
+    txtype[tco]=1;tyobi(59*29,13*29-12,115);
+    txtype[tco]=1;tyobi(60*29,13*29-12,115);
+
+    //ヒントブレイク
+    txtype[tco]=0;tyobi(111*29,6*29-12,301);
+    //ジャンプ
+    txtype[tco]=0;tyobi(114*29,9*29-12,120);
+
+    //ファイア
+    //tyobi(7*29,9*29-12,101);
+
+
+    bco=0;
+    t=bco;ba[t]=101*29*100;bb[t]=(5*29-12)*100;btype[t]=4;bxtype[t]=1;bco++;
+    t=bco;ba[t]=146*29*100;bb[t]=(10*29-12)*100;btype[t]=6;bxtype[t]=1;bco++;
+
+    t=sco;sa[t]=9*29*100;sb[t]=(13*29-12)*100;sc[t]=9000-1;sd[t]=3000;stype[t]=52;sco++;
+    //t=sco;sa[t]=58*29*100;sb[t]=(13*29-12)*100;sc[t]=9000-1;sd[t]=3000;stype[t]=52;sco++;
+
+    //土管
+    t=sco;sa[t]=65*29*100+500;sb[t]=(10*29-12)*100;sc[t]=6000;sd[t]=9000-200;stype[t]=50;sxtype[t]=1;sco++;
+    //t=28;sa[t]=65*29*100;sb[t]=(10*29-12)*100;sc[t]=6000;sd[t]=9000-200;stype[t]=50;sco++;
+
+    //トラップ
+    t=sco;sa[t]=74*29*100;sb[t]=(8*29-12)*100-1500;sc[t]=6000;sd[t]=3000;stype[t]=103;sxtype[t]=1;sco++;
+    t=sco;sa[t]=96*29*100-3000;sb[t]=-6000;sc[t]=9000;sd[t]=70000;stype[t]=102;sxtype[t]=10;sco++;
+    //ポール砲
+    t=sco;sa[t]=131*29*100-1500;sb[t]=(1*29-12)*100-3000;sc[t]=15000;sd[t]=14000;stype[t]=104;sco++;
+
+
+    //？ボール
+    t=bco;ba[t]=10*29*100+100;bb[t]=(11*29-12)*100;btype[t]=105;bxtype[t]=1;bco++;
+    //ブロックもどき
+    t=bco;ba[t]=43*29*100;bb[t]=(11*29-12)*100;btype[t]=82;bxtype[t]=1;bco++;
+    //t=bco;ba[t]=146*29*100;bb[t]=(12*29-12)*100;btype[t]=82;bxtype[t]=1;bco++;
+    //うめぇ
+    t=bco;ba[t]=1*29*100;bb[t]=(2*29-12+10)*100-1000;btype[t]=80;bxtype[t]=0;bco++;
+
+
+    //リフト
+    srco=0;
+    t=srco;sra[t]=33*29*100;srb[t]=(3*29-12)*100;src[t]=90*100;srtype[t]=0;sracttype[t]=0;sre[t]=0;srsp[t]=1;srco++;
+    t=srco;sra[t]=39*29*100-2000;srb[t]=(6*29-12)*100;src[t]=90*100;srtype[t]=0;sracttype[t]=1;sre[t]=0;srco++;
+    t=srco;sra[t]=45*29*100+1500;srb[t]=(10*29-12)*100;src[t]=90*100;srtype[t]=0;sracttype[t]=0;sre[t]=0;srsp[t]=2;srco++;
+
+    t=srco;sra[t]=95*29*100;srb[t]=(7*29-12)*100;src[t]=180*100;srtype[t]=0;sracttype[t]=0;sre[t]=0;srsp[t]=10;srco++;
+    t=srco;sra[t]=104*29*100;srb[t]=(9*29-12)*100;src[t]=90*100;srtype[t]=0;sracttype[t]=0;sre[t]=0;srsp[t]=12;srco++;
+    t=srco;sra[t]=117*29*100;srb[t]=(3*29-12)*100;src[t]=90*100;srtype[t]=0;sracttype[t]=1;sre[t]=0;srsp[t]=15;srco++;
+    t=srco;sra[t]=124*29*100;srb[t]=(5*29-12)*100;src[t]=210*100;srtype[t]=0;sracttype[t]=0;sre[t]=0;srsp[t]=10;srco++;
+
+
+
+    if (stagepoint==1){stagepoint=0;ma=4500;mb=-3000;tyuukan=0;}
+
+
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }}
+
+  }//sta3
+
+
+
+  //1-3(地下)
+  if (sta==1 && stb==3 && stc==1){
+
+    //マリ　地上　入れ
+    //StopSoundMem(oto[0]);
+    bgmchange(oto[103]);
+    //PlaySoundMem(oto[0],DX_PLAYTYPE_LOOP) ;
+
+    scrollx=0*100;
+    ma=6000;mb=6000;
+    stagecolor=2;
+
+
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,},
+      { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,},
+      { 1,54, 0,54, 0,54, 0,54, 0,54, 0,54, 0,54, 0,54, 1, 0,},
+      { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 1, 8, 8, 8, 8,} ,
+      { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    } ;
+
+
+    tco=0;
+    //tyobi(15*29,12*29-12,111);
+
+    stc=0;
+
+
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }}
+
+  }//sta3
+
+
+
+  //1-3(空中)
+  if (sta==1 && stb==3 && stc==5){
+
+    stagecolor=3;
+    bgmchange(oto[104]);
+
+    scrollx=0*100;
+    ma=3000;mb=33000;
+
+    stagepoint=1;
+
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 9, 0, 9, 0, 9, 0, 9, 0, 9, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 9, 0, 9, 0, 9, 0, 9, 0, 0, 0, 0, 0,},
+      { 0, 0, 9, 0, 9, 0, 9, 0, 9, 0, 9, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,},
+      { 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 0, 0, 8, 8, 8, 8, 8,} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    } ;
+
+    sco=0;
+    t=sco;sa[t]=14*29*100-5;sb[t]=(11*29-12)*100;sc[t]=6000;sd[t]=15000-200;stype[t]=50;sxtype[t]=1;sco++;
+    //t=sco;sa[t]=12*29*100;sb[t]=(11*29-12)*100;sc[t]=3000;sd[t]=6000-200;stype[t]=40;sxtype[t]=0;sco++;
+    //t=sco;sa[t]=14*29*100+1000;sb[t]=-6000;sc[t]=5000;sd[t]=70000;stype[t]=100;sxtype[t]=1;sco++;
+
+
+    txtype[tco]=0;tyobi(12*29,4*29-12,112);
+    //ヒント3
+    txtype[tco]=3;tyobi(12*29,8*29-12,300);
+    //txtype[tco]=0;tyobi(13*29,4*29-12,110);
+
+
+    //stc=0;
+
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }}
+
+  }//sta5
+
+
+
+
+
+  //1-4(地下)
+  if (sta==1 && stb==4 && stc==0){
+
+    //マリ　地上　入れ
+    //StopSoundMem(oto[0]);
+    bgmchange(oto[105]);
+    //PlaySoundMem(oto[0],DX_PLAYTYPE_LOOP) ;
+
+    scrollx=4400*100;
+    ma=12000;mb=6000;
+    stagecolor=4;
+
+
+    byte stagedatex[17][1001]={//                                                                                                                                                                                     中間                                                                                                                                                                                                                                                           
+      { 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 7, 7, 7, 7, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,50, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 3, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0,30, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 3, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 7, 7, 2, 2, 7, 5, 5, 5, 5, 0, 0, 0, 3, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0,59, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,59, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0,59, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,40, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5,41, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 5, 5, 5,86, 0, 0,86, 0, 5, 5, 5, 5, 5,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5,86, 0, 0,86, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5,86, 5, 5, 5, 5, 5,86, 0, 0,86, 0, 0, 5, 5, 5, 5, 5, 5, 5,86, 0, 0,86, 5, 5, 5, 5,86, 0, 0,86, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5,86, 0, 5, 5,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0,86, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5,41, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    } ;
+
+    sco=0;//sco=140;
+    t=sco;sa[t]=35*29*100-1500+750;sb[t]=(8*29-12)*100-1500;sc[t]=1500;sd[t]=3000;stype[t]=105;sco++;
+    t=sco;sa[t]=67*29*100;sb[t]=(4*29-12)*100;sc[t]=9000-1;sd[t]=3000*1-1;stype[t]=51;sxtype[t]=3;sgtype[t]=0;sco++;
+    t=sco;sa[t]=73*29*100;sb[t]=(13*29-12)*100;sc[t]=3000*1-1;sd[t]=3000;stype[t]=52;sco++;
+    //t=sco;sa[t]=79*29*100;sb[t]=(13*29-12)*100;sc[t]=30*3*100-1;sd[t]=6000-200;stype[t]=51;sxtype[t]=4;sco++;
+    //t=sco;sa[t]=83*29*100;sb[t]=(-2*29-12)*100;sc[t]=30*5*100-1;sd[t]=3000-200;stype[t]=51;sxtype[t]=4;sco++;
+    t=sco;sa[t]=123*29*100;sb[t]=(1*29-12)*100;sc[t]=30*6*100-1+0;sd[t]=3000-200;stype[t]=51;sxtype[t]=10;sco++;
+    //スクロール消し
+    t=sco;sa[t]=124*29*100+3000;sb[t]=(2*29-12)*100;sc[t]=3000*1-1;sd[t]=300000;stype[t]=102;sxtype[t]=20;sco++;
+    t=sco;sa[t]=148*29*100+1000;sb[t]=(-12*29-12)*100;sc[t]=3000*1-1;sd[t]=300000;stype[t]=102;sxtype[t]=30;sco++;
+
+    //3連星
+    t=sco;sa[t]=100*29*100+1000;sb[t]=-6000;sc[t]=3000;sd[t]=70000;stype[t]=102;sxtype[t]=12;sco++;
+
+    //地面1
+    t=sco;sa[t]=0*29*100-0;sb[t]=9*29*100+1700;sc[t]=3000*7-1;sd[t]=3000*5-1;stype[t]=200;sxtype[t]=0;sco++;
+    t=sco;sa[t]=11*29*100;sb[t]=-1*29*100+1700;sc[t]=3000*8-1;sd[t]=3000*4-1;stype[t]=200;sxtype[t]=0;sco++;
+
+
+    bco=0;
+    t=bco;ba[t]=8*29*100-1400;bb[t]=(2*29-12)*100+500;btype[t]=86;bxtype[t]=0;bco++;
+    t=bco;ba[t]=42*29*100-1400;bb[t]=(-2*29-12)*100+500;btype[t]=86;bxtype[t]=0;bco++;
+    t=bco;ba[t]=29*29*100+1500;bb[t]=(7*29-12)*100+1500;btype[t]=87;bxtype[t]=105;bco++;
+    t=bco;ba[t]=47*29*100+1500;bb[t]=(9*29-12)*100+1500;btype[t]=87;bxtype[t]=110;bco++;
+    t=bco;ba[t]=70*29*100+1500;bb[t]=(9*29-12)*100+1500;btype[t]=87;bxtype[t]=105;bco++;
+    t=bco;ba[t]=66*29*100+1501;bb[t]=(4*29-12)*100+1500;btype[t]=87;bxtype[t]=101;bco++;
+    t=bco;ba[t]=85*29*100+1501;bb[t]=(4*29-12)*100+1500;btype[t]=87;bxtype[t]=105;bco++;
+
+    //ステルスうめぇ
+    t=bco;ba[t]=57*29*100;bb[t]=(2*29-12+10)*100-500;btype[t]=80;bxtype[t]=1;bco++;
+    //ブロックもどき
+    t=bco;ba[t]=77*29*100;bb[t]=(5*29-12)*100;btype[t]=82;bxtype[t]=2;bco++;
+    //ボス
+    t=bco;ba[t]=130*29*100;bb[t]=(8*29-12)*100;btype[t]=30;bxtype[t]=0;bco++;
+    //クックル
+    t=bco;ba[t]=142*29*100;bb[t]=(10*29-12)*100;btype[t]=31;bxtype[t]=0;bco++;
+
+    //マグマ
+    nco=0;
+    na[nco]=7*29*100-300;nb[nco]=14*29*100-1200;ntype[nco]=6;nco++;if (nco>=nmax)nco=0;
+    na[nco]=41*29*100-300;nb[nco]=14*29*100-1200;ntype[nco]=6;nco++;if (nco>=nmax)nco=0;
+    na[nco]=149*29*100-1100;nb[nco]=10*29*100-600;ntype[nco]=100;nco++;if (nco>=nmax)nco=0;
+
+    tco=0;
+    //ON-OFFブロック
+    txtype[tco]=1;tyobi(29*29,3*29-12,130);
+    //1-2
+    tyobi(34*29,9*29-12,5);
+    tyobi(35*29,9*29-12,5);
+    //隠し
+    tyobi(55*29+15,6*29-12,7);
+    //tyobi(62*29,9*29-12,2);
+    //隠しON-OFF
+    txtype[tco]=10;tyobi(50*29,9*29-12,114);
+    //ヒント3
+    txtype[tco]=5;tyobi(1*29,5*29-12,300);
+    //ファイア
+    txtype[tco]=3;
+    tyobi(86*29,9*29-12,101);
+    //キノコなし　普通
+    //txtype[tco]=2;tyobi(81*29,1*29-12,5);
+    //音符
+    txtype[tco]=2;
+    tyobi(86*29,6*29-12,117);
+
+    //もろいぶろっく×３
+    for (t=0;t<=2;t++){
+      txtype[tco]=3;tyobi((79+t)*29,13*29-12,115);
+    }
+
+    //ジャンプ
+    txtype[tco]=3;tyobi(105*29,11*29-12,120);
+    //毒1
+    txtype[tco]=3;tyobi(109*29,7*29-12,102);
+    //デフラグ
+    txtype[tco]=4;tyobi(111*29,7*29-12,101);
+    //剣
+    tyobi(132*29,8*29-12-3,140);
+    tyobi(131*29,9*29-12,141);
+    //メロン
+    tyobi(161*29,12*29-12,142);
+    //ファイアバー強化
+    tyobi(66*29,4*29-12,124);
+
+
+    //リフト
+    srco=0;
+    t=srco;sra[t]=93*29*100;srb[t]=(10*29-12)*100;src[t]=60*100;srtype[t]=0;sracttype[t]=1;sre[t]=0;srco++;
+    t=20;sra[t]=119*29*100+300;srb[t]=(10*29-12)*100;src[t]=12*30*100+1000;srtype[t]=0;sracttype[t]=0;srsp[t]=21;sre[t]=0;srco++;
+
+
+    stc=0;
+
+
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }}
+
+  }//sta4
+
+  if (sta==2 && stb==1 && stc==0){// 2-1
+    ma=5600;
+    mb=32000;
+    bgmchange(oto[100]);
+    stagecolor=1;
+    scrollx=2900*(113-19);
+    //
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 4, 0, 0, 4, 0, 0, 0, 0, 4, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,99, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0,82, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 4, 0, 0, 0, 0, 4, 4, 4, 4, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 4, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 4, 4, 4, 4, 4, 0, 0, 4, 7, 7, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 2, 2,98, 2, 4, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,10,10,10,10, 0, 0,10,10,10,10, 4, 1, 1, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 7, 0, 4, 4, 4, 4, 4, 4, 4, 4} ,
+      { 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,98, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 4, 7, 7, 7, 4, 4, 4, 0, 0, 0, 0,80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0,81, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,81, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,81, 0, 0, 0,81, 0, 0, 0, 0, 0, 0, 0, 0,50, 0, 0,50, 0, 0,50,81, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,81, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 5, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 5, 5, 5} ,
+      { 6, 6, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 0, 6, 6, 0, 0, 0, 0, 0, 6, 6, 6} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    };
+    //追加情報
+    tco = 0;
+    //
+    txtype[tco]=6;
+    tyobi(1*29,9*29-12,300);
+    tco += 1;
+    //
+    txtype[tco]=0;
+    tyobi(40*29,9*29-12,110);
+    tco += 1;
+    //
+    txtype[tco]=7;
+    tyobi(79*29,7*29-12,300);
+    tco += 1;
+    //
+    txtype[tco]=2;
+    tyobi(83*29,7*29-12,102);
+    tco += 1;
+    //
+    txtype[tco]=0;
+    tyobi(83*29,2*29-12,114);
+    tco += 1;
+    //
+    for(int i = -1; i > -7; i -= 1){
+      tyobi(85*29, i*29-12, 4);
+      tco += 1;
+    }
+    //
+    sco = 0;
+    sa[sco]=30*29*100;
+    sb[sco]=(13*29-12)*100;
+    sc[sco]=12000-1;
+    sd[sco]=3000;
+    stype[sco]=52;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=51*29*100;
+    sb[sco]=(4*29-12)*100;
+    sc[sco]=9000-1;
+    sd[sco]=3000;
+    stype[sco]=51;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=84*29*100;
+    sb[sco]=(13*29-12)*100;
+    sc[sco]=9000-1;
+    sd[sco]=3000;
+    stype[sco]=52;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=105*29*100;
+    sb[sco]=(13*29-12)*100;
+    sc[sco]=15000-1;
+    sd[sco]=3000;
+    stype[sco]=52;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    bco = 0;
+    //
+    ba[bco]=13*29*100;
+    bb[bco]=(6*29-12)*100;
+    btype[bco]=4;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=23*29*100;
+    bb[bco]=(7*29-12)*100;
+    btype[bco]=80;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=25*29*100;
+    bb[bco]=(7*29-12)*100;
+    btype[bco]=80;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=27*29*100;
+    bb[bco]=(7*29-12)*100;
+    btype[bco]=80;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=88*29*100;
+    bb[bco]=(12*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }
+    }
+  }
+
+  if (sta==2 && stb==2 && stc==0){//2-2(地上)
+    bgmchange(oto[100]);
+    stagecolor=1;
+    scrollx=2900*(19-19);
+    //
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 7, 0, 0, 0},
+      { 0,80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5},
+      { 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    };
+    //
+    sa[sco]=14*29*100+200;
+    sb[sco]=-6000;
+    sc[sco]=5000;
+    sd[sco]=70000;
+    stype[sco]=100;
+    sco += 1;
+    //
+    sa[sco]=12*29*100+1200;
+    sb[sco]=-6000;
+    sc[sco]=7000;
+    sd[sco]=70000;
+    stype[sco]=101;
+    sco += 1;
+    //
+    sa[sco]=12*29*100;
+    sb[sco]=(13*29-12)*100;
+    sc[sco]=6000-1;
+    sd[sco]=3000;
+    stype[sco]=52;
+    sgtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=14*29*100;
+    sb[sco]=(9*29-12)*100;
+    sc[sco]=6000;
+    sd[sco]=12000-200;
+    stype[sco]=50;
+    sxtype[sco]=1;
+    sco += 1;
+    //
+    tyobi(6*29, 9*29-12, 110);
+    //
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }
+    }
+  }
+
+  if (sta==2 && stb==2 && stc==1){//2-2(地下)
+    bgmchange(oto[103]);
+    stagecolor=2;
+    ma=7500;mb=9000;
+    scrollx=2900*(137-19);
+    //
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,98, 4, 4, 4, 4, 4, 4, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,98, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,10,10,10,10,10,10,10,10,10,10,10, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0,10,10,10,10,10,10,10,10,10, 0, 0, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,51, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,10,10,10,10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 3, 0, 0, 0, 3, 0, 0, 0, 0, 0,30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,57, 0, 0, 0, 0, 0,57, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0,10, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,44, 0, 0, 1, 1, 1, 1, 1, 1, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 7, 7, 7, 0,97, 0, 0, 0, 1, 1, 1, 1, 1, 1, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1} ,
+      { 4, 7, 7, 7, 7, 7, 7, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 4, 4, 0, 0, 0, 1, 1, 0, 0, 0, 0,44, 0, 0, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 4, 0, 0, 0, 0, 1, 1, 0, 0, 0,97, 0, 0, 0, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 4, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1} ,
+      { 4, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 4, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1} ,
+      { 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 5, 5, 5, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1} ,
+      { 6, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6, 6, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 6, 6, 6, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    };
+    //
+    bco=0;
+    ba[bco]=32*29*100-1400;
+    bb[bco]=(-2*29-12)*100+500;
+    btype[bco]=86;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=(31*29-12)*100;
+    bb[bco]=(7*29-12)*100;
+    btype[bco]=7;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=38*29*100+1500;
+    bb[bco]=(6*29-12)*100+1500;
+    btype[bco]=87;
+    bxtype[bco]=107;
+    bco += 1;
+    //
+    ba[bco]=38*29*100+1500;
+    bb[bco]=(6*29-12)*100+1500;
+    btype[bco]=88;
+    bxtype[bco]=107;
+    bco += 1;
+    //
+    ba[bco]=42*29*100+1500;
+    bb[bco]=(6*29-12)*100+1500;
+    btype[bco]=87;
+    bxtype[bco]=107;
+    bco += 1;
+    //
+    ba[bco]=42*29*100+1500;
+    bb[bco]=(6*29-12)*100+1500;
+    btype[bco]=88;
+    bxtype[bco]=107;
+    bco += 1;
+    //
+    ba[bco]=46*29*100+1500;
+    bb[bco]=(6*29-12)*100+1500;
+    btype[bco]=87;
+    bxtype[bco]=107;
+    bco += 1;
+    //
+    ba[bco]=46*29*100+1500;
+    bb[bco]=(6*29-12)*100+1500;
+    btype[bco]=88;
+    bxtype[bco]=107;
+    bco += 1;
+    //
+    ba[bco]=58*29*100;
+    bb[bco]=(7*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=66*29*100;
+    bb[bco]=(7*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=76*29*100-1400;
+    bb[bco]=(-2*29-12)*100+500;
+    btype[bco]=86;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    sco = 0;
+    sa[sco]=2*29*100;
+    sb[sco]=(13*29-12)*100;
+    sc[sco]=300000-6001;
+    sd[sco]=3000;
+    stype[sco]=52;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=3*29*100;
+    sb[sco]=(7*29-12)*100;
+    sc[sco]=3000;
+    sd[sco]=3000;
+    stype[sco]=105;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=107*29*100;
+    sb[sco]=(9*29-12)*100;
+    sc[sco]=9000-1;
+    sd[sco]=24000;
+    stype[sco]=52;
+    sxtype[sco]=1;
+    sco += 1;
+    //
+    sa[sco]=111*29*100;
+    sb[sco]=(7*29-12)*100;
+    sc[sco]=3000;
+    sd[sco]=6000-200;
+    stype[sco]=40;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=113*29*100+1100;
+    sb[sco]=(0*29-12)*100;
+    sc[sco]=4700;
+    sd[sco]=27000-1000;
+    stype[sco]=0;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=128*29*100;
+    sb[sco]=(9*29-12)*100;
+    sc[sco]=9000-1;
+    sd[sco]=24000;
+    stype[sco]=52;
+    sxtype[sco]=1;
+    sco += 1;
+    //
+    sa[sco]=131*29*100;
+    sb[sco]=(9*29-12)*100;
+    sc[sco]=3000;
+    sd[sco]=6000-200;
+    stype[sco]=40;
+    sxtype[sco]=2;
+    sco += 1;
+    //
+    sa[sco]=133*29*100+1100;
+    sb[sco]=(0*29-12)*100;
+    sc[sco]=4700;
+    sd[sco]=32000;
+    stype[sco]=0;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    tco = 0;
+    txtype[tco] = 0;
+    tyobi(0*29, 0*29-12, 4);
+    tco = 1;
+    txtype[tco] = 0;
+    tyobi(2*29, 9*29-12, 4);
+    tco = 2;
+    txtype[tco] = 0;
+    tyobi(3*29, 9*29-12, 4);
+    tco += 1;
+    //
+    txtype[tco] = 1;
+    tyobi(5*29, 9*29-12, 115);
+    tco += 1;
+    txtype[tco] = 1;
+    tyobi(6*29, 9*29-12, 115);
+    tco += 1;
+    //
+    txtype[tco] = 1;
+    tyobi(5*29, 10*29-12, 115);
+    tco += 1;
+    txtype[tco] = 1;
+    tyobi(6*29, 10*29-12, 115);
+    tco += 1;
+    //
+    txtype[tco] = 1;
+    tyobi(5*29, 11*29-12, 115);
+    tco += 1;
+    txtype[tco] = 1;
+    tyobi(6*29, 11*29-12, 115);
+    tco += 1;
+    //
+    txtype[tco] = 1;
+    tyobi(5*29, 12*29-12, 115);
+    tco += 1;
+    txtype[tco] = 1;
+    tyobi(6*29, 12*29-12, 115);
+    tco += 1;
+    //
+    txtype[tco] = 1;
+    tyobi(70*29, 7*29-12, 115);
+    tco += 1;
+    txtype[tco] = 1;
+    tyobi(71*29, 7*29-12, 115);
+    tco += 1;
+    //
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }
+    }
+  }
+
+  if (sta==2 && stb==2 && stc==2){// 2-2 地上
+    //
+    bgmchange(oto[100]);
+    stagecolor = 1;
+    scrollx = 2900 * (36 - 19);
+    ma = 7500;
+    mb = 3000 * 9;
+    //
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,99, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,50,51, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,50, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0,40, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
+      { 0, 0,41, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0,54, 0, 0},
+      { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5} ,
+      { 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6, 6} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    };
+    //
+    bco = 0;
+    ba[bco]=9*29*100;
+    bb[bco]=(12*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=10*29*100;
+    bb[bco]=(11*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=11*29*100;
+    bb[bco]=(10*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=12*29*100;
+    bb[bco]=(9*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=13*29*100;
+    bb[bco]=(8*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=14*29*100;
+    bb[bco]=(7*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=15*29*100;
+    bb[bco]=(6*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=16*29*100;
+    bb[bco]=(5*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=17*29*100;
+    bb[bco]=(5*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=18*29*100;
+    bb[bco]=(5*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=19*29*100;
+    bb[bco]=(5*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=20*29*100;
+    bb[bco]=(5*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }
+    }
+  }
+  //
+  if (sta==2 && stb==3 && stc == 0){// 2-3
+    ma = 7500;
+    mb = 3000 * 8;
+    bgmchange(oto[100]);
+    stagecolor=1;
+    scrollx=2900*(126-19);
+    //
+    byte stagedatex[17][1001]={
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 7, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,82, 0, 0, 0,56, 0, 0, 0, 0, 0, 0, 0, 0, 4,10,10,10,10,10,10,10,10,10,10,10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,99, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,51, 0, 1, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0,82, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0,82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 1, 0, 0, 0, 1, 7, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0,10, 4, 4, 4, 0,54, 0,54, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,58, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 4, 0, 0, 4, 4, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 4, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 0, 4, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 7, 0, 7, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,52, 0, 0, 0, 0, 4, 1, 1, 1, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,10,10, 0, 4, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 4, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0,30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 4, 4, 4, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 6, 6} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    };
+    //
+    tco = 0;
+    txtype[tco] = 0;
+    for(int i = -1; i > -7; i -= 1){
+      tyobi(55*29, i*29-12, 4);
+      tco += 1;
+    }
+    //
+    txtype[tco] = 0;
+    tyobi(64*29, 12*29-12, 120);
+    tco += 1;
+    //
+    txtype[tco] = 8;
+    tyobi(60*29, 6*29-12, 300);
+    tco += 1;
+    //
+    bco = 1;
+    ba[bco]=(54*29-12)*100;
+    bb[bco]=(1*29-12)*100;
+    btype[bco]=80;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    sco = 0;
+    ba[sco]=(102*29-12)*100;
+    bb[sco]=(10*29-12)*100;
+    btype[sco]=50;
+    bxtype[sco]=1;
+    sco += 1;
+    //
+    srco=0;
+    sra[srco]=1*29*100;
+    srb[srco]=(10*29-12)*100;
+    src[srco]=5*3000;
+    srtype[srco]=0;
+    sracttype[srco]=1;
+    sre[srco]=0;
+    srsp[srco]=10;
+    srco++;
+    //
+    sra[srco]=18*29*100;
+    srb[srco]=(4*29-12)*100;
+    src[srco]=3*3000;
+    srtype[srco]=0;
+    sracttype[srco]=0;
+    sre[srco]=0;
+    srsp[srco]=10;
+    srco++;
+    //
+    sra[srco]=35*29*100;
+    srb[srco]=(4*29-12)*100;
+    src[srco]=5*3000;
+    srtype[srco]=0;
+    sracttype[srco]=0;
+    sre[srco]=0;
+    srsp[srco]=10;
+    srco++;
+    //
+    sra[srco]=35*29*100;
+    srb[srco]=(8*29-12)*100;
+    src[srco]=5*3000;
+    srtype[srco]=0;
+    sracttype[srco]=0;
+    sre[srco]=0;
+    srsp[srco]=10;
+    srco++;
+    //
+    sra[srco]=94*29*100;
+    srb[srco]=(6*29-12)*100;
+    src[srco]=3*3000;
+    srtype[srco]=0;
+    sracttype[srco]=0;
+    sre[srco]=0;
+    srsp[srco]=1;
+    srco++;
+    //
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }
+    }
+  }
+  //
+  if (sta==2 && stb==4 && (stc == 0 || stc == 10 || stc == 12)){// 2-4(1番)
+    if(stc == 0){
+      ma = 7500;
+      mb = 3000 * 4;
+    }else{
+      ma = 19500;
+      mb = 3000*11;
+      stc = 0;
+    }
+    bgmchange(oto[105]);
+    stagecolor=4;
+    scrollx=2900*(40-19);
+    //
+    byte stagedatex[17][1001]={
+      { 5, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5} ,
+      { 5, 5, 5, 5, 5, 5, 5, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0,10, 0, 0, 0,10,10,10, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5} ,
+      { 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 7,10,10,10, 5, 5, 5, 5, 5} ,
+      { 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5} ,
+      { 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5} ,
+      { 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 7, 7, 7, 3, 7, 0, 7, 5, 0, 0, 5, 5, 5, 0,58, 0, 5, 0, 0, 5, 5} ,
+      { 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5} ,
+      { 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5} ,
+      { 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5} ,
+      { 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5} ,
+      { 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 5, 5, 5, 0, 0, 0, 5, 5, 5, 5, 5} ,
+      { 5, 0, 0, 0, 0, 0, 0, 0, 0, 0,59,59, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 5,59, 0, 0, 5, 5, 5, 5, 5} ,
+      { 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 5, 0, 0, 0, 5, 5, 5, 5, 5} ,
+      { 5, 5, 5, 5, 5, 5,40, 0, 5, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 5, 0,59, 0, 5, 5, 5, 5, 5} ,
+      { 5,86, 5, 5, 5, 5,41, 0, 5,86, 0, 0,86, 5, 5, 5, 5,86, 0, 0,86, 0, 0,86, 5, 0,86, 5, 5, 5,86, 0, 0, 5, 5, 5, 5, 5} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,59,59, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,59, 0, 0, 0, 0, 0}
+    };
+    //
+    tco=0;
+    txtype[tco] = 0;
+    tyobi(0*29, -1*29-12, 5);
+    tco += 1;
+    //
+    txtype[tco] = 0;
+    tyobi(4*29, -1*29-12, 5);
+    tco += 1;
+    //
+    txtype[tco] = 0;
+    tyobi(1*29, 14*29-12, 5);
+    tco += 1;
+    //
+    txtype[tco] = 0;
+    tyobi(6*29, 14*29-12, 5);
+    tco += 1;
+    //
+    txtype[tco] = 0;
+    tyobi(7*29, 14*29-12, 5);
+    tco += 1;
+    //
+    bco=0;
+    ba[bco]=2*29*100-1400;
+    bb[bco]=(-2*29-12)*100+500;
+    btype[bco]=86;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=20*29*100+1500;
+    bb[bco]=(5*29-12)*100+1500;
+    btype[bco]=87;
+    bxtype[bco]=107;
+    bco += 1;
+    //
+    sco=0;
+    sa[sco]=17*29*100;
+    sb[sco]=(9*29-12)*100;
+    sc[sco]=21000-1;
+    sd[sco]=3000-1;
+    stype[sco]=52;
+    sxtype[sco]=2;
+    sco += 1;
+    //
+    sa[sco]=27*29*100;
+    sb[sco]=(13*29-12)*100;
+    sc[sco]=6000;
+    sd[sco]=6000;
+    stype[sco]=50;
+    sxtype[sco]=6;
+    sco += 1;
+    //
+    sa[sco]=34*29*100;
+    sb[sco]=(5*29-12)*100;
+    sc[sco]=6000;
+    sd[sco]=30000;
+    stype[sco]=50;
+    sxtype[sco]=1;
+    sco += 1;
+    //
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }
+    }
+  }
+
+  if (sta==2 && stb==4 && stc == 1){// 2-4(2番)
+    ma = 4500;
+    mb = 3000*11;
+    bgmchange(oto[105]);
+    stagecolor=4;
+    scrollx=2900*(21-19);
+    //
+    byte stagedatex[17][1001]={
+      { 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5,98} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 7, 7, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 5, 5, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0,10,10, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0} ,
+      { 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0,44, 0, 0} ,
+      { 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 0,97, 0, 0, 0} ,
+      { 0,40, 0, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 5, 5, 5, 5} ,
+      {86,41, 0,86, 0, 5,86, 0, 0,86, 0, 5,86, 0, 0,86, 0, 0,86} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    };
+    //
+    tco=0;
+    txtype[tco] = 1;
+    tyobi(12*29, 13*29-12, 115);
+    tco += 1;
+    //
+    txtype[tco] = 1;
+    tyobi(13*29, 13*29-12, 115);
+    tco += 1;
+    //
+    txtype[tco] = 1;
+    tyobi(14*29, 13*29-12, 115);
+    tco += 1;
+    //
+    sco = 0;
+    sa[sco]=6*29*100;
+    sb[sco]=(6*29-12)*100;
+    sc[sco]=18000-1;
+    sd[sco]=6000-1;
+    stype[sco]=52;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=12*29*100;
+    sb[sco]=(8*29-12)*100;
+    sc[sco]=9000-1;
+    sd[sco]=3000-1;
+    stype[sco]=52;
+    sxtype[sco]=2;
+    sco += 1;
+    //
+    sa[sco]=15*29*100;
+    sb[sco]=(11*29-12)*100;
+    sc[sco]=3000;
+    sd[sco]=6000;
+    stype[sco]=40;
+    sxtype[sco]=2;
+    sco += 1;
+    //
+    sa[sco]=17*29*100+1100;
+    sb[sco]=(0*29-12)*100;
+    sc[sco]=4700;
+    sd[sco]=38000;
+    stype[sco]=0;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }
+    }
+  }
+
+  if (sta==2 && stb==4 && stc == 2){// 2-4(3番)
+    ma = 4500;
+    mb = 3000*11;
+    bgmchange(oto[105]);
+    stagecolor=4;
+    scrollx=2900*(128-19);
+    //
+    byte stagedatex[17][1001]={
+      { 5, 5, 5, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5} ,
+      { 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 5, 0, 5, 5, 5, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 7, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 5, 0, 0, 5, 0, 5, 0,10,10, 5, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,60, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 5, 0, 0, 5, 0, 5, 0, 0, 0, 5, 0, 5, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 5, 3, 0, 5, 0, 3, 0, 0, 0, 5, 0, 5, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 5, 0, 0, 5, 0, 5, 5, 5, 0, 5, 0, 5, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 7, 7, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 3, 0, 0, 3, 0, 0, 3, 7, 0, 3, 7, 7, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 5, 0, 5, 0, 0, 0, 5, 0, 5,10,10, 0, 5, 0, 5, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 7, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 5, 0, 0, 0, 0, 0, 0, 0, 5, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 5, 0, 0, 0, 5, 0, 5, 7, 0, 0, 0, 0, 0, 5, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0,30, 0, 5, 0, 0, 0, 0, 0, 0, 7, 7, 5, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} ,
+      { 5, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 5, 5, 5, 5, 0, 0, 5, 0, 0, 7, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 0, 5, 0, 0, 0, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 0, 0, 0, 5, 5, 5, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5} ,
+      { 5, 0, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 5, 0, 5, 0, 0, 0, 0, 0, 5, 0, 0, 5, 0, 0, 0, 5,59, 0,59, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5} ,
+      { 5,40, 0, 5, 0, 0, 5, 0, 0, 5, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 0, 0, 0, 0, 5, 0, 0, 0, 5, 0, 5, 0, 5, 0, 0, 0, 5, 0, 0, 5, 0, 0, 0, 5, 0,59, 0, 5, 5, 5, 5, 5, 0, 0, 0, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5} ,
+      { 5,41, 0, 5,86, 0, 5,86, 0, 5, 5, 5, 5,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0, 5,86, 0, 0,86, 0, 0,86, 5, 0,86, 0, 5,86, 5, 0, 5,86, 0, 0, 5, 5, 5, 5,86, 0, 0, 5,86,59, 0, 5, 5, 5, 5, 5,86, 0, 0,86, 5, 5,86, 0, 0,86, 0, 0,86, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5,86, 0, 0,86, 0, 0,86, 0, 0,86, 0, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5} ,
+      { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,59, 0, 0, 0, 0, 0,59, 0,59, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,59, 0,59, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
+    };
+    //
+    tco=0;
+    txtype[tco] = 0;
+    tyobi(1*29, 14*29-12, 5);
+    tco += 1;
+    //
+    txtype[tco] = 0;
+    tyobi(2*29, 14*29-12, 5);
+    tco += 1;
+    //
+    txtype[tco] = 9;
+    tyobi(3*29, 4*29-12, 300);
+    tco += 1;
+    //
+    txtype[tco] = 1;
+    tyobi(32*29,9*29-12, 115);
+    tco += 1;
+    //
+    txtype[tco] = 0;
+    tyobi(76*29,14*29-12, 5);
+    tco += 1;
+    //
+    txtype[tco] = 0;
+    tyobi(108*29,11*29-12,141);
+    tco += 1;
+    //
+    txtype[tco] = 0;
+    tyobi(109*29,10*29-12-3,140);
+    tco += 1;
+    //
+    txtype[tco] = 0;
+    tyobi(121*29,10*29-12,142);
+    tco += 1;
+    //
+    bco = 0;
+    ba[bco]=0*29*100+1500;
+    bb[bco]=(8*29-12)*100+1500;
+    btype[bco]=88;
+    bxtype[bco]=105;
+    bco += 1;
+    //
+    ba[bco]=2*29*100;
+    bb[bco]=(0*29-12)*100;
+    btype[bco]=80;
+    bxtype[bco]=1;
+    bco += 1;
+    //
+    ba[bco]=3*29*100+1500;
+    bb[bco]=(8*29-12)*100+1500;
+    btype[bco]=87;
+    bxtype[bco]=105;
+    bco += 1;
+    //
+    ba[bco]=6*29*100+1500;
+    bb[bco]=(8*29-12)*100+1500;
+    btype[bco]=88;
+    bxtype[bco]=107;
+    bco += 1;
+    //
+    ba[bco]=9*29*100+1500;
+    bb[bco]=(8*29-12)*100+1500;
+    btype[bco]=88;
+    bxtype[bco]=107;
+    bco += 1;
+    //
+    ba[bco]=25*29*100-1400;
+    bb[bco]=(2*29-12)*100-400;
+    btype[bco]=86;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=40*29*100;
+    bb[bco]=(8*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=42*29*100;
+    bb[bco]=(8*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=43*29*100+1500;
+    bb[bco]=(6*29-12)*100+1500;
+    btype[bco]=88;
+    bxtype[bco]=105;
+    bco += 1;
+    //
+    ba[bco]=47*29*100+1500;
+    bb[bco]=(6*29-12)*100+1500;
+    btype[bco]=87;
+    bxtype[bco]=105;
+    bco += 1;
+    //
+    ba[bco]=57*29*100;
+    bb[bco]=(7*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=77*29*100-1400;
+    bb[bco]=(2*29-12)*100-400;
+    btype[bco]=86;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=83*29*100-1400;
+    bb[bco]=(2*29-12)*100-400;
+    btype[bco]=86;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=88*29*100+1500;
+    bb[bco]=(9*29-12)*100+1500;
+    btype[bco]=87;
+    bxtype[bco]=105;
+    bco += 1;
+    //
+    ba[bco]=88*29*100+1500;
+    bb[bco]=(9*29-12)*100+1500;
+    btype[bco]=88;
+    bxtype[bco]=105;
+    bco += 1;
+    //
+    ba[bco]=90*29*100;
+    bb[bco]=(9*29-12)*100;
+    btype[bco]=82;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    ba[bco]=107*29*100;
+    bb[bco]=(10*29-12)*100;
+    btype[bco]=30;
+    bxtype[bco]=0;
+    bco += 1;
+    //
+    sco = 0;
+    sa[sco]=13*29*100;
+    sb[sco]=(8*29-12)*100;
+    sc[sco]=33000-1;
+    sd[sco]=3000-1;
+    stype[sco]=52;
+    sxtype[sco]=2;
+    sco += 1;
+    //
+    sa[sco]=13*29*100;
+    sb[sco]=(0*29-12)*100;
+    sc[sco]=33000-1;
+    sd[sco]=3000-1;
+    stype[sco]=51;
+    sxtype[sco]=3;
+    sco += 1;
+    //
+    sa[sco]=10*29*100;
+    sb[sco]=(13*29-12)*100;
+    sc[sco]=6000;
+    sd[sco]=6000;
+    stype[sco]=50;
+    sxtype[sco]=6;
+    sco += 1;
+    //
+    sa[sco]=46*29*100;
+    sb[sco]=(12*29-12)*100;
+    sc[sco]=9000-1;
+    sd[sco]=3000-1;
+    stype[sco]=52;
+    sxtype[sco]=2;
+    sco += 1;
+    //
+    sa[sco]=58*29*100;
+    sb[sco]=(13*29-12)*100;
+    sc[sco]=6000;
+    sd[sco]=6000;
+    stype[sco]=50;
+    sxtype[sco]=6;
+    sco += 1;
+    //
+    sa[sco]=101*29*100-1500;
+    sb[sco]=(10*29-12)*100-3000;
+    sc[sco]=12000;
+    sd[sco]=12000;
+    stype[sco]=104;
+    sxtype[sco]=0;
+    sco += 1;
+    //
+    sa[sco]=102*29*100+3000;
+    sb[sco]=(2*29-12)*100;
+    sc[sco]=3000-1;
+    sd[sco]=300000;
+    stype[sco]=102;
+    sxtype[sco]=20;
+    sco += 1;
+    //
+    srco = 0;
+    sra[srco]=74*29*100-1500;
+    srb[srco]=(7*29-12)*100;
+    src[srco]=2*3000;
+    srtype[srco]=0;
+    sracttype[srco]=1;
+    sre[srco]=0;
+    srsp[srco]=0;
+    srco = 20;
+    //
+    sra[srco]=97*29*100;
+    srb[srco]=(12*29-12)*100;
+    src[srco]=12*3000;
+    srtype[srco]=0;
+    sracttype[srco]=0;
+    sre[srco]=0;
+    srsp[srco]=21;
+    srco += 1;
+    //
+    for (tt=0;tt<=1000;tt++){
+      for (t=0;t<=16;t++){
+        stagedate[t][tt]=0;stagedate[t][tt]=stagedatex[t][tt];
+      }
+    }
+  }
+
+  }//stagep
+
+  //BGM変更
+  void bgmchange(int x){
+    StopSoundMem(oto[0]);
+    oto[0]=0;
+    oto[0]=x;
+  }//bgmchange()
+
+
+
+
+  //ブロック出現
+
+  void tyobi(int x,int y,int type){
+
+    ta[tco]=x*100;tb[tco]=y*100;ttype[tco]=type;
+
+    tco++;if (tco>=tmax)tco=0;
+  }//tyobi
+
+
+  //ブロック破壊
+  void brockbreak(int t){
+    if (titem[t]==1){
+      //eyobi(ta[t],tb[t],0,-800,0,80,xx[1],xx[1],titem[t],8);
+      //hosico++;
+    }
+    if (titem[t]>=2 && titem[t]<=7){
+      //ayobi(ta[t],tb[t],-800,10,100+(titem[t]-2),0);//end();
+    }
+
+    ta[t]=-800000;
+    //}//ty==1
+}//brock
+
+
+//メッセージ
+void ttmsg(){
+  xx[1]=6000/100;xx[2]=4000/100;
+  if (tmsgtype==1 || tmsgtype==2){
+    setc0();	
+    fillrect(xx[1],xx[2],360,tmsgy/100);
+    setc1();
+    drawrect(xx[1],xx[2],360,tmsgy/100);
+  }
+  if (tmsgtype==2){
+    //フォント
+    setfont(20,5);
+
+    if (tmsg==0){
+      setc1();
+      //フォント
+      setfont(20,5);
+      txmsg("テスト　hoge",0);
+    }
+
+    if (tmsg==1){
+      setc1();
+      txmsg("",0);
+      txmsg("ステージ 1 より",0);
+      txmsg("特殊的なものが増えたので",1);
+      txmsg("気をつけてくれよ～",2);
+      txmsg("後、アイテムの一部を利用するかも…",4);
+      txmsg("                       ちく より",6);
+    }
+
+    if (tmsg==2){
+      txmsg("            ？が必要です ",3);
+      txmsg("                         m9(^Д^)",6);
+    }
+
+
+    if (tmsg==3){
+      txmsg("   別にコインに意味ないけどね ",3);
+      txmsg("                      (・ω・ )ﾉｼ",6);
+    }
+
+    if (tmsg==4){
+      txmsg("この先に隠しブロックがあります ",2);
+      txmsg("注意してください !!",4);
+    }
+
+
+    if (tmsg==5){
+      txmsg("",0);
+      txmsg(" 前回よりも難易度を下げましたので",1);
+      txmsg(" 気楽にプレイしてください    ",3);
+      txmsg("                       ちく より",6);
+    }
+
+    if (tmsg==6){
+      txmsg("",0);
+      txmsg(" そこにいる敵のそばによると、      ",1);
+      txmsg(" 自分と一緒にジャンプしてくれます。",2);
+      txmsg("   可愛いですね。                  ",3);
+    }
+
+    if (tmsg==7){
+      txmsg("",0);
+      txmsg(" あの敵は連れて来れましたか?、     ",1);
+      txmsg(" 連れて来れなかった貴方は、        ",2);
+      txmsg(" そこの落とし穴から Let's dive!    ",3);
+    }
+
+    if (tmsg==8){
+      txmsg("そんな容易に",1);
+      txmsg("ヒントに頼るもんじゃないぜ",2);
+      txmsg("ほら、さっさと次行きな!!",3);
+    }
+
+    if (tmsg==9){
+      txmsg(" 正真正銘のファイナルステージ。    ",1);
+      txmsg(" クリアすれば遂にエンディング!!    ",2);
+      txmsg(" その土管から戻ってもいいんだぜ?   ",3);
+    }
+
+    if (tmsg==100){
+      txmsg("え？私ですか？ ",0);
+      txmsg("いやぁ、ただの通りすがりの",2);
+      txmsg("ヒントブロックですよ～",3);
+      txmsg("決して怪しいブロックじゃないですよ",5);
+      txmsg("                          (…チッ)",6);
+    }
+
+
+    setfont(16,4);
+  }//2
+
+  if (tmsgtype==3){
+    xx[5]=(((15-1)*1200+1500)/100-tmsgy/100);
+    if (xx[5]>0){
+      setc0();
+      fillrect(xx[1],xx[2]+tmsgy/100,360,xx[5]);
+      setc1();
+      drawrect(xx[1],xx[2]+tmsgy/100,360,xx[5]);
+    }}
+
+}//ttmsg
+
+void txmsg(string x,int a){
+  int xx=6;
+
+  str(x,60+xx,40+xx+a*24);
+
+}//txmsg
+
+
+//フォント変更
+void setfont(int x,int y){
+  SetFontSize(x);
+  SetFontThickness(y);
+}
+
+
+
+//グラ作成
+void eyobi(int xa,int xb,int xc,int xd,int xe,int xf,int xnobia,int xnobib,int xgtype,int xtm){
+
+  ea[eco]=xa;eb[eco]=xb;ec[eco]=xc;ed[eco]=xd;ee[eco]=xe;ef[eco]=xf;
+  egtype[eco]=xgtype;etm[eco]=xtm;
+  enobia[eco]=xnobia;enobib[eco]=xnobib;
+
+  eco++;if (eco>=emax)eco=0;
+
+}//eyobi
+
+
+
+
+
+
+
+
+//敵キャラ、アイテム作成
+void ayobi(int xa,int xb,int xc,int xd,int xnotm,int xtype,int xxtype){
+  int rz=0;
+  for (t1=0;t1<=1;t1++){t1=2;
+    if (aa[aco]>=-9000 && aa[aco]<=30000)t1=0;rz++;
+
+    if (rz<=amax){t1=3;
+
+      aa[aco]=xa;
+      ab[aco]=xb;//ag[aco]=0;ah[aco]=0;ai[aco]=bb[t];//ad[t]=0;aeon[t]=1;
+      ac[aco]=xc;
+      ad[aco]=xd;
+      if (xxtype>100)ac[aco]=xxtype;
+      //ae[aco]=0;af[aco]=0;
+      atype[aco]=xtype;
+      if (xxtype>=0 && xxtype<=99100)axtype[aco]=xxtype;//ahp[aco]=iz[bxtype[t]];aytm[aco]=0;
+      //if (xxtype==1)end();
+      anotm[aco]=xnotm;
+      if (aa[aco]-fx<=ma+mnobia/2)amuki[aco]=1;
+      if (aa[aco]-fx>ma+mnobia/2)amuki[aco]=0;
+      if (abrocktm[aco]>=1)amuki[aco]=1;
+      if (abrocktm[aco]==20)amuki[aco]=0;
+
+      anobia[aco]=anx[atype[aco]];anobib[aco]=any[atype[aco]];
+
+
+      //大砲音
+      if (xtype==7 && CheckSoundMem(oto[10])==0){ot(oto[10]);}
+      //ファイア音
+      if (xtype==10 && CheckSoundMem(oto[18])==0){ot(oto[18]);}
+
+
+      azimentype[aco]=1;
+
+      //if (atype[aco]<=30 && atype[aco]!=4)atm[aco]=20;
+
+
+
+      //azimentype[aco]=1;
+
+      switch(atype[aco]){
+        /*
+           case 0:case 1:case 2:case 5:case 6:case 7:case 8:
+           azimentype[aco]=2;
+           break;
+
+           case 3:case 4:
+           azimentype[aco]=0;
+           break;
+
+           case 49:case 50://case 2:case 5:case 6:
+           azimentype[aco]=4;
+           break;
+
+           case 80:case 81:case 82:case 83:case 84:case 85:
+           azimentype[aco]=1;
+           break;
+
+           case 100:case 101:case 102:case 103:case 104:case 105:case 106:case 107:case 108:
+           azimentype[aco]=1;
+           break;
+
+           case 120:case 121:case 122:
+           azimentype[aco]=1;
+           break;
+
+           case 130:case 131:case 132:case 133:case 134:
+           azimentype[aco]=1;
+           break;
+           */
+      }
+
+      if (xtype==87){atm[aco]=rand(179)+(-90);}
+
+      aco+=1;if (aco>=amax-1){aco=0;}
+    }//t1
+
+    //if (bz[t]==1){bz[t]=0;}
+  }//rz
+
+}//ayobi
diff --git a/main.h b/main.h
new file mode 100644
index 0000000..9de267f
--- /dev/null
+++ b/main.h
@@ -0,0 +1,228 @@
+#include "DxLib.h"
+#include <stdio.h>
+#include <math.h>
+#include <string>
+using namespace std;
+
+void loadg();
+
+//String 使用
+
+//プログラム中
+//main-10
+//タイトル-100
+int main=100,maintm=0;
+
+//ステージ
+int stagecolor=0;
+int sta=1,stb=4,stc=0;
+
+//クイック
+int fast=1;
+
+//トラップ表示
+int trap=1;
+
+//中間ゲート
+int tyuukan=0;
+
+
+//スタッフロール
+int ending=0;
+
+
+//ステージ読み込みループ(いじらない)
+int stagerr,stagepoint;
+//オーバーフローさせる
+int over=0;
+
+//ステージスイッチ
+int stageonoff=0;
+
+
+//メインプログラム
+void Mainprogram();
+void rpaint();
+int maint;
+
+
+//サブクラス
+//(ウエイト系
+void wait(int interval);
+void wait2(long stime, long etime,int FLAME_TIME);
+int rand(int Rand);
+void end();
+
+//描画
+int color;
+void setfont(int a);
+void setcolor(int red, int green, int blue);
+void setc0();
+void setc1();
+void drawpixel(int a,int b);
+void drawline(int a,int b,int c,int d);
+void drawrect(int a,int b,int c,int d);
+void fillrect(int a,int b,int c,int d);
+void drawarc(int a,int b,int c,int d);
+void fillarc(int a,int b,int c,int d);
+int grap[161][8],mgrap[51];
+int loadimage(string b);
+int loadimage(int a,int x,int y,int r,int z);
+int mirror;
+void drawimage(int mx,int a,int b);
+void drawimage(int mx,int a,int b,int c,int d,int e,int f);
+void setre();
+void setre2();
+void setno();
+int oto[151];
+void ot(int x);void bgmchange(int x);
+
+//文字
+void str(string c,int a,int b);
+
+
+//)
+
+void stagecls();
+void stage();
+void stagep();
+
+
+
+
+
+//1-ステージ
+//10-ステージ前
+//
+
+
+
+//ループ
+int t,tt,t1,t2,t3,t4;
+
+
+//初期化
+int zxon,zzxon;
+
+//キーコンフィグ
+int key,keytm;
+
+//三角関数
+double pai=3.1415926535;
+
+
+//地面
+#define smax 31
+int sx,sco;
+int sa[smax],sb[smax],sc[smax],sd[smax],stype[smax],sxtype[smax],sr[smax];
+int sgtype[smax];
+
+
+
+//プレイヤー
+int mainmsgtype;
+int ma,mb,mnobia,mnobib,mhp;
+int mc,md,macttype,atkon,atktm,mactsok,msstar,nokori=2,mactp,mact;
+
+int mtype,mxtype,mtm,mzz;
+int mzimen,mrzimen,mkasok,mmuki,mmukitm,mjumptm,mkeytm,mcleartm;
+int mmutekitm,mmutekion;
+int mztm,mztype;
+int actaon[7];
+//メッセージ
+int mmsgtm,mmsgtype;
+
+int mascrollmax=21000;//9000
+
+
+
+
+//ブロック
+void tyobi(int x,int y,int type);
+void brockbreak(int t);
+#define tmax 641
+int tco;
+int ta[tmax],tb[tmax],tc[tmax],td[tmax],thp[tmax],ttype[tmax];
+int titem[tmax],txtype[tmax];
+
+//メッセージブロック
+int tmsgtm,tmsgtype,tmsgx,tmsgy,tmsgnobix,tmsgnobiy,tmsg;
+void ttmsg();void txmsg(string x,int a);
+void setfont(int x,int y);
+
+//効果を持たないグラ
+void eyobi(int xa,int xb,int xc,int xd,int xe,int xf,int xnobia,int xnobib,int xgtype,int xtm);
+#define emax 201
+int eco;
+int ea[emax],eb[emax],enobia[emax],enobib[emax],ec[emax],ed[emax];
+int ee[emax],ef[emax],etm[emax];
+int egtype[emax];
+
+
+
+//敵キャラ
+void ayobi(int xa,int xb,int xc,int xd,int xnotm,int xtype,int xxtype);
+void tekizimen();
+#define amax 24
+int aco;
+int aa[amax],ab[amax],anobia[amax],anobib[amax],ac[amax],ad[amax];
+int ae[amax],af[amax],abrocktm[amax];
+int aacta[amax],aactb[amax],azimentype[amax],axzimen[amax];
+int atype[amax],axtype[amax],amuki[amax],ahp[amax];
+int anotm[amax],anx[160],any[160];
+int atm[amax],a2tm[amax];
+int amsgtm[amax],amsgtype[amax];
+
+//敵出現
+#define bmax 81
+int bco;
+int ba[bmax],bb[bmax],btm[bmax];
+int btype[bmax],bxtype[bmax],bz[bmax];
+
+
+//背景
+#define nmax 41
+int nxxmax,nco;
+int na[nmax],nb[nmax],nc[nmax],nd[nmax],ntype[nmax];
+int ne[nmax],nf[nmax],ng[nmax],nx[nmax];
+
+
+//リフト
+#define srmax 21
+int srco;
+int sra[srmax],srb[srmax],src[srmax],srd[srmax],sre[srmax],srf[srmax];
+int srtype[srmax],srgtype[srmax],sracttype[srmax],srsp[srmax];
+int srmuki[srmax],sron[srmax],sree[srmax];
+int srsok[srmax],srmovep[srmax],srmove[srmax];
+
+
+
+
+
+//スクロール範囲
+int fx=0,fy=0,fzx,fzy,scrollx,scrolly;
+//全体のポイント
+int fma=0,fmb=0;
+//強制スクロール
+int kscroll=0;
+//画面サイズ(ファミコンサイズ×2)(256-224)
+int fxmax=48000,fymax=42000;
+
+
+
+//ステージ
+byte stagedate[17][2001];
+
+//画面黒
+int blacktm=1,blackx=0;
+
+
+
+//自由な値
+int xx[91];
+double xd[11];
+string xs[31];
+
+
+//タイマー測定
+long stime;
\ No newline at end of file
diff --git a/res/brock.png b/res/brock.png
new file mode 100644
index 0000000..bec47f5
Binary files /dev/null and b/res/brock.png differ
diff --git a/res/brock2.png b/res/brock2.png
new file mode 100644
index 0000000..03f118d
Binary files /dev/null and b/res/brock2.png differ
diff --git a/res/haikei.png b/res/haikei.png
new file mode 100644
index 0000000..079b4de
Binary files /dev/null and b/res/haikei.png differ
diff --git a/res/item.png b/res/item.png
new file mode 100644
index 0000000..ed06206
Binary files /dev/null and b/res/item.png differ
diff --git a/res/omake.png b/res/omake.png
new file mode 100644
index 0000000..a72d359
Binary files /dev/null and b/res/omake.png differ
diff --git a/res/omake2.png b/res/omake2.png
new file mode 100644
index 0000000..33d7ce1
Binary files /dev/null and b/res/omake2.png differ
diff --git a/res/player.png b/res/player.png
new file mode 100644
index 0000000..db6c92d
Binary files /dev/null and b/res/player.png differ
diff --git a/res/syobon3.png b/res/syobon3.png
new file mode 100644
index 0000000..291c6a9
Binary files /dev/null and b/res/syobon3.png differ
diff --git a/res/teki.png b/res/teki.png
new file mode 100644
index 0000000..e3def0a
Binary files /dev/null and b/res/teki.png differ
diff --git a/se/4-clear.mp3 b/se/4-clear.mp3
new file mode 100644
index 0000000..eddc02e
Binary files /dev/null and b/se/4-clear.mp3 differ
diff --git a/se/allclear.mp3 b/se/allclear.mp3
new file mode 100644
index 0000000..1eacbfe
Binary files /dev/null and b/se/allclear.mp3 differ
diff --git a/se/brockbreak.mp3 b/se/brockbreak.mp3
new file mode 100644
index 0000000..a629a0b
Binary files /dev/null and b/se/brockbreak.mp3 differ
diff --git a/se/brockcoin.mp3 b/se/brockcoin.mp3
new file mode 100644
index 0000000..bdc10ab
Binary files /dev/null and b/se/brockcoin.mp3 differ
diff --git a/se/brockkinoko.mp3 b/se/brockkinoko.mp3
new file mode 100644
index 0000000..96713ee
Binary files /dev/null and b/se/brockkinoko.mp3 differ
diff --git a/se/coin.mp3 b/se/coin.mp3
new file mode 100644
index 0000000..bdc10ab
Binary files /dev/null and b/se/coin.mp3 differ
diff --git a/se/death.mp3 b/se/death.mp3
new file mode 100644
index 0000000..462003e
Binary files /dev/null and b/se/death.mp3 differ
diff --git a/se/dokan.mp3 b/se/dokan.mp3
new file mode 100644
index 0000000..c5e892b
Binary files /dev/null and b/se/dokan.mp3 differ
diff --git a/se/gameover.mp3 b/se/gameover.mp3
new file mode 100644
index 0000000..59e9453
Binary files /dev/null and b/se/gameover.mp3 differ
diff --git a/se/goal.mp3 b/se/goal.mp3
new file mode 100644
index 0000000..7878d71
Binary files /dev/null and b/se/goal.mp3 differ
diff --git a/se/hintblock.mp3 b/se/hintblock.mp3
new file mode 100644
index 0000000..aceb286
Binary files /dev/null and b/se/hintblock.mp3 differ
diff --git a/se/humi.mp3 b/se/humi.mp3
new file mode 100644
index 0000000..45623f6
Binary files /dev/null and b/se/humi.mp3 differ
diff --git a/se/jump.mp3 b/se/jump.mp3
new file mode 100644
index 0000000..abead48
Binary files /dev/null and b/se/jump.mp3 differ
diff --git a/se/jumpblock.mp3 b/se/jumpblock.mp3
new file mode 100644
index 0000000..45b7e68
Binary files /dev/null and b/se/jumpblock.mp3 differ
diff --git a/se/kirra.mp3 b/se/kirra.mp3
new file mode 100644
index 0000000..5ab6f7e
Binary files /dev/null and b/se/kirra.mp3 differ
diff --git a/se/koura.mp3 b/se/koura.mp3
new file mode 100644
index 0000000..4ac43f5
Binary files /dev/null and b/se/koura.mp3 differ
diff --git a/se/powerup.mp3 b/se/powerup.mp3
new file mode 100644
index 0000000..35d4e67
Binary files /dev/null and b/se/powerup.mp3 differ
diff --git a/se/pswitch.mp3 b/se/pswitch.mp3
new file mode 100644
index 0000000..618742c
Binary files /dev/null and b/se/pswitch.mp3 differ
diff --git a/se/tekifire.mp3 b/se/tekifire.mp3
new file mode 100644
index 0000000..83a35c8
Binary files /dev/null and b/se/tekifire.mp3 differ