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

トーンクラスター ver.0.03 - サクラ曲掲示板6

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

トーンクラスター ver.0.03

庚申works
MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. //初期化------------//
  2. TrackName ={"トーンクラスター ver.0.03"};
  3. Copyright ={"庚申works"};
  4.  
  5. /*
  6. この曲は擬似トーンクラスターを使用する現代音楽に近いものです。
  7.  
  8. 8小節の基本パターンで動いており、
  9. Track1からTrack2へ入れ換える際、TR1終わりの時間から、4小節
  10. 時間をもどしTR2の始めとします。
  11.  
  12. 決まりごととして、Track2の音は'e g b'から始まるどれかの音
  13. をランダムに半音上下し、発声するようにします。
  14. (厳密にはTrack1から)
  15. この時、オクターブ上げるかしないかランダム判断します。
  16.  
  17. その後、トラック同士のボリュームをクロスフェードします。
  18.  
  19.  
  20. TR3へきたらTR1へもどり、これを繰り返します。
  21. 必ず半音でぶつかる不協和音ため、独特の緊張感が出ます。
  22.  
  23. TR1 8小節 TR1 8小節
  24. TR2 8小節 ...
  25. TR3 8小節 ...
  26.  
  27. 図式化するとこんな感じです。だからなんだと言えばそれまでですが。
  28.  
  29.  
  30.  
  31. 与太話
  32.  
  33. これまで先行指定の仕方が良くわからなかったのですが、
  34. じょんさんのmax_msp_01 の解析ではたと気づきました。
  35.  
  36. // Time();
  37. // Sub{l4 V = 100; rrrr V = 0; rrrr V.T(100,0,!1+1);}
  38. // MML...
  39.  
  40. 4小節パターンとするとトラックヴェロシティがミソですね。。
  41. もっともこの方法を使いきる自信はありません、MML恐るべし、。
  42.  
  43. もうひとつ、Print();があるとTW-music2は通りません、
  44. 前回の問題はこれで解決。エラー出力のみとするべきか・・。
  45.  
  46.  
  47. */
  48.  
  49. // ※※ このスクリプトは構造化エディタ対応です。//
  50.  
  51.  
  52. Include(stdmsg.h); //ミディ音源リセットのおまじない
  53. //System.MeasureShift(1);
  54. Time( 0: 1: 0);
  55. ResetXG();ResetGS();ResetGM(); //音源リセット命令
  56.  
  57.  
  59. TimeBase=120;
  60. Tempo=86;
  61.  
  62. Int Num=0;
  63. Int ADD=0;
  64. Int Select =0;
  65.  
  66. Int Set_time1 =0; Int Set_time2 =0; Int Set_time3 =0;
  67. Int ADD_oct1=0; Int ADD_oct2=0; Int ADD_oct3=0;
  68.  
  69. Str Str_out;
  70. Str Str_btm_out;
  71.  
  72. Int Set_note1 =52; Int St_1 =0;
  73. Int Set_note2 =Set_note1+3; Int St_2 =0;
  74. Int Set_note3 =Set_note1+7; Int St_3 =0;
  75.  
  76.  
  77. FOR(Int I=0;I< 16;I++){
  78.  
  79. ADD=RandomSelect(-1,1); //半音上下
  80.  
  81.  
  82. IF(0< I%3){Select=Random(3)}ELSE{Select=Random(2)+1} // ボトム変更回数制限
  83.  
  84. SWITCH(Select){
  85. CASE(0){
  86. IF(ADD_oct1==12){ADD_oct1=-12}ELSE{ADD_oct1=RandomSelect(0,12)} //ヲクターブ変更
  87.  
  88. St_1 =Set_note1+ADD;
  89. IF(St_2==St_1| St_3==St_1){St_1=St_1-ADD-ADD;} //同音チェック
  90.  
  91. Set_note1 =St_1+ADD_oct1;
  92. }
  93. CASE(1){
  94. IF(ADD_oct2==12){ADD_oct2=-12}ELSE{ADD_oct2=RandomSelect(0,12)}
  95.  
  96. St_2 =Set_note2+ADD;
  97. IF(St_1==St_2| St_3==St_2){St_2=St_2-ADD-ADD;}
  98.  
  99. Set_note2 =St_2+ADD_oct2;
  100. }
  101. CASE(2){
  102. IF(ADD_oct3==12){ADD_oct3=-12}ELSE{ADD_oct3=RandomSelect(0,12)}
  103.  
  104. St_3 =Set_note3+ADD;
  105. IF(St_1== St_3|S
作者からのコメント
この曲は擬似トーンクラスターを使用する現代音楽に近いものです。
作曲者
自作
ライセンス
CCクリエイティブ・コモンズ BY-NC↗商用利用 ×改変 ○非営利なら改変もできる
転載
許可しない
推奨音源
パソコン内蔵音源
ピコサクラ対応
未対応
ピコサクラバージョン
0.2.3
動画
なし
投稿日時
2011-12-26 14:27
更新日時
2011-12-26 14:27
お気に入り
HiroChan騎士王321ゴロニャ～ゴ
ダウンロード数
671
タグ
→この曲(id:791)に問題がある場合こちらへ

感謝のコメント

ひとりそのら（N．）2012/01/04
はじめまして、ひとりそのらと申します、宜しくお願いします！
さて、曲の感想ですが…不思議な感覚がしました。
現代音楽のイメージにぴったりだと思います！（現代音楽の定義自体が
自分の中で不安定ですが（笑）
これは音楽というより、もはや現代のアートなんだと思います。
と～ご2012/01/05
不協和音に着目した面白い作品ですね。フェードする音を取り入れるのが良いアイディアだなぁと思いました。
緊張状態の中にも微妙な変化が見られて良い感じだと思いました。
庚申works2012/01/06
まだ、サクラを始めて3季節ほどしかたっておらず、
サクラ使いの有志からコメントを頂けると思ってなかったので
とても恐縮しております。

サクラは実験的要素も受け付けるので、とても面白いのですが、
力量不足かアイデアを形にする点が間に合っていません。

机上でああしたい、こうしたいな、など考え実践すると、
いまひとつ、パッとしないことが多いので。、、

この曲(プログラム??)は、ミニマル的なアプローチで
考え出した気がします。

本人はもう少しポピュラー寄りなはずですが、、
音楽的趣向が反映したのかもしれません、。
GOMA2012/01/06
プログラム系のことがサッパリわからないので、このシステム？と前書きが何かスゲエな…と思ってしまいました(笑
はじめて間もないということですがこんな実験ＭＭＬをかけるのがすごいと思います。
曲ほんとにミニマルっぽいですね～。
庚申works2012/02/21
GOMAさま、返答遅くなりました。
コメントの仕組みがあまり得意ではなく、基本ROMなので、。
自分としてはもう少しアイデアを出したかったのですが、正直自分の限界を感じてしまい、アップロードという運びになりました。逆にそれが良かったのかも知れませんが、。
個人的にはお褒め頂いて恥ずかしい限りです、有難うございます。
♪
この曲に「ありがとう」を伝えませんか？
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。
ログインしてコメントする はじめての方はこちら（無料登録）