aboutsummaryrefslogtreecommitdiff
path: root/externals/gridflow/pd_examples/scratch_video.pd
blob: d7a38e7e51172e7421169245beee09546e605cf4 (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
#N canvas 503 45 580 510 10;
#X obj 109 94 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
;
#X obj 109 352 listelement 1;
#X floatatom 109 371 5 0 0 0 - - -;
#X floatatom 132 279 5 0 0 0 - - -;
#X obj 109 333 route position;
#X obj 109 256 #in;
#X msg 142 202 open /home/alx/Documents/images/videos/bus_1.mov;
#X obj 112 410 hsl 128 15 1 320 0 0 empty empty empty -2 -6 0 8 -260818
-1 -1 0 1;
#X obj -13 0 cnv 15 580 30 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj -16 477 cnv 15 580 30 empty empty empty 20 12 0 14 -200249 -66577
0;
#X text 16 484 GridFlow 0.8.0;
#X text 16 484 GridFlow 0.8.0;
#X text 0 13 Copyright 2003 Alexandre Castonguay;
#X text 2 52 Use the mouse position to scratch the video \, a touchscreen
works well.;
#N canvas 0 0 450 300 decide_framerate 0;
#X obj 6 56 - 160;
#X floatatom 6 80 5 0 0 0 - - -;
#X obj 55 122 hsl 128 15 20 150 0 0 empty empty empty -2 -6 0 8 -24198
-1 -1 0 1;
#X obj 6 99 abs;
#X floatatom 6 142 5 0 0 0 - - -;
#X obj 6 121 / 3;
#X floatatom 6 226 5 0 0 0 - - -;
#X obj 6 184 abs;
#X obj 6 162 - 64;
#X obj 6 205 + 5;
#X obj -25 21 inlet;
#X obj 34 263 outlet;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 3 0 2 0;
#X connect 3 0 5 0;
#X connect 4 0 8 0;
#X connect 5 0 4 0;
#X connect 6 0 11 0;
#X connect 7 0 9 0;
#X connect 8 0 7 0;
#X connect 9 0 6 0;
#X connect 10 0 0 0;
#X restore 257 409 pd decide_framerate;
#X obj 257 433 s framerate;
#X obj 188 92 r framerate;
#X obj 109 314 #out window;
#X text 176 277 <-- frame number;
#X text 213 351 <-- get x values;
#X text 142 219 load your own until we get a bundled video for the
docs;
#X text 142 232 this one is 320 x 240;
#N canvas 94 214 571 216 frame_count 0;
#X msg 16 -5 1;
#X floatatom 16 50 5 0 0 0 - - -;
#X obj 48 30 float \$1;
#X obj 16 -24 shunt 2;
#X obj 16 30 + 1;
#X msg 60 -5 -1;
#X msg 111 49 0;
#X obj 16 -54 inlet;
#X obj 111 30 inlet;
#X obj 16 102 outlet;
#X floatatom 100 -38 5 0 0 0 - - -;
#X obj 100 -22 > 160;
#X text 145 -23 <-- is the direction left or right on a width of 320
pixels;
#X text 145 49 <-- reset;
#X obj 100 -57 r position;
#X obj 100 -3 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X connect 0 0 4 0;
#X connect 1 0 2 0;
#X connect 1 0 9 0;
#X connect 2 0 4 1;
#X connect 3 0 0 0;
#X connect 3 1 5 0;
#X connect 4 0 1 0;
#X connect 5 0 4 0;
#X connect 6 0 1 0;
#X connect 7 0 3 0;
#X connect 8 0 6 0;
#X connect 10 0 11 0;
#X connect 11 0 15 0;
#X connect 14 0 10 0;
#X connect 15 0 3 1;
#X restore 109 168 pd frame_count;
#X obj 202 141 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
-1;
#X text 226 140 <-- reset;
#X obj 93 433 s position;
#X msg 314 265 loop 1;
#X obj 206 301 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 330 146 r loopit;
#X obj 236 299 print loopit;
#X obj 109 111 metro 100.33;
#X obj 91 257 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
-1;
#X text 0 0 scratch_video.pd;
#X connect 0 0 30 0;
#X connect 1 0 2 0;
#X connect 2 0 7 0;
#X connect 2 0 14 0;
#X connect 2 0 25 0;
#X connect 4 0 1 0;
#X connect 5 0 17 0;
#X connect 5 1 3 0;
#X connect 5 1 27 0;
#X connect 6 0 5 0;
#X connect 14 0 15 0;
#X connect 16 0 30 1;
#X connect 17 0 4 0;
#X connect 22 0 5 0;
#X connect 23 0 22 1;
#X connect 26 0 5 0;
#X connect 27 0 29 0;
#X connect 30 0 22 0;
#X connect 31 0 5 0;