<CsoundSynthesizer>
; tut_14c.csd
; includes en la partitura
; ==============================================
<CsInstruments>

sr	=	44100
kr	=	44100
ksmps	=	1
0dbfs	=	1	; amplitud máxima normalizada a 1


instr 1	

iamp	=	ampdbfs(p4)
ifreq	=	cpspch(p5)
inarm	=	18000/ifreq
imult	=	.95
asig	gbuzz	iamp, ifreq, inarm, 1, imult, 1
kfc     expon   10000, p3, ifreq*7	; frecuencia de corte del filtro
kres    line    .2, p3, .7	; resonancia del filtro
afilt   moogvcf asig, kfc, kres

kamp	adsr	.01, .01, .85, .1
aout	=	afilt*kamp
	out	aout

endin


</CsInstruments>
; ==============================================
<CsScore>

; coseno para gbuzz
f1	0	16384	11	1

t0	72
#include	#seq1#
s
t0	72
#include	#seq2#
s
f0	1.5
s
t0	72
#include	#seq1#
b1.01
#include	#seq1#
b3.02
#include	#seq1#
b2.005
#include	#seq2#
b2.015
#include	#seq2#

e

; última actualización: 2006-06-01 09:24
</CsScore>
</CsoundSynthesizer>