blog
害
- 2008-01-07
今しがた研究レポートをとりあえず書き終わった。でもこれから推敲し直したり校正したりが残っている。 というかこんなにしっかり文章を書く事をした事がなかった。やっぱり文章書くのはむずかしい。 自分には一つの文章を複雑にしたがる癖があるらしい。いちいち同格名詞を使ったり修飾語をいれてみたり気付いたらやってる。やっぱ主述の関係が明快で簡単な文のほうがいい文章だよね。
これと言うのも、 いくらでも入れ子にして書けたり、どんな長い文も改行無しでだらだら一行で書けちゃうプログラム言語ばっかいじってたからだ。こんなところでその弊害が出るとは．．。
だって同格とかリストでマルチチャンネル書いてるときとほぼ同じ思考回路だ。いや考えてない、無意識に。
とにかくこれからは主語と述語がくっきりさっぱりな文章を書きたい。
一行シリーズ
- 2007-12-30
Tempo.bpm=155;SynthDef("hh1",{|out=20,amp=1,rate=1|var src;src=RLPF.ar(Pan2.ar(ClipNoise.ar(0.2)),LFNoise2.ar(0.1,3000,9000),0.3)*EnvGen.ar(Env.perc(0.01,0.07,amp,-6),doneAction:2);Out.ar(20,src)}).store;SynthDef("snr",{|out=20,amp=1,rate=1,src,src2|src=RHPF.ar(ClipNoise.ar(0.05),LFNoise2.ar(1,700,800),0.3)*EnvGen.ar(Env.perc(0.00,0.125,amp,-3),doneAction:2);src2=SinOsc.ar(120,0,0.3)EnvGen.ar(Env.perc(0.00,0.26,amp,-12),doneAction:2);Out.ar(out,(src+src2).dup);}).store;SynthDef("hh2",{|out=20,amp=1,rate=1|var src,src2;src=RLPF.ar(ClipNoise.ar(0.15),LFNoise2.ar(1,1200,9700),0.8)EnvGen.ar(Env.perc(0.00,0.125,amp,2),doneAction:2);src2=RLPF.ar(BrownNoise.ar(0.35),945)EnvGen.ar(Env.perc(0.00,0.2,amp,-12),doneAction:2);Out.ar(out,Pan2.ar(src+src2,LFNoise2.ar(1)));}).store;SynthDef("kicks",{|amp|var out;out=SinOsc.ar(XLine.kr(7020,50,0.02),pi/4,amp).dupEnvGen.ar(Env.perc(0.03,0.25,0.65,-6),doneAction:2);Out.ar(0,out.softclip);}).store;SynthDef("snr1",{|out,amp,rate=1|Out.ar(out,Pan2.ar(PlayBuf.ar(1,3,rate,1.0,0.0,0),0.25)EnvGen.ar(Env.perc(0.01,1,1,2),doneAction:2,levelScale:amp);)}).store;SynthDef("bass",{|amp,note=1,velo=0.3|a=Pan2.ar(Mix.fill(7,{SinOsc.ar((note+[0,-12,0,12].choose).midicps([1,0.99,1.01,101].choose)+LFNoise1.ar(0.6,12),SinOsc.ar(note.midicps),SinOsc.ar(note.midicps,Pulse.ar(note.midicps,0.2)))}).distort,0.02)EnvGen.ar(Env.perc(0.0,velo,1,-2),doneAction:2,levelScale:amp);Out.ar(10,a)}).store;SynthDef("bass2",{|amp=0.8,note=1,velo=0.4|a=RLPF.ar(Mix.fill(5,{SinOsc.ar((note+[0,5,7,12].choose).midicps+LFNoise1.ar(0.3,0.13),SinOsc.ar(note.midicps/2,0,4),SinOsc.ar((note).midicps,SinOsc.ar(note.midicps2)))}),LFNoise2.kr(0.5,23,90).midicps,0.3)EnvGen.ar(Env.perc(0.5,4,0.15,12),doneAction:2,levelScale:amp);a=Pan2.ar(a,LFNoise2.ar(0.1));Out.ar(20,a)}).store;SynthDef("bass3",{|freq,gate=1,out=0|var src;src=Pan2.ar(SinOsc.ar(freq,SinOsc.ar(freq/12,0,LFNoise1.ar(0.3,1,6))EnvGen.ar(Env.adsr(0.01,0.2,0.2,0.1,3,-4)),SinOsc.ar(freq/16,0,0.3))+SinOsc.ar(freq2,SinOsc.ar(freq,0,LFNoise2.ar(4,42,3)),0.3),LFNoise1.ar(2))EnvGen.ar(Env.adsr(0.0,0.6,0.2,0.02,1,6),gate,doneAction:2);Out.ar(10,RLPF.ar((src260).softclip0.2,MouseY.kr(7000,10),0.4));}).store;SynthDef("mel2",{|amp=0.8,note=1,velo=0.4|a=RLPF.ar(Mix.fill(7,{SinOsc.ar((note+[0,5,7,12,-12,24].choose).midicps+LFNoise1.ar(0.6,0.03),0,SinOsc.ar((note).midicps2,SinOsc.ar(note.midicps,0,0.05)))}),LFNoise2.kr(4,23,86).midicps,0.3)EnvGen.ar(Env.perc(0.0,0.1,1,2),doneAction:2,levelScale:amp);a=Pan2.ar(a,LFNoise2.ar(3));Out.ar(10,a)}).store;SynthDef("bass4",{|freq,gate=1,out=0|var src;src=SinOsc.ar([freq,freq0.99],SinOsc.ar(freq,0,LFNoise1.ar(2,1,6))EnvGen.ar(Env.adsr(0.01,0.04,0.02,0.1,1,-4)),SinOsc.ar(freq2,0,0.3))+SinOsc.ar(freq/17,SinOsc.ar(freq,0.8,LFNoise2.ar(1,42,3)),0.3)EnvGen.ar(Env.adsr(0.0,0.6,0.2,0.02,1,6),gate,doneAction:2);Out.ar(10,LPF.ar((src12).softclip0.2,MouseX.kr(10,9800)));}).store;SynthDef("rev",{Buffer.alloc(s,44100,2,bufnum:10);a=PingPong.ar(10,In.ar([10,11]),0.225,0.3,1);a=a+In.ar([20,21]);4.do({a=AllpassC.ar(a,0.25,{[0.04.rand,0.02.rand]+0.01},4.8)});Out.ar(0,a)}).store;s.sendMsg("/s_new","rev",3,1,1);Pdef(tr2,Ppar([Pbind(instrument,mel2,dur,Pseq([0.25,0.5,0.25,0.75,0.75,0.5,0.25,0.25,0.5,0.5,0.75,0.5,0.5],inf),note,Prand([[5,0],,[12,5],,[-7,0],[7,5],0,[-12,5],15,]+76+12,inf),amp,Prand([0.15,0.1],inf),velo,Prand([0.5,1,0.8,1.2,0.6,0.4,0.8]/6,inf)),Pbind(instrument,bass,dur,Pseq([0.75,0.5,0.25,0.75,0.25,0.5,0.25,0.25,0.5,0.25,0.25,0.25,0.5],inf),note,Prand([5,-5,7,15,-7,5,0,-12,0,-12,5,7,0,12,-12,12,-12]+76+24,inf),amp,Prand([0.1,0.07],inf),velo,Prand([0.5,0.6,0.4,0.8]/2,inf)),Pbind(instrument,bass2,dur,Pseq([4],inf),note,Pseq([[5,0],-7,[7,-5],[12,5],[9,0],-12,[12,-7],[5,7]]+76+24,inf),amp,0.1,velo,Prand([1.3],inf)),Pbind(instrument,bass3,dur,Pseq([0.25],inf),midinote,Pseq([Pseq([-5,0,7,15],4),Pseq([0,-5,7,15]+5,4),Pseq([-12,3,-7,15]+7,4),Pseq([-5,10,0,15]+12,4)]+40,inf),amp,Prand([0.2,0.1],inf),legato,Prand([0.3,0.4,0.4,0.8],inf)),Pbind(instrument,kicks,dur,1,amp,1),Pbind(instrument,hh1,dur,0.25,amp,Pseq([0,0,1,1],inf)),Pbind(instrument,hh2,dur,0.5,amp,Pseq([0,0,0.8,0],inf)),Pbind(instrument,snr,dur,0.5,amp,Pseq([0,0,1,0],inf)),Pbind(instrument,bass4,dur,0.25,midinote,Pseq([Pseq([-5,0,7,15],4),Pseq([0,-5,7,15]+5,4),Prand([-12,3,-7,15]+7,4),Pseq([-5,10,0,15]+12,4)]+76-12,inf),amp,Prand([0.2,0.1],inf),legato,Pseq([1,0.3,0.4,1.4,1],inf))]));Pdef(tr2).play;
Pdef(tr2).stop;s.sendMsg("/n_free",3);
more なんかパーカッションとか旋律とかはまた後で．．。
ぱっぱらぱー
- 2007-12-13
明日からはじまりマンモス。
http://gs.idd.tamabi.ac.jp/ic2007/
なんか、これで4年連続でインカレ出場してると思うとなんかね・・どーなのよ俺？
今回はなんかまとめ役っぽいポストに加え2作品（？一つは作品じゃないけど）に絡んで出ます。（さらにあんまり言いたくないけどwebサイトも） はい、マルチタスクです。Intel はいって(ry
あーなんかうすうす気付いてたけど、ホスト側って10倍くらい大変だわこれ。
あ、これをやります
http://gs.idd.tamabi.ac.jp/ic2007/scc/index.html 興味あったらぜひ参加してみてください。
CET2007
- 2007-11-24
直前で申し訳ないのですが、明日馬喰町にてライブイベントがあります。僕もでます。 同じラボの高花謙一や谷口暁彦や山口崇洋が出演です。是非おいでください。 開場: 20:00 スタート: 20:30です。
以下info
ーーーーーーーーーーー 馬喰町電気祭り (UNG企画)
11/25 20:00 - 21:30
開場: 20:00 スタート: 20:30 高花謙一＋谷口暁彦＋山口崇洋＋森浩一郎 各々がプログラミングや、自作インターフェイス、自作楽器、サーキットベンディングなどにより、実験的な活動をしている高花謙一＋谷口暁彦＋山口崇洋＋森浩一郎が、それぞれの作品、音を持ち寄る初の試み。各々の作品、パフォーマンスも見せつつ、4人でのセッションを魅せる予定です。
東京都千代田区東神田１丁目２−１１ (アガタビル地下) （ 行き方）
今日のドークボットトーキョーのほうが行きたい。でも無理。
誰か報告希望。