""

svn path=/trunk/; revision=278

1 files changed, 55 insertions, 74 deletions

diff --git a/externals/grill/vasp/pd-ex/granular2.pd b/externals/grill/vasp/pd-ex/granular2.pd
index 5dea43a7..a065c25c 100644
--- a/externals/grill/vasp/pd-ex/granular2.pd
+++ b/externals/grill/vasp/pd-ex/granular2.pd
@@ -1,9 +1,9 @@
-#N canvas 64 38 704 556 10;

+#N canvas 30 24 706 558 10;

 #N canvas 0 0 450 300 graph34 0;

 #X array insert 128 float 0;

 #X coords 0 1 127 -1 200 140 1;

 #X restore 96 73 graph;

-#N canvas 339 256 521 450 player 0;

+#N canvas 339 256 523 452 player 0;

 #X obj 228 372 tabplay~ schnipparray;

 #X obj 228 396 throw~ toex;

 #X obj 208 45 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

@@ -65,42 +65,17 @@
 #X restore 204 294 pd player;

 #X obj 204 339 catch~ toex;

 #X obj 204 403 dac~;

-#X floatatom 98 423 0 0 0 0 - - -;

-#X obj 98 383 nbx 5 14 -1e+037 1e+037 0 1 empty empty empty 0 -6 0

-10 -24198 -1 -1 0.13 256;

-#X text 98 365 density;

-#X obj 98 445 s \$0-density;

+#X floatatom 51 318 0 0 0 0 - - -;

+#X obj 51 278 nbx 5 14 -1e+037 1e+037 0 1 empty empty empty 0 -6 0

+10 -24198 -1 -1 18.13 256;

+#X text 51 260 density;

+#X obj 51 340 s \$0-density;

 #X obj 204 275 tgl 15 0 empty empty start/stop 0 -6 0 8 -24198 -1 -1

 0 1;

 #X floatatom 241 430 0 0 0 0 - - -;

 #X obj 241 407 env~ 32768;

-#N canvas 202 187 287 226 inside 0;

+#N canvas 202 187 293 232 inside 0;

 #X obj 88 151 table positions;

-#N canvas 259 48 514 364 create_schippler 0;

-#X msg 155 114 vasp insert;

-#X obj 155 182 vasp.u;

-#X obj 155 138 vasp.osc 6.4;

-#X msg 66 114 vasp insert;

-#X obj 66 162 vasp.u;

-#X msg 293 113 vasp insert;

-#X obj 293 161 vasp.u;

-#X obj 293 137 vasp.osc 2;

-#X text 56 71 create various samples to insert;

-#X msg 63 216 vasp insert;

-#X obj 63 261 vasp.u;

-#X obj 63 239 vasp.window;

-#X obj 66 138 vasp.osc 128;

-#X obj 155 160 vasp.*!window lin;

-#X connect 0 0 2 0;

-#X connect 2 0 13 0;

-#X connect 3 0 12 0;

-#X connect 5 0 7 0;

-#X connect 7 0 6 0;

-#X connect 9 0 11 0;

-#X connect 11 0 10 0;

-#X connect 12 0 4 0;

-#X connect 13 0 1 0;

-#X restore 40 47 pd create_schippler;

 #N canvas 136 160 532 356 inserter 0;

 #X obj 48 55 r \$0-part;

 #X text 50 33 after a sample-part is played \, next step is calculated

@@ -281,12 +256,47 @@
 #X connect 4 0 1 0;

 #X connect 5 0 2 0;

 #X restore 41 95 pd init;

-#X restore 436 220 pd inside;

+#N canvas 409 43 522 372 create_schnippl 0;

+#X msg 155 114 vasp insert;

+#X obj 155 182 vasp.u;

+#X obj 155 138 vasp.osc 6.4;

+#X msg 66 114 vasp insert;

+#X obj 66 162 vasp.u;

+#X msg 293 113 vasp insert;

+#X obj 293 161 vasp.u;

+#X obj 293 137 vasp.osc 2;

+#X msg 63 216 vasp insert;

+#X obj 63 261 vasp.u;

+#X obj 63 239 vasp.window;

+#X obj 66 138 vasp.osc 128;

+#X obj 155 160 vasp.*!window lin;

+#X msg 273 230 vasp insert;

+#X obj 273 292 vasp.u;

+#X obj 273 251 vasp.osc 2;

+#X obj 273 271 vasp.*xwindow hamming;

+#X obj 355 230 nbx 5 14 -1e+037 1e+037 0 0 empty empty empty 0 -6 0

+10 -24198 -1 -1 28 256;

+#X text 56 71 create various slices to insert;

+#X connect 0 0 2 0;

+#X connect 2 0 12 0;

+#X connect 3 0 11 0;

+#X connect 5 0 7 0;

+#X connect 7 0 6 0;

+#X connect 8 0 10 0;

+#X connect 10 0 9 0;

+#X connect 11 0 4 0;

+#X connect 12 0 1 0;

+#X connect 13 0 15 0;

+#X connect 15 0 16 0;

+#X connect 16 0 14 0;

+#X connect 17 0 15 1;

+#X restore 40 47 pd create_schnippl;

+#X restore 53 489 pd inside;

 #X obj 322 271 vsl 15 100 0 1 0 1 empty empty volume 0 -8 0 8 -24198

--1 -1 5400 1;

+-1 -1 3400 1;

 #X obj 204 374 *~ 0.2;

 #X text 332 464 needs the zexy library and vasp;

-#X obj 98 402 * 0.0001;

+#X obj 51 297 * 0.0001;

 #N canvas 0 0 478 359 glaetten 0;

 #X floatatom 225 70 5 0 0 0 - - -;

 #X floatatom 242 130 5 0 0 0 - - -;

@@ -318,39 +328,6 @@
 #X connect 8 0 15 0;

 #X connect 16 0 0 0;

 #X restore 482 362 pd glaetten;

-#N canvas 0 0 471 365 sequence 0;

-#X obj 82 115 metro 500;

-#X obj 82 93 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

-;

-#X obj 86 184 sel 1 2 3 4;

-#X obj 52 290 line;

-#X obj 116 145 + 1;

-#X obj 82 144 0;

-#X msg 188 215 0;

-#X floatatom 130 81 5 0 0 0 - - -;

-#X msg 204 245 60 100;

-#X msg 36 248 120 10;

-#X msg 89 246 30 100;

-#X msg 141 246 100 10;

-#X obj 53 323 outlet;

-#X connect 0 0 5 0;

-#X connect 1 0 0 0;

-#X connect 2 0 9 0;

-#X connect 2 1 10 0;

-#X connect 2 2 11 0;

-#X connect 2 3 6 0;

-#X connect 2 3 8 0;

-#X connect 3 0 12 0;

-#X connect 4 0 5 1;

-#X connect 5 0 4 0;

-#X connect 5 0 2 0;

-#X connect 6 0 5 1;

-#X connect 7 0 0 1;

-#X connect 8 0 3 0;

-#X connect 9 0 3 0;

-#X connect 10 0 3 0;

-#X connect 11 0 3 0;

-#X restore 77 342 pd sequence;

 #X obj 482 320 soundfiler;

 #X obj 482 278 openpanel;

 #X msg 482 299 read -resize \$1 insert;

@@ -362,6 +339,10 @@
 #X text 506 251 load sample to insert;

 #X text 332 478 be careful with high density \, with large files costs

 a lot of cpu and glitches can appear;

+#X msg 481 211 \; pd-create_schnippl vis 1;

+#X obj 481 189 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1

+-1;

+#X text 509 188 create samples to insert;

 #X connect 2 0 13 0;

 #X connect 4 0 7 0;

 #X connect 5 0 15 0;

@@ -372,9 +353,9 @@ a lot of cpu and glitches can appear;
 #X connect 13 0 3 1;

 #X connect 13 0 10 0;

 #X connect 15 0 4 0;

-#X connect 17 0 5 0;

-#X connect 18 0 22 0;

-#X connect 19 0 20 0;

+#X connect 17 0 21 0;

+#X connect 18 0 19 0;

+#X connect 19 0 17 0;

 #X connect 20 0 18 0;

-#X connect 21 0 19 0;

-#X connect 22 0 16 0;

+#X connect 21 0 16 0;

+#X connect 26 0 25 0;