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

@0505 #深夜の2時間DTM - サクラ曲掲示板6

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

@0505 #深夜の2時間DTM

ななこっち★動画
MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. Tempo 140
  2. #PEDALON={Sub {r16y64,127}}
  3. #PEDALOFF={r-56 y64,0 r56}
  4. System.TimeBase=10368
  5.  
  6. Function BF(Str MML) {
  7. 　　Str BUF=""
  8. Str FIRST=""
  9. 　　Str ML=""
  10. 　　Str M
  11. 　　Str R
  12. Str FM
  13. Int C=0
  14.  
  15. 　　BUF=""
  16. R=""
  17. 　　For(Int i=1; MID(MML, i, 1)!=""; i++) {
  18. 　　　　M=MID(MML, i, 1)
  19. 　　　　IF(M="a"||M="b"||M="c"||M="d"||M="e"||M="f"||M="g") {
  20. C++
  21. IF(C<3) {
  22. FIRST=ML
  23. ML=FM+M
  24. FM=""
  25. } ELSE {
  26. 　　　　　　R=R+"r"+Random(600,900)
  27. 　　　　　　　　 BUF=BUF+"Sub" + CHR(123)+R+ML+CHR(125)
  28. 　　　　　　ML=M
  29. }
  30. 　　　　} ELSE {
  31. IF(C>0) {
  32. 　　　　　　 ML=ML+M
  33. } ELSE {
  34. FM=FM+M
  35. }
  36. 　　　　}
  37. 　　}
  38. 　　BUF="Sub"+CHR(123)+FIRST+CHR(125)+BUF+"Sub"+CHR(123)+R+ML+CHR(125)+"r"
  39. 　　BUF
  40. }
  41.  
  42. Function BG(Str MML) {
  43. 　　Str BUF=""
  44. Str FIRST=""
  45. 　　Str ML=""
  46. 　　Str M
  47. 　　Str R
  48. Str FM
  49. Int C=0
  50. 　　BUF=""
  51. R=""
  52. 　　For(Int i=1; MID(MML, i, 1)!=""; i++) {
  53. 　　　　M=MID(MML, i, 1)
  54. 　　　　IF(M="a"||M="b"||M="c"||M="d"||M="e"||M="f"||M="g") {
  55. C++
  56. IF(C<3) {
  57. FIRST=ML
  58. ML=FM+M
  59. FM=""
  60. } ELSE {
  61. 　　　　　　R=R+"r"+Random(40,45)
  62. 　　　　　　　　 BUF=BUF+"Sub" + CHR(123)+R+ML+CHR(125)
  63. 　　　　　　ML=M
  64. }
  65. 　　　　} ELSE {
  66. IF(C>0) {
  67. 　　　　　　 ML=ML+M
  68. } ELSE {
  69. FM=FM+M
  70. }
  71. 　　　　}
  72. 　　}
  73. 　　BUF="Sub"+CHR(123)+FIRST+CHR(125)+BUF+"Sub"+CHR(123)+R+ML+CHR(125)+"r"
  74. BUF="r-30"+BUF+"r30"
  75. 　　BUF
  76. }
  77.  
  78. Int VV
  79. Function RandV(Int MIN, Int MAX) {
  80. Str MML="v"
  81. IF(MA7=1) {
  82. MML=MML+#STR(MAX)
  83. } ELSE {
  84. MML=MML+Random(MIN,MAX)
  85. }
  86. MML
  87. }
  88.  
  89. TR(1)
  90. o6
  91. VV=90
  92. Expression(127)
  93. r1
  94. #V1={RandV(VV-45,VV-20)}
  95. #V2={RandV(VV-15,VV+10)}
  96. #PEDALON l2 BG(#V1 ce #V2 g) r8c8e8g8 #PEDALOFF
  97. #PEDALON Sub{l2.BG(#V1 ce #V2 b)}r4>c8<a4c4 #PEDALOFF
  98. #PEDALON l2 <BG(#V1 a>c #V2 g)r8r8f8c8 #PEDALOFF #PEDALON e8
  99. #PEDALON l2 r2 <#PEDALOFF BF(#V1 fb> #V2 d)< #PEDALOFF
  100.  
  101. #PEDALON l2 BG(#V1 ea>#V2 c<)l8rea>c< #PEDALOFF
  102. #PEDALON l2 BG(#V1 df#>#V2 c<)l8rda>c< #PEDALOFF
  103. #PEDALON l4.BF(#V1 dg> #V2 c<) #PEDALOFF l2 #PEDALON BF(#V1 dg #V2 b) r8 #PEDALOFF
  104. #PEDALON l4.BF(#V1 cf #V2 a) #PEDALOF
作曲者
ななこっち★
ライセンス
CCクリエイティブ・コモンズ BY↗商用利用 ○改変 ○作者を表示すれば自由に使える
転載
許可
実行エンジン
未対応
ピコサクラバージョン
0.2.3
動画
▶ YouTubeで見る
投稿日時
2015-05-06 00:13
更新日時
2015-05-06 00:16
お気に入り
庚申worksH゛
ダウンロード数
312
タグ
タグはありません。
→この曲(id:1647)に問題がある場合こちらへ

感謝のコメント

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