instr

1

iamp

=

p4

icps

=

cpspch(p5)

imodamp

=

p6

imodhz

=

p7

imodfn

=

p8

ioscfn

=

p9

klfo

oscili

imodamp,imodhz,imodfn

ktrem

=

klfo + 1

kamp

=

iamp * ktrem

kenv

linen

kamp,.2,p3,.5

asig

oscili

kenv,icps,ioscfn

 

out

asig

 

endin

 


;sample score for am 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

.1

6

1

2

i01

+

.

.

8.02

.2

 

 

 

i01

.

.

.

8.04

.3

 

 

 

i01

.

.

.

8.05

.5

 

 

 

e

 

 

 

 

 

 

 

 


Download amexamp.orc.

Download amexamp.sco.