Next: Comandos de llamada para el primer instrumento Up: Instrumentos Basicos en Snd Previous: Instrumentos Basicos en Snd


Primer instrumento con incremento de fase


 		 
(define simple
    (lambda (comienzo duracion frecuencia amplitud)
      (let* ((inicio (floor (* comienzo (srate))))
             (longitud (floor (* duracion (srate))))
             (incremento-fase 
               (hz->radians frecuencia))
             (salida (make-vct longitud)))
          (do ((i 0 (1+ i)))
              ((= i longitud))
            (vct-set! salida i 
            (* amplitud (sin 
               (* i incremento-fase)))
                      ))
          (vct->samples inicio longitud salida))))


Subsecciones

© Copyright 2001-2004, mAgInvenT.ORG , All rights reserved.
Created and Mantained by Juan Reyes