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

Walked in sunset - サクラ曲掲示板6

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

Walked in sunset

yax
MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. //-----------------------------------------------
  2. // Walked in sunset
  3. // (C)Yax
  4. //-----------------------------------------------
  5.  
  6. TrackName = {"Walked in sunset"}
  7. Copyright = {"Yax"}
  8.  
  9. ResetGM();
  10. r2
  11. TrackSync;
  12.  
  13. // アルペジオ関数
  14. Function ARP(Int D, Int L, Str S) {
  15. Int LNG = L
  16. Int STP = 0
  17. Int TEMP = 0
  18. Str X = ""
  19. Str RS = ""
  20. Str NS = ""
  21. Int J = 0
  22. Array NAR = ()
  23.  
  24. For(Int I = 1; I <= 100; I++ ){
  25. X = MID(S,I,1)
  26. J = ASC(X)
  27.  
  28. IF (X == "") {
  29. EXIT
  30. }
  31.  
  32. IF ( J >= 97 ) {
  33. IF ( J <= 103 ) {
  34. IF ( NS != "" ) {
  35. NS = Replace(NS,{@-},{-@},off)
  36. NS = Replace(NS,{@+},{+@},off)
  37. NS = Replace(NS,{@#},{#@},off)
  38. NS = Replace(NS,{@*},{*@},off)
  39. NAR = (NAR,NS)
  40. NS = ""
  41. }
  42. X = X + "@"
  43. }
  44. }
  45. NS = NS + X
  46. }
  47. IF ( NS != "" ) {
  48. NS = Replace(NS,{@-},{-@},off)
  49. NS = Replace(NS,{@+},{+@},off)
  50. NS = Replace(NS,{@#},{#@},off)
  51. NS = Replace(NS,{@+},{*@},off)
  52. NAR = (NAR,NS)
  53. NS = ""
  54. }
  55.  
  56. For(Int I=0;I<SizeOf(NAR);I++){
  57. TEMP = L - STP
  58. RS = "r%" + #STR(STP)
  59. NS = Replace(NAR(I), {@}, {%}+#STR(TEMP),off)
  60. Sub{ RS NS }
  61. STP = STP+D
  62. }
  63. r%(L)
  64. }
  65.  
  66. // ××ダンド関数
  67. Function DANDO(B, E, LEN, STP) {
  68. Int _STEP = 24
  69. Int _DIFF = 0
  70. Int _CNT = 0
  71. Int _TMP = 0
  72. Int _LAP = 0
  73.  
  74. IF( STP != 0 ) {
  75. _STEP = STP
  76. }
  77.  
  78. _CNT = LEN/_STEP
  79. _DIFF = (E - B)/_CNT
  80.  
  81. _TMP = B
  82. Tempo = %(B)
  83.  
  84. For(Int I = 1; I < _CNT; I++ ){
  85. r%(_STEP)
  86. _TMP = _TMP + _DIFF
  87. Tempo = %(_TMP)
  88. _LAP = _LAP + _STEP
  89. }
  90.  
  91. r%(LEN-_LAP)
  92. Tempo = %(E)
  93. r-%(LEN)
  94. }
  95.  
  96.  
  97. //------------------------------------------------
  98. // 全体の調整
  99. //------------------------------------------------
  100. TR(1) V(110) REV(30) CHO(40)
  101. TR(2) V(112) REV(58) CHO(30)
  102. TR(3) V(119) REV(60) CHO(20)
  103. TR(4) V(113) REV(35) CHO(15)
  104. TR(5) V(110) REV(80) CHO(10)
  105. TR(6) V(100) REV(40) CHO(50)
  106. TR(7) V(94) REV(50) CHO(70)
  107. TR(8) V
作者からのコメント
夕暮れにお散歩…という感じでゆるいシャッフルな感じで作ってみました。
@5のエレピの響きがいい感じかなと。
DLして再生するのを推奨します。(最近アップしてもここで鳴らなくなったような…)
作曲者
自作
ライセンス
CCクリエイティブ・コモンズ BY↗商用利用 ○改変 ○作者を表示すれば自由に使える
転載
許可
推奨音源
TW-MUSIC2
ピコサクラ対応
未対応
ピコサクラバージョン
0.0.0
動画
なし
投稿日時
2025-09-03 11:57
更新日時
2025-09-03 11:57
お気に入り
森と泉
ダウンロード数
152
タグ
タグはありません。
→この曲(id:2869)に問題がある場合こちらへ

感謝のコメント

森と泉2025/09/04
最初は日が傾いたころ、中間はまさに日没、最後は静かな夜に・・・特にTubaが印象的でした。良い曲をありがとうございました♪
♪
この曲に「ありがとう」を伝えませんか？
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。
ログインしてコメントする はじめての方はこちら（無料登録）