; tut_09b.csd
; operador gbuzz
; operador transeg
; GEN11 suma de cosenos armónicos
; ==============================================
sr = 44100
kr = 44100
ksmps = 1
instr 1
iamp = 20000
ifreq = p4
i1arm = p6
; cantidad de armónicos dependiendo de la fundamental
; y del armónico más bajo
inarm = int(p5/ifreq)-i1arm+1
kmult transeg .2, p3*.5, -2.2, .9, p3*.5, 2.2, .2
; multiplicacor de amplitudes variable
a1 gbuzz iamp, ifreq, inarm, i1arm, kmult, 1
kamp linen 1, .1, p3, .2
out a1*kamp
endin
; ==============================================
; tabla con un coseno para gbuzz
f1 0 16384 11 1
;p1 p2 p3 p4 p5 p6 p7
;instr init dur freq límite 1er arm
i1 0 4.5 300 16000 1
i1 5 4.5 300 16000 5
i1 10 4.5 300 6000 11
i1 15 4.5 300 6000 2
i1 20 4.5 1200 6000 1
; actualizado: 2005-06-16 13:21