Random Amplitude Modulation Synthesys with RAN-1

The RAN-1 Class realizes a Random Amplitude Modulation of an Additive Synthesys with the following controls:

• The main amplitude,
• The fundamental frequency of the oscillator,
• Frequency of the Random Amplitude Modulation,
• The attack time of the amplitude envelope,
• The decay time of the amplitude envelope.

The example A focuses on the frequency of the fundamental.

The example B deals with the frequency of the Random Amplitude Modulation.

The example C collects 4 different attack times of the amplitude envelope.

The example D collects 4 different decay times of the amplitude envelope.

instr 1

idur = p3

iamp = (p4 > 0.0 ? (p4*0.001*0dbfs) : (ampdbfs (p4)))

ifq = p5

iran_fq = p6

imindec = 0.01 ; minimum allowed decay

iatk = p7

idec = p8

idec = (((iatk+idec)>idur) ? idur-iatk : idec)

if idec > imindec goto goon

; very short duration

iatk = idur/2

idec = idur/2

goon:

iaudiofun = 1

kenv linen iamp, iatk, idur, idec ; envelope

kran randi kenv, iran_fq ; random numbers

asound poscil kran, ifq, iaudiofun ; applied to amplitude slot

out asound

endin