曲名{"フリクション"}

作者{"goma"}

/* ■再生するたび気まぐれに変化するmml■

　いもむしさんの「対話型遺伝的プログラミング」になんとなく影響を受けて。
  再生のたび違う曲にしたい、と思いました。
　なりませんでした。でもちょっと面白いので何回か遊んでみてほしいです。たまに「おっ」と思うのがある。
　∧∧　
（・x・）　

　★ランダム要素

　その1　テンポ→ゆっくりめか、はやめ　
　その2　TR1のメインリフ→音色を@4−55でチョイス　
  その3　かざりのパートのメロディ？と音色がランダム

  そのほか色々ランダム要素を入れてます。
  興味のある方はmmlを見てみてください。
  やってることがあってるかどうかもよくわかってない。アドバイスあれば是非！
    
（注意：TWM2は再生ボタンでそのつど変化しますが、サクラエディタは一旦ファイル閉じないと、同じのが鳴るみたいです）
もしVoiceでエラーが出たら改行すると鳴ります

H28.2.28 テンポを変更・Keyランダム追加
　*/


音源初期化
拍子4,4
Tempo(Random(95,113))　//ゆっくり、はやめ。

Key(RandomSelect(0,-1,1))
Int　NO　NO=RandomSelect(63,65,67,68,70)
Int　NO2　NO2=RandomSelect(63,65,67)
Int　NO3　NO3=RandomSelect(63,65,67,68)

TR　2　　r1r1r2　P(　Random(40,80,100))Voice(　Random　(1,128)　)　o(　Random　(4,6)　)
v80
REV(　Random(80))
　[4　l16　n（NO）l8　n(NO)]
r1r1r1r1r1r1　
P(　Random(40,80,100))
Voice(　Random　(1,128)　)　o(　Random　(4,6)　)
v70
　[4　　l16　n（NO）l8　n(NO)]
  r1r1r1
 v90
　[4　　l16　n（NO2）l8　n(NO2)]

TR　1 Voice(Random(4,55))
　
音量(120)//←ダブルクリックで変更できます
 音符16
REV(　Random(70))　　
　o(　Random　(5,6)　)
  
[4
If(Random(2)==0){　"g#^「cd#g」r　"g#「gd#c」^"g#
"g^「fd"a#」r"g「fd"a#」^"g　}
Else{　「"g#d#」^「cd#」rr　「g#d#c」rr
"g^「fd」rr「gfd"a#」^"g｝　　　　　　　　　　　　　//二択

If(Random(2)==0){
「d#"a#"g」^d^d#f^「d#ga#」 If(Random(2)==0){「d#"a#"g」^d^d#f^「d#g#」} //A-a　or　A
Else{If(Random(2)==0){
　"c^「cfg」rr「cd#g`d」　^「"c」
「d#"a#"g」^^f^^「d#"a#」^　}　　　　　　　　//B

　　}　｝

Else{　q50"c^「cfg」「cfg」「cd#g`d」　^^「"c」　　//C
「d#"a#"g」^d^d#f^「d#ga#」q90}



"g#^「cd#g」r　"g#「gd#c」^"g#
"g^「fd"a#」r"g「fd"a#」^n(NO3)

If(Random(2)==0){
「gcf」g#a#^　「gcd#」　^fd#
「a#fc#」^^r　「gd#"a#」^^
　n(NO)　}
  
  Else　{「gcf」g#a#`c　「gcd#」　g#fd#　　　　　//二択
「`a#fc#」^^r　「gd#"a#」^^
　n(NO)　｝　　　　　　　　　　　　　　　　　　　　　　　　　　　  ]

TR　3
　
　Voice(　Random　(1,100)　)
　o(　Random　(4,6)　)v(100)
l4　REV(　Random(80))　　　[4　n(NO2)　NO2=RandomSelect(63,65,67)]
　REV(0)　　
　Voice(　Random　(1,100)　)
l16　[4　n(NO2)　NO2=RandomSelect(63,65,67)]
l2　n(NO2)
r1r1　r1　　Voice(　Random　(1,100)　)　
v(Random　(90,110))
l2　[5　n(NO3)NO3=RandomSelect(63,65,67,68)]

TR 6
l16　
r1　Voice(　Random　(1,100)　)　o(　Random　(4,6)　)v(100)
　[4　n(NO3)]

TR　4

l1　Voice(　RandomSelect　(49,53,56)　)P(　Random(127))
r1r1
r1r1r1
n(NO2)NO2=RandomSelect(63,65,67)　n(NO2)　
r1　n(NO2)　
TR　5　

  TR 7
If(Random(3)==1){@120 EP.T(80,127,!1)c1 [7r1]l16 @127,4
r2 [ n(NO2)　] }
Else{ }

  トラック10;          // トラックの設定
チャンネル10;        // リズムを使うには必ずチャンネルを10番にする
Key(0)
~{ど}={n(Kick1),}    // 楽器の割り当て
~{た}={n(Snare1),}
~{つ}={n(ClosedHiHat),}
~{ち}={n(OpenHiHat),}
~{ぱ}={n(CrashCymbal1),}
時間(1:1:0);         // (小節:拍:ティック)でタイムポインタを移動します。
音色(StandardSet)    // 楽器設定     エディタ左側のコマンド挿入タブで一覧から選べます。
音量110           // 0~127まで
音符４            　  // 基本となる音長
　BR　10　p　100　REV(0)P(90)

[
[音色(StandardSet)CHO（80)  l16「n35つど"f#」v-18つ「"f#つど」つ音色(PowerSet)REV(20)「たf#」8r
音色(StandardSet)  「v+18n35ど」v-10つど「つど」ん音色(PowerSet)v+10：た4]
//「 "d"d#」"d"c"c
「ど"d#n69」音色(StandardSet)「つ」つ「つn35」

[音色(StandardSet)CHO（80)  l16「n35つど"f#」v-18つ「"f#つど」つ音色(PowerSet)REV(20)「たf#」8r
音色(StandardSet)  「v+18n35ど」v-10つど「つど」ん音色(PowerSet)v+10：た4]
//「 "d"d#」"d"c"c
「ど"d#n69」音色(StandardSet)「つ」つ「つn35」

[音色(StandardSet)CHO（80)  「n35つど」v-18つ「つど」つ音色(PowerSet)REV(20)「たf#」8r
音色(StandardSet)  「v+18n35ど」v-10つど「つど」ん音色(PowerSet)v+10：た4]
//「 "d"d#」"d"c"c
「"d#たf#」音色(StandardSet)「つど」つ「つ」：
[3「n27」2]l8音色(PowerSet)「どちた」んつ音色(StandardSet)ど
]

//「 "d"d#」"d"c"c

音色(StandardSet)CHO（80)  l16「n35つど"f#」v-18つ「"f#つど」つ音色(PowerSet)REV(20)「たf#」8r
音色(StandardSet)  「v+18n35ど」v-10つど「つど」ん音色(PowerSet)v+10たrrつ
音色(StandardSet)CHO（80)  l16「n35つど"f#」v-18つ「"f#つど」つ音色(PowerSet)REV(20)「たf#」8r
音色(StandardSet)  「v+18n35ど」v-10つど「つど」ん音色(PowerSet)v+10「ぱた」rたど