サクラトップ 掲示板トップ ログイン

Rainy Cruise - サクラ曲掲示板6

曲掲示板6にエディタ機能が追加されました!気軽に曲を作成してみましょう!
AMIO

Rainy Cruise

MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. TrackName = {"Rainy Cruise"};
  2. Copyright = {"AMIO"};
  3.  
  4. /*
  5. アップテンポだけど切ない感じのループ曲。
  6. タイトルは「雨の中を航海する」イメージから。
  7. */
  8.  
  9.  
  10.  
  11. Int Repeat = 2;
  12. // 繰り返し回数を設定できます
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20. //-----------------------------variables---------------------------------
  21.  
  22. Int In = 4;//イントロからメロディースタートまでの時間
  23. Int Ltime = 36;//1ループの時間
  24. Int Out = Ltime*Repeat+In+1;//フェードアウト開始時間
  25. Int Fade = 8;//フェードアウトにかかる時間
  26. Int Tmp = 140;//テンポ
  27. Int Sig = 4;
  28.  
  29. Int Ptime = (In+Ltime*Repeat+Fade)*Sig*60/Tmp;
  30.  
  31. //---------------------------functions---------------------------------
  32.  
  33. Function Repstr(Str MML,Int Tim,Int Rep,Int Beg=0)//MML繰り返し処理関数
  34. {
  35. Int I;
  36. For(I=0;I<Rep-Beg;I++){
  37. Time((I+Beg)*Tim+In+1:1:0) MML;
  38. }
  39. }
  40.  
  41. Function PrintPlayTime(Int Tim)
  42. {
  43. Int Minute = Tim/60;
  44. Int Second = Tim%60;
  45. If(Tim<60){ Print({"演奏時間:"}+Second+{"秒"}); }
  46. Else{Print({"演奏時間:"}+Minute+{"分"}+Second+{"秒"}); }
  47. }
  48.  
  49. Function FadeoutVol(Int Mes,Int Prev)// Prev:pre-volume フェードアウト前のメインボリューム
  50. {
  51. Str I = {!1};
  52. While(Mes>1){I = I+{^1}; Mes--;}
  53. Str CMD = {V.onTime(Prev,0,LEN)};
  54. CMD.s({LEN},I);
  55. CMD;
  56. }
  57.  
  58. Function FadeoutAll(Int Mes,Array X)
  59. {
  60. Int T = Time;
  61. For(Int J=1;J<=16;J++){
  62. TR(J); CH(J); Time(T); FadeoutVol(Mes,X(J-1));
  63. }
  64. }
  65.  
  66. //------------------------------system setting---------------------------------
  67.  
  68. SoundType=1;TimeBase(96);System.MeasureShift(1);Include(guitar.h);Include(gs.h);
  69. Time(0:1:0) Tempo(Tmp);TimeSignature(Sig,4);PrintPlayTime(Ptime);
  70. ResetGM; r2 ResetGS; r2 TrackSync;
  71.  
  72. //----------------------------------strings-----------------------------------
  73.  
  74. #v1_1 = {v.N(95,90,105,105,100,100)};
  75. #v1_2 = {v.N(105,95,85)};
  76. #v1_3 = {v.N(85,90,95,105,100,100)};
  77. #v1_4 = {v.N(105,95,85)};
  78. #v1_5 = {v.N(85,95,100,100,100,100)};
  79. #v1_6 = {v.N(90,100,100,105,100)};
  80. #v1_7 = {v.N(105,95,100,120,115,90,105,105,95,95,100)};
  81. #v1_8 = {v.N(105,95,100,120,115,90,105,115,110,105,95)};
  82.  
  83. Str TR1In = {};
  84. Str TR1 = { l4 q100 o5 v100 EP(127)
  85. [#v1_1 e-4^8c4^8g4^8g4^8f4e-4
  86. #v1_2 f4^8e-4^8d1^4,8
作者からのコメント
AMIOです。アップテンポで切ない感じのループBGMです。
作曲者
自作
ライセンス
🌐パブリックドメイン商用利用 ○改変 ○改変も転載も自由
転載
許可
推奨音源
TW-MUSIC2
ピコサクラ対応
未対応
ピコサクラバージョン
0.2.3
動画
なし
投稿日時
2016-07-16 16:25
更新日時
2016-07-16 16:25
お気に入り
音助しゅん庚申worksYoshiokaH゛
ダウンロード数
404
→この曲(id:1813)に問題がある場合こちらへ

感謝のコメント

音助2016/07/17
サビの部分がユーロビートっぽくて好みです。
あと、曲の構成がシンプルでわかりやすく作られているので、PSG×3チャンネルとかでも良い曲になっちゃうんじゃないかと。
個人的には 2 ループの後、大サビが欲しかったかも
AMIO2016/07/19
> 音助さん
確かにユーロビートっぽい感じもありますね
頭の中でメロディーが浮かんだ時に音色がはっきりしてなかったのでつい付け足しまくったのですが、もうちょっと少なめが良かったかもですね。
Yoshioka2016/07/27
聴かせて頂きましたー。AMIOさんって色んなジャンルの曲作られるんですね(・ω・。
ユロビ感もありありですが、アンサンブル感や音色のバランスの良さが出ていて、BGM作り慣れてるなあと思いました。
AMIO2016/08/03
> Yoshiokaさん
コメント気づかなくてすみません
飽きやすいタイプなのであれを作ったら次はこれ、みたいな感じでフラフラしちゃうんですよね
音量のバランスは最近わかってきた気がしますが、いまだにどの音色を使えばいいかわからない事が多いです
この曲に「ありがとう」を伝えませんか?
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。