#東方弾幕風[Stage]
#Title[東方蒐集記 〜 Collected stories]
#Text[妄想する程度さん原案のオリジナルステージです]
#ScriptVersion[2]

script_stage_main {
 let title = 1; //タイトル中ならtrue
 let titleimg = GetCurrentScriptDirectory~"img\TitleBack.png"; //タイトル画像
 let count = 1; //カーソルの初期値を１にする
 let plus = 1;

 @Initialize {
  LoadGraphic(titleimg);

  Stage1;
 }

 @MainLoop {
  if(title == 1) {
   ForbidShot(true);
   ForbidBomb(true);
   SetPlayerX(GetCenterX);
   SetPlayerY(GetClipMaxY);
   if(GetKeyState(VK_SHOT) == KEY_PUSH) {
    title = 2;
   }
  }
  else if(title == 2) {
   ForbidShot(true); //ショット禁止
   ForbidBomb(true); //ボム禁止
   SetPlayerX(GetCenterX); //プレイヤーのx座標を固定
   SetPlayerY(GetClipMaxY); //プレイヤーのy座標を固定
   if(GetKeyState(VK_DOWN) == KEY_PUSH) { //下キーが押された時{}を実行
    if(count == 1) { //カーソルが１だった場合{}を実行
     count = 2;
    }
    else if(count == 2) { //２だった場合{}を実行
     count = 3;
    }
    else if(count == 3) { //３だった場合{}を実行
     count = 4;
    }
    else if(count == 4) {
     count = 5;
    }
    else if(count == 5) {
     count = 1;
    }
   }
   else if(GetKeyState(VK_UP) == KEY_PUSH) {
    if(count == 1) {
     count = 5;
    }
    else if(count == 2) {
     count = 1;
    }
    else if(count == 3) {
     count = 2;
    }
    else if(count == 4) {
     count = 3;
    }
    else if(count == 5) {
     count = 4;
    }
   }
   else if(GetKeyState(VK_SHOT) == KEY_PUSH) { //ショットキーが押されたら{}を実行
    if(count == 1 || count == 2 || count == 3 || count == 4) {
     title = 3; //タイトル画面終了
    }
    else if(count == 5) {
     ClearStage; //クリア
    }
   }
  }
  else if(title == 3) { //タイトルじゃなかった場合
   ForbidShot(false); //ショット許可
   ForbidBomb(false); //ボム許可
  }

  yield;
 }

 @Finalize {
  DeleteGraphic(titleimg);
 }

 @DrawTopObject {
  if(title == 1) {
   SetTexture(titleimg); //タイトル画像をセット
   SetGraphicRect(0, 0, 384, 448);
   DrawGraphic(GetCenterX, GetCenterY);
   DrawText("東", 70, 80, 150, 255);
   DrawText("方", 240, 120, 100, 255);
   DrawText("蒐", 60, 250, 120, 255);
   DrawText("集", 190, 290, 80, 255);
   DrawText("記", 280, 270, 100, 255);
   DrawText("GAME START", 150, 380, 30, 255);
   DrawText("Let's push shot key", 140, 420, 18, 255);
  }
  else if(title == 2) {
   SetTexture(titleimg);
   SetGraphicRect(0, 0, 384, 448);
   DrawGraphic(GetCenterX, GetCenterY);
   DrawText("⇒", 50, 40 * count, 18, 255);
   DrawText("前書き(Easy)", 100, 40, 18, 255);
   DrawText("まずは概要を知ることも大事", 250, 45, 12, 255);
   DrawText("序章(Normal)", 100, 80, 18, 255);
   DrawText("物語はここから始まる", 250, 85, 12, 255);
   DrawText("伏線(Hard)", 100, 120, 18, 255);
   DrawText("何気ない言葉に裏がある", 250, 125, 12, 255);
   DrawText("真髄(Lunatic)", 100, 160, 18, 255);
   DrawText("ここでしか味わえない物語", 250, 165, 12, 255);
   DrawText("用なんてない", 100, 200, 18, 255);
  }
 }
#include_function ".\１面\stage1.txt"
}