Csound Csound-dev Csound-tekno Search About

[Csnd] Reaverbsc crazy loud bang

Date2014-01-23 20:26
Fromhlolli
Subject[Csnd] Reaverbsc crazy loud bang
Hi I just can't get rid of this bang sounds coming on my reverb on
initialization. Sound to me like an extreme version of unenveloped click.
But I've tried alot of things, changing time, instrument name, starting
time. Nothing works.

Here's my reverb instrument

instr 101, 103, 104, 105; REVERB STERIO
ilevel = p4
ainL = (gaReverbInFL + gaReverbInRL)*.5
ainR = (gaReverbInRR + gaReverbInFR + gaReverbInC)*0.333
;ainL = gaReverbInFL
;ainR = gaReverbInFR

  gaReverbInFL = 0
  gaReverbInFR = 0
  gaReverbInC  = 0
  gaReverbInRL = 0
  gaReverbInRR = 0
aoutL, aoutR reverbsc ainL, ainR, p5, p6
aoutL = aoutL * ilevel
aoutR = aoutR * ilevel

aoutL dcblock2 aoutL
aoutR  dcblock2 aoutR

aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0
outo
aoutL*aenv2,aoutR*aenv2,aoutR*aenv2,aoutL*aenv2,aoutL*aenv2,aoutR*aenv2,aoutL*aenv2,aoutR*aenv2
;outo aoutL, aoutR
;clear gaReverbInL, gaReverbInR


endin


And notice different sound coming from the file "Bang1.ogg" it's due to the
chorus intialized on same time as the reverb.

instr 102 ;CHORUS 5.0
ain = gaChorus
gaChorus = 0
iamp = p4

;Delay med feedback
klfo1 lfo 0.003, 0.99
klfo2 lfo 0.003, .98
klfo3 lfo 0.003, .96
klfo4 lfo 0.003, .97
klfo5 lfo 0.003, .95
aout delayr 0.09
atp1 deltapi 0.03 + klfo1
atp2 deltapi 0.03 + klfo2
atp3 deltapi 0.04 + klfo3
atp4 deltapi 0.04 + klfo4
atp5 deltapi 0.05 + klfo5

  delayw ain + (atp1 * 0.2) + (atp2 * 0.2) + (atp3 * 0.2) + (atp4 * 0.2) +
(atp5 * 0.2)

;Output
aFL = iamp * atp1
aFR = iamp * atp2
aC = iamp * atp3
aRL = iamp * atp4
aRR = iamp * atp5
aFL dcblock2 aFL
aFR  dcblock2 aFR
aC  dcblock2 aC 
aRL  dcblock2 aRL
aRR  dcblock2 aRR
aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0

outo aFL,aFR,aC,aC*0 ,aC*0 ,aC*0 , aRL, aRR
endin

(also I tried dcblock2 assuming it would fix some mathematic error)

Anyway hope you guys recognize this problem and can help me as soon as
possible. I have an concert on Saturday among art students so it's kind of
emergency shout from me. But I'll share this piece with you guys after the
weekend :)

bang1.ogg   
bang2.ogg   

*WARNING LOUD NOISE IN THESE SOUND FILES!!!*

And a bonus question.
I'm trying to play extreamly fast chromatic scale on this organ, but no
sound seem to appear. What could be causing very short note values to be
unheard?

          instr        12, 13 ;ORGAN FROM HALLOWEEN.CSD
idur      =         p3
iamp      =         p5
ifqc      =         cpspch(p4)
;ipanl     =         p6
;ipanr     =         1-p6
;ioutch1   =         p7
;ioutch2   =         p8
iatk      =         10
iop1f     =         ifqc
iop2f     =         2.01*ifqc
iop3f     =         3.99*ifqc
iop4f     =         8*ifqc
iop5f     =         .5*ifqc
iop7f     =         16*ifqc
kdclick   linseg    0, idur*.001, iamp, idur*0.99, iamp, idur*.001, 0
kamp1     linseg    0, .01, 1, idur*0.98, 1, .01, 0
kamp2     linseg    0, idur*.05, 1, idur*.1, .7, idur*.84, .7, idur*0.9, 0
kamp3     linseg    0, idur*.03, .8, idur*.05, 0, idur*.01, 0
kamp4     linseg    0, .idur*.1, .3, idur*.1, .05, idur*.7, .1, idur*.1, 0
aop8      oscil3     kamp4,   iop5f, 1
ap1       =         aop8+1
aop1      oscil3     kamp1,   ap1*iop1f, 1
aop2      oscil3     kamp2,   ap1*iop2f, 1
aop3      oscil3     kamp2,   iop3f, 1
aop4      oscil3     kamp2,   iop4f, 1
aop5      oscil3     kamp3,   iop5f*5, 1
;aop6      oscil     kamp2,   iop5f+aop5*ifqc, 1
aop7      oscil3     kamp2,   iop7f, 1
aout      =         (aop1 + aop2 + aop3 + aop4 + aop5 + aop7)*0.2
         ; outs      aout*kdclick*ipanl, aout*kdclick*ipanr
         
         aut = aout*kdclick
         
         ipanA = p7 ;A punktur eda If numer 2
ipanB = p6 ;B punktur
ipan = p7  ;If numer
ipan3 = p8 ;Pantimi
kpan3 = p9 ;K-Pantimi
#include "pan5.txt"

outo aFL,aFR,aC,a6*0,a7*0,a8*0,aRL,aRR


  
  gaReverbInFL = gaReverbInFL + aut*.8
  gaReverbInFR = gaReverbInFR + aut*.8
  gaReverbInC  =  gaReverbInC + aut*.8
  gaReverbInRL = gaReverbInRL + aut*.8
  gaReverbInRR = gaReverbInRR + aut*.8
         

          endin



--
View this message in context: http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880.html
Sent from the Csound - General mailing list archive at Nabble.com.

Date2014-01-23 20:47
FromTarmo Johannes
SubjectRe: [Csnd] Reaverbsc crazy loud bang

Hi,

 

just one guess, hardly it helps:

 

can you try to change the envelopes in instr 12,13 to a- rate (sound always better)

 

adclick linseg 0,idur,...

etc

I can't see from this code, but surely you have initlialized the ga-values to 0?

 

gaReverbInFL init 0 etc?

 

tarmo

 

On Thursday 23 January 2014 12:26:45 hlolli wrote:

> Hi I just can't get rid of this bang sounds coming on my reverb on

> initialization. Sound to me like an extreme version of unenveloped click.

> But I've tried alot of things, changing time, instrument name, starting

> time. Nothing works.

>

> Here's my reverb instrument

>

> instr 101, 103, 104, 105; REVERB STERIO

> ilevel = p4

> ainL = (gaReverbInFL + gaReverbInRL)*.5

> ainR = (gaReverbInRR + gaReverbInFR + gaReverbInC)*0.333

> ;ainL = gaReverbInFL

> ;ainR = gaReverbInFR

>

> gaReverbInFL = 0

> gaReverbInFR = 0

> gaReverbInC = 0

> gaReverbInRL = 0

> gaReverbInRR = 0

> aoutL, aoutR reverbsc ainL, ainR, p5, p6

> aoutL = aoutL * ilevel

> aoutR = aoutR * ilevel

>

> aoutL dcblock2 aoutL

> aoutR dcblock2 aoutR

>

> aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0

> outo

> aoutL*aenv2,aoutR*aenv2,aoutR*aenv2,aoutL*aenv2,aoutL*aenv2,aoutR*aenv2,aout

> L*aenv2,aoutR*aenv2 ;outo aoutL, aoutR

> ;clear gaReverbInL, gaReverbInR

>

>

> endin

>

>

> And notice different sound coming from the file "Bang1.ogg" it's due to the

> chorus intialized on same time as the reverb.

>

> instr 102 ;CHORUS 5.0

> ain = gaChorus

> gaChorus = 0

> iamp = p4

>

> ;Delay med feedback

> klfo1 lfo 0.003, 0.99

> klfo2 lfo 0.003, .98

> klfo3 lfo 0.003, .96

> klfo4 lfo 0.003, .97

> klfo5 lfo 0.003, .95

> aout delayr 0.09

> atp1 deltapi 0.03 + klfo1

> atp2 deltapi 0.03 + klfo2

> atp3 deltapi 0.04 + klfo3

> atp4 deltapi 0.04 + klfo4

> atp5 deltapi 0.05 + klfo5

>

> delayw ain + (atp1 * 0.2) + (atp2 * 0.2) + (atp3 * 0.2) + (atp4 * 0.2) +

> (atp5 * 0.2)

>

> ;Output

> aFL = iamp * atp1

> aFR = iamp * atp2

> aC = iamp * atp3

> aRL = iamp * atp4

> aRR = iamp * atp5

> aFL dcblock2 aFL

> aFR dcblock2 aFR

> aC dcblock2 aC

> aRL dcblock2 aRL

> aRR dcblock2 aRR

> aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0

>

> outo aFL,aFR,aC,aC*0 ,aC*0 ,aC*0 , aRL, aRR

> endin

>

> (also I tried dcblock2 assuming it would fix some mathematic error)

>

> Anyway hope you guys recognize this problem and can help me as soon as

> possible. I have an concert on Saturday among art students so it's kind of

> emergency shout from me. But I'll share this piece with you guys after the

> weekend :)

>

> bang1.ogg <http://csound.1045644.n5.nabble.com/file/n5731880/bang1.ogg>

> bang2.ogg <http://csound.1045644.n5.nabble.com/file/n5731880/bang2.ogg>

>

> *WARNING LOUD NOISE IN THESE SOUND FILES!!!*

>

> And a bonus question.

> I'm trying to play extreamly fast chromatic scale on this organ, but no

> sound seem to appear. What could be causing very short note values to be

> unheard?

>

> instr 12, 13 ;ORGAN FROM HALLOWEEN.CSD

> idur = p3

> iamp = p5

> ifqc = cpspch(p4)

> ;ipanl = p6

> ;ipanr = 1-p6

> ;ioutch1 = p7

> ;ioutch2 = p8

> iatk = 10

> iop1f = ifqc

> iop2f = 2.01*ifqc

> iop3f = 3.99*ifqc

> iop4f = 8*ifqc

> iop5f = .5*ifqc

> iop7f = 16*ifqc

> kdclick linseg 0, idur*.001, iamp, idur*0.99, iamp, idur*.001, 0

> kamp1 linseg 0, .01, 1, idur*0.98, 1, .01, 0

> kamp2 linseg 0, idur*.05, 1, idur*.1, .7, idur*.84, .7, idur*0.9, 0

> kamp3 linseg 0, idur*.03, .8, idur*.05, 0, idur*.01, 0

> kamp4 linseg 0, .idur*.1, .3, idur*.1, .05, idur*.7, .1, idur*.1, 0

> aop8 oscil3 kamp4, iop5f, 1

> ap1 = aop8+1

> aop1 oscil3 kamp1, ap1*iop1f, 1

> aop2 oscil3 kamp2, ap1*iop2f, 1

> aop3 oscil3 kamp2, iop3f, 1

> aop4 oscil3 kamp2, iop4f, 1

> aop5 oscil3 kamp3, iop5f*5, 1

> ;aop6 oscil kamp2, iop5f+aop5*ifqc, 1

> aop7 oscil3 kamp2, iop7f, 1

> aout = (aop1 + aop2 + aop3 + aop4 + aop5 + aop7)*0.2

> ; outs aout*kdclick*ipanl, aout*kdclick*ipanr

>

> aut = aout*kdclick

>

> ipanA = p7 ;A punktur eda If numer 2

> ipanB = p6 ;B punktur

> ipan = p7 ;If numer

> ipan3 = p8 ;Pantimi

> kpan3 = p9 ;K-Pantimi

> #include "pan5.txt"

>

> outo aFL,aFR,aC,a6*0,a7*0,a8*0,aRL,aRR

>

>

>

> gaReverbInFL = gaReverbInFL + aut*.8

> gaReverbInFR = gaReverbInFR + aut*.8

> gaReverbInC = gaReverbInC + aut*.8

> gaReverbInRL = gaReverbInRL + aut*.8

> gaReverbInRR = gaReverbInRR + aut*.8

>

>

> endin

>

>

>

> --

> View this message in context:

> http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880.htm

> l Sent from the Csound - General mailing list archive at Nabble.com.

>

>

> Send bugs reports to the Sourceforge bug trackers

> csound6:

> https://sourceforge.net/p/csound/tickets/

> csound5:

> https://sourceforge.net/p/csound/bugs/

> Discussions of bugs and features can be posted here

> To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe

> csound"


Date2014-01-23 20:58
FromOeyvind Brandtsegg
SubjectRe: [Csnd] Reaverbsc crazy loud bang
What causes the error is not obvious to me from the code you sent,
so my first attempt at helping will be a hack.
It seems you are starting the reverb instrument in the middle of a
phrase in the music, so one way to avoid the click would be to keep
the reverb instr running from the start (starting with output volume =
0, then fading it in after a few seconds, ... then start the actual
playing of music. If you want to turn the reverb effect on and off
during the piece, you could automate the input level to the reverb to
enable/disable it.
Also, as Tarmo suggests, using a-rate envelopes might help, both to
minimize noise, and also to enable very fast passages (exactly how
fast is very fast to you?, also what is your ksmps?).
To be able to help more with the actual problem, it would be better if
you send the complete code ,and best of all would be a minimal version
of the complete code that still shows the error.
best
Oeyvind

2014/1/23 hlolli :
> Hi I just can't get rid of this bang sounds coming on my reverb on
> initialization. Sound to me like an extreme version of unenveloped click.
> But I've tried alot of things, changing time, instrument name, starting
> time. Nothing works.
>
> Here's my reverb instrument
>
> instr 101, 103, 104, 105; REVERB STERIO
> ilevel = p4
> ainL = (gaReverbInFL + gaReverbInRL)*.5
> ainR = (gaReverbInRR + gaReverbInFR + gaReverbInC)*0.333
> ;ainL = gaReverbInFL
> ;ainR = gaReverbInFR
>
>   gaReverbInFL = 0
>   gaReverbInFR = 0
>   gaReverbInC  = 0
>   gaReverbInRL = 0
>   gaReverbInRR = 0
> aoutL, aoutR reverbsc ainL, ainR, p5, p6
> aoutL = aoutL * ilevel
> aoutR = aoutR * ilevel
>
> aoutL dcblock2 aoutL
> aoutR  dcblock2 aoutR
>
> aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0
> outo
> aoutL*aenv2,aoutR*aenv2,aoutR*aenv2,aoutL*aenv2,aoutL*aenv2,aoutR*aenv2,aoutL*aenv2,aoutR*aenv2
> ;outo aoutL, aoutR
> ;clear gaReverbInL, gaReverbInR
>
>
> endin
>
>
> And notice different sound coming from the file "Bang1.ogg" it's due to the
> chorus intialized on same time as the reverb.
>
> instr 102 ;CHORUS 5.0
> ain = gaChorus
> gaChorus = 0
> iamp = p4
>
> ;Delay med feedback
> klfo1 lfo 0.003, 0.99
> klfo2 lfo 0.003, .98
> klfo3 lfo 0.003, .96
> klfo4 lfo 0.003, .97
> klfo5 lfo 0.003, .95
> aout delayr 0.09
> atp1 deltapi 0.03 + klfo1
> atp2 deltapi 0.03 + klfo2
> atp3 deltapi 0.04 + klfo3
> atp4 deltapi 0.04 + klfo4
> atp5 deltapi 0.05 + klfo5
>
>   delayw ain + (atp1 * 0.2) + (atp2 * 0.2) + (atp3 * 0.2) + (atp4 * 0.2) +
> (atp5 * 0.2)
>
> ;Output
> aFL = iamp * atp1
> aFR = iamp * atp2
> aC = iamp * atp3
> aRL = iamp * atp4
> aRR = iamp * atp5
> aFL dcblock2 aFL
> aFR  dcblock2 aFR
> aC  dcblock2 aC
> aRL  dcblock2 aRL
> aRR  dcblock2 aRR
> aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0
>
> outo aFL,aFR,aC,aC*0 ,aC*0 ,aC*0 , aRL, aRR
> endin
>
> (also I tried dcblock2 assuming it would fix some mathematic error)
>
> Anyway hope you guys recognize this problem and can help me as soon as
> possible. I have an concert on Saturday among art students so it's kind of
> emergency shout from me. But I'll share this piece with you guys after the
> weekend :)
>
> bang1.ogg 
> bang2.ogg 
>
> *WARNING LOUD NOISE IN THESE SOUND FILES!!!*
>
> And a bonus question.
> I'm trying to play extreamly fast chromatic scale on this organ, but no
> sound seem to appear. What could be causing very short note values to be
> unheard?
>
>           instr        12, 13 ;ORGAN FROM HALLOWEEN.CSD
> idur      =         p3
> iamp      =         p5
> ifqc      =         cpspch(p4)
> ;ipanl     =         p6
> ;ipanr     =         1-p6
> ;ioutch1   =         p7
> ;ioutch2   =         p8
> iatk      =         10
> iop1f     =         ifqc
> iop2f     =         2.01*ifqc
> iop3f     =         3.99*ifqc
> iop4f     =         8*ifqc
> iop5f     =         .5*ifqc
> iop7f     =         16*ifqc
> kdclick   linseg    0, idur*.001, iamp, idur*0.99, iamp, idur*.001, 0
> kamp1     linseg    0, .01, 1, idur*0.98, 1, .01, 0
> kamp2     linseg    0, idur*.05, 1, idur*.1, .7, idur*.84, .7, idur*0.9, 0
> kamp3     linseg    0, idur*.03, .8, idur*.05, 0, idur*.01, 0
> kamp4     linseg    0, .idur*.1, .3, idur*.1, .05, idur*.7, .1, idur*.1, 0
> aop8      oscil3     kamp4,   iop5f, 1
> ap1       =         aop8+1
> aop1      oscil3     kamp1,   ap1*iop1f, 1
> aop2      oscil3     kamp2,   ap1*iop2f, 1
> aop3      oscil3     kamp2,   iop3f, 1
> aop4      oscil3     kamp2,   iop4f, 1
> aop5      oscil3     kamp3,   iop5f*5, 1
> ;aop6      oscil     kamp2,   iop5f+aop5*ifqc, 1
> aop7      oscil3     kamp2,   iop7f, 1
> aout      =         (aop1 + aop2 + aop3 + aop4 + aop5 + aop7)*0.2
>          ; outs      aout*kdclick*ipanl, aout*kdclick*ipanr
>
>          aut = aout*kdclick
>
>          ipanA = p7 ;A punktur eda If numer 2
> ipanB = p6 ;B punktur
> ipan = p7  ;If numer
> ipan3 = p8 ;Pantimi
> kpan3 = p9 ;K-Pantimi
> #include "pan5.txt"
>
> outo aFL,aFR,aC,a6*0,a7*0,a8*0,aRL,aRR
>
>
>
>   gaReverbInFL = gaReverbInFL + aut*.8
>   gaReverbInFR = gaReverbInFR + aut*.8
>   gaReverbInC  =  gaReverbInC + aut*.8
>   gaReverbInRL = gaReverbInRL + aut*.8
>   gaReverbInRR = gaReverbInRR + aut*.8
>
>
>           endin
>
>
>
> --
> View this message in context: http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880.html
> Sent from the Csound - General mailing list archive at Nabble.com.
>
>
> Send bugs reports to the Sourceforge bug trackers
> csound6:
>             https://sourceforge.net/p/csound/tickets/
> csound5:
>             https://sourceforge.net/p/csound/bugs/
> Discussions of bugs and features can be posted here
> To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe csound"
>
>



-- 

Oeyvind Brandtsegg
Professor of Music Technology
NTNU
7491 Trondheim
Norway
Cell: +47 92 203 205

http://flyndresang.no/
http://www.partikkelaudio.com/
http://soundcloud.com/brandtsegg
http://soundcloud.com/t-emp

Date2014-01-23 20:59
Fromhlolli
Subject[Csnd] Re: Reaverbsc crazy loud bang
Thanks for the reply, but it didn't work. I have now all envelopes and declicks at a-rate. But also I rendered this at kspms which makes k-rate=a-rate.

;5.0 Intialize

gaReverbInFL init 0

gaReverbInFR init 0

gaReverbInC init 0

gaReverbInRL init 0

gaReverbInRR init 0


This is in the beginning in the orchestra. Hope this is right?



2014/1/23 Tarmo Johannes-2 [via Csound] <[hidden email]>

Hi,

 

just one guess, hardly it helps:

 

can you try to change the envelopes in instr 12,13 to a- rate (sound always better)

 

adclick linseg 0,idur,...

etc

I can't see from this code, but surely you have initlialized the ga-values to 0?

 

gaReverbInFL init 0 etc?

 

tarmo

 

On Thursday 23 January 2014 12:26:45 hlolli wrote:

> Hi I just can't get rid of this bang sounds coming on my reverb on

> initialization. Sound to me like an extreme version of unenveloped click.

> But I've tried alot of things, changing time, instrument name, starting

> time. Nothing works.

>

> Here's my reverb instrument

>

> instr 101, 103, 104, 105; REVERB STERIO

> ilevel = p4

> ainL = (gaReverbInFL + gaReverbInRL)*.5

> ainR = (gaReverbInRR + gaReverbInFR + gaReverbInC)*0.333

> ;ainL = gaReverbInFL

> ;ainR = gaReverbInFR

>

> gaReverbInFL = 0

> gaReverbInFR = 0

> gaReverbInC = 0

> gaReverbInRL = 0

> gaReverbInRR = 0

> aoutL, aoutR reverbsc ainL, ainR, p5, p6

> aoutL = aoutL * ilevel

> aoutR = aoutR * ilevel

>

> aoutL dcblock2 aoutL

> aoutR dcblock2 aoutR

>

> aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0

> outo

> aoutL*aenv2,aoutR*aenv2,aoutR*aenv2,aoutL*aenv2,aoutL*aenv2,aoutR*aenv2,aout

> L*aenv2,aoutR*aenv2 ;outo aoutL, aoutR

> ;clear gaReverbInL, gaReverbInR

>

>

> endin

>

>

> And notice different sound coming from the file "Bang1.ogg" it's due to the

> chorus intialized on same time as the reverb.

>

> instr 102 ;CHORUS 5.0

> ain = gaChorus

> gaChorus = 0

> iamp = p4

>

> ;Delay med feedback

> klfo1 lfo 0.003, 0.99

> klfo2 lfo 0.003, .98

> klfo3 lfo 0.003, .96

> klfo4 lfo 0.003, .97

> klfo5 lfo 0.003, .95

> aout delayr 0.09

> atp1 deltapi 0.03 + klfo1

> atp2 deltapi 0.03 + klfo2

> atp3 deltapi 0.04 + klfo3

> atp4 deltapi 0.04 + klfo4

> atp5 deltapi 0.05 + klfo5

>

> delayw ain + (atp1 * 0.2) + (atp2 * 0.2) + (atp3 * 0.2) + (atp4 * 0.2) +

> (atp5 * 0.2)

>

> ;Output

> aFL = iamp * atp1

> aFR = iamp * atp2

> aC = iamp * atp3

> aRL = iamp * atp4

> aRR = iamp * atp5

> aFL dcblock2 aFL

> aFR dcblock2 aFR

> aC dcblock2 aC

> aRL dcblock2 aRL

> aRR dcblock2 aRR

> aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0

>

> outo aFL,aFR,aC,aC*0 ,aC*0 ,aC*0 , aRL, aRR

> endin

>

> (also I tried dcblock2 assuming it would fix some mathematic error)

>

> Anyway hope you guys recognize this problem and can help me as soon as

> possible. I have an concert on Saturday among art students so it's kind of

> emergency shout from me. But I'll share this piece with you guys after the

> weekend :)

>

> bang1.ogg <http://csound.1045644.n5.nabble.com/file/n5731880/bang1.ogg>

> bang2.ogg <http://csound.1045644.n5.nabble.com/file/n5731880/bang2.ogg>

>

> *WARNING LOUD NOISE IN THESE SOUND FILES!!!*

>

> And a bonus question.

> I'm trying to play extreamly fast chromatic scale on this organ, but no

> sound seem to appear. What could be causing very short note values to be

> unheard?

>

> instr 12, 13 ;ORGAN FROM HALLOWEEN.CSD

> idur = p3

> iamp = p5

> ifqc = cpspch(p4)

> ;ipanl = p6

> ;ipanr = 1-p6

> ;ioutch1 = p7

> ;ioutch2 = p8

> iatk = 10

> iop1f = ifqc

> iop2f = 2.01*ifqc

> iop3f = 3.99*ifqc

> iop4f = 8*ifqc

> iop5f = .5*ifqc

> iop7f = 16*ifqc

> kdclick linseg 0, idur*.001, iamp, idur*0.99, iamp, idur*.001, 0

> kamp1 linseg 0, .01, 1, idur*0.98, 1, .01, 0

> kamp2 linseg 0, idur*.05, 1, idur*.1, .7, idur*.84, .7, idur*0.9, 0

> kamp3 linseg 0, idur*.03, .8, idur*.05, 0, idur*.01, 0

> kamp4 linseg 0, .idur*.1, .3, idur*.1, .05, idur*.7, .1, idur*.1, 0

> aop8 oscil3 kamp4, iop5f, 1

> ap1 = aop8+1

> aop1 oscil3 kamp1, ap1*iop1f, 1

> aop2 oscil3 kamp2, ap1*iop2f, 1

> aop3 oscil3 kamp2, iop3f, 1

> aop4 oscil3 kamp2, iop4f, 1

> aop5 oscil3 kamp3, iop5f*5, 1

> ;aop6 oscil kamp2, iop5f+aop5*ifqc, 1

> aop7 oscil3 kamp2, iop7f, 1

> aout = (aop1 + aop2 + aop3 + aop4 + aop5 + aop7)*0.2

> ; outs aout*kdclick*ipanl, aout*kdclick*ipanr

>

> aut = aout*kdclick

>

> ipanA = p7 ;A punktur eda If numer 2

> ipanB = p6 ;B punktur

> ipan = p7 ;If numer

> ipan3 = p8 ;Pantimi

> kpan3 = p9 ;K-Pantimi

> #include "pan5.txt"

>

> outo aFL,aFR,aC,a6*0,a7*0,a8*0,aRL,aRR

>

>

>

> gaReverbInFL = gaReverbInFL + aut*.8

> gaReverbInFR = gaReverbInFR + aut*.8

> gaReverbInC = gaReverbInC + aut*.8

> gaReverbInRL = gaReverbInRL + aut*.8

> gaReverbInRR = gaReverbInRR + aut*.8

>

>

> endin

>

>

>

> --

> View this message in context:

> http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880.htm

> l Sent from the Csound - General mailing list archive at Nabble.com.

>

>

> Send bugs reports to the Sourceforge bug trackers

> csound6:

> https://sourceforge.net/p/csound/tickets/

> csound5:

> https://sourceforge.net/p/csound/bugs/

> Discussions of bugs and features can be posted here

> To unsubscribe, send email [hidden email] with body "unsubscribe

> csound"




If you reply to this email, your message will be added to the discussion below:
http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880p5731883.html
To unsubscribe from Reaverbsc crazy loud bang, click here.
NAML



--
Hlöðver Sigurðsson


View this message in context: Re: Reaverbsc crazy loud bang
Sent from the Csound - General mailing list archive at Nabble.com.

Date2014-01-23 21:07
FromHlöðver Sigurðsson
SubjectRe: [Csnd] Re: Reaverbsc crazy loud bang
ok I have at least solved this "speed" issue. As I was copying the score for the I noticed the P3 field are 0, hehe.
I blame Rosegarden for that midi-score screwup.


i12 12.349 0.0 8

i12 12.3979 0.0 8.01

i12 12.4479 0.0 8.02

i12 12.5 0.0 8.03

i12 12.549 0.0 8.04

i12 12.599 0.0 8.05

i12 12.6479 0.0 8.06

i12 12.6979 0.0 8.07

i12 12.75 0.0 8.08

i12 12.799 0.0 8.09

i12 12.849 0.0 8.1

i12 12.8979 0.0 8.11

i12 12.9479 0.0 9

i12 13 0.0 9.01

i12 13.049 0.0 9.02

i12 13.099 0.0 9.03

i12 13.1479 0.0 9.04

i12 13.1979 0.0 9.05

i12 13.25 0.0 9.06

i12 13.299 0.0 9.07

i12 13.349 0.0 9.08

i12 13.3979 0.0 9.09


Yes I agree turning the reverb on once is probably best. Maybe it's best to use if-statements to change the reverb size when needed. But I'm using alot of b-statements in the score. Is there a way to do in orchesta: if (totaltime == x) then roomsize = y, because p3 field will be set to 0 over and over. Hope you understand me. Thanks for the reply.





2014/1/23 hlolli <hlolli@gmail.com>
Thanks for the reply, but it didn't work. I have now all envelopes and declicks at a-rate. But also I rendered this at kspms which makes k-rate=a-rate.

;5.0 Intialize

gaReverbInFL init 0

gaReverbInFR init 0

gaReverbInC init 0

gaReverbInRL init 0

gaReverbInRR init 0


This is in the beginning in the orchestra. Hope this is right?



2014/1/23 Tarmo Johannes-2 [via Csound] <[hidden email]>

Hi,

 

just one guess, hardly it helps:

 

can you try to change the envelopes in instr 12,13 to a- rate (sound always better)

 

adclick linseg 0,idur,...

etc

I can't see from this code, but surely you have initlialized the ga-values to 0?

 

gaReverbInFL init 0 etc?

 

tarmo

 

On Thursday 23 January 2014 12:26:45 hlolli wrote:

> Hi I just can't get rid of this bang sounds coming on my reverb on

> initialization. Sound to me like an extreme version of unenveloped click.

> But I've tried alot of things, changing time, instrument name, starting

> time. Nothing works.

>

> Here's my reverb instrument

>

> instr 101, 103, 104, 105; REVERB STERIO

> ilevel = p4

> ainL = (gaReverbInFL + gaReverbInRL)*.5

> ainR = (gaReverbInRR + gaReverbInFR + gaReverbInC)*0.333

> ;ainL = gaReverbInFL

> ;ainR = gaReverbInFR

>

> gaReverbInFL = 0

> gaReverbInFR = 0

> gaReverbInC = 0

> gaReverbInRL = 0

> gaReverbInRR = 0

> aoutL, aoutR reverbsc ainL, ainR, p5, p6

> aoutL = aoutL * ilevel

> aoutR = aoutR * ilevel

>

> aoutL dcblock2 aoutL

> aoutR dcblock2 aoutR

>

> aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0

> outo

> aoutL*aenv2,aoutR*aenv2,aoutR*aenv2,aoutL*aenv2,aoutL*aenv2,aoutR*aenv2,aout

> L*aenv2,aoutR*aenv2 ;outo aoutL, aoutR

> ;clear gaReverbInL, gaReverbInR

>

>

> endin

>

>

> And notice different sound coming from the file "Bang1.ogg" it's due to the

> chorus intialized on same time as the reverb.

>

> instr 102 ;CHORUS 5.0

> ain = gaChorus

> gaChorus = 0

> iamp = p4

>

> ;Delay med feedback

> klfo1 lfo 0.003, 0.99

> klfo2 lfo 0.003, .98

> klfo3 lfo 0.003, .96

> klfo4 lfo 0.003, .97

> klfo5 lfo 0.003, .95

> aout delayr 0.09

> atp1 deltapi 0.03 + klfo1

> atp2 deltapi 0.03 + klfo2

> atp3 deltapi 0.04 + klfo3

> atp4 deltapi 0.04 + klfo4

> atp5 deltapi 0.05 + klfo5

>

> delayw ain + (atp1 * 0.2) + (atp2 * 0.2) + (atp3 * 0.2) + (atp4 * 0.2) +

> (atp5 * 0.2)

>

> ;Output

> aFL = iamp * atp1

> aFR = iamp * atp2

> aC = iamp * atp3

> aRL = iamp * atp4

> aRR = iamp * atp5

> aFL dcblock2 aFL

> aFR dcblock2 aFR

> aC dcblock2 aC

> aRL dcblock2 aRL

> aRR dcblock2 aRR

> aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0

>

> outo aFL,aFR,aC,aC*0 ,aC*0 ,aC*0 , aRL, aRR

> endin

>

> (also I tried dcblock2 assuming it would fix some mathematic error)

>

> Anyway hope you guys recognize this problem and can help me as soon as

> possible. I have an concert on Saturday among art students so it's kind of

> emergency shout from me. But I'll share this piece with you guys after the

> weekend :)

>

> bang1.ogg <http://csound.1045644.n5.nabble.com/file/n5731880/bang1.ogg>

> bang2.ogg <http://csound.1045644.n5.nabble.com/file/n5731880/bang2.ogg>

>

> *WARNING LOUD NOISE IN THESE SOUND FILES!!!*

>

> And a bonus question.

> I'm trying to play extreamly fast chromatic scale on this organ, but no

> sound seem to appear. What could be causing very short note values to be

> unheard?

>

> instr 12, 13 ;ORGAN FROM HALLOWEEN.CSD

> idur = p3

> iamp = p5

> ifqc = cpspch(p4)

> ;ipanl = p6

> ;ipanr = 1-p6

> ;ioutch1 = p7

> ;ioutch2 = p8

> iatk = 10

> iop1f = ifqc

> iop2f = 2.01*ifqc

> iop3f = 3.99*ifqc

> iop4f = 8*ifqc

> iop5f = .5*ifqc

> iop7f = 16*ifqc

> kdclick linseg 0, idur*.001, iamp, idur*0.99, iamp, idur*.001, 0

> kamp1 linseg 0, .01, 1, idur*0.98, 1, .01, 0

> kamp2 linseg 0, idur*.05, 1, idur*.1, .7, idur*.84, .7, idur*0.9, 0

> kamp3 linseg 0, idur*.03, .8, idur*.05, 0, idur*.01, 0

> kamp4 linseg 0, .idur*.1, .3, idur*.1, .05, idur*.7, .1, idur*.1, 0

> aop8 oscil3 kamp4, iop5f, 1

> ap1 = aop8+1

> aop1 oscil3 kamp1, ap1*iop1f, 1

> aop2 oscil3 kamp2, ap1*iop2f, 1

> aop3 oscil3 kamp2, iop3f, 1

> aop4 oscil3 kamp2, iop4f, 1

> aop5 oscil3 kamp3, iop5f*5, 1

> ;aop6 oscil kamp2, iop5f+aop5*ifqc, 1

> aop7 oscil3 kamp2, iop7f, 1

> aout = (aop1 + aop2 + aop3 + aop4 + aop5 + aop7)*0.2

> ; outs aout*kdclick*ipanl, aout*kdclick*ipanr

>

> aut = aout*kdclick

>

> ipanA = p7 ;A punktur eda If numer 2

> ipanB = p6 ;B punktur

> ipan = p7 ;If numer

> ipan3 = p8 ;Pantimi

> kpan3 = p9 ;K-Pantimi

> #include "pan5.txt"

>

> outo aFL,aFR,aC,a6*0,a7*0,a8*0,aRL,aRR

>

>

>

> gaReverbInFL = gaReverbInFL + aut*.8

> gaReverbInFR = gaReverbInFR + aut*.8

> gaReverbInC = gaReverbInC + aut*.8

> gaReverbInRL = gaReverbInRL + aut*.8

> gaReverbInRR = gaReverbInRR + aut*.8

>

>

> endin

>

>

>

> --

> View this message in context:

> http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880.htm

> l Sent from the Csound - General mailing list archive at Nabble.com.

>

>

> Send bugs reports to the Sourceforge bug trackers

> csound6:

> https://sourceforge.net/p/csound/tickets/

> csound5:

> https://sourceforge.net/p/csound/bugs/

> Discussions of bugs and features can be posted here

> To unsubscribe, send email [hidden email] with body "unsubscribe

> csound"




If you reply to this email, your message will be added to the discussion below:
http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880p5731883.html
To unsubscribe from Reaverbsc crazy loud bang, click here.
NAML



--
Hlöðver Sigurðsson


View this message in context: Re: Reaverbsc crazy loud bang

Sent from the Csound - General mailing list archive at Nabble.com.



--
Hlöðver Sigurðsson

Date2014-01-23 21:17
FromOeyvind Brandtsegg
SubjectRe: [Csnd] Re: Reaverbsc crazy loud bang
Good to hear some of the issues get ironed out,
yes you can use the "times" opcode

ktotaltime times ; time since the start of the performance
... then use ktotaltime in conditional expressions as you suggest





2014/1/23 Hlöðver Sigurðsson :
> ok I have at least solved this "speed" issue. As I was copying the score for
> the I noticed the P3 field are 0, hehe.
> I blame Rosegarden for that midi-score screwup.
>
>
> i12 12.349 0.0 8
>
> i12 12.3979 0.0 8.01
>
> i12 12.4479 0.0 8.02
>
> i12 12.5 0.0 8.03
>
> i12 12.549 0.0 8.04
>
> i12 12.599 0.0 8.05
>
> i12 12.6479 0.0 8.06
>
> i12 12.6979 0.0 8.07
>
> i12 12.75 0.0 8.08
>
> i12 12.799 0.0 8.09
>
> i12 12.849 0.0 8.1
>
> i12 12.8979 0.0 8.11
>
> i12 12.9479 0.0 9
>
> i12 13 0.0 9.01
>
> i12 13.049 0.0 9.02
>
> i12 13.099 0.0 9.03
>
> i12 13.1479 0.0 9.04
>
> i12 13.1979 0.0 9.05
>
> i12 13.25 0.0 9.06
>
> i12 13.299 0.0 9.07
>
> i12 13.349 0.0 9.08
>
> i12 13.3979 0.0 9.09
>
>
> Yes I agree turning the reverb on once is probably best. Maybe it's best to
> use if-statements to change the reverb size when needed. But I'm using alot
> of b-statements in the score. Is there a way to do in orchesta: if
> (totaltime == x) then roomsize = y, because p3 field will be set to 0 over
> and over. Hope you understand me. Thanks for the reply.
>
>
>
>
>
> 2014/1/23 hlolli 
>>
>> Thanks for the reply, but it didn't work. I have now all envelopes and
>> declicks at a-rate. But also I rendered this at kspms which makes
>> k-rate=a-rate.
>>
>> ;5.0 Intialize
>>
>> gaReverbInFL init 0
>>
>> gaReverbInFR init 0
>>
>> gaReverbInC init 0
>>
>> gaReverbInRL init 0
>>
>> gaReverbInRR init 0
>>
>>
>> This is in the beginning in the orchestra. Hope this is right?
>>
>>
>>
>> 2014/1/23 Tarmo Johannes-2 [via Csound] <[hidden email]>
>>>
>>> Hi,
>>>
>>>
>>>
>>> just one guess, hardly it helps:
>>>
>>>
>>>
>>> can you try to change the envelopes in instr 12,13 to a- rate (sound
>>> always better)
>>>
>>>
>>>
>>> adclick linseg 0,idur,...
>>>
>>> etc
>>>
>>> I can't see from this code, but surely you have initlialized the
>>> ga-values to 0?
>>>
>>>
>>>
>>> gaReverbInFL init 0 etc?
>>>
>>>
>>>
>>> tarmo
>>>
>>>
>>>
>>> On Thursday 23 January 2014 12:26:45 hlolli wrote:
>>>
>>> > Hi I just can't get rid of this bang sounds coming on my reverb on
>>>
>>> > initialization. Sound to me like an extreme version of unenveloped
>>> > click.
>>>
>>> > But I've tried alot of things, changing time, instrument name, starting
>>>
>>> > time. Nothing works.
>>>
>>> >
>>>
>>> > Here's my reverb instrument
>>>
>>> >
>>>
>>> > instr 101, 103, 104, 105; REVERB STERIO
>>>
>>> > ilevel = p4
>>>
>>> > ainL = (gaReverbInFL + gaReverbInRL)*.5
>>>
>>> > ainR = (gaReverbInRR + gaReverbInFR + gaReverbInC)*0.333
>>>
>>> > ;ainL = gaReverbInFL
>>>
>>> > ;ainR = gaReverbInFR
>>>
>>> >
>>>
>>> > gaReverbInFL = 0
>>>
>>> > gaReverbInFR = 0
>>>
>>> > gaReverbInC = 0
>>>
>>> > gaReverbInRL = 0
>>>
>>> > gaReverbInRR = 0
>>>
>>> > aoutL, aoutR reverbsc ainL, ainR, p5, p6
>>>
>>> > aoutL = aoutL * ilevel
>>>
>>> > aoutR = aoutR * ilevel
>>>
>>> >
>>>
>>> > aoutL dcblock2 aoutL
>>>
>>> > aoutR dcblock2 aoutR
>>>
>>> >
>>>
>>> > aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0
>>>
>>> > outo
>>>
>>> >
>>> > aoutL*aenv2,aoutR*aenv2,aoutR*aenv2,aoutL*aenv2,aoutL*aenv2,aoutR*aenv2,aout
>>>
>>> > L*aenv2,aoutR*aenv2 ;outo aoutL, aoutR
>>>
>>> > ;clear gaReverbInL, gaReverbInR
>>>
>>> >
>>>
>>> >
>>>
>>> > endin
>>>
>>> >
>>>
>>> >
>>>
>>> > And notice different sound coming from the file "Bang1.ogg" it's due to
>>> > the
>>>
>>> > chorus intialized on same time as the reverb.
>>>
>>> >
>>>
>>> > instr 102 ;CHORUS 5.0
>>>
>>> > ain = gaChorus
>>>
>>> > gaChorus = 0
>>>
>>> > iamp = p4
>>>
>>> >
>>>
>>> > ;Delay med feedback
>>>
>>> > klfo1 lfo 0.003, 0.99
>>>
>>> > klfo2 lfo 0.003, .98
>>>
>>> > klfo3 lfo 0.003, .96
>>>
>>> > klfo4 lfo 0.003, .97
>>>
>>> > klfo5 lfo 0.003, .95
>>>
>>> > aout delayr 0.09
>>>
>>> > atp1 deltapi 0.03 + klfo1
>>>
>>> > atp2 deltapi 0.03 + klfo2
>>>
>>> > atp3 deltapi 0.04 + klfo3
>>>
>>> > atp4 deltapi 0.04 + klfo4
>>>
>>> > atp5 deltapi 0.05 + klfo5
>>>
>>> >
>>>
>>> > delayw ain + (atp1 * 0.2) + (atp2 * 0.2) + (atp3 * 0.2) + (atp4 * 0.2)
>>> > +
>>>
>>> > (atp5 * 0.2)
>>>
>>> >
>>>
>>> > ;Output
>>>
>>> > aFL = iamp * atp1
>>>
>>> > aFR = iamp * atp2
>>>
>>> > aC = iamp * atp3
>>>
>>> > aRL = iamp * atp4
>>>
>>> > aRR = iamp * atp5
>>>
>>> > aFL dcblock2 aFL
>>>
>>> > aFR dcblock2 aFR
>>>
>>> > aC dcblock2 aC
>>>
>>> > aRL dcblock2 aRL
>>>
>>> > aRR dcblock2 aRR
>>>
>>> > aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0
>>>
>>> >
>>>
>>> > outo aFL,aFR,aC,aC*0 ,aC*0 ,aC*0 , aRL, aRR
>>>
>>> > endin
>>>
>>> >
>>>
>>> > (also I tried dcblock2 assuming it would fix some mathematic error)
>>>
>>> >
>>>
>>> > Anyway hope you guys recognize this problem and can help me as soon as
>>>
>>> > possible. I have an concert on Saturday among art students so it's kind
>>> > of
>>>
>>> > emergency shout from me. But I'll share this piece with you guys after
>>> > the
>>>
>>> > weekend :)
>>>
>>> >
>>>
>>> > bang1.ogg 
>>>
>>> > bang2.ogg 
>>>
>>> >
>>>
>>> > *WARNING LOUD NOISE IN THESE SOUND FILES!!!*
>>>
>>> >
>>>
>>> > And a bonus question.
>>>
>>> > I'm trying to play extreamly fast chromatic scale on this organ, but no
>>>
>>> > sound seem to appear. What could be causing very short note values to
>>> > be
>>>
>>> > unheard?
>>>
>>> >
>>>
>>> > instr 12, 13 ;ORGAN FROM HALLOWEEN.CSD
>>>
>>> > idur = p3
>>>
>>> > iamp = p5
>>>
>>> > ifqc = cpspch(p4)
>>>
>>> > ;ipanl = p6
>>>
>>> > ;ipanr = 1-p6
>>>
>>> > ;ioutch1 = p7
>>>
>>> > ;ioutch2 = p8
>>>
>>> > iatk = 10
>>>
>>> > iop1f = ifqc
>>>
>>> > iop2f = 2.01*ifqc
>>>
>>> > iop3f = 3.99*ifqc
>>>
>>> > iop4f = 8*ifqc
>>>
>>> > iop5f = .5*ifqc
>>>
>>> > iop7f = 16*ifqc
>>>
>>> > kdclick linseg 0, idur*.001, iamp, idur*0.99, iamp, idur*.001, 0
>>>
>>> > kamp1 linseg 0, .01, 1, idur*0.98, 1, .01, 0
>>>
>>> > kamp2 linseg 0, idur*.05, 1, idur*.1, .7, idur*.84, .7, idur*0.9, 0
>>>
>>> > kamp3 linseg 0, idur*.03, .8, idur*.05, 0, idur*.01, 0
>>>
>>> > kamp4 linseg 0, .idur*.1, .3, idur*.1, .05, idur*.7, .1, idur*.1, 0
>>>
>>> > aop8 oscil3 kamp4, iop5f, 1
>>>
>>> > ap1 = aop8+1
>>>
>>> > aop1 oscil3 kamp1, ap1*iop1f, 1
>>>
>>> > aop2 oscil3 kamp2, ap1*iop2f, 1
>>>
>>> > aop3 oscil3 kamp2, iop3f, 1
>>>
>>> > aop4 oscil3 kamp2, iop4f, 1
>>>
>>> > aop5 oscil3 kamp3, iop5f*5, 1
>>>
>>> > ;aop6 oscil kamp2, iop5f+aop5*ifqc, 1
>>>
>>> > aop7 oscil3 kamp2, iop7f, 1
>>>
>>> > aout = (aop1 + aop2 + aop3 + aop4 + aop5 + aop7)*0.2
>>>
>>> > ; outs aout*kdclick*ipanl, aout*kdclick*ipanr
>>>
>>> >
>>>
>>> > aut = aout*kdclick
>>>
>>> >
>>>
>>> > ipanA = p7 ;A punktur eda If numer 2
>>>
>>> > ipanB = p6 ;B punktur
>>>
>>> > ipan = p7 ;If numer
>>>
>>> > ipan3 = p8 ;Pantimi
>>>
>>> > kpan3 = p9 ;K-Pantimi
>>>
>>> > #include "pan5.txt"
>>>
>>> >
>>>
>>> > outo aFL,aFR,aC,a6*0,a7*0,a8*0,aRL,aRR
>>>
>>> >
>>>
>>> >
>>>
>>> >
>>>
>>> > gaReverbInFL = gaReverbInFL + aut*.8
>>>
>>> > gaReverbInFR = gaReverbInFR + aut*.8
>>>
>>> > gaReverbInC = gaReverbInC + aut*.8
>>>
>>> > gaReverbInRL = gaReverbInRL + aut*.8
>>>
>>> > gaReverbInRR = gaReverbInRR + aut*.8
>>>
>>> >
>>>
>>> >
>>>
>>> > endin
>>>
>>> >
>>>
>>> >
>>>
>>> >
>>>
>>> > --
>>>
>>> > View this message in context:
>>>
>>> >
>>> > http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880.htm
>>>
>>> > l Sent from the Csound - General mailing list archive at Nabble.com.
>>>
>>> >
>>>
>>> >
>>>
>>> > Send bugs reports to the Sourceforge bug trackers
>>>
>>> > csound6:
>>>
>>> > https://sourceforge.net/p/csound/tickets/
>>>
>>> > csound5:
>>>
>>> > https://sourceforge.net/p/csound/bugs/
>>>
>>> > Discussions of bugs and features can be posted here
>>>
>>> > To unsubscribe, send email [hidden email] with body "unsubscribe
>>>
>>> > csound"
>>>
>>>
>>>
>>> ________________________________
>>> If you reply to this email, your message will be added to the discussion
>>> below:
>>>
>>> http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880p5731883.html
>>> To unsubscribe from Reaverbsc crazy loud bang, click here.
>>> NAML
>>
>>
>>
>>
>> --
>> Hlöðver Sigurðsson
>>
>> ________________________________
>> View this message in context: Re: Reaverbsc crazy loud bang
>>
>> Sent from the Csound - General mailing list archive at Nabble.com.
>
>
>
>
> --
> Hlöðver Sigurðsson



-- 

Oeyvind Brandtsegg
Professor of Music Technology
NTNU
7491 Trondheim
Norway
Cell: +47 92 203 205

http://flyndresang.no/
http://www.partikkelaudio.com/
http://soundcloud.com/brandtsegg
http://soundcloud.com/t-emp


Date2014-01-23 21:22
Fromhlolli
Subject[Csnd] Re: Reaverbsc crazy loud bang
Thanks, just what I was looking for.

Also, it wasn't Rosegarden fault for the 0 in p3 fields.

I pasted into excel and it automatically decreased decimal, so very stupid error.

Allt er gott sem endar vel :)


2014/1/23 Oeyvind Brandtsegg-3 [via Csound] <[hidden email]>
Good to hear some of the issues get ironed out,
yes you can use the "times" opcode

ktotaltime times ; time since the start of the performance
... then use ktotaltime in conditional expressions as you suggest





2014/1/23 Hlöðver Sigurðsson <[hidden email]>:

> ok I have at least solved this "speed" issue. As I was copying the score for
> the I noticed the P3 field are 0, hehe.
> I blame Rosegarden for that midi-score screwup.
>
>
> i12 12.349 0.0 8
>
> i12 12.3979 0.0 8.01
>
> i12 12.4479 0.0 8.02
>
> i12 12.5 0.0 8.03
>
> i12 12.549 0.0 8.04
>
> i12 12.599 0.0 8.05
>
> i12 12.6479 0.0 8.06
>
> i12 12.6979 0.0 8.07
>
> i12 12.75 0.0 8.08
>
> i12 12.799 0.0 8.09
>
> i12 12.849 0.0 8.1
>
> i12 12.8979 0.0 8.11
>
> i12 12.9479 0.0 9
>
> i12 13 0.0 9.01
>
> i12 13.049 0.0 9.02
>
> i12 13.099 0.0 9.03
>
> i12 13.1479 0.0 9.04
>
> i12 13.1979 0.0 9.05
>
> i12 13.25 0.0 9.06
>
> i12 13.299 0.0 9.07
>
> i12 13.349 0.0 9.08
>
> i12 13.3979 0.0 9.09
>
>
> Yes I agree turning the reverb on once is probably best. Maybe it's best to
> use if-statements to change the reverb size when needed. But I'm using alot
> of b-statements in the score. Is there a way to do in orchesta: if
> (totaltime == x) then roomsize = y, because p3 field will be set to 0 over
> and over. Hope you understand me. Thanks for the reply.
>
>
>
>
>
> 2014/1/23 hlolli <[hidden email]>
>>

>> Thanks for the reply, but it didn't work. I have now all envelopes and
>> declicks at a-rate. But also I rendered this at kspms which makes
>> k-rate=a-rate.
>>
>> ;5.0 Intialize
>>
>> gaReverbInFL init 0
>>
>> gaReverbInFR init 0
>>
>> gaReverbInC init 0
>>
>> gaReverbInRL init 0
>>
>> gaReverbInRR init 0
>>
>>
>> This is in the beginning in the orchestra. Hope this is right?
>>
>>
>>
>> 2014/1/23 Tarmo Johannes-2 [via Csound] <[hidden email]>
>>>
>>> Hi,
>>>
>>>
>>>
>>> just one guess, hardly it helps:
>>>
>>>
>>>
>>> can you try to change the envelopes in instr 12,13 to a- rate (sound
>>> always better)
>>>
>>>
>>>
>>> adclick linseg 0,idur,...
>>>
>>> etc
>>>
>>> I can't see from this code, but surely you have initlialized the
>>> ga-values to 0?
>>>
>>>
>>>
>>> gaReverbInFL init 0 etc?
>>>
>>>
>>>
>>> tarmo
>>>
>>>
>>>
>>> On Thursday 23 January 2014 12:26:45 hlolli wrote:
>>>
>>> > Hi I just can't get rid of this bang sounds coming on my reverb on
>>>
>>> > initialization. Sound to me like an extreme version of unenveloped
>>> > click.
>>>
>>> > But I've tried alot of things, changing time, instrument name, starting
>>>
>>> > time. Nothing works.
>>>
>>> >
>>>
>>> > Here's my reverb instrument
>>>
>>> >
>>>
>>> > instr 101, 103, 104, 105; REVERB STERIO
>>>
>>> > ilevel = p4
>>>
>>> > ainL = (gaReverbInFL + gaReverbInRL)*.5
>>>
>>> > ainR = (gaReverbInRR + gaReverbInFR + gaReverbInC)*0.333
>>>
>>> > ;ainL = gaReverbInFL
>>>
>>> > ;ainR = gaReverbInFR
>>>
>>> >
>>>
>>> > gaReverbInFL = 0
>>>
>>> > gaReverbInFR = 0
>>>
>>> > gaReverbInC = 0
>>>
>>> > gaReverbInRL = 0
>>>
>>> > gaReverbInRR = 0
>>>
>>> > aoutL, aoutR reverbsc ainL, ainR, p5, p6
>>>
>>> > aoutL = aoutL * ilevel
>>>
>>> > aoutR = aoutR * ilevel
>>>
>>> >
>>>
>>> > aoutL dcblock2 aoutL
>>>
>>> > aoutR dcblock2 aoutR
>>>
>>> >
>>>
>>> > aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0
>>>
>>> > outo
>>>
>>> >
>>> > aoutL*aenv2,aoutR*aenv2,aoutR*aenv2,aoutL*aenv2,aoutL*aenv2,aoutR*aenv2,aout
>>>
>>> > L*aenv2,aoutR*aenv2 ;outo aoutL, aoutR
>>>
>>> > ;clear gaReverbInL, gaReverbInR
>>>
>>> >
>>>
>>> >
>>>
>>> > endin
>>>
>>> >
>>>
>>> >
>>>
>>> > And notice different sound coming from the file "Bang1.ogg" it's due to
>>> > the
>>>
>>> > chorus intialized on same time as the reverb.
>>>
>>> >
>>>
>>> > instr 102 ;CHORUS 5.0
>>>
>>> > ain = gaChorus
>>>
>>> > gaChorus = 0
>>>
>>> > iamp = p4
>>>
>>> >
>>>
>>> > ;Delay med feedback
>>>
>>> > klfo1 lfo 0.003, 0.99
>>>
>>> > klfo2 lfo 0.003, .98
>>>
>>> > klfo3 lfo 0.003, .96
>>>
>>> > klfo4 lfo 0.003, .97
>>>
>>> > klfo5 lfo 0.003, .95
>>>
>>> > aout delayr 0.09
>>>
>>> > atp1 deltapi 0.03 + klfo1
>>>
>>> > atp2 deltapi 0.03 + klfo2
>>>
>>> > atp3 deltapi 0.04 + klfo3
>>>
>>> > atp4 deltapi 0.04 + klfo4
>>>
>>> > atp5 deltapi 0.05 + klfo5
>>>
>>> >
>>>
>>> > delayw ain + (atp1 * 0.2) + (atp2 * 0.2) + (atp3 * 0.2) + (atp4 * 0.2)
>>> > +
>>>
>>> > (atp5 * 0.2)
>>>
>>> >
>>>
>>> > ;Output
>>>
>>> > aFL = iamp * atp1
>>>
>>> > aFR = iamp * atp2
>>>
>>> > aC = iamp * atp3
>>>
>>> > aRL = iamp * atp4
>>>
>>> > aRR = iamp * atp5
>>>
>>> > aFL dcblock2 aFL
>>>
>>> > aFR dcblock2 aFR
>>>
>>> > aC dcblock2 aC
>>>
>>> > aRL dcblock2 aRL
>>>
>>> > aRR dcblock2 aRR
>>>
>>> > aenv2 linseg 0, 0.02, 1, p3 - 0.05, 1, 0.02, 0, 0.01, 0
>>>
>>> >
>>>
>>> > outo aFL,aFR,aC,aC*0 ,aC*0 ,aC*0 , aRL, aRR
>>>
>>> > endin
>>>
>>> >
>>>
>>> > (also I tried dcblock2 assuming it would fix some mathematic error)
>>>
>>> >
>>>
>>> > Anyway hope you guys recognize this problem and can help me as soon as
>>>
>>> > possible. I have an concert on Saturday among art students so it's kind
>>> > of
>>>
>>> > emergency shout from me. But I'll share this piece with you guys after
>>> > the
>>>
>>> > weekend :)
>>>
>>> >
>>>
>>> > bang1.ogg <http://csound.1045644.n5.nabble.com/file/n5731880/bang1.ogg>
>>>
>>> > bang2.ogg <http://csound.1045644.n5.nabble.com/file/n5731880/bang2.ogg>
>>>
>>> >
>>>
>>> > *WARNING LOUD NOISE IN THESE SOUND FILES!!!*
>>>
>>> >
>>>
>>> > And a bonus question.
>>>
>>> > I'm trying to play extreamly fast chromatic scale on this organ, but no
>>>
>>> > sound seem to appear. What could be causing very short note values to
>>> > be
>>>
>>> > unheard?
>>>
>>> >
>>>
>>> > instr 12, 13 ;ORGAN FROM HALLOWEEN.CSD
>>>
>>> > idur = p3
>>>
>>> > iamp = p5
>>>
>>> > ifqc = cpspch(p4)
>>>
>>> > ;ipanl = p6
>>>
>>> > ;ipanr = 1-p6
>>>
>>> > ;ioutch1 = p7
>>>
>>> > ;ioutch2 = p8
>>>
>>> > iatk = 10
>>>
>>> > iop1f = ifqc
>>>
>>> > iop2f = 2.01*ifqc
>>>
>>> > iop3f = 3.99*ifqc
>>>
>>> > iop4f = 8*ifqc
>>>
>>> > iop5f = .5*ifqc
>>>
>>> > iop7f = 16*ifqc
>>>
>>> > kdclick linseg 0, idur*.001, iamp, idur*0.99, iamp, idur*.001, 0
>>>
>>> > kamp1 linseg 0, .01, 1, idur*0.98, 1, .01, 0
>>>
>>> > kamp2 linseg 0, idur*.05, 1, idur*.1, .7, idur*.84, .7, idur*0.9, 0
>>>
>>> > kamp3 linseg 0, idur*.03, .8, idur*.05, 0, idur*.01, 0
>>>
>>> > kamp4 linseg 0, .idur*.1, .3, idur*.1, .05, idur*.7, .1, idur*.1, 0
>>>
>>> > aop8 oscil3 kamp4, iop5f, 1
>>>
>>> > ap1 = aop8+1
>>>
>>> > aop1 oscil3 kamp1, ap1*iop1f, 1
>>>
>>> > aop2 oscil3 kamp2, ap1*iop2f, 1
>>>
>>> > aop3 oscil3 kamp2, iop3f, 1
>>>
>>> > aop4 oscil3 kamp2, iop4f, 1
>>>
>>> > aop5 oscil3 kamp3, iop5f*5, 1
>>>
>>> > ;aop6 oscil kamp2, iop5f+aop5*ifqc, 1
>>>
>>> > aop7 oscil3 kamp2, iop7f, 1
>>>
>>> > aout = (aop1 + aop2 + aop3 + aop4 + aop5 + aop7)*0.2
>>>
>>> > ; outs aout*kdclick*ipanl, aout*kdclick*ipanr
>>>
>>> >
>>>
>>> > aut = aout*kdclick
>>>
>>> >
>>>
>>> > ipanA = p7 ;A punktur eda If numer 2
>>>
>>> > ipanB = p6 ;B punktur
>>>
>>> > ipan = p7 ;If numer
>>>
>>> > ipan3 = p8 ;Pantimi
>>>
>>> > kpan3 = p9 ;K-Pantimi
>>>
>>> > #include "pan5.txt"
>>>
>>> >
>>>
>>> > outo aFL,aFR,aC,a6*0,a7*0,a8*0,aRL,aRR
>>>
>>> >
>>>
>>> >
>>>
>>> >
>>>
>>> > gaReverbInFL = gaReverbInFL + aut*.8
>>>
>>> > gaReverbInFR = gaReverbInFR + aut*.8
>>>
>>> > gaReverbInC = gaReverbInC + aut*.8
>>>
>>> > gaReverbInRL = gaReverbInRL + aut*.8
>>>
>>> > gaReverbInRR = gaReverbInRR + aut*.8
>>>
>>> >
>>>
>>> >
>>>
>>> > endin
>>>
>>> >
>>>
>>> >
>>>
>>> >
>>>
>>> > --
>>>
>>> > View this message in context:
>>>
>>> >
>>> > http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880.htm
>>>

>>> > l Sent from the Csound - General mailing list archive at Nabble.com.
>>>
>>> >
>>>
>>> >
>>>
>>> > Send bugs reports to the Sourceforge bug trackers
>>>
>>> > csound6:
>>>
>>> > https://sourceforge.net/p/csound/tickets/
>>>
>>> > csound5:
>>>
>>> > https://sourceforge.net/p/csound/bugs/
>>>
>>> > Discussions of bugs and features can be posted here
>>>
>>> > To unsubscribe, send email [hidden email] with body "unsubscribe
>>>
>>> > csound"
>>>
>>>
>>>
>>> ________________________________
>>> If you reply to this email, your message will be added to the discussion
>>> below:
>>>
>>> http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880p5731883.html
>>> To unsubscribe from Reaverbsc crazy loud bang, click here.

>>> NAML
>>
>>
>>
>>
>> --
>> Hlöðver Sigurðsson
>>
>> ________________________________
>> View this message in context: Re: Reaverbsc crazy loud bang
>>
>> Sent from the Csound - General mailing list archive at Nabble.com.
>
>
>
>
> --
> Hlöðver Sigurðsson


--

Oeyvind Brandtsegg
Professor of Music Technology
NTNU
7491 Trondheim
Norway
Cell: <a href="tel:%2B47%2092%20203%20205" value="+4792203205" target="_blank">+47 92 203 205

http://flyndresang.no/
http://www.partikkelaudio.com/
http://soundcloud.com/brandtsegg
http://soundcloud.com/t-emp


Send bugs reports to the Sourceforge bug trackers
csound6:
            https://sourceforge.net/p/csound/tickets/
csound5:
            https://sourceforge.net/p/csound/bugs/
Discussions of bugs and features can be posted here
To unsubscribe, send email [hidden email] with body "unsubscribe csound"





If you reply to this email, your message will be added to the discussion below:
http://csound.1045644.n5.nabble.com/Reaverbsc-crazy-loud-bang-tp5731880p5731887.html
To unsubscribe from Reaverbsc crazy loud bang, click here.
NAML



--
Hlöðver Sigurðsson


View this message in context: Re: Reaverbsc crazy loud bang
Sent from the Csound - General mailing list archive at Nabble.com.