-
Notifications
You must be signed in to change notification settings - Fork 6
/
Copy path05a-av-combination.pd
113 lines (113 loc) · 3.03 KB
/
05a-av-combination.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
100
101
102
103
104
105
106
107
108
109
110
111
112
113
#N canvas 175 106 542 796 10;
#X declare -lib Gem;
#X obj 4 6 cnv 15 480 60 empty empty A/V_Combination 20 30 0 20 -262130
-99865 0;
#X obj 26 676 dac~;
#X obj 26 622 vline~;
#X obj 28 276 soundfiler;
#X obj 28 165 openpanel;
#X obj 28 146 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X floatatom 55 339 20 0 0 0 - - -, f 20;
#X floatatom 28 404 20 0 0 0 - - -, f 20;
#X obj 28 359 / 48;
#X obj 27 298 t f f;
#N canvas 0 396 450 300 sample 0;
#N canvas 0 50 450 300 (subpatch) 0;
#X array \$0-soundfile 214603 float 2;
#X coords 0 1 214603 -1 200 140 1;
#X restore 17 27 graph;
#X restore 27 112 pd sample;
#X obj 293 155 gemwin;
#X msg 293 111 create \, 1;
#X msg 305 133 0 \, destroy;
#X obj 295 597 pix_film;
#X obj 295 667 pix_texture;
#X obj 295 370 gemhead;
#X obj 323 430 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 323 448 openpanel;
#X msg 323 467 open \$1;
#X obj 317 621 unpack f f f;
#X obj 26 573 *;
#X msg 26 595 \$1 50;
#X obj 29 446 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 340 513 *;
#X text 27 85 Audio;
#X text 291 87 Video;
#X text 29 426 Scratcher;
#X text 94 114 Storage for the sample;
#X text 382 128 Gem window;
#X text 48 144 loading the audio into the buffer;
#X text 340 430 opening the video file;
#X obj 26 648 tabread4~ \$0-soundfile;
#X obj 28 188 t a b;
#X obj 55 208 symbol \$0-soundfile;
#X obj 28 231 pack s s;
#X msg 28 254 read -resize \$1 \$2;
#X obj 37 383 s \$0-miliseconds;
#X obj 355 491 r \$0-frames;
#X obj 317 643 s \$0-frames;
#X obj 41 551 r \$0-samples;
#X obj 270 110 cnv 15 20 20 empty empty 1 6 10 0 14 -261234 -66577
0;
#X obj 300 426 cnv 15 20 20 empty empty 3 6 10 0 14 -261234 -66577
0;
#X obj 5 142 cnv 15 20 20 empty empty 2 6 10 0 14 -261234 -66577 0
;
#X obj 3 443 cnv 15 20 20 empty empty 4 6 10 0 14 -261234 -66577 0
;
#N canvas 0 83 145 114 init 0;
#X obj 20 14 declare -lib Gem;
#X obj 20 37 loadbang;
#X msg 20 60 \; pd dsp 1;
#X connect 1 0 2 0;
#X restore 438 71 pd init;
#X floatatom 77 595 10 0 0 0 - - -, f 10;
#X obj 340 575 change;
#X obj 295 689 square 4;
#X obj 69 318 send \$0-samples;
#X floatatom 416 644 5 0 0 0 - - -, f 5;
#X obj 340 553 int;
#X obj 340 533 + 0.5;
#X text 22 716 Max Neupert - Bauhaus-Universität Weimar 2009-2012
;
#X connect 2 0 32 0;
#X connect 3 0 9 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 8 0 7 0;
#X connect 8 0 37 0;
#X connect 9 0 8 0;
#X connect 9 1 6 0;
#X connect 9 1 49 0;
#X connect 12 0 11 0;
#X connect 13 0 11 0;
#X connect 14 0 15 0;
#X connect 14 1 20 0;
#X connect 15 0 48 0;
#X connect 16 0 14 0;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 19 0 14 0;
#X connect 20 0 39 0;
#X connect 20 0 50 0;
#X connect 21 0 22 0;
#X connect 21 0 46 0;
#X connect 22 0 2 0;
#X connect 23 0 21 0;
#X connect 23 0 24 0;
#X connect 24 0 52 0;
#X connect 32 0 1 0;
#X connect 32 0 1 1;
#X connect 33 0 35 0;
#X connect 33 1 34 0;
#X connect 34 0 35 1;
#X connect 35 0 36 0;
#X connect 36 0 3 0;
#X connect 38 0 24 1;
#X connect 40 0 21 1;
#X connect 47 0 14 1;
#X connect 51 0 47 0;
#X connect 52 0 51 0;