; tut_12b.csd ; filtros de frecuencia de segundo orden (butterworth) ; pasa-bajos y pasa-banda (operadores butlp, butbp) ; ============================================== sr = 44100 kr = 44100 ksmps = 1 instr 1 iamp = ampdbfs(p4) ifc1 = p5 ; frecuencia de corte inicial ifc2 = p6 ; frecuencia de corte final ifreq = sr/2 asig randi iamp, ifreq, .5, 1 ; ruido limitado a sr/2 kfc expon ifc1, p3, ifc2 afilt butlp asig, kfc kamp linen 1, .02, p3, .03 out afilt*kamp endin instr 2 iamp = ampdbfs(p4) ifc = p5 ; frecuencia central ibw = p6 ; ancho de banda ifreq = sr/2 asig randi iamp, ifreq, .5, 1 ; ruido limitado a sr/2 afilt butbp asig, ifc, ibw ; filtro pasa-banda kamp linen 1, .02, p3, .03 out afilt*kamp endin ; ============================================== i1 0 6 -4 18000 15 i2 7 1.5 -4 1000 100 i2 9 1.5 -4 1000 20 i2 11 1.5 -4 1000 300 i2 13 1.5 -4 5000 300 ; última actualización: 2005-06-23 19:15