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;