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

「わくわくするような曲」@深夜の2時間DTM - サクラ曲掲示板6

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

「わくわくするような曲」@深夜の2時間DTM

MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. Int LOOP=2
  2. Int TIMIDITY=0
  3. Tempo 260
  4. #PEDALON={Sub {r16y64,127}}
  5. #PEDALOFF={r-32 y64,0 r32}
  6.  
  7. //PlayFrom(100:1:1)
  8. // シンバルのロテート
  9. Int CYMINIT=0
  10. Int SNAREINIT=0
  11.  
  12. Function Vibrate(delay1, depth1, delay2, depth2, delay3, depth3, delay4, depth4, delay5, depth5) {
  13. Int NowTime;
  14. NowTime = Time;
  15. IF(delay1=0) {
  16. Modulation(depth1)
  17. } ELSE {
  18. Modulation.onNoteWave(0, 0, delay1 /2, 0, depth1, delay1/2)
  19. IF(delay2<>0) {
  20. Time=NowTime+delay1
  21. Modulation.onNoteWave(depth1, depth2, delay2)
  22. IF(delay3<>0) {
  23. Time=NowTime+delay1+delay2
  24. Modulation.onNoteWave(depth2, depth3, delay3)
  25. IF(delay4<>0) {
  26. Time=NowTime+delay1+delay2+delay3
  27. Modulation.onNoteWave(depth3, depth4, delay4)
  28. IF(delay5<>0) {
  29. Time=NowTime+delay1+delay2+delay3+delay4
  30. Modulation.onNoteWave(depth4, depth5, delay5)
  31. }
  32. }
  33. }
  34. }
  35. }
  36. Time=NowTime
  37. }
  38.  
  39. Function Snare() {
  40. Int CC
  41. IF(TIMIDITY=0) {
  42. CC=Snare2
  43. } ELSE {
  44. IF(SNAREINIT=0) {
  45. CC=Snare1
  46. SNAREINIT=1
  47. } ELSE {
  48. CC=Snare2
  49. SNAREINIT=0
  50. }
  51. }
  52. Result=CC
  53. }
  54.  
  55. Function Cymbal() {
  56. Int CC
  57. IF(CYMINIT=0) {
  58. CC=CrashCymbal1
  59. CYMINIT=1
  60. } ELSE {
  61. CC=CrashCymbal2
  62. CYMINIT=0
  63. }
  64. Result=CC
  65. }
  66.  
  67. Function RandV(Int MIN, Int MAX) {
  68. Str MML="v"
  69. MML=MML+Random(MIN,MAX)
  70. // Print(MML)
  71. MML
  72. }
  73.  
  74. Str RMML
  75. Function RandR(Int MIN, Int MAX) {
  76. Str MML="r"
  77. IF(RANDON=1) {
  78. RMML=RMML+"r"
  79. Int VALUE=Random(0,10)
  80. IF(VALUE<5) {
  81. MML=MML+"-"
  82. } ELSE {
  83. RMML=RMML+"-"
  84. }
  85. Str RAND=Random(MIN,MAX)
  86. MML=MML+RAND
  87. RMML=RMML+RAND
  88. // Print(MML)
  89. MML
  90. }
  91. }
  92.  
  93. Function SyncR() {
  94. Str MML=RMML
  95. RMML=""
  96. // Print(MML)
  97. MML
  98. }
  99.  
  100. Function LoopPlay(Str Mml) {
  101. Str _MML
  102. For (Int i = 1; i <= LOOP; i++) {
  103. _MML=_MML + #STR(Mml)
  104. }
  105. _MML
  106. }
  107.  
  108. #back={
  109. q50
  110. #gce={'g>ce<'}
  111. #amcf={'a->cf<'}
  112. #gcf={'g>cf<'}
  113. #acf={'a>cf<'}
  114. #acpf={'a>c#f<'}
  115. #gbf={'gb>f<'}
  116. #gbe={'gb>e<'}
  117. #acpe={'a>c#e<'}
  118. #ace={'a>ce<'}
  119. #gcd={'g>cd<'}
  120. #bdg
作者からのコメント
たまには、いきぬきさせてなの。。。
2時間作曲なのね。
1月につくった、何かの曲ににてるなの。ぐすぐす;;
参考、メインメロディー(最初の8小節)作曲が、5分程度、サビが、1時間悩んで・・・あれを使ったなの。。。

参考ハッシュタグ:https://twitter.com/hashtag/%E6%B7%B1%E5%A4%9C%E3%81%AE2%E6%99%82%E9%96%93DTM?src=hash
作曲者
ななこっち★
ライセンス
CCクリエイティブ・コモンズ BY↗商用利用 ○改変 ○作者を表示すれば自由に使える
転載
許可
推奨音源
MSGS/TiMidiTy++
ピコサクラ対応
未対応
ピコサクラバージョン
0.2.3
投稿日時
2015-05-04 00:04
更新日時
2015-05-04 00:19
お気に入り
(^o^)/
ダウンロード数
315
→この曲(id:1646)に問題がある場合こちらへ

感謝のコメント

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