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

rdrum.h α版- ドラムに演奏感を付加する。 - サクラ曲掲示板6

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

rdrum.h α版- ドラムに演奏感を付加する。

ななこっち★
MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. ///////////////////////////////////////////////////////////////////////////////
  2. // title: "rdrum.h" ver 0.0α
  3. // description: ドラムに演奏感をつける
  4. // keywords: SAKURA Function by ななこっち★ @nanakochi123456
  5. // HP: http://nano.daiba.cx/
  6. ///////////////////////////////////////////////////////////////////////////////
  7. // rdrum.h ドラムに演奏感をつける
  8. ///////////////////////////////////////////////////////////////////////////////
  9.  
  10. // ロテート
  11. Int BDROTATE=0
  12. Int SDROTATE=0
  13. Int CYMROTATE=0
  14.  
  15. Int BDINIT=0
  16. Int CYMINIT=0
  17. Int SDINIT=0
  18.  
  19. Int RANDV=0
  20. Int RANDR=0
  21.  
  22. Int RDVOL=127
  23.  
  24. Function RDINIT(Int _RDVOL, Int _RANDV, Int _RANDR, Int _BDROTATE, Int _SDROTATE, Int _CYMROTATE) {
  25. RDVOL=_RDVOL
  26. RANDV=_RANDV
  27. RANDR=_RANDR
  28. BDROTATE=_BDROTATE
  29. SDROTATE=_SDROTATE
  30. CYMROTATE=_CYMROTATE
  31. }
  32.  
  33. Function BassDrum(Int VO) {
  34. Int CC
  35. IF(BDROTATE=0) {
  36. CC=VO
  37. } ELSE {
  38. IF(BDINIT=0) {
  39. CC=BassDrum1
  40. BDINIT=1
  41. } ELSE {
  42. CC=BassDrum2
  43. BDINIT=0
  44. }
  45. }
  46. Result=CC
  47. }
  48.  
  49. Function Snare(Int VO) {
  50. Int CC
  51. IF(SDROTATE=0) {
  52. CC=VO
  53. } ELSE {
  54. IF(SDINIT=0) {
  55. CC=Snare1
  56. SDINIT=1
  57. } ELSE {
  58. CC=Snare2
  59. SDINIT=0
  60. }
  61. }
  62. Result=CC
  63. }
  64.  
  65. Function Cymbal(Int VO) {
  66. Int CC
  67. IF(CYMROTATE=0) {
  68. CC=VO
  69. } ELSE {
  70. IF(CYMINIT=0) {
  71. CC=CrashCymbal1
  72. CYMINIT=1
  73. } ELSE {
  74. CC=CrashCymbal2
  75. CYMINIT=0
  76. }
  77. }
  78. Result=CC
  79. }
  80.  
  81. Function Splash(Int VO) {
  82. Int CC
  83. IF(CYMROTATE=0) {
  84. CC=VO
  85. } ELSE {
  86. IF(CYMINIT=0) {
  87. CC=SplashCymbal
  88. CYMINIT=1
  89. } ELSE {
  90. CC=SplashCymbal
  91. CYMINIT=0
  92. }
  93. }
  94. Result=CC
  95. }
  96.  
  97. Function RDV(Int V) {
  98. RDVOL=V
  99. }
  100.  
  101. Function RDCresc(Int V) {
  102. RDVOL=RDVOL+V
  103. IF(RDVOL>127) {
  104. RDVOL=127
  105. }
  106. IF(RDVOL<0) {
  107. RDVOL=0
  108. }
  109. }
  110.  
  111. Function _RDV(Int V) {
  112. Int R=V
  113. R=R-(127-RDVOL)
  114. IF(R<0) {
  115. R=0
  116. }
  117. Result=R
  118. }
  119.  
  120. Function RandV(Int MIN, Int MAX) {
  121. Str MML="v"
  122. IF(RANDV=0) {
  123. MML=MML+#STR(_RDV(MAX)
  124. } ELSE {
  125. MML=MML+Random(_RDV(MIN), _RDV(MAX))
  126. }
  127. MML
  128. }
  129.  
  130. Str RMML
  131. F
作者からのコメント
以前投稿したものをIncludeにしたものです。
ランダムに休符や音量変化（ベロシティー）を加えたり、ドラムロテートを付けて、演奏感を加えます。
※α版につき、頻繁にアップデートしているかもしれません。
作曲者
なの
ライセンス
CCクリエイティブ・コモンズ BY↗商用利用 ○改変 ○作者を表示すれば自由に使える
転載
許可
推奨音源
rdrum.h とリネームして、サクラやTWのIncludeフォルダに入れます
ピコサクラ対応
未対応
ピコサクラバージョン
0.2.3
動画
なし
投稿日時
2015-05-31 13:23
更新日時
2015-05-31 13:27
お気に入り
(^o^)/
ダウンロード数
369
タグ
タグはありません。
→この曲(id:1672)に問題がある場合こちらへ

感謝のコメント

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