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

Step in riverside - サクラ曲掲示板6

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

Step in riverside

yax
MML先頭 2000 文字だけ表示しています全文を見る
  1. //-----------------------------------------------
  2. // Step in riverside
  3. // (C)Yax
  4. //-----------------------------------------------
  5.  
  6. ResetGM();
  7.  
  8. TrackName = {"Step in riverside"}
  9. Copyright = {"Yax"}
  10.  
  11. Include(bend.h)
  12.  
  13. r4
  14. TrackSync;
  15.  
  16.  
  17. /*
  18. * アルペジオ記号用関数
  19. * D : ずれ幅
  20. * L : 全体長
  21. * S : 構成音
  22. */
  23. Function ARP(Int D, Int L, Str S) {
  24. Int LNG = L
  25. Int STP = 0
  26. Int TEMP = 0
  27. Str X = ""
  28. Str RS = ""
  29. Str NS = ""
  30. Int J = 0
  31. Array NAR = ()
  32.  
  33. For(Int I = 1; I <= 100; I++ ){
  34. X = MID(S,I,1)
  35. J = ASC(X)
  36.  
  37. IF (X == "") {
  38. EXIT
  39. }
  40.  
  41. IF ( J >= 97 ) {
  42. IF ( J <= 103 ) {
  43. IF ( NS != "" ) {
  44. NS = Replace(NS,{@-},{-@},off)
  45. NS = Replace(NS,{@+},{+@},off)
  46. NS = Replace(NS,{@#},{#@},off)
  47. NS = Replace(NS,{@*},{*@},off)
  48. NAR = (NAR,NS)
  49. NS = ""
  50. }
  51. X = X + "@"
  52. }
  53. }
  54. NS = NS + X
  55. }
  56. IF ( NS != "" ) {
  57. NS = Replace(NS,{@-},{-@},off)
  58. NS = Replace(NS,{@+},{+@},off)
  59. NS = Replace(NS,{@#},{#@},off)
  60. NS = Replace(NS,{@+},{*@},off)
  61. NAR = (NAR,NS)
  62. NS = ""
  63. }
  64.  
  65. For(Int I=0;I<SizeOf(NAR);I++){
  66. TEMP = L - STP
  67. RS = "r%" + #STR(STP)
  68. NS = Replace(NAR(I), {@}, {%}+#STR(TEMP),off)
  69. Sub{ RS NS }
  70. STP = STP+D
  71. }
  72. r%(L)
  73. }
  74.  
  75.  
  76. INT ETR = 3
  77. FUNCTION ETRANS() {
  78. TrackKey(ETR)
  79. }
  80.  
  81. FUNCTION ETRANS_REV() {
  82. TrackKey(0)
  83. }
  84.  
  85.  
  86. Tempo=129
  87.  
  88. INT KEY = 0
  89. Key(KEY)
  90. TR(10) TrackKey(-KEY)
  91. TR(20) TrackKey(-KEY)
  92.  
  93.  
  94. // 全体の調整
  95. TR(1) V(109) REV(45) CHO(120)
  96. TR(2) V(90) REV(58) CHO(50)
  97. TR(12) V(89) REV(58) CHO(50) r64
  98. TR(3) V(96) REV(70) CHO(100)
  99. TR(4) V(100) REV(40) CHO(80)
  100. TR(5) V(98) REV(50) CHO(110)
  101. TR(6) V(94) REV(70) CHO(90)
  102. TR(7) V(85) REV(47) CHO(110)
  103. TR(8) V(85) REV(47) CHO(110)
  104. TR(9) V(100) REV(100) CHO(100)
  105. TR(10) V(110) REV(35) CHO(60)
  106.  
  107.  
  108. //------------------------------------
  109. // Track 1 :
  110. //------------------------------------
  111. TR(1) CH(1) P(64)
  112. @40 l8
  113. v120
  115. [4 r
作者からのコメント
ダンサブルなイメージで作ってみました。
DLして再生するのをお勧めします。
作曲者
自作
ライセンス
CCクリエイティブ・コモンズ BY↗商用利用 ○改変 ○作者を表示すれば自由に使える
転載
許可
推奨音源
TW-MUSIC2
ピコサクラ対応
未対応
ピコサクラバージョン
0.0.0
動画
なし
投稿日時
2025-06-05 08:46
更新日時
2025-06-05 08:46
お気に入り
森と泉
ダウンロード数
98
タグ
タグはありません。
→この曲(id:2819)に問題がある場合こちらへ

感謝のコメント

森と泉2025/06/05
良い曲をありがとうございました♪
♪
この曲に「ありがとう」を伝えませんか？
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。
ログインしてコメントする はじめての方はこちら（無料登録）