Next: Comandos de llamada para el instrumento de fase constante Up: Instrumentos Basicos en Snd Previous: Comandos de llamada para el instrumento con envolventes


Sinusoidal con incremento de fase

Este es un ejemplo de un instrumento con onda sinuosidal e incremento de fase:


 		 
(define fase-constante
  (lambda 
      (comienzo duracion frecuencia 
                amplitud incremento-fase)
    (let* 
        ((inicio (floor (* comienzo (srate))))
         (longitud (floor (* duracion (srate))))
         (sine-wave (make-oscil 
                     :frequency frecuencia))
         (incremento-fase-rad-per-sec 
          (hz->radians incremento-fase))
         (salida (make-vct longitud)))
      (do ((i 0 (1+ i)))
          ((= i longitud))
        (vct-set! 
         salida i 
         (* amplitud 
            (oscil sine-wave 
                   incremento-fase-rad-per-sec ))
         ))
      (vct->samples inicio longitud salida))))


Subsecciones

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