From 9583b21dae8041c6544fb37de00ca42b034ebc98 Mon Sep 17 00:00:00 2001
From: Oli <olivier.belanger@umontreal.ca>
Date: Fri, 26 Oct 2007 05:50:30 +0000
Subject: miniT tabs cleanup, loop settings moved to Jam

---
(limited to 'common/Resources')

diff --git a/common/Resources/tamtamorc.csd b/common/Resources/tamtamorc.csd
index 37129fb..3eb3db4 100644
--- a/common/Resources/tamtamorc.csd
+++ b/common/Resources/tamtamorc.csd
@@ -509,8 +509,6 @@ aRight  eqfil       aRight, 4000, 1000, 0.125
 
 aLeft   butterhp    aLeft, 150
 aRight  butterhp    aRight, 150
-aLeft   butterhp    aLeft, 150
-aRight  butterhp    aRight, 150
 
 aOutLeft dcblock (arev + aLeft) * koutGain * gkduck
 aOutRight dcblock (arev + aRight) * koutGain * gkduck
@@ -749,6 +747,7 @@ instr 5022
 kstart chnget "lstart"
 kend chnget "lend"
 kdur chnget "ldur"
+kvol chnget "lvol"
 
 idurfadein     init    0.005
 idurfadeout     init    0.095
@@ -790,12 +789,12 @@ kvibrato    oscil   .006, ivibRand, 1
 
 a1	     flooper2	0.5, 1+kvibrato, kstart, kend, kdur, 4999, 0, 0, 0, iskip
 
-a1      =   a1*kenv
+a1      =   a1*kenv*kvol
 
 gaoutL = a1*0.5+gaoutL
 gaoutR =  a1*0.5+gaoutR
 
-gainrev	=	        a1*0.1+gainrev
+gainrev	=	        a1*0.05+gainrev
 
   tieskip:
 endin
@@ -805,18 +804,20 @@ Loop points editor, simple player
 *************************/
 instr 5023
 
+kvol chnget "lvol"
+
 p3      =   nsamp(4999) * giScale
 
 a1      loscil  0.5, 1, 4999, 1
 
 kenv   adsr     0.005, 0.05, .8, 0.1
 
-a1  =   a1*kenv
+a1  =   a1*kenv*kvol
 
 gaoutL = a1*0.5+gaoutL
 gaoutR = a1*0.5+gaoutR
 
-gainrev =	    a1*0.1+gainrev
+gainrev =	    a1*0.05+gainrev
 
 endin
 
--
cgit v0.9.1