temp hinzugefügt

bauhauslib · May 30, 2012 · a8d8e29 · a8d8e29
1 parent 2bec4cb
commit a8d8e29
Showing 1 changed file with 69 additions and 42 deletions.
diff --git a/looper~.pd b/looper~.pd
@@ -1,7 +1,7 @@
-#N canvas 608 247 790 675 10;
+#N canvas -829 58 790 675 10;
 #X obj 13 -23 inlet~;
 #X obj 339 -153 inlet;
-#X obj 13 456 outlet~;
+#X obj 13 493 outlet~;
 #X text 17 -131 normalize;
 #X text 18 -114 MIDI sync / clock;
 #X obj 355 471 outlet;
@@ -11,59 +11,59 @@
 #X obj 200 -24 r \$0-play;
 #X obj 200 3 t b b;
 #X obj 65 5 t b b;
-#N canvas 899 36 766 919 tables 1;
+#N canvas -841 55 766 919 tables 0;
 #N canvas 0 22 758 404 (subpatch) 0;
 #X array \$0-phrase0 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 115 -22 graph;
-#X msg 21 0 const 0;
-#X obj 21 -24 r \$0-clear;
+#X restore 115 -20 graph;
+#X msg 21 2 const 0;
+#X obj 21 -22 r \$0-clear;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-phrase1 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 113 140 graph;
+#X restore 113 142 graph;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-phrase2 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 112 301 graph;
+#X restore 112 303 graph;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-phrase3 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 110 464 graph;
+#X restore 110 466 graph;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-phrase4 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 109 627 graph;
-#X obj 21 64 s;
-#X obj 36 31 r \$0-phrase;
+#X restore 109 629 graph;
+#X obj 21 66 s;
+#X obj 36 33 r \$0-phrase;
 #N canvas 0 22 758 404 (subpatch) 0;
 #X array \$0-phrase5 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 332 -24 graph;
+#X restore 332 -22 graph;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-phrase6 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 331 141 graph;
+#X restore 331 143 graph;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-phrase7 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 330 302 graph;
+#X restore 330 304 graph;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-phrase8 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 328 465 graph;
+#X restore 328 467 graph;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-phrase9 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 327 628 graph;
+#X restore 327 630 graph;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-phrase10 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 547 -21 graph;
+#X restore 547 -19 graph;
 #N canvas 0 22 450 278 (subpatch) 0;
 #X array \$0-temp 882000 float 2;
 #X coords 0 1 881999 -1 200 140 1 0 0;
-#X restore 547 141 graph;
+#X restore 547 143 graph;
 #X connect 1 0 7 0;
 #X connect 2 0 1 0;
 #X connect 8 0 7 1;
@@ -81,7 +81,7 @@
 #X text 12 25 LICENSE LGPL;
 #X text 12 165 WEBSITE https://github.com/bauhauslib/blib;
 #X restore 662 489 pd META;
-#N canvas 1090 386 708 586 set-loop-size 0;
+#N canvas -768 160 708 586 set-loop-size 0;
 #X obj 61 225 loadbang;
 #X obj 61 248 samplerate~;
 #X obj 28 146 timer;
@@ -120,7 +120,7 @@ after a memory clear!;
 #X restore 92 38 pd set-loop-size;
 #X obj 541 -57 s \$0-phrase;
 #X obj 541 -79 makefilename \$0-phrase%d;
-#X obj 65 426 tabread4~ \$0-phrase0;
+#X obj 78 426 tabread4~ \$0-phrase0;
 #X obj 65 378 vline~;
 #X msg 123 341 1;
 #X obj 65 341 pack f f;
@@ -132,7 +132,7 @@ after a memory clear!;
 #X obj 165 269 delay 10;
 #X obj 65 247 t b b b;
 #X obj 432 405 r \$0-loop;
-#N canvas 520 49 699 364 record-on-loop-start 1;
+#N canvas 520 49 699 364 record-on-loop-start 0;
 #X obj 36 6 r \$0-loop;
 #X obj 36 320 outlet;
 #X obj 98 6 inlet record;
@@ -204,7 +204,7 @@ the begining of the loop.;
 #X connect 19 0 5 0;
 #X connect 20 0 19 1;
 #X restore 65 70 pd record-on-loop-start;
-#N canvas 1071 410 517 442 play-record 0;
+#N canvas -571 243 517 442 play-record 0;
 #X obj 23 177 s \$0-record;
 #X obj 53 31 == 0;
 #X obj 23 65 sel 0 1;
@@ -234,7 +234,7 @@ the begining of the loop.;
 #X connect 11 0 12 0;
 #X connect 12 0 3 1;
 #X restore 339 -56 pd play-record;
-#N canvas 65 315 822 654 stop-and-clear 0;
+#N canvas 898 153 822 654 stop-and-clear 1;
 #X obj 32 564 outlet;
 #X obj 31 52 sel 1 0;
 #X obj 31 79 timer;
@@ -309,28 +309,52 @@ the undo.;
 #X obj 540 186 \$0;
 #X obj 540 236 s \$0-phrase;
 #X msg 540 211 \$1-phrase0;
-#X msg 110 401 set \$1;
-#X obj 110 378 r \$0-phrase;
-#N canvas 482 141 450 300 copy-to-phrase 1;
-#X obj 45 103 r \$0-phrase;
-#X msg 45 128 set \$1;
-#X obj 126 75 t b b;
-#X obj 126 169 tabwrite~ \$1;
-#X obj 38 219 block~ 4096 1 32;
-#X obj 153 107 tabplay~ \$0-temp;
-#X obj 126 50 r \$0-burn-phrase;
-#X msg 246 132 stop;
+#X msg 123 401 set \$1;
+#X obj 123 378 r \$0-phrase;
+#N canvas -732 202 446 448 copy-to-phrase 1;
+#X obj 23 28 r \$0-phrase;
+#X msg 23 53 set \$1;
+#X obj 130 180 tabplay~ \$0-temp;
+#X obj 101 27 r \$0-burn-phrase;
+#X msg 223 205 stop;
+#X obj 140 106 delwrite~ \$0-buffer 200;
+#X obj 149 252 delread~ \$0-buffer 200;
+#X msg 149 228 20;
+#X obj 101 129 del 20;
+#X obj 140 82 tabplay~ \$0-phrase0;
+#X obj 309 102 block~ 64 1 1;
+#X obj 101 52 t b b b;
+#X obj 198 53 print hier;
+#X obj 130 313 tabwrite~ \$0-phrase0;
+#X obj 102 153 t b b;
+#X msg 295 253 const 0;
+#X obj 295 276 s \$0-temp;
 #X connect 0 0 1 0;
-#X connect 1 0 3 0;
-#X connect 2 0 3 0;
-#X connect 2 1 5 0;
-#X connect 5 0 3 0;
-#X connect 5 1 7 0;
-#X connect 6 0 2 0;
-#X connect 7 0 3 0;
+#X connect 1 0 13 0;
+#X connect 1 0 9 0;
+#X connect 2 0 13 0;
+#X connect 2 1 4 0;
+#X connect 3 0 11 0;
+#X connect 3 0 12 0;
+#X connect 4 0 13 0;
+#X connect 4 0 15 0;
+#X connect 6 0 13 0;
+#X connect 7 0 6 0;
+#X connect 8 0 14 0;
+#X connect 9 0 5 0;
+#X connect 11 0 8 0;
+#X connect 11 1 7 0;
+#X connect 11 2 9 0;
+#X connect 14 0 13 0;
+#X connect 14 1 2 0;
+#X connect 15 0 16 0;
 #X restore 541 -29 pd copy-to-phrase;
 #X obj 65 131 tabwrite~ \$0-temp;
 #X obj 339 -129 route float clear undo stop play record phrase;
+#X obj 552 20 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 552 42 s \$0-burn-phrase;
+#X obj 65 462 tabread4~ \$0-temp;
 #X connect 0 0 2 0;
 #X connect 0 0 48 0;
 #X connect 1 0 49 0;
@@ -346,6 +370,7 @@ the undo.;
 #X connect 16 0 15 0;
 #X connect 17 0 2 0;
 #X connect 18 0 17 0;
+#X connect 18 0 52 0;
 #X connect 19 0 18 0;
 #X connect 20 0 18 0;
 #X connect 21 0 20 0;
@@ -381,4 +406,6 @@ the undo.;
 #X connect 49 4 30 2;
 #X connect 49 5 30 3;
 #X connect 49 6 16 0;
+#X connect 50 0 51 0;
+#X connect 52 0 2 0;
 #X coords 0 675 1 674 250 175 0;