blob: af1f33d52d26ba5c9a3423e7adcec35051a7aa94 (
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
|
#N canvas 73 204 530 82 10;
#X obj 1 1 cnv 5 528 80 empty empty Animate_Presets 6 13 1 12 -133153
-1 0;
#N canvas 349 89 765 585 interna 0;
#X obj 9 22 cnv 15 600 450 empty empty empty 5 8 1 10 -260390 -1 0
;
#X obj 413 151 inlet;
#X obj 445 294 r \$0-save;
#X obj 430 223 r \$0-load;
#X text 458 150 care-taker commands;
#X obj 413 425 caretaker RRADICAL;
#X obj 430 243 openpanel;
#X obj 445 314 savepanel;
#X msg 445 334 file \$1 \, save RRADICAL;
#X msg 430 263 file \$1 \, load RRADICAL;
#X obj 17 438 outlet;
#X msg 17 416 numFrames \$1;
#X obj 17 353 f \$1;
#X obj 27 329 loadbang;
#X text 10 7 Preset Animation;
#X obj 165 299 + 1;
#X obj 277 299 - 1;
#X obj 165 237 r \$0-right;
#X obj 277 237 r \$0-left;
#X obj 194 151 inlet;
#X text 194 130 Frame;
#X obj 165 340 clip 0 \$1;
#X obj 277 340 clip 0 \$1;
#X obj 181 258 r \$0-slider-out;
#X obj 293 258 r \$0-slider-out;
#X obj 150 188 s \$0-slider-in;
#X obj 165 360 s \$0-slider-in;
#X obj 277 360 s \$0-slider-in;
#X obj 277 279 f;
#X obj 165 279 f;
#X obj 277 319 int;
#X obj 165 319 int;
#X obj 274 123 r \$0-slider-out;
#X obj 274 143 int;
#X obj 274 185 s pt.currentPreset;
#X obj 17 30 inlet;
#X text 24 526 Simple scrubbing interface for states \, dynamic number
of frames!;
#X text 24 501 \$1 Argument Specifies the # of Frames/Presets;
#X obj 111 437 s \$0-slider-in;
#X msg 111 416 range 0 \$1;
#X obj 17 61 route numKeys loopPos;
#X obj 215 416 s \$0-numKeys;
#X text 187 66 numFrames = NumKeys * 100 \, otherwise we're going at
30keyframes/s! too fast. 3s per keyframe is better;
#X obj 17 394 * 30;
#X obj 150 99 expr int($f1/30);
#N canvas 0 22 454 304 defaults 0;
#X obj 37 26 loadbang;
#X obj 37 49 f \$1;
#X obj 37 71 select 0;
#X obj 55 120 print pt.animate;
#X msg 55 98 No arguments given. Using 10 Key-Frames.;
#X msg 37 156 numKeys 10;
#X obj 37 179 outlet;
#X text 28 254 if (arg1 == "0" || not set) then sey numKeys 10;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 2 0 5 0;
#X connect 4 0 3 0;
#X connect 5 0 6 0;
#X restore 60 30 pd defaults;
#X obj 274 164 change;
#X obj 348 396 bang;
#X text 385 397 Resend numFrames on load/save;
#N canvas 349 89 462 312 OSC-stuff 0;
#X obj 12 13 r pt.osc;
#X obj 12 34 OSCroute /pt;
#X obj 12 55 OSCroute /animate;
#X obj 12 76 OSCroute /frame;
#X text 172 16 How to register this OSC name?;
#X obj 12 97 outlet;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X restore 182 31 pd OSC-stuff;
#X text 274 32 Problem of registering this?;
#X connect 1 0 5 0;
#X connect 2 0 7 0;
#X connect 2 0 47 0;
#X connect 3 0 6 0;
#X connect 3 0 47 0;
#X connect 6 0 9 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 9 0 5 0;
#X connect 11 0 10 0;
#X connect 12 0 39 0;
#X connect 12 0 41 0;
#X connect 12 0 43 0;
#X connect 13 0 12 0;
#X connect 15 0 31 0;
#X connect 16 0 30 0;
#X connect 17 0 29 0;
#X connect 18 0 28 0;
#X connect 19 0 25 0;
#X connect 21 0 26 0;
#X connect 22 0 27 0;
#X connect 23 0 29 1;
#X connect 24 0 28 1;
#X connect 28 0 16 0;
#X connect 29 0 15 0;
#X connect 30 0 22 0;
#X connect 31 0 21 0;
#X connect 32 0 33 0;
#X connect 33 0 46 0;
#X connect 35 0 40 0;
#X connect 39 0 38 0;
#X connect 40 0 12 0;
#X connect 40 0 21 2;
#X connect 40 0 22 2;
#X connect 40 1 44 0;
#X connect 43 0 11 0;
#X connect 44 0 25 0;
#X connect 45 0 40 0;
#X connect 46 0 34 0;
#X connect 47 0 12 0;
#X connect 49 0 25 0;
#X restore 7 148 pd interna;
#X obj 430 6 bng 15 250 50 0 \$0-save \$0 Save 20 8 1 9 -237178 -1
-1;
#X obj 480 6 bng 15 250 50 0 \$0-load \$0 Load 20 8 1 9 -237178 -1
-1;
#X obj 92 124 inlet;
#X obj 7 172 outlet;
#X text 4 104 Preset Animation;
#X obj 10 26 hsl 510 30 0 10 0 0 \$0-slider-out \$0-slider-in empty
-2 -6 0 8 -262144 -1 -1 0 0;
#X obj 7 60 nbx 5 14 -1e+37 1e+37 0 0 \$0- pt.currentPreset Current-Key-Frame
60 9 1 12 -262144 -1 -1 0 256;
#X obj 466 60 nbx 5 14 -1e+37 1e+37 0 0 empty \$0-numKeys Number-of-Key-Frames
-145 9 1 12 -262144 -1 -1 10 256;
#X obj 221 6 bng 15 250 50 0 \$0-left \$0 << 18 8 1 12 -237178 -1 -1
;
#X obj 281 6 bng 15 250 50 0 \$0-right \$0 >> -17 8 1 12 -237178 -1
-1;
#X obj 47 124 inlet;
#X obj 5 124 inlet;
#X connect 1 0 5 0;
#X connect 4 0 1 2;
#X connect 12 0 1 1;
#X connect 13 0 1 0;
#X coords 0 0 1 1 530 82 1;
|
