bangsample_lib/0000755000175000017500000000000011200721223013001 5ustar glermglermbangsample_lib/bangsample.pd0000644000175000017500000000235411177245613015464 0ustar glermglerm#N canvas 153 160 799 604 10; #X obj 125 318 soundfiler; #N canvas 0 0 450 300 (subpatch) 0; #X array \$0-s 50048 float 2; #X coords 0 1 50048 -1 70 50 1; #X restore 143 142 graph; #X obj 82 364 outlet~; #X obj 82 303 inlet; #X msg 82 323 bang; #X obj 86 239 openpanel; #X obj 105 143 bng 30 250 50 0 empty empty empty 17 7 0 10 -203904 -16662 -1; #X obj 201 335 t b; #X obj 201 365 pipe 10; #X obj 81 343 tabplay~ \$0-s; #X obj 294 104 loadbang; #X obj 293 156 f \$0; #X floatatom 313 131 5 0 0 0 - - -; #X obj 291 183 makefilename %d-s; #X obj 159 237 symbol; #X msg 127 291 read -resize \$1 \$2; #X obj 108 204 t b b; #X obj 116 270 pack s s; #X obj 190 438 s \$0-s; #X obj 331 319 print; #X msg 204 395 normalize 1; #X obj 203 103 bng 15 250 50 0 empty empty empty 17 7 0 10 -232576 -86277 -1; #X connect 0 0 7 0; #X connect 3 0 4 0; #X connect 4 0 9 0; #X connect 4 0 21 0; #X connect 5 0 17 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 20 0; #X connect 9 0 2 0; #X connect 10 0 11 0; #X connect 11 0 13 0; #X connect 12 0 11 0; #X connect 13 0 14 1; #X connect 14 0 17 1; #X connect 15 0 0 0; #X connect 15 0 19 0; #X connect 16 0 5 0; #X connect 16 1 14 0; #X connect 17 0 15 0; #X connect 20 0 18 0; #X coords 0 -1 1 1 120 100 1 100 100; bangsample_lib/rbangsample-help.pd0000644000175000017500000000113711200717262016561 0ustar glermglerm#N canvas 0 26 1024 661 10; #X declare -lib iem_tab; #X obj 174 17 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 174 208 ezdac~; #X text 192 15 dispara o sampler (bang entrada); #X text 85 129 crop de trecho; #X text 274 154 zera tabela; #X text 274 93 sinaliza o ataque; #X text 230 72 |; #X text 231 63 ------------------------------------- gravando!; #X obj 174 90 rbangsample; #X text 190 65 rec/; #X text 190 75 stop; #X obj 817 21 declare -lib iem_tab; #X text 821 4 depende de iem_tab; #X obj 177 182 fx.pitch.shift~; #X connect 0 0 8 0; #X connect 8 0 13 0; #X connect 13 0 1 0; bangsample_lib/rbangsample.pd0000644000175000017500000000511511200711273015627 0ustar glermglerm#N canvas 184 79 799 604 10; #X obj 82 364 outlet~; #X obj 55 22 inlet; #X msg 82 323 bang; #X obj 81 343 tabplay~ \$0-s; #X obj 242 428 s \$0-s; #X msg 241 403 normalize 1; #X obj 297 119 adc~ 1; #X obj 297 145 hip~ 5; #X msg 259 149 bang; #X obj 297 205 tabwrite~ \$0-r; #X obj 324 427 tab_copy \$0-r \$0-s; #X obj 320 402 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X msg 225 150 stop; #X msg 197 350 const 0; #X obj 282 368 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X msg 344 391 \$1 0 44100; #X msg 366 280 const 0; #X obj 309 297 s \$0-r; #X obj 347 334 inlet; #X msg 201 450 resize 44100; #N canvas 0 0 450 300 (subpatch) 0; #X array \$0-s 44100 float 2; #X coords 0 1 44100 -1 70 50 1; #X restore 118 129 graph; #X obj 178 101 bng 20 250 50 0 empty empty empty 17 7 0 10 -257985 -159808 -1; #X obj 228 123 sel 0 1; #X obj 102 104 vsl 15 70 0 396900 0 0 empty empty empty 0 -9 0 10 -203904 -4160 -1 1900 1; #X obj 320 174 table \$0-r; #X msg 329 256 resize 441000; #X msg 121 0 \; pd dsp 1; #X obj 188 168 bng 12 250 50 0 empty empty empty 17 7 0 10 -66577 -262144 -1; #X obj 329 230 loadbang; #N canvas 0 0 232 178 contador_10segundos 0; #X obj 68 47 metro; #X floatatom 70 88 5 0 0 0 - - -; #X obj 21 40 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 ; #X obj 69 65 counter 10000; #X obj 70 108 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 106 34 sel 1; #X obj 158 82 sel 100; #X obj 158 59 % 150; #X msg 70 128 0; #X obj 108 136 outlet; #X obj 21 16 inlet; #X connect 0 0 3 0; #X connect 2 0 0 0; #X connect 2 0 5 0; #X connect 3 0 1 0; #X connect 3 0 7 0; #X connect 3 3 4 0; #X connect 4 0 8 0; #X connect 5 0 3 2; #X connect 6 0 9 0; #X connect 7 0 6 0; #X connect 8 0 2 0; #X connect 10 0 2 0; #X restore 184 79 pd contador_10segundos; #X msg 94 76 1; #X obj 145 103 bng 25 250 50 0 empty empty empty 17 7 0 10 -86277 -258113 -1; #X obj 119 103 tgl 25 0 empty empty empty 17 7 0 10 -260097 -83269 -1 0 1; #X connect 1 0 2 0; #X connect 1 0 21 0; #X connect 2 0 3 0; #X connect 3 0 0 0; #X connect 5 0 4 0; #X connect 6 0 7 0; #X connect 7 0 9 0; #X connect 8 0 9 0; #X connect 11 0 10 0; #X connect 12 0 9 0; #X connect 13 0 4 0; #X connect 14 0 5 0; #X connect 15 0 10 0; #X connect 15 0 14 0; #X connect 16 0 17 0; #X connect 18 0 15 0; #X connect 19 0 4 0; #X connect 22 0 12 0; #X connect 22 0 30 0; #X connect 22 1 8 0; #X connect 23 0 15 0; #X connect 25 0 17 0; #X connect 27 0 13 0; #X connect 27 0 16 0; #X connect 28 0 25 0; #X connect 29 0 31 0; #X connect 30 0 23 0; #X connect 32 0 29 0; #X connect 32 0 22 0; #X coords 0 -1 1 1 100 80 2 100 100; bangsample_lib/bangsample-help.pd0000644000175000017500000000050511200711545016373 0ustar glermglerm#N canvas 0 0 450 300 10; #X obj 152 79 bangsample; #X obj 154 194 ezdac~; #X obj 152 34 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X text 50 128 carrega o sample; #X text 113 140 wav; #X text 273 81 sinaliza ataque; #X text 172 33 bang de ataque; #X connect 0 0 1 0; #X connect 0 0 1 1; #X connect 2 0 0 0;