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

Sweet Gift - サクラ曲掲示板6

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

Sweet Gift

AMIO動画
MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. TrackName = {"Sweet Gift"};
  2. Copyright = {"AMIO"};
  3.  
  4. /*
  5.  
  6. */
  7.  
  8.  
  9.  
  10. Int Repeat = 2;
  11. // 繰り返し回数を設定できます
  12.  
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19. //-----------------------------variables---------------------------------
  20.  
  21. Int In = 0;//イントロからメロディースタートまでの時間
  22. Int Ltime = 36;//1ループの時間
  23. Int Out = Ltime*Repeat+In+1;//フェードアウト開始時間
  24. Int Fade = 8;//フェードアウトにかかる時間
  25. Int Tmp = 94;//テンポ
  26. Int Sig = 4;
  27.  
  28. Int Ptime = (In+Ltime*Repeat+Fade)*Sig*60/Tmp;
  29.  
  30. //---------------------------functions---------------------------------
  31.  
  32. Function Repstr(Str MML,Int Tim,Int Rep,Int Beg=0)//MML繰り返し処理関数
  33. {
  34. Int I;
  35. For(I=0;I<Rep-Beg;I++){
  36. Time((I+Beg)*Tim+In+1:1:0) MML;
  37. }
  38. }
  39.  
  40. Function PrintPlayTime(Int Tim)
  41. {
  42. Int Minute = Tim/60;
  43. Int Second = Tim%60;
  44. If(Tim<60){ Print({"演奏時間:"}+Second+{"秒"}); }
  45. Else{Print({"演奏時間:"}+Minute+{"分"}+Second+{"秒"}); }
  46. }
  47.  
  48. Function FadeoutVol(Int Mes,Int Prev)// Prev:pre-volume フェードアウト前のメインボリューム
  49. {
  50. Str I = {!1};
  51. While(Mes>1){I = I+{^1}; Mes--;}
  52. Str CMD = {V.onTime(Prev,0,LEN)};
  53. CMD.s({LEN},I);
  54. CMD;
  55. }
  56.  
  57. Function FadeoutAll(Int Mes,Array X)
  58. {
  59. Int T = Time;
  60. For(Int J=1;J<=16;J++){
  61. TR(J); CH(J); Time(T); FadeoutVol(Mes,X(J-1));
  62. }
  63. }
  64.  
  65. //------------------------------system setting---------------------------------
  66.  
  67. SoundType=1;TimeBase(96);System.MeasureShift(1);Include(guitar.h);Include(gs.h);
  68. Time(0:1:0) Tempo(Tmp);TimeSignature(Sig,4);PrintPlayTime(Ptime);
  69. ResetGM; r4 ResetGS; r4 TrackSync;
  70.  
  71. //----------------------------------strings-----------------------------------
  72.  
  73. Str TR1In = {};
  74. Str TR1 = {[4r1]
  75. l16 ["b-^^^"b-cc+"a- ^^^^^^^r "a-^^^"b-"a-"e-"f ^^^^^^^r
  76. "b-^^^"b-"a-"b-:c ^c^cc+^e-^ f^^^^^^^,90 rrrrrrrr]c ^c^c"b-^c^ c+^^^^^^^,90 rrrrrr"b-c+
  77. [f^^^c+^"b-c+ ^^^rc+^e-^ c^^^"b-"a-"f"a- ^^^^^^^r :
  78. f^^^c+^"b-c+ ^c+^c+e-^c+e- f^^^^^^^,90 rrrrrrrr]
  79. "b-^"b-^"b-"b-^c ^c^c"b-^c^ c+^^^^^^^,90 rrrrrrc+"a-
  80. ["b-^^^"b-cc+"a- ^^^^^^^r "a-^^^"b-"a-"e-"f^^^^^^^r
  81. "b-^^^"b-cc+"a- ^c+^c+e-^c+e- :f^^^^^^^,90 rrrrr
作者からのコメント
AMIOです。相変わらずループ音楽です。甘い大人な感じのBGMに仕上がったと思います。
作曲者
自作
ライセンス
🌐パブリックドメイン↗商用利用 ○改変 ○改変も転載も自由
転載
許可
推奨音源
SGM-V2.01
実行エンジン
未対応
ピコサクラバージョン
0.0.0
投稿日時
2024-12-14 01:52
更新日時
2024-12-14 02:01
お気に入り
森と泉
ダウンロード数
155
タグ
タグはありません。
→この曲(id:2692)に問題がある場合こちらへ

感謝のコメント

感謝のコメント募集中です!!
♪
この曲に「ありがとう」を伝えませんか?
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。