振幅変調から

振幅変調を試行錯誤したけど、、、うまくいった例。他にもあると思うけど。sinosc n => c.gainではエラーになってしまうのでgainをはさんで変調させてみた。

sinosc c => gain g => dac;
sinosc n => g;
10 => n.freq;
0.2 => c.gain;
10::second => now;

今日もlarry.ckを模写する。biquadがちょっとわからないのですが、2極2ゼロってわからない。係数がa0,a1,a2,b1,b2といろいろできるんですがね。sweepって例えば中心周波数を"掃引する"って事だと知りました。

impulse i => biquad f => dac;
.99 => f.prad; 
1 => f.eqzs;
0.0 => float v;
.5 => f.gain;
while( true )
{
    1.0 => i.next;
    std.fabs(math.sin(v)) * 4000.0 => f.pfreq;
    v + .1 => v;
    99::ms => now;
}