Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/common/Resources
diff options
context:
space:
mode:
authorOli <olivier.belanger@umontreal.ca>2007-10-26 05:50:30 (GMT)
committer Oli <olivier.belanger@umontreal.ca>2007-10-26 05:50:30 (GMT)
commit9583b21dae8041c6544fb37de00ca42b034ebc98 (patch)
tree4c37d754cdaa5b332969f7fc30f0bba31025d006 /common/Resources
parent3aebf3dad1f5c137a5182cfe06b8edc778a5ddb9 (diff)
miniT tabs cleanup, loop settings moved to Jam
Diffstat (limited to 'common/Resources')
-rw-r--r--common/Resources/tamtamorc.csd13
1 files changed, 7 insertions, 6 deletions
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