From 4fd6b889aaa67d52093722fd1a9c8be6a08a2432 Mon Sep 17 00:00:00 2001 From: Pete Shadbolt Date: Mon, 9 May 2022 00:14:17 +0100 Subject: [PATCH] bit boring but nice noise --- audio.scd | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/audio.scd b/audio.scd index 003481b..bbba97b 100644 --- a/audio.scd +++ b/audio.scd @@ -15,10 +15,10 @@ s.waitForBoot { var oscillator, noise, filter, panner, mixer, frequency, qfactor, lagtime, output, amplitude; // Dynamic time of the module - lagtime = 100 / (2**(octave/8)); + lagtime = 10 / (2**(octave/8)); // Oscillator/filter frequency - frequency = (notefreq * (0.9 + (hue*0.2))) * (2**(octave/4-2)); + frequency = (notefreq * (1.0 + (hue*0.02))) * (2**(octave-1)); //frequency = (130 + (hue * 130)) * (2 ** octave); //frequency = 130 * Scale.major.ratios[(hue * 12).asInteger]; //frequency = (130 * frequency) * (2**octave); @@ -63,7 +63,7 @@ s.waitForBoot { octave = (2 - (index / 4).floor); "Module %: Pan %, octave %\n".postf(index, pan.round(1e-1), octave.round(1e-1)); Synth.new(\module, - [\hue, 0.5, \saturation, 0.1, \value, 0.5, \pan, pan, \gain, 0.9, \octave, octave, \notefreq, Scale.minor.degreeToFreq(index, 48.midicps, octave)] + [\hue, 0.5, \saturation, 0.1, \value, 0.5, \pan, pan, \gain, 0.9, \octave, octave, \notefreq, Scale.major.degreeToFreq(index, 48.midicps, octave)] ) } );