![]() Wave(i)=CreateWave(buffersize,samplerate,channels,bits) W->A = Attack*Dur*_Samplerate - SilenceAdjustįunction ADSREnvelope2 Overload(func as any ptr, Attack as single, Decay as single, Sustain as single, Release as Single, Dur as single, SilenceAdjust as integer=0) as EnvelopeFunction2 ptrĭim shared as WaveHeaderType ptr wave(1 to 6),tempwave W->DecR = Sustain / (Dur*_Samplerate * Release + 1) W->DecD = (1 - Sustain) / (Dur*_Samplerate * Decay + 1) ![]() W->Incr = 1 / (Dur*_Samplerate * Attack + 1) Type EnvelopeFunction2 extends SoundFunctionįunction EnvelopeFunction2.GetNext() as singleįunction ADSREnvelope2 Overload(Attack as single, Decay as single, Sustain as single, Release as Single, Dur as single, SilenceAdjust as integer=0) as EnvelopeFunction2 ptrĭim w as EnvelopeFunction2 ptr=new EnvelopeFunction2ĭim as single S = 1 - Attack - Decay - Release
0 Comments
Leave a Reply. |