instr

1

;simple vibrato example

iamp

=

p4

 

icps

=

cpspch(p5)

 

imodamp

=

p6

;vib width (very small!)

imodhz

=

p7

;vibrato rate

imodfn

=

p8

;use a sine wave

ioscfn

=

p9

 

klfo

oscili

imodamp,imodhz,imodfn

;vibrato lfo

kvib

=

klfo + 1

;vary around 1

kcps

=

icps * kvib

;modulate the freq

kenv

linen

iamp,.2,p3,.5

 

asig

oscili

kenv,kcps,ioscfn

 

 

out

asig

 

 

endin

 

 


;sample score for vibrato example

;a sine wave

f01

0

512

10

1

 

 

 

 

;the oscil func

f02

0

512

10

1

0

.1

 

 

;nn

st

dur

amp

pch

modamp

modhz

modfn

oscfn

i01

0

3

20000

8.00

.01

6

1

2

i01

+

.

.

8.02

.04

 

 

 

i01

.

.

.

8.04

.083

 

 

 

i01

.

.

.

8.05

.1

 

 

 

e

 

 

 

 

 

 

 

 


Download vibexamp.orc

Download vibexamp.sco