// FM synthesis by hand // carrierSinOsc c => dac;// modulatorSinOsc m => blackhole; // carrier frequency220 => float cf;// modulator frequency550 => float mf => m.freq;// index of modulation200 => float index; // time-loopwhile( true ){ // modulate cf + (index * m.last()) => c.freq; // advance time by 1 samp 1::samp => now;}
// FM synthesis by hand
// carrier
SinOsc c => dac;
// modulator
SinOsc m => blackhole;
// carrier frequency
220 => float cf;
// modulator frequency
550 => float mf => m.freq;
// index of modulation
200 => float index;
// time-loop
while( true )
{
// modulate
cf + (index * m.last()) => c.freq;
// advance time by 1 samp
1::samp => now;
}