diff options
Diffstat (limited to 'site/udo')
| -rwxr-xr-x | site/udo/twist/transforms/generate.udo | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/site/udo/twist/transforms/generate.udo b/site/udo/twist/transforms/generate.udo index e7355a8..8ccdda9 100755 --- a/site/udo/twist/transforms/generate.udo +++ b/site/udo/twist/transforms/generate.udo @@ -60,7 +60,7 @@ opcode twst_tf_gensimpleadditive, a, kkkkkio endif
aosc oscili (1 / iharmonics) * kgain, (kfreq * kmultiplier)
if (index < iharmonics) then
- arec twst_tf_gensimpleadditive, min:k(kfreq * kstepmult, sr / 2), kstepmult, kampprofile, iharmonics, index + 1
+ arec twst_tf_gensimpleadditive kamp, kmultiplier, min:k(kfreq * kstepmult, sr / 2), kstepmult, kampprofile, iharmonics, index + 1
aosc += arec
endif
xout aosc * kamp
@@ -93,7 +93,7 @@ opcode twst_tf_genfeedback, a, kkkk asig += (adel * kfeedback)
asig butterbp asig, kfreq, kbw
asig butterbp asig, kfreq, kbw
- asig tanh ain
+ asig tanh asig
asig *= kpostgain
xout asig
endop
@@ -107,11 +107,11 @@ instr twst_tf_genfeedback kpostgain = twst_param:k("postgain")
kbw = twst_param:k("bandwidth")
if (ileft == 1) then
- aL twst_tf_genfeedback kfeedback, kfreq, kpostgain
+ aL twst_tf_genfeedback kfeedback, kfreq, kpostgain, kbw
aL *= kamp
endif
if (iright == 1) then
- aR twst_tf_genfeedback kfeedback, kfreq, kpostgain
+ aR twst_tf_genfeedback kfeedback, kfreq, kpostgain, kbw
aR *= kamp
endif
outs aL, aR
|