All pastes #456107 Raw Edit

Unnamed

public text v1 · immutable
#456107 ·published 2007-04-24 17:33 UTC
rendered paste body
<CsoundSynthesizer>
<CsOptions>

</CsOptions>
<CsInstruments>
sr=44100
ksmps=25
nchnls=2

	instr 11

kamp	init	1
iamp	=	p4 * 0dbfs
idettack	=	p3
inum	=	100
idamp	=	1.6
imaxshake=	1
ifreq	=	450
ifreq1	=	600
ifreq2	=	750

aenv	linseg	0, .002, iamp, p3-.005, iamp, .003, 0

adrop1	dripwater	kamp, idettack, inum, idamp, imaxshake, ifreq, ifreq1, ifreq2
adrop2	dripwater	kamp, idettack, inum, idamp, imaxshake, ifreq, ifreq1, ifreq2
adrop3	dripwater	kamp, idettack, inum, idamp, imaxshake, ifreq, ifreq1, ifreq2
adrop4	dripwater	kamp, idettack, inum, idamp, imaxshake, ifreq, ifreq1, ifreq2
adrop5	dripwater	kamp, idettack, inum, idamp, imaxshake, ifreq, ifreq1, ifreq2

kfc	expseg	5000, p3, 2000
afilt1	rezzy	adrop1, kfc, 6
afilt2	rezzy	adrop2, kfc, 6
afilt3	rezzy	adrop3, kfc, 6
afilt4	rezzy	adrop4, kfc, 6
afilt5	rezzy	adrop5, kfc, 6


amix	=	aenv * (afilt1 + afilt2 + afilt3 + afilt4 + afilt5)/5
;asig	=	afilt1

acompr	compress	amix, amix, 0, 80, 86, 20, .004, .005, .05

asig	=	acompr

	outs	asig, asig

	endin

</CsInstruments>
<CsScore>
i11	0	10	.8
;i11	0	4	.8
;i11	0	4	.8
;i11	0	4	.8

e
</CsScore>
</CsoundSynthesizer>