Csound Csound-dev Csound-tekno Search About

unwanted noise with reverb

Date2016-11-09 00:59
From"Joe ."
Subjectunwanted noise with reverb
Hey guys, working on a piece here. I want the sound, basically as I
get here, but I don't know why I'm getting that noise/ rip sound. It's
coming from the reverb, which is just about as loud as the original
signal. How do I remove/ avoid the noise? It isn't present in any
other parts of the piece (which aren't here). Thanks






--sample-accurate





sr = 192000

ksmps = 10

nchnls = 2

0dbfs = 16


#define AmplitudeFrequencyConverters

#

iAmplitude = ampdb(p4)

iCPS = cps2pch:i(p5, 12)

#


gaReverb init 0


giFt1 = ftgen:i(101, 0, 8193, 10, 1, 0.04)

giFt6 = ftgen:i(106, 0, 8193, -7, 0.1, 32, 1, 8192-32, 0)

giFt10 = ftgen:i(110, 0, 8193, 10, 1, 0.5, 0.3, 0.25, 0.2, 0.167,
0.14, 0.125, .111)

giFt11 = ftgen:i(111, 0, 8193, 9, 1,1,0, 2.01,0.75,0, 3.03,0.5,0, 3.97,0.25,0)

giFt12 = ftgen:i(112, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0, 3.97,0.05,0)

giFt13 = ftgen:i(113, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0, 7.97,0.05,0)

instr 1

$AmplitudeFrequencyConverters

iAmplitude = iAmplitude*p6

kPhasor = phasor:a(p13)

aTable = table(kPhasor*8192, 106)

aVibrato = poscil:a(iCPS*((1-p12)*1/5), 5, 106)

aMainFreq = poscil:a(iAmplitude, iCPS+aVibrato, p11, -1)

aDistune = poscil:a(iAmplitude, iCPS*p12, p11, -1)

aRoom = poscil:a(iAmplitude*0.03, iCPS*p12, 101, -1)

aEnvelope = transeg:a(\

0, p7, (10-p5)*1.25,

0.7*iAmplitude, p3*p8, 0,

iAmplitude*p9, p3-p7-(p3*p8)-(p10*p3), 0,

iAmplitude*p9, p10*p3, 3,

0)

if p13 = 0000 then

aOut = (aMainFreq+aDistune+aRoom)*aEnvelope

else

aOut = (aMainFreq+aDistune+aRoom)*aEnvelope*aTable

endif

if p14 = 0 then

aLeft = 1

aRight = 0

elseif p14 = 1 then

aLeft = 0

aRight = 1

elseif p14 = 2 then

aLeft = 1

aRight = 1

endif

outs aOut*aLeft, aOut*aRight

gaReverb = gaReverb + aOut

endin


instr 99

aReverb = nreverb:a(gaReverb, p4, 0)

aNoclick = linseg:a(0,0.01, 1,p3-0.03, 1, 0.02, 0)

aOut = aReverb*p5*aNoclick

outs aOut, aOut

gaReverb = 0

endin





#define tempo #110#

#define on #1111#

#define off #0000#

t 0 $tempo

a 0 0 56

i99 56.5 31 0.3 0.8

i1 57 30 -3 4.11 1.5 0.02 0.1 0.3 0.5 110 0.992 12 2

i1 57 29 -3 5.11 1 0.02 0.1 0.3 . 110 0.992 $off 1

i1 58 28 -3 6.07 1 0.02 0.1 0.3 . 110 0.995 30 1

i1 59 27 -3 7.09 0.75 0.02 0.1 0.3 . 112 0.995 $off 0

i1 60 26 -3 8.10 0.75 0.02 0.1 0.3 . 112 0.995 $off 1

i1 61 25 -3 10.02 0.75 0.01 0.1 0.3 . 113 0.995 $off 0

i1 62 24 -3 11.00 0.6 0.005 0.1 0.3 . 112 0.995 20 1


i1 69 18 -6 10.08 0.75 0.013 0.1 0.3 . 113 0.995 $off 0

i1 69 18 -6 10.06 0.75 0.013 0.1 0.3 . 113 0.995 $off 0

i1 71 16 -6 8.04 1.25 0.01 0.1 0.3 . 112 0.995 $off 0

i1 71 16 -6 8.03 1.25 0.01 0.1 0.3 . 112 0.995 $off 0

i1 75 12 -3 5.01 2.5 0.02 0.1 0.3 . 110 0.992 12 2

i1 75 12 -3 5.05 2.5 0.02 0.1 0.3 . 110 0.992 $off 1

s






/* Joe */

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-09 13:08
FromJohn ff
SubjectRe: unwanted noise with reverb
Not at a csound computer but if you remove the sample-accurate option does it work?

Sent from TypeApp
On 9 Nov 2016, at 01:00, "Joe ." <not007ful@GMAIL.COM> wrote:
Hey guys, working on a piece here. I want the sound, basically as I
get here, but I don't know why I'm getting that noise/ rip sound. It's
coming from the reverb, which is just about as loud as the original
signal. How do I remove/ avoid the noise? It isn't present in any
other parts of the piece (which aren't here). Thanks


<CsoundSynthesizer>

<CsOptions>

--sample-accurate

</CsOptions>

<CsInstruments>

sr = 192000

ksmps = 10

nchnls = 2

0dbfs = 16


#define AmplitudeFrequencyConverters

#

iAmplitude = ampdb(p4)

iCPS = cps2pch:i(p5, 12)

#


gaReverb init 0


giFt1 = ftgen:i(101, 0, 8193, 10, 1, 0.04)

giFt6 = ftgen :i(106, 0, 8193, -7, 0.1, 32, 1, 8192-32, 0)

giFt10 = ftgen:i(110, 0, 8193, 10, 1, 0.5, 0.3, 0.25, 0.2, 0.167,
0.14, 0.125, .111)

giFt11 = ftgen:i(111, 0, 8193, 9, 1,1,0, 2.01,0.75,0, 3.03,0.5,0, 3.97,0.25,0)

giFt12 = ftgen:i(112, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0, 3.97,0.05,0)

giFt13 = ftgen:i(113, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0, 7.97,0.05,0)

instr 1

$AmplitudeFrequencyConverters

iAmplitude = iAmplitude*p6

kPhasor = phasor:a(p13)

aTable = table(kPhasor*8192, 106)

aVibrato = poscil:a(iCPS*((1-p12)*1/5), 5, 106)

aMainFreq = poscil:a(iAmplitude, iCPS+aVibrato, p11, -1)

aDistune = poscil:a(iAmplitude, iCPS*p12, p11, -1)

aRoom = poscil:a(iAmplitude*0.03, iCPS*p12, 101, -1)

aEnvelope = transeg:a(\

0, p7, (10-p5)*1.25,

0.7*iAmplitude, p3*p8, 0,

iAmplitude*p9, p3-p7-(p3*p8)-(p10*p3), 0,

iAmplitude*p9, p10*p3, 3,

0)

if p 13 = 0000 then

aOut = (aMainFreq+aDistune+aRoom)*aEnvelope

else

aOut = (aMainFreq+aDistune+aRoom)*aEnvelope*aTable

endif

if p14 = 0 then

aLeft = 1

aRight = 0

elseif p14 = 1 then

aLeft = 0

aRight = 1

elseif p14 = 2 then

aLeft = 1

aRight = 1

endif

outs aOut*aLeft, aOut*aRight

gaReverb = gaReverb + aOut

endin


instr 99

aReverb = nreverb:a(gaReverb, p4, 0)

aNoclick = linseg:a(0,0.01, 1,p3-0.03, 1, 0.02, 0)

aOut = aReverb*p5*aNoclick

outs aOut, aOut

gaReverb = 0

endin

</CsInstruments>

<CsScore>

#define tempo #110#

#define on #1111#

#define off #0000#

t 0 $tempo

a 0 0 56

i99 56.5 31 0.3 0.8

i1 57 30 -3 4.11 1.5 0.02 0.1 0.3 0.5 110 0.992 12 2

i1 57 29 -3 5.11 1 0.02 0.1 0.3 . 110 0.992 $off 1

i1 58 28 -3 6.07 1 0.02 0.1 0.3 . 110 0.995 30 1

i1 59 27 -3 7.09 0.75 0.02 0.1 0.3 . 112 0.995 $off 0

i1 60 26 -3 8.10 0.75 0.02 0.1 0.3 . 112 0.995 $off 1

i1 61 25 -3 10.02 0.75 0.01 0.1 0.3 . 113 0.995 $off 0

i1 62 24 -3 11.00 0.6 0.005 0.1 0.3 . 112 0.995 20 1


i1 69 18 -6 10.08 0.75 0.013 0.1 0.3 . 113 0.995 $off 0

i1 69 18 -6 10.06 0.75 0.013 0.1 0.3 . 113 0.995 $off 0

i1 71 16 -6 8.04 1.25 0.01 0.1 0.3 . 112 0.995 $off 0

i1 71 16 -6 8.03 1.25 0.01 0.1 0.3 . 112 0.995 $off 0

i1 75 12 -3 5.01 2.5 0.02 0.1 0.3 . 110 0.992 12 2

i1 75 12 -3 5.05 2.5 0.02 0.1 0.3 . 110 0.992 $off 1

s

</CsScore>

</CsoundSynthesizer>


/* Joe */

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
https://github.com/cs ound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-09 15:19
From"Joe ."
SubjectRe: unwanted noise with reverb
yes, it works fine that way. Thanks
Joe
/* Joe */


On Wed, Nov 9, 2016 at 7:08 AM, John ff  wrote:
> Not at a csound computer but if you remove the sample-accurate option does
> it work?
>
> Sent from TypeApp
> On 9 Nov 2016, at 01:00, "Joe ."  wrote:
>>
>> Hey guys, working on a piece here. I want the sound, basically as I
>> get here, but I don't know why I'm getting that noise/ rip sound. It's
>> coming from the reverb, which is just about as loud as the original
>> signal. How do I remove/ avoid the noise? It isn't present in any
>> other parts of the piece (which aren't here). Thanks
>>
>>
>> 
>>
>> 
>>
>> --sample-accurate
>>
>> 
>>
>> 
>>
>> sr = 192000
>>
>> ksmps = 10
>>
>> nchnls = 2
>>
>> 0dbfs = 16
>>
>>
>> #define AmplitudeFrequencyConverters
>>
>> #
>>
>> iAmplitude = ampdb(p4)
>>
>> iCPS = cps2pch:i(p5, 12)
>>
>> #
>>
>>
>> gaReverb init 0
>>
>>
>> giFt1 = ftgen:i(101, 0, 8193, 10, 1, 0.04)
>>
>> giFt6 = ftgen:i(106, 0, 8193, -7, 0.1, 32, 1, 8192-32, 0)
>>
>> giFt10 = ftgen:i(110, 0, 8193, 10, 1, 0.5, 0.3, 0.25, 0.2, 0.167,
>> 0.14, 0.125, .111)
>>
>> giFt11 = ftgen:i(111, 0, 8193, 9, 1,1,0,
>> 2.01,0.75,0, 3.03,0.5,0, 3.97,0.25,0)
>>
>> giFt12 = ftgen:i(112, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>> 3.97,0.05,0)
>>
>> giFt13 = ftgen:i(113, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>> 7.97,0.05,0)
>>
>> instr 1
>>
>> $AmplitudeFrequencyConverters
>>
>> iAmplitude = iAmplitude*p6
>>
>> kPhasor = phasor:a(p13)
>>
>> aTable = table(kPhasor*8192, 106)
>>
>> aVibrato = poscil:a(iCPS*((1-p12)*1/5), 5, 106)
>>
>> aMainFreq = poscil:a(iAmplitude, iCPS+aVibrato, p11, -1)
>>
>> aDistune = poscil:a(iAmplitude, iCPS*p12, p11, -1)
>>
>> aRoom = poscil:a(iAmplitude*0.03, iCPS*p12, 101, -1)
>>
>> aEnvelope = transeg:a(\
>>
>> 0, p7, (10-p5)*1.25,
>>
>> 0.7*iAmplitude, p3*p8, 0,
>>
>> iAmplitude*p9, p3-p7-(p3*p8)-(p10*p3), 0,
>>
>> iAmplitude*p9, p10*p3, 3,
>>
>> 0)
>>
>> if p13 = 0000 then
>>
>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope
>>
>> else
>>
>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope*aTable
>>
>> endif
>>
>> if p14 = 0 then
>>
>> aLeft =
>> 1
>>
>> aRight = 0
>>
>> elseif p14 = 1 then
>>
>> aLeft = 0
>>
>> aRight = 1
>>
>> elseif p14 = 2 then
>>
>> aLeft = 1
>>
>> aRight = 1
>>
>> endif
>>
>> outs aOut*aLeft, aOut*aRight
>>
>> gaReverb = gaReverb + aOut
>>
>> endin
>>
>>
>> instr 99
>>
>> aReverb = nreverb:a(gaReverb, p4, 0)
>>
>> aNoclick = linseg:a(0,0.01, 1,p3-0.03, 1, 0.02, 0)
>>
>> aOut = aReverb*p5*aNoclick
>>
>> outs aOut, aOut
>>
>> gaReverb = 0
>>
>> endin
>>
>> 
>>
>> 
>>
>> #define tempo #110#
>>
>> #define on #1111#
>>
>> #define off #0000#
>>
>> t 0 $tempo
>>
>> a 0 0 56
>>
>> i99 56.5 31 0.3 0.8
>>
>> i1 57 30 -3 4.11 1.5 0.02 0.1 0.3 0.5 110 0.992 12 2
>>
>> i1 57 29 -3 5.11 1 0.02 0.1 0.3 . 110 0.992 $off 1
>>
>> i1 58 28 -3 6.07 1 0.02 0.1 0.3 . 110 0.995 30 1
>>
>> i1 59 27 -3 7.09 0.75 0.02 0.1 0.3 . 112 0.995 $off 0
>>
>> i1 60 26 -3 8.10 0.75 0.02 0.1 0.3 . 112 0.995 $off 1
>>
>> i1 61 25 -3 10.02 0.75 0.01 0.1 0.3 . 113 0.995
>> $off 0
>>
>> i1 62 24 -3 11.00 0.6 0.005 0.1 0.3 . 112 0.995 20 1
>>
>>
>> i1 69 18 -6 10.08 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>
>> i1 69 18 -6 10.06 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>
>> i1 71 16 -6 8.04 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>
>> i1 71 16 -6 8.03 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>
>> i1 75 12 -3 5.01 2.5 0.02 0.1 0.3 . 110 0.992 12 2
>>
>> i1 75 12 -3 5.05 2.5 0.02 0.1 0.3 . 110 0.992 $off 1
>>
>> s
>>
>> 
>>
>> 
>>
>>
>> /* Joe */
>>
>> Csound mailing list
>> Csound@listserv.heanet.ie
>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>> Send bugs reports to
>>         https://github.com/csound/csound/issues
>> Discussions of bugs and features can be posted here
>
> Csound mailing list Csound@listserv.heanet.ie
> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND Send bugs reports to
> https://github.com/csound/csound/issues Discussions of bugs and features can
> be posted here

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-09 15:23
From"Joe ."
SubjectRe: unwanted noise with reverb
actually, let me redact that. It still "rips" on a few notes, although
it is much better.
/* Joe */


On Wed, Nov 9, 2016 at 9:19 AM, Joe .  wrote:
> yes, it works fine that way. Thanks
> Joe
> /* Joe */
>
>
> On Wed, Nov 9, 2016 at 7:08 AM, John ff  wrote:
>> Not at a csound computer but if you remove the sample-accurate option does
>> it work?
>>
>> Sent from TypeApp
>> On 9 Nov 2016, at 01:00, "Joe ."  wrote:
>>>
>>> Hey guys, working on a piece here. I want the sound, basically as I
>>> get here, but I don't know why I'm getting that noise/ rip sound. It's
>>> coming from the reverb, which is just about as loud as the original
>>> signal. How do I remove/ avoid the noise? It isn't present in any
>>> other parts of the piece (which aren't here). Thanks
>>>
>>>
>>> 
>>>
>>> 
>>>
>>> --sample-accurate
>>>
>>> 
>>>
>>> 
>>>
>>> sr = 192000
>>>
>>> ksmps = 10
>>>
>>> nchnls = 2
>>>
>>> 0dbfs = 16
>>>
>>>
>>> #define AmplitudeFrequencyConverters
>>>
>>> #
>>>
>>> iAmplitude = ampdb(p4)
>>>
>>> iCPS = cps2pch:i(p5, 12)
>>>
>>> #
>>>
>>>
>>> gaReverb init 0
>>>
>>>
>>> giFt1 = ftgen:i(101, 0, 8193, 10, 1, 0.04)
>>>
>>> giFt6 = ftgen:i(106, 0, 8193, -7, 0.1, 32, 1, 8192-32, 0)
>>>
>>> giFt10 = ftgen:i(110, 0, 8193, 10, 1, 0.5, 0.3, 0.25, 0.2, 0.167,
>>> 0.14, 0.125, .111)
>>>
>>> giFt11 = ftgen:i(111, 0, 8193, 9, 1,1,0,
>>> 2.01,0.75,0, 3.03,0.5,0, 3.97,0.25,0)
>>>
>>> giFt12 = ftgen:i(112, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>> 3.97,0.05,0)
>>>
>>> giFt13 = ftgen:i(113, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>> 7.97,0.05,0)
>>>
>>> instr 1
>>>
>>> $AmplitudeFrequencyConverters
>>>
>>> iAmplitude = iAmplitude*p6
>>>
>>> kPhasor = phasor:a(p13)
>>>
>>> aTable = table(kPhasor*8192, 106)
>>>
>>> aVibrato = poscil:a(iCPS*((1-p12)*1/5), 5, 106)
>>>
>>> aMainFreq = poscil:a(iAmplitude, iCPS+aVibrato, p11, -1)
>>>
>>> aDistune = poscil:a(iAmplitude, iCPS*p12, p11, -1)
>>>
>>> aRoom = poscil:a(iAmplitude*0.03, iCPS*p12, 101, -1)
>>>
>>> aEnvelope = transeg:a(\
>>>
>>> 0, p7, (10-p5)*1.25,
>>>
>>> 0.7*iAmplitude, p3*p8, 0,
>>>
>>> iAmplitude*p9, p3-p7-(p3*p8)-(p10*p3), 0,
>>>
>>> iAmplitude*p9, p10*p3, 3,
>>>
>>> 0)
>>>
>>> if p13 = 0000 then
>>>
>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope
>>>
>>> else
>>>
>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope*aTable
>>>
>>> endif
>>>
>>> if p14 = 0 then
>>>
>>> aLeft =
>>> 1
>>>
>>> aRight = 0
>>>
>>> elseif p14 = 1 then
>>>
>>> aLeft = 0
>>>
>>> aRight = 1
>>>
>>> elseif p14 = 2 then
>>>
>>> aLeft = 1
>>>
>>> aRight = 1
>>>
>>> endif
>>>
>>> outs aOut*aLeft, aOut*aRight
>>>
>>> gaReverb = gaReverb + aOut
>>>
>>> endin
>>>
>>>
>>> instr 99
>>>
>>> aReverb = nreverb:a(gaReverb, p4, 0)
>>>
>>> aNoclick = linseg:a(0,0.01, 1,p3-0.03, 1, 0.02, 0)
>>>
>>> aOut = aReverb*p5*aNoclick
>>>
>>> outs aOut, aOut
>>>
>>> gaReverb = 0
>>>
>>> endin
>>>
>>> 
>>>
>>> 
>>>
>>> #define tempo #110#
>>>
>>> #define on #1111#
>>>
>>> #define off #0000#
>>>
>>> t 0 $tempo
>>>
>>> a 0 0 56
>>>
>>> i99 56.5 31 0.3 0.8
>>>
>>> i1 57 30 -3 4.11 1.5 0.02 0.1 0.3 0.5 110 0.992 12 2
>>>
>>> i1 57 29 -3 5.11 1 0.02 0.1 0.3 . 110 0.992 $off 1
>>>
>>> i1 58 28 -3 6.07 1 0.02 0.1 0.3 . 110 0.995 30 1
>>>
>>> i1 59 27 -3 7.09 0.75 0.02 0.1 0.3 . 112 0.995 $off 0
>>>
>>> i1 60 26 -3 8.10 0.75 0.02 0.1 0.3 . 112 0.995 $off 1
>>>
>>> i1 61 25 -3 10.02 0.75 0.01 0.1 0.3 . 113 0.995
>>> $off 0
>>>
>>> i1 62 24 -3 11.00 0.6 0.005 0.1 0.3 . 112 0.995 20 1
>>>
>>>
>>> i1 69 18 -6 10.08 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>
>>> i1 69 18 -6 10.06 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>
>>> i1 71 16 -6 8.04 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>
>>> i1 71 16 -6 8.03 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>
>>> i1 75 12 -3 5.01 2.5 0.02 0.1 0.3 . 110 0.992 12 2
>>>
>>> i1 75 12 -3 5.05 2.5 0.02 0.1 0.3 . 110 0.992 $off 1
>>>
>>> s
>>>
>>> 
>>>
>>> 
>>>
>>>
>>> /* Joe */
>>>
>>> Csound mailing list
>>> Csound@listserv.heanet.ie
>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>>> Send bugs reports to
>>>         https://github.com/csound/csound/issues
>>> Discussions of bugs and features can be posted here
>>
>> Csound mailing list Csound@listserv.heanet.ie
>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND Send bugs reports to
>> https://github.com/csound/csound/issues Discussions of bugs and features can
>> be posted here

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-09 15:29
From"Joe ."
SubjectRe: unwanted noise with reverb
Let me redact that again and say it works great now without the
sample-accurate option. Sorry, was up real late last night.
/* Joe */


On Wed, Nov 9, 2016 at 9:23 AM, Joe .  wrote:
> actually, let me redact that. It still "rips" on a few notes, although
> it is much better.
> /* Joe */
>
>
> On Wed, Nov 9, 2016 at 9:19 AM, Joe .  wrote:
>> yes, it works fine that way. Thanks
>> Joe
>> /* Joe */
>>
>>
>> On Wed, Nov 9, 2016 at 7:08 AM, John ff  wrote:
>>> Not at a csound computer but if you remove the sample-accurate option does
>>> it work?
>>>
>>> Sent from TypeApp
>>> On 9 Nov 2016, at 01:00, "Joe ."  wrote:
>>>>
>>>> Hey guys, working on a piece here. I want the sound, basically as I
>>>> get here, but I don't know why I'm getting that noise/ rip sound. It's
>>>> coming from the reverb, which is just about as loud as the original
>>>> signal. How do I remove/ avoid the noise? It isn't present in any
>>>> other parts of the piece (which aren't here). Thanks
>>>>
>>>>
>>>> 
>>>>
>>>> 
>>>>
>>>> --sample-accurate
>>>>
>>>> 
>>>>
>>>> 
>>>>
>>>> sr = 192000
>>>>
>>>> ksmps = 10
>>>>
>>>> nchnls = 2
>>>>
>>>> 0dbfs = 16
>>>>
>>>>
>>>> #define AmplitudeFrequencyConverters
>>>>
>>>> #
>>>>
>>>> iAmplitude = ampdb(p4)
>>>>
>>>> iCPS = cps2pch:i(p5, 12)
>>>>
>>>> #
>>>>
>>>>
>>>> gaReverb init 0
>>>>
>>>>
>>>> giFt1 = ftgen:i(101, 0, 8193, 10, 1, 0.04)
>>>>
>>>> giFt6 = ftgen:i(106, 0, 8193, -7, 0.1, 32, 1, 8192-32, 0)
>>>>
>>>> giFt10 = ftgen:i(110, 0, 8193, 10, 1, 0.5, 0.3, 0.25, 0.2, 0.167,
>>>> 0.14, 0.125, .111)
>>>>
>>>> giFt11 = ftgen:i(111, 0, 8193, 9, 1,1,0,
>>>> 2.01,0.75,0, 3.03,0.5,0, 3.97,0.25,0)
>>>>
>>>> giFt12 = ftgen:i(112, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>>> 3.97,0.05,0)
>>>>
>>>> giFt13 = ftgen:i(113, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>>> 7.97,0.05,0)
>>>>
>>>> instr 1
>>>>
>>>> $AmplitudeFrequencyConverters
>>>>
>>>> iAmplitude = iAmplitude*p6
>>>>
>>>> kPhasor = phasor:a(p13)
>>>>
>>>> aTable = table(kPhasor*8192, 106)
>>>>
>>>> aVibrato = poscil:a(iCPS*((1-p12)*1/5), 5, 106)
>>>>
>>>> aMainFreq = poscil:a(iAmplitude, iCPS+aVibrato, p11, -1)
>>>>
>>>> aDistune = poscil:a(iAmplitude, iCPS*p12, p11, -1)
>>>>
>>>> aRoom = poscil:a(iAmplitude*0.03, iCPS*p12, 101, -1)
>>>>
>>>> aEnvelope = transeg:a(\
>>>>
>>>> 0, p7, (10-p5)*1.25,
>>>>
>>>> 0.7*iAmplitude, p3*p8, 0,
>>>>
>>>> iAmplitude*p9, p3-p7-(p3*p8)-(p10*p3), 0,
>>>>
>>>> iAmplitude*p9, p10*p3, 3,
>>>>
>>>> 0)
>>>>
>>>> if p13 = 0000 then
>>>>
>>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope
>>>>
>>>> else
>>>>
>>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope*aTable
>>>>
>>>> endif
>>>>
>>>> if p14 = 0 then
>>>>
>>>> aLeft =
>>>> 1
>>>>
>>>> aRight = 0
>>>>
>>>> elseif p14 = 1 then
>>>>
>>>> aLeft = 0
>>>>
>>>> aRight = 1
>>>>
>>>> elseif p14 = 2 then
>>>>
>>>> aLeft = 1
>>>>
>>>> aRight = 1
>>>>
>>>> endif
>>>>
>>>> outs aOut*aLeft, aOut*aRight
>>>>
>>>> gaReverb = gaReverb + aOut
>>>>
>>>> endin
>>>>
>>>>
>>>> instr 99
>>>>
>>>> aReverb = nreverb:a(gaReverb, p4, 0)
>>>>
>>>> aNoclick = linseg:a(0,0.01, 1,p3-0.03, 1, 0.02, 0)
>>>>
>>>> aOut = aReverb*p5*aNoclick
>>>>
>>>> outs aOut, aOut
>>>>
>>>> gaReverb = 0
>>>>
>>>> endin
>>>>
>>>> 
>>>>
>>>> 
>>>>
>>>> #define tempo #110#
>>>>
>>>> #define on #1111#
>>>>
>>>> #define off #0000#
>>>>
>>>> t 0 $tempo
>>>>
>>>> a 0 0 56
>>>>
>>>> i99 56.5 31 0.3 0.8
>>>>
>>>> i1 57 30 -3 4.11 1.5 0.02 0.1 0.3 0.5 110 0.992 12 2
>>>>
>>>> i1 57 29 -3 5.11 1 0.02 0.1 0.3 . 110 0.992 $off 1
>>>>
>>>> i1 58 28 -3 6.07 1 0.02 0.1 0.3 . 110 0.995 30 1
>>>>
>>>> i1 59 27 -3 7.09 0.75 0.02 0.1 0.3 . 112 0.995 $off 0
>>>>
>>>> i1 60 26 -3 8.10 0.75 0.02 0.1 0.3 . 112 0.995 $off 1
>>>>
>>>> i1 61 25 -3 10.02 0.75 0.01 0.1 0.3 . 113 0.995
>>>> $off 0
>>>>
>>>> i1 62 24 -3 11.00 0.6 0.005 0.1 0.3 . 112 0.995 20 1
>>>>
>>>>
>>>> i1 69 18 -6 10.08 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>>
>>>> i1 69 18 -6 10.06 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>>
>>>> i1 71 16 -6 8.04 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>>
>>>> i1 71 16 -6 8.03 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>>
>>>> i1 75 12 -3 5.01 2.5 0.02 0.1 0.3 . 110 0.992 12 2
>>>>
>>>> i1 75 12 -3 5.05 2.5 0.02 0.1 0.3 . 110 0.992 $off 1
>>>>
>>>> s
>>>>
>>>> 
>>>>
>>>> 
>>>>
>>>>
>>>> /* Joe */
>>>>
>>>> Csound mailing list
>>>> Csound@listserv.heanet.ie
>>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>>>> Send bugs reports to
>>>>         https://github.com/csound/csound/issues
>>>> Discussions of bugs and features can be posted here
>>>
>>> Csound mailing list Csound@listserv.heanet.ie
>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND Send bugs reports to
>>> https://github.com/csound/csound/issues Discussions of bugs and features can
>>> be posted here

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-09 15:29
FromSteven Yi
SubjectRe: unwanted noise with reverb
I'm wondering about this line:

kPhasor = phasor:a(p13)

I would have imagined that you should be using an a-rate phasor and
table lookup.

An easy way to test though is setting ksmps=1.  Could you give that a
try? If that clears it up, then I think the issue may be that
something (like the above) is k-rate that should be a-rate.

On Wed, Nov 9, 2016 at 10:23 AM, Joe .  wrote:
> actually, let me redact that. It still "rips" on a few notes, although
> it is much better.
> /* Joe */
>
>
> On Wed, Nov 9, 2016 at 9:19 AM, Joe .  wrote:
>> yes, it works fine that way. Thanks
>> Joe
>> /* Joe */
>>
>>
>> On Wed, Nov 9, 2016 at 7:08 AM, John ff  wrote:
>>> Not at a csound computer but if you remove the sample-accurate option does
>>> it work?
>>>
>>> Sent from TypeApp
>>> On 9 Nov 2016, at 01:00, "Joe ."  wrote:
>>>>
>>>> Hey guys, working on a piece here. I want the sound, basically as I
>>>> get here, but I don't know why I'm getting that noise/ rip sound. It's
>>>> coming from the reverb, which is just about as loud as the original
>>>> signal. How do I remove/ avoid the noise? It isn't present in any
>>>> other parts of the piece (which aren't here). Thanks
>>>>
>>>>
>>>> 
>>>>
>>>> 
>>>>
>>>> --sample-accurate
>>>>
>>>> 
>>>>
>>>> 
>>>>
>>>> sr = 192000
>>>>
>>>> ksmps = 10
>>>>
>>>> nchnls = 2
>>>>
>>>> 0dbfs = 16
>>>>
>>>>
>>>> #define AmplitudeFrequencyConverters
>>>>
>>>> #
>>>>
>>>> iAmplitude = ampdb(p4)
>>>>
>>>> iCPS = cps2pch:i(p5, 12)
>>>>
>>>> #
>>>>
>>>>
>>>> gaReverb init 0
>>>>
>>>>
>>>> giFt1 = ftgen:i(101, 0, 8193, 10, 1, 0.04)
>>>>
>>>> giFt6 = ftgen:i(106, 0, 8193, -7, 0.1, 32, 1, 8192-32, 0)
>>>>
>>>> giFt10 = ftgen:i(110, 0, 8193, 10, 1, 0.5, 0.3, 0.25, 0.2, 0.167,
>>>> 0.14, 0.125, .111)
>>>>
>>>> giFt11 = ftgen:i(111, 0, 8193, 9, 1,1,0,
>>>> 2.01,0.75,0, 3.03,0.5,0, 3.97,0.25,0)
>>>>
>>>> giFt12 = ftgen:i(112, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>>> 3.97,0.05,0)
>>>>
>>>> giFt13 = ftgen:i(113, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>>> 7.97,0.05,0)
>>>>
>>>> instr 1
>>>>
>>>> $AmplitudeFrequencyConverters
>>>>
>>>> iAmplitude = iAmplitude*p6
>>>>
>>>> kPhasor = phasor:a(p13)
>>>>
>>>> aTable = table(kPhasor*8192, 106)
>>>>
>>>> aVibrato = poscil:a(iCPS*((1-p12)*1/5), 5, 106)
>>>>
>>>> aMainFreq = poscil:a(iAmplitude, iCPS+aVibrato, p11, -1)
>>>>
>>>> aDistune = poscil:a(iAmplitude, iCPS*p12, p11, -1)
>>>>
>>>> aRoom = poscil:a(iAmplitude*0.03, iCPS*p12, 101, -1)
>>>>
>>>> aEnvelope = transeg:a(\
>>>>
>>>> 0, p7, (10-p5)*1.25,
>>>>
>>>> 0.7*iAmplitude, p3*p8, 0,
>>>>
>>>> iAmplitude*p9, p3-p7-(p3*p8)-(p10*p3), 0,
>>>>
>>>> iAmplitude*p9, p10*p3, 3,
>>>>
>>>> 0)
>>>>
>>>> if p13 = 0000 then
>>>>
>>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope
>>>>
>>>> else
>>>>
>>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope*aTable
>>>>
>>>> endif
>>>>
>>>> if p14 = 0 then
>>>>
>>>> aLeft =
>>>> 1
>>>>
>>>> aRight = 0
>>>>
>>>> elseif p14 = 1 then
>>>>
>>>> aLeft = 0
>>>>
>>>> aRight = 1
>>>>
>>>> elseif p14 = 2 then
>>>>
>>>> aLeft = 1
>>>>
>>>> aRight = 1
>>>>
>>>> endif
>>>>
>>>> outs aOut*aLeft, aOut*aRight
>>>>
>>>> gaReverb = gaReverb + aOut
>>>>
>>>> endin
>>>>
>>>>
>>>> instr 99
>>>>
>>>> aReverb = nreverb:a(gaReverb, p4, 0)
>>>>
>>>> aNoclick = linseg:a(0,0.01, 1,p3-0.03, 1, 0.02, 0)
>>>>
>>>> aOut = aReverb*p5*aNoclick
>>>>
>>>> outs aOut, aOut
>>>>
>>>> gaReverb = 0
>>>>
>>>> endin
>>>>
>>>> 
>>>>
>>>> 
>>>>
>>>> #define tempo #110#
>>>>
>>>> #define on #1111#
>>>>
>>>> #define off #0000#
>>>>
>>>> t 0 $tempo
>>>>
>>>> a 0 0 56
>>>>
>>>> i99 56.5 31 0.3 0.8
>>>>
>>>> i1 57 30 -3 4.11 1.5 0.02 0.1 0.3 0.5 110 0.992 12 2
>>>>
>>>> i1 57 29 -3 5.11 1 0.02 0.1 0.3 . 110 0.992 $off 1
>>>>
>>>> i1 58 28 -3 6.07 1 0.02 0.1 0.3 . 110 0.995 30 1
>>>>
>>>> i1 59 27 -3 7.09 0.75 0.02 0.1 0.3 . 112 0.995 $off 0
>>>>
>>>> i1 60 26 -3 8.10 0.75 0.02 0.1 0.3 . 112 0.995 $off 1
>>>>
>>>> i1 61 25 -3 10.02 0.75 0.01 0.1 0.3 . 113 0.995
>>>> $off 0
>>>>
>>>> i1 62 24 -3 11.00 0.6 0.005 0.1 0.3 . 112 0.995 20 1
>>>>
>>>>
>>>> i1 69 18 -6 10.08 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>>
>>>> i1 69 18 -6 10.06 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>>
>>>> i1 71 16 -6 8.04 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>>
>>>> i1 71 16 -6 8.03 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>>
>>>> i1 75 12 -3 5.01 2.5 0.02 0.1 0.3 . 110 0.992 12 2
>>>>
>>>> i1 75 12 -3 5.05 2.5 0.02 0.1 0.3 . 110 0.992 $off 1
>>>>
>>>> s
>>>>
>>>> 
>>>>
>>>> 
>>>>
>>>>
>>>> /* Joe */
>>>>
>>>> Csound mailing list
>>>> Csound@listserv.heanet.ie
>>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>>>> Send bugs reports to
>>>>         https://github.com/csound/csound/issues
>>>> Discussions of bugs and features can be posted here
>>>
>>> Csound mailing list Csound@listserv.heanet.ie
>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND Send bugs reports to
>>> https://github.com/csound/csound/issues Discussions of bugs and features can
>>> be posted here
>
> Csound mailing list
> Csound@listserv.heanet.ie
> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
> Send bugs reports to
>         https://github.com/csound/csound/issues
> Discussions of bugs and features can be posted here

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-09 16:51
Fromjpff
SubjectRe: unwanted noise with reverb
G]For my development infomation, what versiob of csound are you usig?  We 
changed this area since 6.07
==John

On Wed, 9 Nov 2016, Joe . wrote:

> Let me redact that again and say it works great now without the
> sample-accurate option. Sorry, was up real late last night.
> /* Joe */
>
>
> On Wed, Nov 9, 2016 at 9:23 AM, Joe .  wrote:
>> actually, let me redact that. It still "rips" on a few notes, although
>> it is much better.
>> /* Joe */
>>
>>
>> On Wed, Nov 9, 2016 at 9:19 AM, Joe .  wrote:
>>> yes, it works fine that way. Thanks
>>> Joe
>>> /* Joe */
>>>
>>>
>>> On Wed, Nov 9, 2016 at 7:08 AM, John ff  wrote:
>>>> Not at a csound computer but if you remove the sample-accurate option does
>>>> it work?
>>>>
>>>> Sent from TypeApp
>>>> On 9 Nov 2016, at 01:00, "Joe ."  wrote:
>>>>>
>>>>> Hey guys, working on a piece here. I want the sound, basically as I
>>>>> get here, but I don't know why I'm getting that noise/ rip sound. It's
>>>>> coming from the reverb, which is just about as loud as the original
>>>>> signal. How do I remove/ avoid the noise? It isn't present in any
>>>>> other parts of the piece (which aren't here). Thanks
>>>>>
>>>>>
>>>>> 
>>>>>
>>>>> 
>>>>>
>>>>> --sample-accurate
>>>>>
>>>>> 
>>>>>
>>>>> 
>>>>>
>>>>> sr = 192000
>>>>>
>>>>> ksmps = 10
>>>>>
>>>>> nchnls = 2
>>>>>
>>>>> 0dbfs = 16
>>>>>
>>>>>
>>>>> #define AmplitudeFrequencyConverters
>>>>>
>>>>> #
>>>>>
>>>>> iAmplitude = ampdb(p4)
>>>>>
>>>>> iCPS = cps2pch:i(p5, 12)
>>>>>
>>>>> #
>>>>>
>>>>>
>>>>> gaReverb init 0
>>>>>
>>>>>
>>>>> giFt1 = ftgen:i(101, 0, 8193, 10, 1, 0.04)
>>>>>
>>>>> giFt6 = ftgen:i(106, 0, 8193, -7, 0.1, 32, 1, 8192-32, 0)
>>>>>
>>>>> giFt10 = ftgen:i(110, 0, 8193, 10, 1, 0.5, 0.3, 0.25, 0.2, 0.167,
>>>>> 0.14, 0.125, .111)
>>>>>
>>>>> giFt11 = ftgen:i(111, 0, 8193, 9, 1,1,0,
>>>>> 2.01,0.75,0, 3.03,0.5,0, 3.97,0.25,0)
>>>>>
>>>>> giFt12 = ftgen:i(112, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>>>> 3.97,0.05,0)
>>>>>
>>>>> giFt13 = ftgen:i(113, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>>>> 7.97,0.05,0)
>>>>>
>>>>> instr 1
>>>>>
>>>>> $AmplitudeFrequencyConverters
>>>>>
>>>>> iAmplitude = iAmplitude*p6
>>>>>
>>>>> kPhasor = phasor:a(p13)
>>>>>
>>>>> aTable = table(kPhasor*8192, 106)
>>>>>
>>>>> aVibrato = poscil:a(iCPS*((1-p12)*1/5), 5, 106)
>>>>>
>>>>> aMainFreq = poscil:a(iAmplitude, iCPS+aVibrato, p11, -1)
>>>>>
>>>>> aDistune = poscil:a(iAmplitude, iCPS*p12, p11, -1)
>>>>>
>>>>> aRoom = poscil:a(iAmplitude*0.03, iCPS*p12, 101, -1)
>>>>>
>>>>> aEnvelope = transeg:a(\
>>>>>
>>>>> 0, p7, (10-p5)*1.25,
>>>>>
>>>>> 0.7*iAmplitude, p3*p8, 0,
>>>>>
>>>>> iAmplitude*p9, p3-p7-(p3*p8)-(p10*p3), 0,
>>>>>
>>>>> iAmplitude*p9, p10*p3, 3,
>>>>>
>>>>> 0)
>>>>>
>>>>> if p13 = 0000 then
>>>>>
>>>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope
>>>>>
>>>>> else
>>>>>
>>>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope*aTable
>>>>>
>>>>> endif
>>>>>
>>>>> if p14 = 0 then
>>>>>
>>>>> aLeft =
>>>>> 1
>>>>>
>>>>> aRight = 0
>>>>>
>>>>> elseif p14 = 1 then
>>>>>
>>>>> aLeft = 0
>>>>>
>>>>> aRight = 1
>>>>>
>>>>> elseif p14 = 2 then
>>>>>
>>>>> aLeft = 1
>>>>>
>>>>> aRight = 1
>>>>>
>>>>> endif
>>>>>
>>>>> outs aOut*aLeft, aOut*aRight
>>>>>
>>>>> gaReverb = gaReverb + aOut
>>>>>
>>>>> endin
>>>>>
>>>>>
>>>>> instr 99
>>>>>
>>>>> aReverb = nreverb:a(gaReverb, p4, 0)
>>>>>
>>>>> aNoclick = linseg:a(0,0.01, 1,p3-0.03, 1, 0.02, 0)
>>>>>
>>>>> aOut = aReverb*p5*aNoclick
>>>>>
>>>>> outs aOut, aOut
>>>>>
>>>>> gaReverb = 0
>>>>>
>>>>> endin
>>>>>
>>>>> 
>>>>>
>>>>> 
>>>>>
>>>>> #define tempo #110#
>>>>>
>>>>> #define on #1111#
>>>>>
>>>>> #define off #0000#
>>>>>
>>>>> t 0 $tempo
>>>>>
>>>>> a 0 0 56
>>>>>
>>>>> i99 56.5 31 0.3 0.8
>>>>>
>>>>> i1 57 30 -3 4.11 1.5 0.02 0.1 0.3 0.5 110 0.992 12 2
>>>>>
>>>>> i1 57 29 -3 5.11 1 0.02 0.1 0.3 . 110 0.992 $off 1
>>>>>
>>>>> i1 58 28 -3 6.07 1 0.02 0.1 0.3 . 110 0.995 30 1
>>>>>
>>>>> i1 59 27 -3 7.09 0.75 0.02 0.1 0.3 . 112 0.995 $off 0
>>>>>
>>>>> i1 60 26 -3 8.10 0.75 0.02 0.1 0.3 . 112 0.995 $off 1
>>>>>
>>>>> i1 61 25 -3 10.02 0.75 0.01 0.1 0.3 . 113 0.995
>>>>> $off 0
>>>>>
>>>>> i1 62 24 -3 11.00 0.6 0.005 0.1 0.3 . 112 0.995 20 1
>>>>>
>>>>>
>>>>> i1 69 18 -6 10.08 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>>>
>>>>> i1 69 18 -6 10.06 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>>>
>>>>> i1 71 16 -6 8.04 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>>>
>>>>> i1 71 16 -6 8.03 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>>>
>>>>> i1 75 12 -3 5.01 2.5 0.02 0.1 0.3 . 110 0.992 12 2
>>>>>
>>>>> i1 75 12 -3 5.05 2.5 0.02 0.1 0.3 . 110 0.992 $off 1
>>>>>
>>>>> s
>>>>>
>>>>> 
>>>>>
>>>>> 
>>>>>
>>>>>
>>>>> /* Joe */
>>>>>
>>>>> Csound mailing list
>>>>> Csound@listserv.heanet.ie
>>>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>>>>> Send bugs reports to
>>>>>         https://github.com/csound/csound/issues
>>>>> Discussions of bugs and features can be posted here
>>>>
>>>> Csound mailing list Csound@listserv.heanet.ie
>>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND Send bugs reports to
>>>> https://github.com/csound/csound/issues Discussions of bugs and features can
>>>> be posted here
>
> Csound mailing list
> Csound@listserv.heanet.ie
> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
> Send bugs reports to
>        https://github.com/csound/csound/issues
> Discussions of bugs and features can be posted here
>

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-09 23:36
From"Joe ."
SubjectRe: unwanted noise with reverb
jpff: it says version 6070. Steven: it does work with sample accurate
after I changed the table() to table:a(), which was a typo/ brain slip
up.

Thanks everybody
/* Joe */


On Wed, Nov 9, 2016 at 10:51 AM, jpff  wrote:
> G]For my development infomation, what versiob of csound are you usig?  We
> changed this area since 6.07
> ==John
>
>
> On Wed, 9 Nov 2016, Joe . wrote:
>
>> Let me redact that again and say it works great now without the
>> sample-accurate option. Sorry, was up real late last night.
>> /* Joe */
>>
>>
>> On Wed, Nov 9, 2016 at 9:23 AM, Joe .  wrote:
>>>
>>> actually, let me redact that. It still "rips" on a few notes, although
>>> it is much better.
>>> /* Joe */
>>>
>>>
>>> On Wed, Nov 9, 2016 at 9:19 AM, Joe .  wrote:
>>>>
>>>> yes, it works fine that way. Thanks
>>>> Joe
>>>> /* Joe */
>>>>
>>>>
>>>> On Wed, Nov 9, 2016 at 7:08 AM, John ff  wrote:
>>>>>
>>>>> Not at a csound computer but if you remove the sample-accurate option
>>>>> does
>>>>> it work?
>>>>>
>>>>> Sent from TypeApp
>>>>> On 9 Nov 2016, at 01:00, "Joe ."  wrote:
>>>>>>
>>>>>>
>>>>>> Hey guys, working on a piece here. I want the sound, basically as I
>>>>>> get here, but I don't know why I'm getting that noise/ rip sound. It's
>>>>>> coming from the reverb, which is just about as loud as the original
>>>>>> signal. How do I remove/ avoid the noise? It isn't present in any
>>>>>> other parts of the piece (which aren't here). Thanks
>>>>>>
>>>>>>
>>>>>> 
>>>>>>
>>>>>> 
>>>>>>
>>>>>> --sample-accurate
>>>>>>
>>>>>> 
>>>>>>
>>>>>> 
>>>>>>
>>>>>> sr = 192000
>>>>>>
>>>>>> ksmps = 10
>>>>>>
>>>>>> nchnls = 2
>>>>>>
>>>>>> 0dbfs = 16
>>>>>>
>>>>>>
>>>>>> #define AmplitudeFrequencyConverters
>>>>>>
>>>>>> #
>>>>>>
>>>>>> iAmplitude = ampdb(p4)
>>>>>>
>>>>>> iCPS = cps2pch:i(p5, 12)
>>>>>>
>>>>>> #
>>>>>>
>>>>>>
>>>>>> gaReverb init 0
>>>>>>
>>>>>>
>>>>>> giFt1 = ftgen:i(101, 0, 8193, 10, 1, 0.04)
>>>>>>
>>>>>> giFt6 = ftgen:i(106, 0, 8193, -7, 0.1, 32, 1, 8192-32, 0)
>>>>>>
>>>>>> giFt10 = ftgen:i(110, 0, 8193, 10, 1, 0.5, 0.3, 0.25, 0.2, 0.167,
>>>>>> 0.14, 0.125, .111)
>>>>>>
>>>>>> giFt11 = ftgen:i(111, 0, 8193, 9, 1,1,0,
>>>>>> 2.01,0.75,0, 3.03,0.5,0, 3.97,0.25,0)
>>>>>>
>>>>>> giFt12 = ftgen:i(112, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>>>>> 3.97,0.05,0)
>>>>>>
>>>>>> giFt13 = ftgen:i(113, 0, 8193, 9, 1,1,0, 2.01,0.5, 0, 3.03,0.1,0,
>>>>>> 7.97,0.05,0)
>>>>>>
>>>>>> instr 1
>>>>>>
>>>>>> $AmplitudeFrequencyConverters
>>>>>>
>>>>>> iAmplitude = iAmplitude*p6
>>>>>>
>>>>>> kPhasor = phasor:a(p13)
>>>>>>
>>>>>> aTable = table(kPhasor*8192, 106)
>>>>>>
>>>>>> aVibrato = poscil:a(iCPS*((1-p12)*1/5), 5, 106)
>>>>>>
>>>>>> aMainFreq = poscil:a(iAmplitude, iCPS+aVibrato, p11, -1)
>>>>>>
>>>>>> aDistune = poscil:a(iAmplitude, iCPS*p12, p11, -1)
>>>>>>
>>>>>> aRoom = poscil:a(iAmplitude*0.03, iCPS*p12, 101, -1)
>>>>>>
>>>>>> aEnvelope = transeg:a(\
>>>>>>
>>>>>> 0, p7, (10-p5)*1.25,
>>>>>>
>>>>>> 0.7*iAmplitude, p3*p8, 0,
>>>>>>
>>>>>> iAmplitude*p9, p3-p7-(p3*p8)-(p10*p3), 0,
>>>>>>
>>>>>> iAmplitude*p9, p10*p3, 3,
>>>>>>
>>>>>> 0)
>>>>>>
>>>>>> if p13 = 0000 then
>>>>>>
>>>>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope
>>>>>>
>>>>>> else
>>>>>>
>>>>>> aOut = (aMainFreq+aDistune+aRoom)*aEnvelope*aTable
>>>>>>
>>>>>> endif
>>>>>>
>>>>>> if p14 = 0 then
>>>>>>
>>>>>> aLeft =
>>>>>> 1
>>>>>>
>>>>>> aRight = 0
>>>>>>
>>>>>> elseif p14 = 1 then
>>>>>>
>>>>>> aLeft = 0
>>>>>>
>>>>>> aRight = 1
>>>>>>
>>>>>> elseif p14 = 2 then
>>>>>>
>>>>>> aLeft = 1
>>>>>>
>>>>>> aRight = 1
>>>>>>
>>>>>> endif
>>>>>>
>>>>>> outs aOut*aLeft, aOut*aRight
>>>>>>
>>>>>> gaReverb = gaReverb + aOut
>>>>>>
>>>>>> endin
>>>>>>
>>>>>>
>>>>>> instr 99
>>>>>>
>>>>>> aReverb = nreverb:a(gaReverb, p4, 0)
>>>>>>
>>>>>> aNoclick = linseg:a(0,0.01, 1,p3-0.03, 1, 0.02, 0)
>>>>>>
>>>>>> aOut = aReverb*p5*aNoclick
>>>>>>
>>>>>> outs aOut, aOut
>>>>>>
>>>>>> gaReverb = 0
>>>>>>
>>>>>> endin
>>>>>>
>>>>>> 
>>>>>>
>>>>>> 
>>>>>>
>>>>>> #define tempo #110#
>>>>>>
>>>>>> #define on #1111#
>>>>>>
>>>>>> #define off #0000#
>>>>>>
>>>>>> t 0 $tempo
>>>>>>
>>>>>> a 0 0 56
>>>>>>
>>>>>> i99 56.5 31 0.3 0.8
>>>>>>
>>>>>> i1 57 30 -3 4.11 1.5 0.02 0.1 0.3 0.5 110 0.992 12 2
>>>>>>
>>>>>> i1 57 29 -3 5.11 1 0.02 0.1 0.3 . 110 0.992 $off 1
>>>>>>
>>>>>> i1 58 28 -3 6.07 1 0.02 0.1 0.3 . 110 0.995 30 1
>>>>>>
>>>>>> i1 59 27 -3 7.09 0.75 0.02 0.1 0.3 . 112 0.995 $off 0
>>>>>>
>>>>>> i1 60 26 -3 8.10 0.75 0.02 0.1 0.3 . 112 0.995 $off 1
>>>>>>
>>>>>> i1 61 25 -3 10.02 0.75 0.01 0.1 0.3 . 113 0.995
>>>>>> $off 0
>>>>>>
>>>>>> i1 62 24 -3 11.00 0.6 0.005 0.1 0.3 . 112 0.995 20 1
>>>>>>
>>>>>>
>>>>>> i1 69 18 -6 10.08 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>>>>
>>>>>> i1 69 18 -6 10.06 0.75 0.013 0.1 0.3 . 113 0.995 $off 0
>>>>>>
>>>>>> i1 71 16 -6 8.04 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>>>>
>>>>>> i1 71 16 -6 8.03 1.25 0.01 0.1 0.3 . 112 0.995 $off 0
>>>>>>
>>>>>> i1 75 12 -3 5.01 2.5 0.02 0.1 0.3 . 110 0.992 12 2
>>>>>>
>>>>>> i1 75 12 -3 5.05 2.5 0.02 0.1 0.3 . 110 0.992 $off 1
>>>>>>
>>>>>> s
>>>>>>
>>>>>> 
>>>>>>
>>>>>> 
>>>>>>
>>>>>>
>>>>>> /* Joe */
>>>>>>
>>>>>> Csound mailing list
>>>>>> Csound@listserv.heanet.ie
>>>>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>>>>>> Send bugs reports to
>>>>>>         https://github.com/csound/csound/issues
>>>>>> Discussions of bugs and features can be posted here
>>>>>
>>>>>
>>>>> Csound mailing list Csound@listserv.heanet.ie
>>>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND Send bugs reports to
>>>>> https://github.com/csound/csound/issues Discussions of bugs and
>>>>> features can
>>>>> be posted here
>>
>>
>> Csound mailing list
>> Csound@listserv.heanet.ie
>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>> Send bugs reports to
>>        https://github.com/csound/csound/issues
>> Discussions of bugs and features can be posted here
>>
>
> Csound mailing list
> Csound@listserv.heanet.ie
> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
> Send bugs reports to
>        https://github.com/csound/csound/issues
> Discussions of bugs and features can be posted here

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-10 14:17
Fromjpff
SubjectRe: unwanted noise with reverb
Thank you; tat eans you hit the ugg alreat reported ad fixed.  o more wok 
for me t do!

On Wed, 9 Nov 2016, Joe . wrote:

> jpff: it says version 6070. Steven: it does work with sample accurate
> after I changed the table() to table:a(), which was a typo/ brain slip
> up.
>
> Thanks everybody
> /* Joe */
>
>

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-10 14:31
Fromjpff
SubjectRe: unwanted noise with reverb
Oh dear...
Thank you; that means you hit the bug already reported and fixed.  One 
more less it of work for me to do!

On Thu, 10 Nov 2016, jpff wrote:

> Thank you; tat eans you hit the ugg alreat reported ad fixed.  o more wok for 
> me t do!
>
> On Wed, 9 Nov 2016, Joe . wrote:
>
>> jpff: it says version 6070. Steven: it does work with sample accurate
>> after I changed the table() to table:a(), which was a typo/ brain slip
>> up.
>> 
>> Thanks everybody
>> /* Joe */
>> 
>> 
>
> Csound mailing list
> Csound@listserv.heanet.ie
> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
> Send bugs reports to
>       https://github.com/csound/csound/issues
> Discussions of bugs and features can be posted here
>

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-10 14:38
From"Joe ."
SubjectRe: unwanted noise with reverb
Believe it or not, I understood you the first time! Ha! Thanks

/* Joe */


On Thu, Nov 10, 2016 at 8:31 AM, jpff  wrote:
> Oh dear...
> Thank you; that means you hit the bug already reported and fixed.  One more
> less it of work for me to do!
>
>
> On Thu, 10 Nov 2016, jpff wrote:
>
>> Thank you; tat eans you hit the ugg alreat reported ad fixed.  o more wok
>> for me t do!
>>
>> On Wed, 9 Nov 2016, Joe . wrote:
>>
>>> jpff: it says version 6070. Steven: it does work with sample accurate
>>> after I changed the table() to table:a(), which was a typo/ brain slip
>>> up.
>>>
>>> Thanks everybody
>>> /* Joe */
>>>
>>>
>>
>> Csound mailing list
>> Csound@listserv.heanet.ie
>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>> Send bugs reports to
>>       https://github.com/csound/csound/issues
>> Discussions of bugs and features can be posted here
>>
>
> Csound mailing list
> Csound@listserv.heanet.ie
> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
> Send bugs reports to
>        https://github.com/csound/csound/issues
> Discussions of bugs and features can be posted here

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-10 16:14
FromAnders Genell
SubjectRe: unwanted noise with reverb
I have been wondering for some time, John, if that is the keyboard you also do your coding on? It would seem to add enough extra bits of work even without new bugs :-)

Regards,
Anders

> 10 nov. 2016 kl. 15:17 skrev jpff :
> 
> Thank you; tat eans you hit the ugg alreat reported ad fixed.  o more wok for me t do!
> 
>> On Wed, 9 Nov 2016, Joe . wrote:
>> 
>> jpff: it says version 6070. Steven: it does work with sample accurate
>> after I changed the table() to table:a(), which was a typo/ brain slip
>> up.
>> 
>> Thanks everybody
>> /* Joe */
>> 
>> 
> 
> Csound mailing list
> Csound@listserv.heanet.ie
> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
> Send bugs reports to
>       https://github.com/csound/csound/issues
> Discussions of bugs and features can be posted here

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here

Date2016-11-10 17:41
Fromjoachim heintz
SubjectRe: unwanted noise with reverb
great — i will ask you for your translation in the future =)
	j


On 10/11/16 15:38, Joe . wrote:
> Believe it or not, I understood you the first time! Ha! Thanks
>
> /* Joe */
>
>
> On Thu, Nov 10, 2016 at 8:31 AM, jpff  wrote:
>> Oh dear...
>> Thank you; that means you hit the bug already reported and fixed.  One more
>> less it of work for me to do!
>>
>>
>> On Thu, 10 Nov 2016, jpff wrote:
>>
>>> Thank you; tat eans you hit the ugg alreat reported ad fixed.  o more wok
>>> for me t do!
>>>
>>> On Wed, 9 Nov 2016, Joe . wrote:
>>>
>>>> jpff: it says version 6070. Steven: it does work with sample accurate
>>>> after I changed the table() to table:a(), which was a typo/ brain slip
>>>> up.
>>>>
>>>> Thanks everybody
>>>> /* Joe */
>>>>
>>>>
>>>
>>> Csound mailing list
>>> Csound@listserv.heanet.ie
>>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>>> Send bugs reports to
>>>       https://github.com/csound/csound/issues
>>> Discussions of bugs and features can be posted here
>>>
>>
>> Csound mailing list
>> Csound@listserv.heanet.ie
>> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
>> Send bugs reports to
>>        https://github.com/csound/csound/issues
>> Discussions of bugs and features can be posted here
>
> Csound mailing list
> Csound@listserv.heanet.ie
> https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
> Send bugs reports to
>         https://github.com/csound/csound/issues
> Discussions of bugs and features can be posted here
>

Csound mailing list
Csound@listserv.heanet.ie
https://listserv.heanet.ie/cgi-bin/wa?A0=CSOUND
Send bugs reports to
        https://github.com/csound/csound/issues
Discussions of bugs and features can be posted here