|  | @@ -87,7 +87,7 @@ int IDN_FMEval(laSynthNodeFM* n){
 | 
	
		
			
				|  |  |      real f=n->Frequency, constf=0; real* inputf;
 | 
	
		
			
				|  |  |      INPUTPACKET(inputf,n->InFrequency); LA_GET_SRC_AS_VALUE(constf,n->InFrequency); 
 | 
	
		
			
				|  |  |      for(int i=0;i<LA_SYNTH_PLEN;i++){
 | 
	
		
			
				|  |  | -        real useF=inputf?(inputf[i]+f):(f+constf); if(n->Slow) useF-=10;
 | 
	
		
			
				|  |  | +        real useF=inputf?(inputf[i]*n->rInfluence+f):(f+constf); if(n->Slow) useF-=10;
 | 
	
		
			
				|  |  |          n->Phase+=FRAME_INTERVAL*VAL2FREQ(useF)*_2PI;
 | 
	
		
			
				|  |  |          WRAPPHASE(n->Phase);
 | 
	
		
			
				|  |  |          n->OutSamples[i]=sin(n->Phase)*10;
 | 
	
	
		
			
				|  | @@ -104,8 +104,9 @@ void laui_FMNode(laUiList *uil, laPropPack *This, laPropPack *Extra, laColumn *U
 | 
	
		
			
				|  |  |      LA_BASE_NODE_HEADER(uil,c,This);
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |      laUiItem* b=laBeginRow(uil,c,0,0);
 | 
	
		
			
				|  |  | -    laShowNodeSocket(uil,c,This,"in_frequency",0)->Flags|=LA_UI_SOCKET_LABEL_E;
 | 
	
		
			
				|  |  |      laShowItem(uil,c,This,"slow");
 | 
	
		
			
				|  |  | +    laShowNodeSocket(uil,c,This,"in_frequency",0)->Flags|=LA_UI_SOCKET_LABEL_E;
 | 
	
		
			
				|  |  | +    laShowItem(uil,c,This,"influence");
 | 
	
		
			
				|  |  |      laShowItem(uil,c,This,"frequency")->Expand=1;
 | 
	
		
			
				|  |  |      laShowNodeSocket(uil,c,This,"out",0);
 | 
	
		
			
				|  |  |      laEndRow(uil,b);
 | 
	
	
		
			
				|  | @@ -136,7 +137,7 @@ int IDN_VCAEval(laSynthNodeVCA* n){
 | 
	
		
			
				|  |  |      n->Out->Data=n->OutSamples; n->Out->ArrLen=LA_SYNTH_PLEN;
 | 
	
		
			
				|  |  |      if(!input){ memset(n->OutSamples,0,sizeof(real)*LA_SYNTH_PLEN); return 0; }
 | 
	
		
			
				|  |  |      for(int i=0;i<LA_SYNTH_PLEN;i++){
 | 
	
		
			
				|  |  | -        real useA=(inputamp?(inputamp[i]/10):1)*constamp;
 | 
	
		
			
				|  |  | +        real useA=(inputamp?(inputamp[i]*n->rInfluence/10):1)*constamp;
 | 
	
		
			
				|  |  |          n->OutSamples[i]= input[i]*useA;
 | 
	
		
			
				|  |  |      }
 | 
	
		
			
				|  |  |      return 1;
 | 
	
	
		
			
				|  | @@ -153,6 +154,7 @@ void laui_VCANode(laUiList *uil, laPropPack *This, laPropPack *Extra, laColumn *
 | 
	
		
			
				|  |  |      laUiItem* b=laBeginRow(uil,c,0,0);
 | 
	
		
			
				|  |  |      laShowNodeSocket(uil,c,This,"in",0)->Flags|=LA_UI_SOCKET_LABEL_E;
 | 
	
		
			
				|  |  |      laShowNodeSocket(uil,c,This,"in_amp",0);
 | 
	
		
			
				|  |  | +    laShowItem(uil,c,This,"influence");
 | 
	
		
			
				|  |  |      laShowItem(uil,c,This,"amp")->Expand=1;
 | 
	
		
			
				|  |  |      laShowNodeSocket(uil,cr,This,"out",0);
 | 
	
		
			
				|  |  |      laEndRow(uil,b);
 | 
	
	
		
			
				|  | @@ -324,13 +326,14 @@ void IDN_EnvelopeInit(laSynthNodeEnvelope* n, int NoCreate){
 | 
	
		
			
				|  |  |          n->Attack=laCreateInSocket("ATTACK",0); n->Delay=laCreateInSocket("DELAY",0);
 | 
	
		
			
				|  |  |          n->Sustain=laCreateInSocket("SUSTAIN",0); n->Release=laCreateInSocket("RELEASE",0);
 | 
	
		
			
				|  |  |          n->Trigger=laCreateInSocket("TRIGGER",0); n->Out=laCreateOutSocket(n, "OUT",0);
 | 
	
		
			
				|  |  | +        n->Time=20; n->rAttack=1; n->rDelay=5; n->rSustain=5; n->rRelease=7; n->rGate=5;
 | 
	
		
			
				|  |  |      }
 | 
	
		
			
				|  |  | +    if(!n->Gate){ n->Gate=laCreateInSocket("GATE",0); }
 | 
	
		
			
				|  |  |      if(!n->OutSamples){ n->OutSamples=memAcquireSimple(sizeof(real)*LA_SYNTH_PLEN); }
 | 
	
		
			
				|  |  |      n->Out->Data = n->OutSamples; n->Out->DataType = LA_PROP_FLOAT|LA_PROP_ARRAY; n->Out->ArrLen=LA_SYNTH_PLEN;
 | 
	
		
			
				|  |  | -    n->Time=20; n->rAttack=1; n->rDelay=5; n->rSustain=5; n->rRelease=7;
 | 
	
		
			
				|  |  |  }
 | 
	
		
			
				|  |  |  void IDN_EnvelopeDestroy(laSynthNodeEnvelope* n){
 | 
	
		
			
				|  |  | -    laDestroyInSocket(n->Attack); laDestroyInSocket(n->Delay);
 | 
	
		
			
				|  |  | +    laDestroyInSocket(n->Attack); laDestroyInSocket(n->Delay); laDestroyInSocket(n->Gate);
 | 
	
		
			
				|  |  |      laDestroyInSocket(n->Sustain); laDestroyInSocket(n->Release);
 | 
	
		
			
				|  |  |      laDestroyInSocket(n->Trigger); laDestroyOutSocket(n->Out);
 | 
	
		
			
				|  |  |      memFree(n->OutSamples);
 | 
	
	
		
			
				|  | @@ -347,16 +350,24 @@ int IDN_EnvelopeVisit(laSynthNodeEnvelope* n, laNodeVisitInfo* vi){
 | 
	
		
			
				|  |  |      return LA_DAG_FLAG_PERM;
 | 
	
		
			
				|  |  |  }
 | 
	
		
			
				|  |  |  int IDN_EnvelopeEval(laSynthNodeEnvelope* n){
 | 
	
		
			
				|  |  | -    int trigger_at=-1; real trig=n->bTrigger*100;
 | 
	
		
			
				|  |  | +    int trigger_at=-1; real trig=n->bTrigger?n->bTrigger*100:-100;
 | 
	
		
			
				|  |  |      real* trigger; INPUTPACKET(trigger,n->Trigger); if(!trigger){ LA_GET_SRC_AS_VALUE(trig,n->Trigger); }
 | 
	
		
			
				|  |  | +    real *att,*del,*sus,*rel,*gat;
 | 
	
		
			
				|  |  |      real attack=n->rAttack,delay=n->rDelay,sustain=n->rSustain,release=n->rRelease;
 | 
	
		
			
				|  |  | -    LA_GET_SRC_AS_VALUE(attack,n->Attack); LA_GET_SRC_AS_VALUE(delay,n->Delay);
 | 
	
		
			
				|  |  | -    LA_GET_SRC_AS_VALUE(sustain,n->Sustain); LA_GET_SRC_AS_VALUE(release,n->Release);
 | 
	
		
			
				|  |  | +    real gate = n->rGate; INPUTPACKET(gat,n->Gate); if(!gat) LA_GET_SRC_AS_VALUE(gate,n->Gate);
 | 
	
		
			
				|  |  | +    INPUTPACKET(att,n->Attack); if(!att) LA_GET_SRC_AS_VALUE(attack,n->Attack);
 | 
	
		
			
				|  |  | +    INPUTPACKET(del,n->Delay); if(!del) LA_GET_SRC_AS_VALUE(delay,n->Delay);
 | 
	
		
			
				|  |  | +    INPUTPACKET(sus,n->Sustain); if(!sus) LA_GET_SRC_AS_VALUE(sustain,n->Sustain);
 | 
	
		
			
				|  |  | +    INPUTPACKET(rel,n->Release); if(!rel) LA_GET_SRC_AS_VALUE(release,n->Release);
 | 
	
		
			
				|  |  |      attack=attack?pow(attack/10,2):0; delay=delay?pow(delay/10,2):0; release=release?pow(release/10,2):0;
 | 
	
		
			
				|  |  |      for(int i=0;i<LA_SYNTH_PLEN;i++){
 | 
	
		
			
				|  |  | -        if(trigger){ trig=trigger[i]; }
 | 
	
		
			
				|  |  | -        if(!n->Triggered){ if(trig > 5.0f){ n->Triggered = 1; n->Time = 0; n->ReleaseTime=10000; n->AtLevel=0; } }
 | 
	
		
			
				|  |  | -        else{ if(trig < 2.0f){ n->Triggered = 0; n->ReleaseTime = n->Time; } }
 | 
	
		
			
				|  |  | +        if(trigger){ trig=trigger[i]; } if(gat){ gate=gat[i]; }
 | 
	
		
			
				|  |  | +        if(att){ attack=att[i]*n->iAttack+n->rAttack; }
 | 
	
		
			
				|  |  | +        if(del){ delay=del[i]*n->iDelay+n->rDelay; }
 | 
	
		
			
				|  |  | +        if(sus){ sustain=sus[i]*n->iSustain+n->rSustain; }
 | 
	
		
			
				|  |  | +        if(rel){ release=rel[i]*n->iRelease+n->rRelease; }
 | 
	
		
			
				|  |  | +        if(!n->Triggered){ if(trig > gate){ n->Triggered = 1; n->Time = 0; n->ReleaseTime=10000; n->AtLevel=0; } }
 | 
	
		
			
				|  |  | +        else{ if(trig < gate-0.0001f){ n->Triggered = 0; n->ReleaseTime = n->Time; } }
 | 
	
		
			
				|  |  |          if(n->Time < n->ReleaseTime){
 | 
	
		
			
				|  |  |              if(n->Time<=attack){
 | 
	
		
			
				|  |  |                  n->OutSamples[i]=10.0f*pow(n->Time/attack,0.3);
 | 
	
	
		
			
				|  | @@ -393,18 +404,23 @@ void laui_EnvelopeNode(laUiList *uil, laPropPack *This, laPropPack *Extra, laCol
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |      laUiItem* b,*b1;
 | 
	
		
			
				|  |  |  #define ADSR_ROW(what) \
 | 
	
		
			
				|  |  | -    b=laBeginRow(uil,c,0,0); \
 | 
	
		
			
				|  |  | +    b=laBeginRow(uil,c,0,0);{ \
 | 
	
		
			
				|  |  |      laShowNodeSocket(uil,c,This,"in_" what,0)->Flags|=LA_UI_SOCKET_LABEL_E; \
 | 
	
		
			
				|  |  | -    b1=laOnConditionThat(uil,c,laNot(laPropExpression(This,"in_" what ".source")));{ \
 | 
	
		
			
				|  |  | -        laUiItem* value=laShowItem(uil,c,This,what);value->Expand=1; value->Flags|=LA_UI_FLAGS_KNOB;\
 | 
	
		
			
				|  |  | -    } laEndCondition(uil,b1); \
 | 
	
		
			
				|  |  | -    laEndRow(uil,b);
 | 
	
		
			
				|  |  | +    laUiItem* value=laShowItem(uil,c,This,"i" what); \
 | 
	
		
			
				|  |  | +    value=laShowItem(uil,c,This,what);value->Expand=1; \
 | 
	
		
			
				|  |  | +    }laEndRow(uil,b);
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |      ADSR_ROW("attack") ADSR_ROW("delay") ADSR_ROW("sustain") ADSR_ROW("release")
 | 
	
		
			
				|  |  |      
 | 
	
		
			
				|  |  |      b=laBeginRow(uil,c,0,0);
 | 
	
		
			
				|  |  | -    laShowItem(uil,c,This,"in_trigger"); laShowItem(uil,c,This,"trigger")->Flags|=LA_UI_FLAGS_MOMENTARY|LA_UI_FLAGS_HIGHLIGHT;
 | 
	
		
			
				|  |  | -    laShowSeparator(uil,c)->Expand=1; laShowItem(uil,c,This,"out")->Flags|=LA_UI_SOCKET_LABEL_W;
 | 
	
		
			
				|  |  | +    laShowItem(uil,c,This,"gate")->Expand=1;
 | 
	
		
			
				|  |  | +    laShowNodeSocket(uil,c,This,"in_gate",0)->Flags|=LA_UI_SOCKET_LABEL_W;
 | 
	
		
			
				|  |  | +    laShowNodeSocket(uil,c,This,"in_trigger",0)->Flags|=LA_UI_SOCKET_LABEL_E;
 | 
	
		
			
				|  |  | +    laEndRow(uil,b);
 | 
	
		
			
				|  |  | +    b=laBeginRow(uil,c,0,0);
 | 
	
		
			
				|  |  | +    laShowSeparator(uil,c)->Expand=1; 
 | 
	
		
			
				|  |  | +    laShowItem(uil,c,This,"trigger")->Flags|=LA_UI_FLAGS_MOMENTARY|LA_UI_FLAGS_HIGHLIGHT;
 | 
	
		
			
				|  |  | +    laShowItem(uil,c,This,"out")->Flags|=LA_UI_SOCKET_LABEL_W;
 | 
	
		
			
				|  |  |      laEndRow(uil,b);
 | 
	
		
			
				|  |  |  }
 | 
	
		
			
				|  |  |  
 | 
	
	
		
			
				|  | @@ -758,6 +774,7 @@ void laInitAudio(){
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"in_frequency", "In Frequency","Input frequency","la_in_socket",0,0,0,offsetof(laSynthNodeFM,InFrequency),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"out", "Out","Output","la_out_socket",0,0,0,offsetof(laSynthNodeFM,Out),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddFloatProperty(pc,"frequency","Frequency","Frequency of the oscilliator",0,0,0,10,0,0.1,0,0,offsetof(laSynthNodeFM,Frequency),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"influence","Influence","Influence of the molulation input",LA_WIDGET_KNOB,0,0,1,-1,0.01,0,0,offsetof(laSynthNodeFM,rInfluence),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  |      p=laAddEnumProperty(pc,"slow","Slow","Low frequency oscilliator",LA_WIDGET_ENUM_HIGHLIGHT,0,0,0,0,offsetof(laSynthNodeFM,Slow),0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  |      laAddEnumItemAs(p,"NONE","None","Regular frequency range",0,0);
 | 
	
		
			
				|  |  |      laAddEnumItemAs(p,"SLOW","Slow","Slow frequency range",1,0);
 | 
	
	
		
			
				|  | @@ -769,6 +786,7 @@ void laInitAudio(){
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"in", "Input","Input","la_in_socket",0,0,0,offsetof(laSynthNodeVCA,In),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"out", "Out","Output","la_out_socket",0,0,0,offsetof(laSynthNodeVCA,Out),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddFloatProperty(pc,"amp","Amptitude","Amptitude of the output signal",0,0,0,10,0,0.1,0,0,offsetof(laSynthNodeVCA,Amp),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"influence","Influence","Influence of the modulating signal",LA_WIDGET_KNOB,0,0,1,-1,0.01,0,0,offsetof(laSynthNodeVCA,rInfluence),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |      pc=laAddPropertyContainer("la_node_synth_noise", "Noise Node", "Noise node",0,laui_NoiseNode,sizeof(laSynthNodeFM),lapost_Node,0,1);
 | 
	
		
			
				|  |  |      LA_PC_IDN_NOISE=pc; laPropContainerExtraFunctions(pc,0,0,0,0,laui_DefaultNodeOperationsPropUiDefine);
 | 
	
	
		
			
				|  | @@ -809,16 +827,22 @@ void laInitAudio(){
 | 
	
		
			
				|  |  |      pc=laAddPropertyContainer("la_node_synth_envelope", "Envelope Node", "Sound envelope",0,laui_EnvelopeNode,sizeof(laSynthNodeEnvelope),lapost_Node,0,1);
 | 
	
		
			
				|  |  |      LA_PC_IDN_ENVELOPE=pc; laPropContainerExtraFunctions(pc,0,0,0,0,laui_DefaultNodeOperationsPropUiDefine);
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"base","Base","Base node","la_base_node",0,0,0,0,0,0,0,0,0,0,0,LA_UDF_LOCAL);
 | 
	
		
			
				|  |  | +    laAddSubGroup(pc,"in_gate", "Gate","Gate input","la_in_socket",0,0,0,offsetof(laSynthNodeEnvelope,Gate),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"in_attack", "Attack","Attack input","la_in_socket",0,0,0,offsetof(laSynthNodeEnvelope,Attack),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"in_delay", "Delay","Delay input","la_in_socket",0,0,0,offsetof(laSynthNodeEnvelope,Delay),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"in_sustain", "Sustain","Sustain input","la_in_socket",0,0,0,offsetof(laSynthNodeEnvelope,Sustain),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"in_release", "Release","Release input","la_in_socket",0,0,0,offsetof(laSynthNodeEnvelope,Release),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"in_trigger", "Trigger","Trigger input","la_in_socket",0,0,0,offsetof(laSynthNodeEnvelope,Trigger),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  |      laAddSubGroup(pc,"out", "Output","Envelope output","la_out_socket",0,0,0,offsetof(laSynthNodeEnvelope,Out),0,0,0,0,0,0,0,LA_UDF_SINGLE);
 | 
	
		
			
				|  |  | -    laAddFloatProperty(pc,"attack","Attack","Attack value",0,0,0,10,0,0.1,0,0,offsetof(laSynthNodeEnvelope,rAttack),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | -    laAddFloatProperty(pc,"delay","Delay","Delay value",0,0,0,10,0,0.1,0,0,offsetof(laSynthNodeEnvelope,rDelay),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | -    laAddFloatProperty(pc,"sustain","Sustain","Sustain value",0,0,0,10,0,0.1,0,0,offsetof(laSynthNodeEnvelope,rSustain),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | -    laAddFloatProperty(pc,"release","Release","Release value",0,0,0,10,0,0.1,0,0,offsetof(laSynthNodeEnvelope,rRelease),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"gate","Gate","Gate for the trigger",0,0,0,10,-10,0.01,0,0,offsetof(laSynthNodeEnvelope,rGate),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"attack","Attack","Attack value",0,0,0,10,0,0.01,0,0,offsetof(laSynthNodeEnvelope,rAttack),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"delay","Delay","Delay value",0,0,0,10,0,0.01,0,0,offsetof(laSynthNodeEnvelope,rDelay),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"sustain","Sustain","Sustain value",0,0,0,10,0,0.01,0,0,offsetof(laSynthNodeEnvelope,rSustain),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"release","Release","Release value",0,0,0,10,0,0.01,0,0,offsetof(laSynthNodeEnvelope,rRelease),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"iattack","Attack Influence","Attack modulation influence value",LA_WIDGET_KNOB,0,0,1,-1,0.01,0,0,offsetof(laSynthNodeEnvelope,iAttack),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"idelay","Delay Influence","Delay modulation influence value",LA_WIDGET_KNOB,0,0,1,-1,0.01,0,0,offsetof(laSynthNodeEnvelope,iDelay),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"isustain","Sustain Influence","Sustain modulation influence value",LA_WIDGET_KNOB,0,0,1,-1,0.01,0,0,offsetof(laSynthNodeEnvelope,iSustain),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  | +    laAddFloatProperty(pc,"irelease","Release Influence","Release modulation influence value",LA_WIDGET_KNOB,0,0,1,-1,0.01,0,0,offsetof(laSynthNodeEnvelope,iRelease),0,0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  |      p=laAddEnumProperty(pc,"trigger","Trigger","Trigger the envelope",LA_WIDGET_ENUM_CYCLE,0,0,0,0,offsetof(laSynthNodeEnvelope,bTrigger),0,0,0,0,0,0,0,0,0,0);
 | 
	
		
			
				|  |  |      laAddEnumItemAs(p,"IDLE","Idle","Trigger idle",0,0);
 | 
	
		
			
				|  |  |      laAddEnumItemAs(p,"TRIG","Trigger","Trigger active",1,0);
 |