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

素朴な風鈴 - サクラ曲掲示板6

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

素朴な風鈴

森と泉ピコ対応
MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. TrackName={"素朴な風鈴"}
  2. Copyright={"Moritoizumi"}
  3. Int A=79 //o6g+～o7gの音がランダムに400音鳴ります。
  4. Int B=71　　　　　　　　　 　//音長はl1～l24、音量はv10～v70です。
  5. Int C=72 //下側タブにMMLを表示します（ピコサクラ・サクラともに）
  6. Int D=73 //A,B,C,Dの数字を変えると乱数が変わります。
  7.  
  8. Int N=12 //Nは音色です。数字を変えてみてください。
  9. 　　　　　　　　　　 　　　　// 9 CelestaStrings
  10. // 11 MusicBox
  11. // 12 Vibraphone
  12. // 16 Dulcimer
  13. Int Z
  14. Int X
  15. Str L //音長
  16. Str L9="l9" //旧音長
  17. Str W //音量
  18. Str W9="v9" //旧音量
  19. Str U //ノート
  20. Str M1L=""
  21. Str M2L=""
  22.  
  23. Tempo=120
  24. TR=1 CH=1 @(N) V(100) o6 q100 P.onNoteWave(32,96,!4)
  25.  
  26. For(Int I=0; I<400; I++){
  27.  
  28. X=(A*B+C)%(D+1) //D+1で0の除算を防ぐ
  29. X=X/2
  30. X=X+55
  31.  
  32. Z=X%9 //除算の余りによって音長を決める
  33. IF(Z=0){L="l1"}
  34. IF(Z=1){L="l2"}
  35. IF(Z=2){L="l3"}
  36. IF(Z=3){L="l4"}
  37. IF(Z=4){L="l6"}
  38. IF(Z=5){L="l8"}
  39. IF(Z=6){L="l12"}
  40. IF(Z=7){L="l16"}
  41. IF(Z=8){L="l24"}
  42.  
  43. Z=X%7 //除算の余りによって音量を決める
  44. IF(Z=0){W="v10"}
  45. IF(Z=1){W="v20"}
  46. IF(Z=2){W="v30"}
  47. IF(Z=3){W="v40"}
  48. IF(Z=4){W="v50"}
  49. IF(Z=5){W="v60"}
  50. IF(Z=6){W="v70"}
  51.  
  52. Z=X%12 //除算の余りによって音程を決める
  53. IF(Z=0){U="g+"}
  54. IF(Z=1){U="a"}
  55. IF(Z=2){U="a+"}
  56. IF(Z=3){U="b"}
  57. IF(Z=4){U="`c"}
  58. IF(Z=5){U="`c+"}
  59. IF(Z=6){U="`d"}
  60. IF(Z=7){U="`d+"}
  61. IF(Z=8){U="`e"}
  62. IF(Z=9){U="`f"}
  63. IF(Z=10){U="`f+"}
  64. IF(Z=11){U="`g"}
  65.  
  66. IF(L=L9){L=""}ELSE{L9=L}
  67. IF(W=W9){W=""}ELSE{W9=W}
  68. M1L=M1L+L+W+U+" "
  69.  
  70. Z=I%10
  71. IF(Z=9){M2L=M2L+M1L;M1L=M1L+(I+1);Print(M1L);M1L=""}//10音ずつ表示
  72.  
  73. A=B;B=C;C=D;D=X} //係数をずらす
  74.  
  75. Play(M2L) //演奏
  76.  
  77. /*
  78. TrackName={"素朴な風鈴"}
  79. Copyright={"Moritoizumi"}
  80. Int A=75 //n80～n91(o6g+～o7g)の音がランダムに100音鳴ります。
  81. Int B=71　　　　　　　　　 　//音長はl1～l24、音量はv10～v70です。
  82. Int C=72 //下側タブにMMLを表示します（ピコサクラ・サクラともに）
  83. Int D=73 //A,B,C,Dの数字を変えると乱数が変わります。
  84.  
  85. Int N=12 //Nは音色です。変えてみてください。
作者からのコメント
季節外れの風鈴ですが、よろしかったらお聴きください。
２０２５年１月１日、１００音では少ないのでMMLを修正して４００音にしました。旧MMLは下の方にコメントで残してあります。あと、ノートをn表記からcdefgab表記にしました。
作曲者
自作
ライセンス
🌐パブリックドメイン↗商用利用 ○改変 ○改変も転載も自由
転載
許可
推奨音源
soundfont
ピコサクラ対応
対応
ピコサクラバージョン
0.1.37
動画
なし
投稿日時
2024-12-28 10:50
更新日時
2025-01-01 15:49
お気に入り
しゅん
ダウンロード数
151
タグ
タグはありません。
→この曲(id:2697)に問題がある場合こちらへ

感謝のコメント

しゅん2024/12/30
深淵な作品ですね。ただランダムに鳴らしているのではなく音長や音量を変えているのがミソでしょうか。
昔よく聴いていたヴェーベルン(現代音楽の元祖みたいな作曲家)を思い出しましたよ♪
森と泉2024/12/30
しゅんさん、ありがとうございます！　軒先の風鈴が近所迷惑にならぬよう控えめに鳴っております。音量v10やv20が小さすぎですが休符の代わりとしていいかも？
♪
この曲に「ありがとう」を伝えませんか？
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。
ログインしてコメントする はじめての方はこちら（無料登録）