Down below you can see the code of four experimental “patches” for the sound in the “free time”. In these patches the sound is either triggered and manipulated by the sound of the SSmodule, or the sound of the SSmodule itself is manipulated. The corresponding sound examples can also be found down below.

// 1 // Noisy

a = Buffer.read(s, “sounds/AF7.wav”);        // load sample in buffer

SynthDef(“Effect”, {
var sig, sig2, amp;
sig = AudioIn.ar([3,4]);                // Input Solar Sound Module
amp = Amplitude.kr(AudioIn.ar([3,4])); // Track amp ssModule
sig = sig ring3: SinOsc.ar(Lag.kr(amp*10000, FSinOsc.kr(2))); // ringmodulate with Sine of which
// freq is modulated by amp ssModule

sig = DelayN.ar(sig, 3.0, amp);                       // delaytime modulated by amp
sig2 = sig ring4: PlayBuf.ar(2, a.bufnum, 1.0, loop:1); // ringmodulate with sample
Out.ar(0, Pan2.ar(sig+sig2, 0));                        // add the two signals
}).send(s);

Synth(\Effect);                                 // Play Synth

// 2 // FM grain-synthesizer controlled by Solar Sound Module with ringmodulation modulated by Gingerbreadman Chaos and Convolution
//

SynthDef(“Grains”, { arg trigger,gate = 1;
var sig, ampfol, freq, hasFreq;
# freq, hasFreq = Pitch.kr(AudioIn.ar(3),ampThreshold:0.02); // follow frequency module
ampfol = Amplitude.kr(AudioIn.ar(3));                        // follow amp of module
sig = FMGrain.ar(                                                // FM grains
Impulse.ar(Lag.kr(ampfol*1000, 20)),                // trigger rate modulated by amp
ampfol*5,                                          // grainlength mod by amp
freq,                                             //carfreq mod by Lorenz
freq,                                            // same for modfreq
LFNoise1.kr(1).range(1, 10),                     // index of modulation mod by noise
EnvGen.kr(                                       // amp evelope
Env([0, 1, 0], [1, 1], \sin, 1),
gate,
levelScale: ampfol,
doneAction: 2)
);
sig = Convolution.ar(sig, AudioIn.ar([3,4]), 1024, 0.5); // convolved with module as kernel
sig = sig ring4: Lag.ar(GbmanL.ar(freq/1000), 20);       // ringmodulated with gingerbreadman
// chaos of which the iteration freq
// is mod by
Out.ar(0, Pan2.ar(sig, 0.0,0.3));
}).send(s);

Synth(\Grains);       // Play Synth

 

// 3 // FM grain-synthesizer controlled by Solar Sound Module with Lorenz and Gingerbreadman-chaos generators with convolution and ringmodulation //

SynthDef(“Grains”, { arg gate = 1;
var sig, ampfol, freq, hasFreq;
# freq, hasFreq = Pitch.kr(AudioIn.ar(3),ampThreshold:0.02); // follow frequency of module
ampfol = Amplitude.kr(AudioIn.ar(3));                        // follow amp of module
sig = FMGrain.ar(                                                 // FM grains
Impulse.ar(Lag.kr(ampfol*1000, 20)),                //trigger rate modulated by amp
ampfol*30,                                          //grain length modulated by amp
LorenzL.ar(freq,3e-3)*800+900,   //carfreq mod by Lorenz chaos of which the iteration freq
// is modulated by freq of module
LorenzL.ar(freq,3e-3)*500+400,   // same for modfreq
LFNoise1.kr(1).range(1, 10),     // index of modulation modulated by noise
EnvGen.kr(                             // amp envelope
Env([0, 1, 0], [1, 1], \sin, 1),
gate,
levelScale: ampfol,
doneAction: 2)
);
sig = Convolution.ar(sig, AudioIn.ar([3,4]), 1024, 0.5);  // convolved with module as kernel
sig = sig ring4: Lag.ar(GbmanL.ar(freq/1000), 20);   // ringmodulated with Gingerbreadman of
// which iteration freq is modulated by
// freq of module. Lag is used to smoothen.
Out.ar(0, Pan2.ar(sig, 0.0,0.3));
}).send(s);

a = Synth(\Grains);                                   // start synth
// 4 // Noisy with Chaos

SynthDef(“NoisyChaos”, {
var sig, sig2,sig3, amp, freq, hasFreq;
sig = AudioIn.ar([3,4]);                // Input Solar Sound Module
# freq, hasFreq = Pitch.kr(AudioIn.ar(3));
amp = Amplitude.kr(AudioIn.ar([3,4])); // Track amp ssModule
sig2 = sig ring3: SinOsc.ar(Lag.kr(amp*10000, FSinOsc.kr(2))); // ringmodulate with Sine of which
// freq is modulated by amp ssModule

sig2 = DelayN.ar(sig2, 3.0, amp);  // delaytime modulated by amp
sig3 = sig ring4: FBSineC.ar(freq/100,
amp*10, amp, 1.005, 0.7) * 0.2; // ringmodulate with chaotic sine
sig3 = Resonz.ar(sig3, freq,1.0);
Out.ar(0, Pan2.ar(sig2+sig3, 0));                        // add the two signals
}).send(s);

Synth(\NoisyChaos);                 // Play Synth