diff options
| author | olipet <olpc@localhost.localdomain> | 2007-01-07 10:01:33 (GMT) |
|---|---|---|
| committer | olipet <olpc@localhost.localdomain> | 2007-01-07 10:01:33 (GMT) |
| commit | 5dcd05db5c22ee80b74152064468c052d568fafb (patch) | |
| tree | 712909b334a11a57ec6d63ef4635682f2afe2d75 /Resources | |
| parent | d5c71cd48dceeaad37e53d51463ac5310234f081 (diff) | |
come back to sr = 22K
Diffstat (limited to 'Resources')
| -rw-r--r-- | Resources/univorc.csd | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/Resources/univorc.csd b/Resources/univorc.csd index dfe6c2b..86b412f 100644 --- a/Resources/univorc.csd +++ b/Resources/univorc.csd @@ -3,9 +3,10 @@ -+rtaudio=alsa -idevaudio -odevaudio -m0 -W -s -d -b128 -B512 </CsOptions> <CsInstruments> -sr=16000 +sr=22050 ksmps=50 nchnls=2 +giScale = 1/sr gainrev init 0 gaoutL init 0 @@ -256,7 +257,7 @@ aSource balance aSource, ar elseif iSourceType == 6 then iSndpitch = p4/261.626 iPar2 = iPar2 -p3 = nsamp(5000+iPar2) * 0.0000625 / (iSndpitch*iPar1) +p3 = nsamp(5000+iPar2) * giScale / (iSndpitch*iPar1) aSource loscil kpara4*.4, iSndpitch*kpara1, 5000+iPar2, 1 aSource butterlp aSource, kpara3 elseif iSourceType == 7 then @@ -356,7 +357,7 @@ gkduck init 1 gkduck port gkduck, .03, 1. ain dcblock gainrev*0.05 -arev reverb ain, 2.5 +arev reverb ain, 2.5 arev butterlp arev, 5000 outs (arev + gaoutL)*koutGain*gkduck, (arev + gaoutR) * koutGain*gkduck @@ -367,7 +368,6 @@ arev butterlp arev, 5000 endin - /**************************************************************** Handler audio input recording ****************************************************************/ @@ -517,7 +517,7 @@ gasynth = aout outs aout, aout -aout = 0 +;aout = 0 zacl 0, 8 endin @@ -664,7 +664,7 @@ endin instr 5003 -p3 = nsamp(p8) * 0.0000625 / p4 +p3 = nsamp(p8) * giScale / p4 a1 loscil p6, p4, p8, 1 |