; Select audio/midi flags here according to platform
-odac ;;;realtime audio out
;-iadc ;;;uncomment -iadc if realtime audio input is needed too
; For Non-realtime ouput leave only the line below:
; -o pvsvoc.wav -W ;;; for file output any platform
sr = 44100
ksmps = 32
nchnls = 2
0dbfs = 1
gisaw ftgen 1, 0, 2048, 10, 1, 0.5, 0.3, 0.25, 0.2 ;sawtooth-like
instr 1
asig in ;get the signal in
asyn poscil .6, 150, gisaw ;excitation signal of 150 Hz
famp pvsanal asig, 1024, 256, 1024, 1 ;analyse in signal
fexc pvsanal asyn, 1024, 256, 1024, 1 ;analyse excitation signal
ftps pvsvoc famp, fexc, 1, 1 ;cross it
atps pvsynth ftps ;synthesise it
outs atps, atps
endin
i 1 0 10
e