Kaynağa Gözat

bit boring but nice noise

master
Pete Shadbolt 2 yıl önce
ebeveyn
işleme
4fd6b889aa
1 değiştirilmiş dosya ile 3 ekleme ve 3 silme
  1. +3
    -3
      audio.scd

+ 3
- 3
audio.scd Dosyayı Görüntüle

@@ -15,10 +15,10 @@ s.waitForBoot {
var oscillator, noise, filter, panner, mixer, frequency, qfactor, lagtime, output, amplitude; var oscillator, noise, filter, panner, mixer, frequency, qfactor, lagtime, output, amplitude;


// Dynamic time of the module // Dynamic time of the module
lagtime = 100 / (2**(octave/8));
lagtime = 10 / (2**(octave/8));


// Oscillator/filter frequency // 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 + (hue * 130)) * (2 ** octave);
//frequency = 130 * Scale.major.ratios[(hue * 12).asInteger]; //frequency = 130 * Scale.major.ratios[(hue * 12).asInteger];
//frequency = (130 * frequency) * (2**octave); //frequency = (130 * frequency) * (2**octave);
@@ -63,7 +63,7 @@ s.waitForBoot {
octave = (2 - (index / 4).floor); octave = (2 - (index / 4).floor);
"Module %: Pan %, octave %\n".postf(index, pan.round(1e-1), octave.round(1e-1)); "Module %: Pan %, octave %\n".postf(index, pan.round(1e-1), octave.round(1e-1));
Synth.new(\module, 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)]
) )
} }
); );


Yükleniyor…
İptal
Kaydet