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

@0506 戦闘&勝利 #深夜の2時間DTM - サクラ曲掲示板6

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

@0506 戦闘&勝利 #深夜の2時間DTM

MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. // ↓どっちかを1にしてなの;;ぐすぐす;;
  2. Int SENTO=0
  3. Int SHORI=0
  4.  
  5. IF(SENTO=1) {
  6. Tempo 240
  7. Int CYMINIT=0
  8. Int LOOP=4
  9.  
  10. Function LoopPlay(Str Mml) {
  11. Str _MML
  12. For (Int i = 1; i <= LOOP; i++) {
  13. _MML=_MML + #STR(Mml)
  14. }
  15. _MML
  16. }
  17. Int SNAREINIT=0
  18.  
  19. Function Snare() {
  20. Int CC
  21. IF(TIMIDITY=0) {
  22. CC=Snare1
  23. } ELSE {
  24. IF(SNAREINIT=0) {
  25. CC=Snare1
  26. SNAREINIT=1
  27. } ELSE {
  28. CC=Snare2
  29. SNAREINIT=0
  30. }
  31. }
  32. Result=CC
  33. }
  34.  
  35. Function Cymbal() {
  36. Int CC
  37. IF(CYMINIT=0) {
  38. CC=CrashCymbal1
  39. CYMINIT=1
  40. } ELSE {
  41. CC=CrashCymbal2
  42. CYMINIT=0
  43. }
  44. Result=CC
  45. }
  46.  
  47. Function Symbal() {
  48. Int CC
  49. IF(CYMINIT=0) {
  50. CC=62
  51. CYMINIT=1
  52. } ELSE {
  53. CC=61
  54. CYMINIT=0
  55. }
  56. Result=CC
  57. }
  58.  
  59. Function RandV(Int MIN, Int MAX) {
  60. Str MML="v"
  61. MML=MML+Random(MIN,MAX)
  62. MML
  63. }
  64.  
  65. #melody1={
  66. l4
  67. [
  68. g4.a4.b-
  69. >d2.c#8d8
  70. c#1.r2<
  71. ]
  72. [
  73. >d4.e4.f
  74. a2.g#8a8
  75. g#1.r2<
  76. ]
  77. [4 r1]
  78. }
  79. Int VV
  80. #melody2={
  81. [
  82. r1r1
  83. l8
  84. VV=80
  85. r2l10
  86. Sub{[5 VV=VV+2 RandV(VV-10,VV) 'c#eg']}r2
  87. Sub{[5 VV=VV+2 RandV(VV-10,VV) 'ega#']}r2
  88. Sub{[5 VV=VV+2 RandV(VV-10,VV) 'ga#>c#<']}r2
  89. ]
  90. [
  91. r1r1
  92. VV=85
  93. r2l10
  94. Sub{[5 VV=VV+2 RandV(VV-10,VV) 'g#b>d<']}r2
  95. Sub{[5 VV=VV+2 RandV(VV-10,VV) 'b>df<']}r2
  96. Sub{[5 VV=VV+2 RandV(VV-10,VV) '>dfg#<']}r2
  97. ]
  98. l8
  99. [4 'f#a>cf<'] r 'f#4.a4.>c4.f4.<'
  100. [4 'fa-b>e<'] r 'f4.a-4.b4.>e4.<'
  101. [4 'egb->e-<'] r 'e4.g4.b-.>e-4.<'
  102. [4 'e-f#a>d<'] r 'e-4.f#4.a.>d4.<'
  103.  
  104. }
  105.  
  106. TR(1)
  107. #tr1={
  108. @(Oboe)
  109. q95v127
  110. [#melody1]
  111. }
  112. LoopPlay(#tr1)
  113.  
  114. TR(2)
  115. r-48
  116. #tr2={
  117. @(Violin)
  118. q75v90
  119. [#melody2]
  120. }
  121. LoopPlay(#tr2)
  122.  
  123. TR(8)
  124. r-14
  125. #tr8={
  126. @(Strings1)
  127. [
  128. o4q99v80
  129. l1
  130. [
  131. 'g^b-^>d^<'
  132. 'g^b-^>c#^e^<'
  133. ]
  134. >
  135. [
  136. 'd^f^a^'
  137. 'd^f^g#^b^'
  138. ]
  139.  
  140. <
  141. l1
  142. 'f#a>cf<'
  143. 'fa-b>e<'
  144. 'egb->e-<'
  145. 'e-f#a>d<'
  146. ]
  147. }
  148. LoopPlay(#tr8)
  149.  
  150. TR(9)
  151. Lo
作者からのコメント
このままではなりません。ソース参照
TiMidity++用のみ調整済
作曲者
なの
ライセンス
CCクリエイティブ・コモンズ BY↗商用利用 ○改変 ○作者を表示すれば自由に使える
転載
許可
推奨音源
TiMidity++
ピコサクラ対応
未対応
ピコサクラバージョン
0.2.3
投稿日時
2015-05-07 00:13
更新日時
2015-05-07 00:14
お気に入り
屍翠龍司
ダウンロード数
341
タグ
タグはありません。
→この曲(id:1650)に問題がある場合こちらへ

感謝のコメント

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