blob: b2758330ed91f88fecf5483c5512b9f4a502a18c (
plain)
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
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
|
#N canvas 143 195 358 294 10;
#X obj 1 1 cnv 5 128 136 empty empty empty 5 6 1 9 -249661 -66577 0
;
#X obj 4 4 tgl 15 0 \$0-loop \$0- Loop_Film 25 8 1 8 -262144 -1 -33289
1 1;
#X obj 8 92 hsl 112 15 198 5 1 0 \$0-rate \$0-rates play_rate 38 8
1 8 -262144 -1 -128992 1700 1;
#X obj 8 23 hsl 115 15 0 100 0 0 \$0-in_slider \$0-ins in_point 40
8 1 8 -262144 -1 -128992 0 1;
#X obj 8 38 hsl 115 15 0 100 0 0 \$0-out_slider \$0-outs out_point
37 8 1 8 -262144 -1 -128992 11400 1;
#N canvas 655 265 629 554 interna 0;
#X text 15 9 Film Looper;
#X obj 146 8 cnv 15 270 340 empty empty empty 5 8 1 10 -260390 -1 0
;
#X obj 353 16 inlet;
#X obj 366 325 outlet;
#X obj 8 27 cnv 15 100 320 empty empty empty 5 8 1 10 -3121 -1 0;
#X obj 16 38 inlet;
#X obj 19 326 outlet;
#X obj 178 259 prepend loopPos;
#X obj 151 149 route loop rate type in out numFrames;
#N canvas 558 152 613 634 looper 0;
#X text 74 18 Initialize;
#X msg 26 78 33;
#X obj 87 157 r \$0-loop;
#X obj 87 205 metro 33;
#X obj 152 231 + 1;
#X obj 152 206 r \$0-direction;
#X obj 86 407 outlet;
#X obj 87 382 counter 1 100 3;
#X obj 102 102 s \$0-ins;
#X obj 163 102 s \$0-outs;
#X obj 43 157 inlet;
#X obj 247 179 inlet;
#X obj 257 206 inlet;
#X obj 283 240 inlet;
#X obj 312 312 inlet;
#X obj 158 328 t b f;
#X msg 163 77 100;
#X obj 382 107 inlet;
#X obj 211 355 expr ($f1/100)*$f2;
#X obj 189 283 expr ($f1/100)*$f2;
#X obj 122 38 r \$0-reset;
#X obj 233 101 s \$0-directions;
#X obj 26 102 s \$0-rates;
#X msg 233 77 0;
#X obj 382 134 t b b f f;
#X msg 102 77 0;
#X text 42 455 Replace with cyclone counter in future?;
#X text 45 476 * added to fix expr /0 error;
#X msg 99 355 clear;
#X obj 21 39 bang;
#X obj 20 14 inlet;
#X obj 189 240 r \$0-loop-in;
#X obj 211 312 r \$0-loop-out;
#X obj 137 179 r \$0-rate;
#X connect 1 0 22 0;
#X connect 2 0 3 0;
#X connect 3 0 7 0;
#X connect 4 0 7 1;
#X connect 5 0 4 0;
#X connect 7 0 6 0;
#X connect 10 0 3 0;
#X connect 11 0 3 1;
#X connect 12 0 4 0;
#X connect 13 0 19 0;
#X connect 14 0 18 0;
#X connect 15 0 28 0;
#X connect 15 1 7 2;
#X connect 16 0 9 0;
#X connect 17 0 24 0;
#X connect 18 0 7 3;
#X connect 19 0 15 0;
#X connect 20 0 1 0;
#X connect 20 0 25 0;
#X connect 20 0 16 0;
#X connect 20 0 23 0;
#X connect 23 0 21 0;
#X connect 24 0 25 0;
#X connect 24 1 16 0;
#X connect 24 2 19 1;
#X connect 24 3 18 1;
#X connect 25 0 8 0;
#X connect 28 0 7 0;
#X connect 29 0 1 0;
#X connect 29 0 25 0;
#X connect 29 0 16 0;
#X connect 30 0 29 0;
#X connect 31 0 19 0;
#X connect 32 0 18 0;
#X connect 33 0 3 1;
#X restore 178 216 pd looper ------------;
#X text 16 356 Outputs absolute frame numbers;
#X text 19 378 Find different method to send "numFrames" through control
bus.;
#X obj 178 46 mementoSetup pt.loop \$0;
#X obj 178 72 delay 250;
#X connect 2 0 12 0;
#X connect 2 0 8 0;
#X connect 5 0 6 0;
#X connect 7 0 3 0;
#X connect 8 0 9 1;
#X connect 8 1 9 2;
#X connect 8 2 9 3;
#X connect 8 3 9 4;
#X connect 8 4 9 5;
#X connect 8 5 9 6;
#X connect 8 6 3 0;
#X connect 9 0 7 0;
#X connect 12 0 13 0;
#X connect 12 1 3 0;
#X connect 13 0 9 0;
#X restore 10 219 pd interna;
#X obj 10 197 inlet;
#X obj 75 198 inlet;
#X obj 10 241 outlet;
#X obj 75 242 outlet;
#X obj 193 185 s \$0-direction;
#X obj 5 57 nbx 8 15 0 1e+06 0 0 \$0-loop-in \$0-in_slider In_Point
65 8 1 8 -262144 -1 -1 0 256;
#X obj 5 73 nbx 8 15 0 1e+06 0 0 \$0-loop-out \$0-out_slider Out_Point
65 8 1 8 -262144 -1 -1 100 256;
#X obj 113 6 bng 11 250 50 0 \$0-reset \$0- Reset -25 6 1 8 -262144
-1 -1;
#X obj 168 136 r \$0-directions;
#X obj 143 5 commun /loop \$0;
#X obj 151 51 commun /in-point \$0;
#X obj 147 79 commun /out-point \$0;
#X obj 167 109 commun /rate \$0;
#X obj 151 205 commun /direction \$0;
#X text 14 148 Film Looper;
#X obj 128 163 route bang;
#X obj 2 110 popup 124 25 grey95 Direction Forward Reverse Ping-Pong
;
#X connect 1 0 15 0;
#X connect 2 0 18 0;
#X connect 3 0 16 0;
#X connect 4 0 17 0;
#X connect 5 0 8 0;
#X connect 5 1 9 0;
#X connect 6 0 5 0;
#X connect 7 0 5 1;
#X connect 14 0 22 0;
#X connect 15 0 1 0;
#X connect 16 0 3 0;
#X connect 17 0 4 0;
#X connect 18 0 2 0;
#X connect 19 0 22 0;
#X connect 21 1 19 0;
#X connect 21 1 10 0;
#X connect 22 0 21 0;
#X coords 0 -1 1 1 130 138 1 0 0;
|