rdk

Check-in [a0421c0d45]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:compiled /initrd/mnt/dev_save/dsp/rdk/SchlemmerReverb/zita_ref1b.dsp to zita_ref1b.jgtk using f2jgtk. +lfo
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | www
Files: files | file ages | folders
SHA1:a0421c0d45779ad947817e93379bb4501c8cf2f9
User & Date: root 2018-12-20 14:32:51
Context
2018-12-20
15:11
SchlemmerReverb/zita_ref1b.jgtk --> preset: def () (/initrd/mnt/dev_save/dsp/rdk/SchlemmerReverb/zita_ref1b-presets) good to go check-in: 984b163d1b user: root tags: www
14:32
compiled /initrd/mnt/dev_save/dsp/rdk/SchlemmerReverb/zita_ref1b.dsp to zita_ref1b.jgtk using f2jgtk. +lfo check-in: a0421c0d45 user: root tags: www
12:24
compiled /initrd/mnt/dev_save/dsp/rdk/SchlemmerReverb/zita_ref1b.dsp to zita_ref1b.jgtk using f2jgtk. matches zita_ref0.dsp? check-in: 3dff632415 user: root tags: www
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to SchlemmerReverb/zita_ref1.defaults.

16
17
18
19
20
21
22



SIM_ROOM(3)=16.00;
SIM_SOURCE(1)=33/42;
SIM_SOURCE(2)=11/19;
SIM_SOURCE(3)=3/16;
SIM_DESTINATION(1)=0.13; //(Ls-1)*DISTANCE;
SIM_DESTINATION(2)=0.5;//(B)*(LR);
SIM_DESTINATION(3)=1/16; 










>
>
>
16
17
18
19
20
21
22
23
24
25
SIM_ROOM(3)=16.00;
SIM_SOURCE(1)=33/42;
SIM_SOURCE(2)=11/19;
SIM_SOURCE(3)=3/16;
SIM_DESTINATION(1)=0.13; //(Ls-1)*DISTANCE;
SIM_DESTINATION(2)=0.5;//(B)*(LR);
SIM_DESTINATION(3)=1/16; 

ZE_SinusFreqHz=1.18;
ZE_SinusDepth=0.004;

Changes to SchlemmerReverb/zita_ref1.gui.

17
18
19
20
21
22
23



24
25
26
27
28
29
30
  ZE_GUI_APPERCENT=guigroup2(hslider("[13]APDELAY_PERCENT",APDELAY_PERCENT,0,1,.01));
  
  ZE_GUI_OUTDELAY      =guigroup3(vgroup("[2]Out2",nentry("[0]Outdelay",Outdelay,0,4000,1)));
  ZE_GUI_OUTLEVEL(1)   =guigroup3(vgroup("[1]Out1",nentry("[0]Outlevel(1)",Outlevel(1),-1,1,0.001)*BYBOX(1)));
  ZE_GUI_OUTLEVEL(2)   =guigroup3(vgroup("[2]Out2",nentry("[0]Outlevel(2)",Outlevel(2),-1,1,0.001)*BYBOX(2)));
  BYBOX(i) = 1-checkbox("BY(%i)");
  



gui=environment {



//AP_G(i)         =guigroup2(hslider("[15]AP_G",AP_G,0,.9,.01));    









>
>
>







17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
  ZE_GUI_APPERCENT=guigroup2(hslider("[13]APDELAY_PERCENT",APDELAY_PERCENT,0,1,.01));
  
  ZE_GUI_OUTDELAY      =guigroup3(vgroup("[2]Out2",nentry("[0]Outdelay",Outdelay,0,4000,1)));
  ZE_GUI_OUTLEVEL(1)   =guigroup3(vgroup("[1]Out1",nentry("[0]Outlevel(1)",Outlevel(1),-1,1,0.001)*BYBOX(1)));
  ZE_GUI_OUTLEVEL(2)   =guigroup3(vgroup("[2]Out2",nentry("[0]Outlevel(2)",Outlevel(2),-1,1,0.001)*BYBOX(2)));
  BYBOX(i) = 1-checkbox("BY(%i)");
  
  ZE_GUI_SinusDepth=guigroup3(vgroup("[3]Misc",nentry("[0]ZE_SinusDepth",ZE_SinusDepth,0,1,0.001)));
  ZE_GUI_SinusFreqHz=guigroup3(vgroup("[3]Misc",nentry("[0]ZE_SinusFreqHz",ZE_SinusFreqHz,0,10,0.01)));
  
gui=environment {



//AP_G(i)         =guigroup2(hslider("[15]AP_G",AP_G,0,.9,.01));    


Changes to SchlemmerReverb/zita_ref1b.dsp.

7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
..
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
//import("revgui.lib");
import("zita_ref1.lib");
import("zita_ref1.gui");
import("zita_ref1.defaults");



/* klingt der _sim-lfo_ wirklich genau so gut?
sinusi=library("../rdk.lib").sinusi(freq,phase);
zitaLFO(i)=sinusi(ZT_GUI_SinusFreqHz,i*.125 )*(ZT_GUI_SinusDepth)+1.0;
  ZT_GUI_SinusFreqHz=1;
  ZT_SinusFreqHz=1;
  ZT_GUI_SinusDepth=0.01;
  ZT_SinusDepth=0.01;
*/

process = zt.zita_distrib2(8):
  //zt.zita_rev_fdn(zt.f1,zt.f2,zt.t60dc,zt.t60m,zt.fsmax)
  zitaCore
  :ze.reflevel(zt.N)
  :dir.eq82
  :ze.lexicon_trick(zt.N)
................................................................................
      :cl.wdn(zt.N,ze.reverbtime(zt.N),(1-(ZE_GUI_FLTON)))));

ze = environment{
  
///step 1: main loop
reverbtime(N) = par(i,N,*(ZE_GUI_MAINFB)) ;
///step 2.0: change delay to fdelay
fbdelaylines(zt.N)=par(i,zt.N,(fdelay(zt.maxfbdelay(i),(ze.fbdelay(i)))));
///step 2.1: change *g to UI
allpass_combs(N)=par(i,zt.N,(allpass_fcomb(zt.maxapdelay(i),ze.apdelay(i),ZE_GUI_APG(i)))) with {
  
  allpass_fcomb(maxdel,N,aN) = (+ <: fdelay(maxdel,N-1),*(aN)) ~ *(-aN) : mem,_ : + ;//filters.lib
  }; 
///step 3: change delay(i) lenths to reflect SIM
apdelay(i)=sim.ssq(i+1)*gui.ZE_GUI_APPERCENT*SR/1000.0; //samples //rename ssq reflection
fbdelay(i)=sim.ssq(i+1)*SR/1000.0;

///step 4: change delay(i) lenths to reflect SIM
reflevel(N) = par(i,N,*(reflectionlevel(i)));
reflectionlevel(i) = sim.D0/(sim.ref(i+1)) *(ZE_GUI_ERCOMPRESSION) + makeup ;
 makeup = 1 - ZE_GUI_ERCOMPRESSION ;








|
|
|
<
<
<
<
<







 







|






|







7
8
9
10
11
12
13
14
15
16





17
18
19
20
21
22
23
..
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
//import("revgui.lib");
import("zita_ref1.lib");
import("zita_ref1.gui");
import("zita_ref1.defaults");



// klingt der _sim-lfo_ wirklich genau so gut?
sinusi(freq,phase)=component("../rdk.lib").rdk.sinusi(freq,phase);
zitaLFO(i)=sinusi(ZE_GUI_SinusFreqHz,i*.125 )*(ZE_GUI_SinusDepth)+1.0;






process = zt.zita_distrib2(8):
  //zt.zita_rev_fdn(zt.f1,zt.f2,zt.t60dc,zt.t60m,zt.fsmax)
  zitaCore
  :ze.reflevel(zt.N)
  :dir.eq82
  :ze.lexicon_trick(zt.N)
................................................................................
      :cl.wdn(zt.N,ze.reverbtime(zt.N),(1-(ZE_GUI_FLTON)))));

ze = environment{
  
///step 1: main loop
reverbtime(N) = par(i,N,*(ZE_GUI_MAINFB)) ;
///step 2.0: change delay to fdelay
fbdelaylines(N)=par(i,N,(fdelay(zt.maxfbdelay(i),(ze.fbdelay(i)))));
///step 2.1: change *g to UI
allpass_combs(N)=par(i,zt.N,(allpass_fcomb(zt.maxapdelay(i),ze.apdelay(i),ZE_GUI_APG(i)))) with {
  
  allpass_fcomb(maxdel,N,aN) = (+ <: fdelay(maxdel,N-1),*(aN)) ~ *(-aN) : mem,_ : + ;//filters.lib
  }; 
///step 3: change delay(i) lenths to reflect SIM
apdelay(i)=sim.ssq(i+1)*gui.ZE_GUI_APPERCENT*SR/1000.0*zitaLFO(i); //samples //rename ssq reflection
fbdelay(i)=sim.ssq(i+1)*SR/1000.0;

///step 4: change delay(i) lenths to reflect SIM
reflevel(N) = par(i,N,*(reflectionlevel(i)));
reflectionlevel(i) = sim.D0/(sim.ref(i+1)) *(ZE_GUI_ERCOMPRESSION) + makeup ;
 makeup = 1 - ZE_GUI_ERCOMPRESSION ;

Deleted SchlemmerReverb/zita_ref1c.dsp.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
//import("all.lib");
import("maxmsp.lib");

//import("common.lib");
import("classic6.lib");

//import("revgui.lib");
import("zita_ref1.lib");
import("zita_ref1.gui");
import("zita_ref1.defaults");

///Extending Zita Reverb with Virtual Room Acoustics 
//Life coding/sound processing and modification of the famous zita reverb by fons adriaensen.

//---------------------------------------------------------------------------------------
re=library("effect.lib"); // doesn't work because with {} is used for 'member' functions.
//---------------------------------------------------------------------------------------



/* klingt der _sim-lfo_ wirklich genau so gut?
sinusi=library("../rdk.lib").sinusi(freq,phase);
zitaLFO(i)=sinusi(ZT_GUI_SinusFreqHz,i*.125 )*(ZT_GUI_SinusDepth)+1.0;
  ZT_GUI_SinusFreqHz=1;
  ZT_SinusFreqHz=1;
  ZT_GUI_SinusDepth=0.01;
  ZT_SinusDepth=0.01;
*/

process = zt.zita_distrib2(8):
  //zt.zita_rev_fdn(zt.f1,zt.f2,zt.t60dc,zt.t60m,zt.fsmax)
  zitaCore
  :ze.reflevel(zt.N)
  :dir.eq82
  :ze.lexicon_trick(zt.N)
  :bus(2)
;

zitaCore=((bus(2*zt.N):>ze.fbdelaylines(zt.N):ze.allpass_combs(zt.N))
      ~(zt.feedbackmatrix(zt.N):cl.wdn(zt.N,zt.delayfilters(zt.N,zt.freqs,zt.durs),ZE_GUI_FLTON)
      :cl.wdn(zt.N,ze.reverbtime(zt.N),(1-(ZE_GUI_FLTON)))));

ze = environment{
  
///step 1: main loop
reverbtime(N) = par(i,N,*(ZE_GUI_MAINFB)) ;
///step 2.0: change delay to fdelay
fbdelaylines(zt.N)=par(i,zt.N,(fdelay(zt.maxfbdelay(i),(ze.fbdelay(i)))));
///step 2.1: change *g to UI
allpass_combs(N)=par(i,zt.N,(allpass_fcomb(zt.maxapdelay(i),ze.apdelay(i),ZE_GUI_APG(i)))) with {
  
  allpass_fcomb(maxdel,N,aN) = (+ <: fdelay(maxdel,N-1),*(aN)) ~ *(-aN) : mem,_ : + ;//filters.lib
  }; 
///step 3: change delay(i) lenths to reflect SIM
apdelay(i)=sim.ssq(i+1)*gui.ZE_GUI_APPERCENT*SR/1000.0; //samples //rename ssq reflection
fbdelay(i)=sim.ssq(i+1)*SR/1000.0;

///step 4: change delay(i) lenths to reflect SIM
reflevel(N) = par(i,N,*(reflectionlevel(i)));
reflectionlevel(i) = sim.D0/(sim.ref(i+1)) *(ZE_GUI_ERCOMPRESSION) + makeup ;
 makeup = 1 - ZE_GUI_ERCOMPRESSION ;

///step 5: apply the lexicon trick
lexicon_trick(N)=bus(N)<:bus(2*N):(reva,refb):bus(4):>bus(2)
with {
  reva=bus(N):>bus(2):par(i,2,*(ZE_GUI_OUTLEVEL(1)));
  refb=bus(N):>bus(2):par(i,2,@(ZE_GUI_OUTDELAY)):par(i,2,*(ZE_GUI_OUTLEVEL(2)));
  };

};
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<












































































































































Added SchlemmerReverb/zita_ref1c.dsp~.













































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
//import("all.lib");
import("maxmsp.lib");

//import("common.lib");
import("classic6.lib");

//import("revgui.lib");
import("zita_ref1.lib");
import("zita_ref1.gui");
import("zita_ref1.defaults");

///Extending Zita Reverb with Virtual Room Acoustics 
//Life coding/sound processing and modification of the famous zita reverb by fons adriaensen.

//---------------------------------------------------------------------------------------
re=library("effect.lib"); // doesn't work because with {} is used for 'member' functions.
//---------------------------------------------------------------------------------------



/* klingt der _sim-lfo_ wirklich genau so gut?
sinusi=library("../rdk.lib").sinusi(freq,phase);
zitaLFO(i)=sinusi(ZT_GUI_SinusFreqHz,i*.125 )*(ZT_GUI_SinusDepth)+1.0;
  ZT_GUI_SinusFreqHz=1;
  ZT_SinusFreqHz=1;
  ZT_GUI_SinusDepth=0.01;
  ZT_SinusDepth=0.01;
*/

process = zt.zita_distrib2(8):
  //zt.zita_rev_fdn(zt.f1,zt.f2,zt.t60dc,zt.t60m,zt.fsmax)
  zitaCore
  :ze.reflevel(zt.N)
  :dir.eq82
  :ze.lexicon_trick(zt.N)
  :bus(2)
;

zitaCore=((bus(2*zt.N):>ze.fbdelaylines(zt.N):ze.allpass_combs(zt.N))
      ~(zt.feedbackmatrix(zt.N):cl.wdn(zt.N,zt.delayfilters(zt.N,zt.freqs,zt.durs),ZE_GUI_FLTON)
      :cl.wdn(zt.N,ze.reverbtime(zt.N),(1-(ZE_GUI_FLTON)))));

ze = environment{
  
///step 1: main loop
reverbtime(N) = par(i,N,*(ZE_GUI_MAINFB)) ;
///step 2.0: change delay to fdelay
fbdelaylines(zt.N)=par(i,zt.N,(fdelay(zt.maxfbdelay(i),(ze.fbdelay(i)))));
///step 2.1: change *g to UI
allpass_combs(N)=par(i,zt.N,(allpass_fcomb(zt.maxapdelay(i),ze.apdelay(i),ZE_GUI_APG(i)))) with {
  
  allpass_fcomb(maxdel,N,aN) = (+ <: fdelay(maxdel,N-1),*(aN)) ~ *(-aN) : mem,_ : + ;//filters.lib
  }; 
///step 3: change delay(i) lenths to reflect SIM
apdelay(i)=sim.ssq(i+1)*gui.ZE_GUI_APPERCENT*SR/1000.0; //samples //rename ssq reflection
fbdelay(i)=sim.ssq(i+1)*SR/1000.0;

///step 4: change delay(i) lenths to reflect SIM
reflevel(N) = par(i,N,*(reflectionlevel(i)));
reflectionlevel(i) = sim.D0/(sim.ref(i+1)) *(ZE_GUI_ERCOMPRESSION) + makeup ;
 makeup = 1 - ZE_GUI_ERCOMPRESSION ;

///step 5: apply the lexicon trick
lexicon_trick(N)=bus(N)<:bus(2*N):(reva,refb):bus(4):>bus(2)
with {
  reva=bus(N):>bus(2):par(i,2,*(ZE_GUI_OUTLEVEL(1)));
  refb=bus(N):>bus(2):par(i,2,@(ZE_GUI_OUTDELAY)):par(i,2,*(ZE_GUI_OUTLEVEL(2)));
  };

};