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

ループする子犬のワルツ - サクラ曲掲示板6

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

ループする子犬のワルツ

MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. // 子犬のワルツ by ななこっち★
  2. // Fryderyk Franciszek Chopin Valse op.64-1
  3. /////////////////////////////////////////////////////////////////////////////////////////
  4. // 各種設定らしきもの
  5. Int MSGS=0
  6. Int TWM2=0
  7. Int TIMIDITY=0
  8. Int LOOP=2
  9.  
  10. Int KEY=0
  11. Int TEMPORATIO=100
  12. Int TEMPODIFF=0
  13. Int IGNORETEMPO=0
  14. Int BRIGHT=0
  15. Int TINY=0
  16. Int GAKUHU=0
  17. //Int DEBUG=1
  18. //Mute(1,2,3)
  19. // ↑上2行のコメント外すと、メトロノームだけが鳴るなの。どうやって使うかは秘密なの。ぐすぐす;;
  20. ////////////////////////////////////////////////////////////////////////////////////////////////
  21. 拍子 3,4
  22.  
  23. 曲名{"子犬のワルツ Valse op.64-1"}
  24. 作者{"Fryderyk Franciszek Chopin MML by ななこっち★"}
  25.  
  26. IF(MSGS=1 || TWM2=1) {
  27. ResetGS
  28. }
  29. #METORONOMEMML={M4m4m4}
  30.  
  31. IF(TINY=1 || GAKUHU=1 || TWM2=1) {
  32. Expression.Frequency(2);
  33. Modulation.Frequency(8);
  34. System.TimeBase=96
  35. } ELSE {
  36. Expression.Frequency(1);
  37. Modulation.Frequency(1);
  38. System.TimeBase=3072
  39. }
  40.  
  41. #PEDALON={Sub {r32y64,127}}
  42. #PEDALOFF={r-34 y64,0 r34}
  43.  
  44. ///////////////////////////////////////////////////////////////////////////////
  45. // title: "rchord.h" ver 1.01
  46. // description: 和音を下からランダムなタイミングで演奏するインクルードファイル(2015/05/24)
  47. // keywords: SAKURA Function by ななこっち★ @nanakochi123456
  48. // HP: http://nano.daiba.cx/
  49. ///////////////////////////////////////////////////////////////////////////////
  50. // rchord.h 和音をランダムなタイミングで演奏する
  51. ///////////////////////////////////////////////////////////////////////////////
  52. // Function RCDINIT(min, value)
  53. // 乱数値の最小値、最大値を設定する。両方0にすると、同一タイミングで演奏します。
  54. //
  55. // Function RCD(mml)
  56. // ランダムに演奏したい和音のMMLを入力する
  57. ///////////////////////////////////////////////////////////////////////////////
  58. // Example
  59. // Include(rchord.h)
  60. // RCDINIT(53,513)
  61. // l4 RCD(ceg)
  62. // l8 RCD(<b>fg)
  63. // l8 RCD(ceg)
  64. ///////////////////////////////////////////////////////////////////////////////
  65. // テストする場合、コメントアウトを消して下さい。
  66. //Int TEST=1
  67. ///////////////////////////////////////////////////////////////////////////////
  68.  
  69. Int RCD_MIN=192
  70. Int RCD_MAX=768
  71.  
  72. Function RCDINIT(Int MIN, Int MAX) {
  73.  
作者からのコメント
https://sakuramml.com/mmlbbs6/post.php?mml_id=1663
をループするように改造しました。
理論上100回ぐらいまでループできます。
100回級のループをして再生してばかりいると、サクラのシステムがおかしくなり、書き込み不可となり、強制終了せざる得ない場合がありますので、ご注意下さい。
spoon版:https://www.spooncast.net/jp/cast/2308018
作曲者
Fryderyk Franciszek Chopin
ライセンス
🌐パブリックドメイン商用利用 ○改変 ○改変も転載も自由
転載
許可
推奨音源
MSGS
TWM2
Sakura v2 MIDI Player
Virtual MIDI Synth + https://www.ir.isas.jaxa.jp/~cyamauch/NoctSalamanderGrandPiano/index.ni.html 音源セット#3: Noct-Salamander Grand Piano の中のNoct-SalamanderGrandPiano_flat_withoutNoise.sfz
spoonのは別音源を使用しています(失念)
動画はNoct-SalamanderGrandPiano_flat_withoutNoise.sfzです
ピコサクラ対応
未対応
ピコサクラバージョン
0.0.0
投稿日時
2021-01-12 14:13
更新日時
2025-01-22 06:08
お気に入り
GOMAH゛
ダウンロード数
319
→この曲(id:2184)に問題がある場合こちらへ

感謝のコメント

GOMA2021/02/11
midi打ち込みなのに生演奏のような丁寧な表現で感心しました。
ソースを見ても難しくてよく理解できませんすごい。
H゛2021/03/21
INT LOOP=10で試しましたが、めっちゃコンパイル時間掛かりますね笑
100回とか出来るんですね。
うちでは100ループだとForを解析したまま重くて落ちてしまいました><
とにかくループさせて長くしてやろうって試みが現代音楽ちっくで好きです。
面白いですね
無駄に生っぽく聞かせようとしているので、コンパイルに異様に時間がかかるの
Ryzen 3700X メモリ32Gなら100回ループいけたの。。。。
この曲に「ありがとう」を伝えませんか?
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。