; tut_13b.csd ; procesamiento de la partitura: ; carry (. y espacio en blanco) ; ramping lineal < ; ramping exponencial ) ; ramping aleatorio ~ ; ============================================== sr = 44100 kr = 44100 ksmps = 1 0dbfs = 1 instr 1 iamp = ampdbfs(p4) ist = int(p5)/100 ; cantidad de semitonos sobre C3 ipch = 7+ist ; frecuencia en pch ifrec = cpspch(ipch) inarm = int(p6/ifrec) kmult line 1, p3, .3 kamp transeg 0, .01, 3, 1, p3, -6, 0 ; envolvente de caída exponencial asig gbuzz iamp, ifrec, inarm, 1, kmult, 1 out asig*kamp print ipch, inarm endin ; ============================================== ; tabla con un coseno para gbuzz f1 0 16384 11 1 t 0 204 16 360 22 120 ;p1 p2 p3 p4 p5 p6 ;instr init dur amp stonos límite espectral i1 0 1 -6 06 19000 i1 + . . < i1 . . . < i1 . . . < i1 . . . < i1 . . . < i1 . .5 . < i1 ^+1 . . < i1 ^+1 . . < i1 ^+1 . . 23 i1 ^+1 . . ~ i1 ^+1 . . ~ i1 ^+1 1.2 . ~ i1 ^+1 . . ~ i1 ^+1 . . ~ i1 ^+1 . . ~ i1 ^+1 . . 29 15000 i1 ^+1 . . ( i1 ^+1 . . ( i1 ^+1 1 . ( i1 + . . ( i1 . . . ( i1 . . . ( i1 . 2 . 05 e ;fin de la partitura ; última actualización: 2005-06-23 20:26