From b39ec5585464d9ec7fd112c64353de09c81ac50c Mon Sep 17 00:00:00 2001 From: Leonard Francis Coogan Date: Tue, 20 May 2025 03:33:44 -0400 Subject: [PATCH] more interesting convolution --- convolution.scd | 35 +++++++++++++++++++++++++++++++++-- 1 file changed, 33 insertions(+), 2 deletions(-) diff --git a/convolution.scd b/convolution.scd index fa59d99..bc11979 100644 --- a/convolution.scd +++ b/convolution.scd @@ -1,3 +1,34 @@ -var ir = Buffer.read(s, "/home/lcoogan/snd/ir/ForestScaleModel/ForestScaleModel/IR_ScaleModel/S1R1_ScaleModel.wav"); // Load an impulse response file +~ir = Buffer.read(s, "/Users/lcoogan/snd/samples/convolution/ir_chunks/ir_chunk_055.wav"); +~ir.play; + +b = Buffer.read(s, "/home/lcoogan/snd/live/2025-04-26.Basic_City_Brewery/harm/01 Ritual for Harmonica.wav", bufnum:0); + +b = Buffer.read(s, "/Users/lcoogan/Misc/grave.wav"); +b = Buffer.read + + + +( +SynthDef(\convolv, { + var sig, env; + + // sig = SinOsc.ar(\freq.ar(440)); + sig = PlayBuf.ar(1, b, 1, loop: 0, doneAction: 2); // Mono playback (1 channel) + + // env = EnvGen.kr(Env.asr(0.1, 0.3), doneAction:1); + // sig = LPF.ar(sig, 600); + + + sig = Convolution2.ar(sig, ~ir, 512); // Apply convolution reverb with buffer size 512''' + + + Out.ar(0, sig.dup * 0.1); +}).add; + +) + +Synth(\convolv, [\freq, [50].midicps]); + + +MIDIIn.connectAll; -sig = Convolution2.ar(sig, ir, 512) * 0.5; // Apply convolution reverb with buffer size 512''' \ No newline at end of file