sr = 24000
   kr = 3000
   ksmps = 8
   nchnls = 1

instr 1                                            ; freq. modulation
   ifrq    =       cpspch(p7)                      ; pitch freq.
   aenv    oscili  1., 1./p3, 2                    ; amp, freq, table num
   amod    oscili  aenv*p5*ifrq, aenv*p6, 1        ; p5: vibrato width, p6: vibrato rate
   arnd    randi   amod, p8                        ; p8: random gen freq
   asig    oscili  aenv*p4, ifrq+arnd, 1           ; p4: Amplitude
   out     asig
endin