-
Notifications
You must be signed in to change notification settings - Fork 0
/
tapelooper.pd
99 lines (99 loc) · 2.53 KB
/
tapelooper.pd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
#N canvas 369 203 289 236 10;
#N canvas 677 27 315 317 recorder 1;
#X obj 110 21 inlet~;
#X obj 19 22 inlet~;
#X obj 19 281 outlet~;
#X text 68 21 adc;
#X text 155 20 player;
#X text 75 280 to player;
#X obj 133 80 delwrite~ playerDelay 2000;
#X text 196 63 buffer 2 seconds;
#X obj 110 199 +~;
#X floatatom 156 136 5 0 0 0 - - -;
#X obj 159 104 hsl 128 15 0 2000 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 3200 1;
#X text 226 118 delay time;
#X obj 156 198 *~;
#X obj 197 199 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 228 198 loadbang;
#X obj 156 171 delread~ playerDelay;
#X obj 19 258 *~;
#X connect 0 0 6 0;
#X connect 0 0 8 0;
#X connect 1 0 16 0;
#X connect 8 0 16 1;
#X connect 9 0 15 0;
#X connect 10 0 9 0;
#X connect 12 0 8 1;
#X connect 13 0 12 1;
#X connect 14 0 13 0;
#X connect 15 0 12 0;
#X connect 16 0 2 0;
#X restore 67 87 pd recorder;
#X obj 108 161 dac~;
#N canvas 726 462 456 306 player 1;
#X obj 184 -177 inlet~;
#X obj 48 45 outlet~;
#X text 230 -177 from recorder;
#X text 105 46 to recorder;
#X obj 300 42 outlet~;
#X text 350 42 to dac;
#X obj 200 -132 delwrite~ holdDelay 2000;
#X obj 218 -103 hsl 128 15 0 2000 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 3200 1;
#X text 358 -133 buffer 2 secs;
#X text 353 -102 delay time;
#X floatatom 215 -82 5 0 0 0 - - -;
#X obj 184 -31 +~;
#X obj 215 -59 delread~ holdDelay;
#X obj 215 -32 *~;
#X obj 259 -32 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 291 -32 loadbang;
#X connect 0 0 6 0;
#X connect 0 0 11 0;
#X connect 7 0 10 0;
#X connect 10 0 12 0;
#X connect 11 0 1 0;
#X connect 11 0 4 0;
#X connect 12 0 13 0;
#X connect 13 0 11 1;
#X connect 14 0 13 1;
#X connect 15 0 14 0;
#X restore 67 114 pd player;
#X obj 67 188 send~ recorder;
#X obj 152 70 receive~ recorder;
#N canvas 1033 237 117 165 loadfile 1;
#X obj 12 7 inlet;
#X obj 12 131 outlet~;
#X obj 37 110 outlet~;
#X obj 12 31 openpanel;
#X msg 12 56 open \$1;
#X obj 12 81 readsf~ 2;
#X obj 85 98 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 75 57 start;
#X obj 74 8 inlet;
#X connect 0 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 1 0;
#X connect 5 1 2 0;
#X connect 5 2 6 0;
#X connect 7 0 5 0;
#X connect 8 0 7 0;
#X restore 67 41 pd loadfile;
#X obj 67 8 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 130 8 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X connect 2 1 1 1;
#X connect 4 0 0 1;
#X connect 5 0 0 0;
#X connect 5 1 0 0;
#X connect 6 0 5 0;
#X connect 7 0 5 1;