AdFM - Delay-based false 2 2 itab chnget "AdFM.sine_table" if (itab == 0) then itab ftgen 0, 0, 65537, 10, 1 ; sine wave chnset itab, "AdFM.sine_table" endif aout1 DFM ain1, <fc_fm_ratio>, <index>, itab aout2 DFM ain2, <fc_fm_ratio>, <index>, itab blue port of the delay-based version of Victor Lazzarini's Adaptive FM Synthesis(AdFM) For more information, please consult the article "Adaptive FM Synthesis" by Victor Lazzarini, Joseph Timoney, and Thomas Lysaght, available at: http://dafx.labri.fr/dafx07_proceedings.html DFM a akki setksmps 1 as,krt,knx,ifn xin ioff = 2/sr /* 2-sample offset*/ /* pitch tracking */ kcps,kamp ptrack as,512 /* modulator */ adt oscili knx/($M_PI*kcps),kcps/krt,ifn adp delayr 1 /* delay line */ adel deltap3 adt + ioff delayw as xout adel asig DFM ain,krat,kndx,ifn ain ? input signal krat ? fc:fm ratio kndx ? index of modulation ifn ? mod signal function table fc_fm_ratio 5 68 true 1.0 8.0 2.0 60 true 22 48 index 69 68 true 0.0 12.0 1.0 60 true 84 48 42 3 30 27