Select Code to Download

#
# Fourier Synthesis
...
        &osc::sinus($s1,$fpa[0],$fpa[1],$fpa[2],1);
    }
}

#
# set the maximum amplitude to 1/-1
...
    }
    $$s1[$SMP_CELLS] = $newcells;           # update the amount of cel
+ls in sample
}