adding separate rate field to Sample

heuermh · Jan 2, 2010 · 31c416f · 31c416f
1 parent b076c44
commit 31c416f
Show file tree

Hide file tree

Showing 7 changed files with 13 additions and 6 deletions.
diff --git a/AkaiMpc60.ck b/AkaiMpc60.ck
@@ -22,6 +22,7 @@
 
 class Sample extends IntProcedure
 {
+    1.0 => float rate;
     0.6 => float maxGain;
 
     SndBuf buf => dac;
@@ -33,7 +34,7 @@ class Sample extends IntProcedure
     {
         0 => buf.pos;
         (value / 127.0) * maxGain => buf.gain;
-        1.0 => buf.rate;
+        rate => buf.rate;
     }
 }
 

diff --git a/EmuDrumulator.ck b/EmuDrumulator.ck
@@ -22,6 +22,7 @@
 
 class Sample extends IntProcedure
 {
+    1.0 => float rate;
     0.8 => float maxGain;
 
     SndBuf buf => dac;
@@ -33,7 +34,7 @@ class Sample extends IntProcedure
     {
         0 => buf.pos;
         (value / 127.0) * maxGain => buf.gain;
-        1.0 => buf.rate;
+        rate => buf.rate;
     }
 }
 

diff --git a/OberheimDmx.ck b/OberheimDmx.ck
@@ -22,6 +22,7 @@
 
 class Sample extends IntProcedure
 {
+    1.0 => float rate;
     0.8 => float maxGain;
 
     SndBuf buf => dac;
@@ -33,7 +34,7 @@ class Sample extends IntProcedure
     {
         0 => buf.pos;
         (value / 127.0) * maxGain => buf.gain;
-        1.0 => buf.rate;
+        rate => buf.rate;
     }
 }
 

diff --git a/RolandCr78.ck b/RolandCr78.ck
@@ -22,6 +22,7 @@
 
 class Sample extends IntProcedure
 {
+    1.0 => float rate;
     1.0 => float maxGain;
 
     SndBuf buf => dac;
@@ -33,7 +34,7 @@ class Sample extends IntProcedure
     {
         0 => buf.pos;
         (value / 127.0) * maxGain => buf.gain;
-        1.0 => buf.rate;
+        rate => buf.rate;
     }
 }
 

diff --git a/RolandTr606.ck b/RolandTr606.ck
@@ -22,6 +22,7 @@
 
 class Sample extends IntProcedure
 {
+    1.0 => float rate;
     0.8 => float maxGain;
 
     SndBuf buf => dac;

diff --git a/RolandTr808.ck b/RolandTr808.ck
@@ -22,6 +22,7 @@
 
 class Sample extends IntProcedure
 {
+    1.0 => float rate;
     1.0 => float maxGain;
 
     SndBuf buf => dac;
@@ -33,7 +34,7 @@ class Sample extends IntProcedure
     {
         0 => buf.pos;
         (value / 127.0) * maxGain => buf.gain;
-        1.0 => buf.rate;
+        rate => buf.rate;
     }
 }
 

diff --git a/RolandTr909.ck b/RolandTr909.ck
@@ -22,6 +22,7 @@
 
 class Sample extends IntProcedure
 {
+    1.0 => float rate;
     0.8 => float maxGain;
 
     SndBuf buf => dac;
@@ -33,7 +34,7 @@ class Sample extends IntProcedure
     {
         0 => buf.pos;
         (value / 127.0) * maxGain => buf.gain;
-        1.0 => buf.rate;
+        rate => buf.rate;
     }
 }