Commit 7704224f authored by J Reso's avatar J Reso
Browse files

update video-rec+video-sampler

parent 0269d47f
#N canvas 408 79 834 638 10;
#N canvas 94 79 834 638 10;
#X declare -path ../../abstractions/in -path ../../abstractions/out
-path ../../abstractions/numbers -path ../../abstractions/video -path
../../abstractions/audio -path ../../abstractions/core -path ../../abstractions/brutbox
......@@ -6,19 +6,18 @@
#X declare -path ../core;
#X declare -path ../core;
#X declare -path ../core;
#X msg 538 109 0 \, destroy;
#X msg 525 86 create \, 1;
#X obj 525 139 gemwin;
#X text 522 61 Gem window;
#X text 608 85 <- on;
#X text 610 107 <- off;
#X text 56 566 Screencast (save screen movie) : http://reso-nance.org/wiki/logiciels/screencast/accueil
#X msg 557 129 0 \, destroy;
#X msg 544 106 create \, 1;
#X obj 544 159 gemwin;
#X text 541 81 Gem window;
#X text 627 105 <- on;
#X text 629 127 <- off;
#X text 56 584 Screencast (save screen movie) : http://reso-nance.org/wiki/logiciels/screencast/accueil
;
#X obj 59 168 video-in;
#X obj 59 408 video-out;
#X obj 79 192 video-in;
#X obj 726 22 ../include;
#X text 61 40 video-rec \; ------------- \; ???????????????;
#N canvas 271 98 1035 627 _ALL_MESSAGES_ 0;
#N canvas 269 99 1035 627 _ALL_MESSAGES_ 0;
#X msg -788 228 auto-stop \$1;
#X obj -788 210 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
0 1;
......@@ -56,6 +55,8 @@ the correct size which is unknown before recording) \; Default : 0
#X msg -873 94 rec;
#X msg -896 67 size 200;
#X msg -872 119 write;
#X obj -946 207 tgl 15 0 empty empty rec 17 7 0 10 -262144 -1 -1 0
1;
#X connect 0 0 8 0;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
......@@ -73,80 +74,72 @@ the correct size which is unknown before recording) \; Default : 0
#X connect 18 0 11 0;
#X connect 20 0 14 0;
#X restore 546 303 pd _ALL_MESSAGES_;
#X obj 228 239 r \$0-to-rec;
#X floatatom 125 314 8 0 0 3 length(frames) - -;
#X obj 192 305 bng 15 250 50 0 empty empty end 0 20 0 10 -262144 -1
#X obj 225 228 r \$0-to-rec;
#X floatatom 145 281 8 0 0 3 length(frames) - -;
#X obj 212 272 bng 15 250 50 0 empty empty end 0 20 0 10 -262144 -1
-1;
#X obj 264 440 video-out;
#X msg 397 296 play;
#N canvas 573 343 557 361 AUDIO_rec_msg 0;
#X obj 207 257 r \$0-to-rec;
#X obj 369 158 s \$0-to-rec;
#X obj 369 298 s \$0-to-rec;
#X msg 369 277 rec \$1;
#X obj 369 189 bng 15 250 50 0 empty empty oneshot 17 7 0 10 -262144
#X msg 212 203 rec \$1;
#X obj 212 183 hradio 15 1 0 5 empty empty empty 0 -8 0 10 -262144
-1 -1 0;
#X obj 79 228 video-rec \$0-LIVE 100;
#X obj 81 485 video-out;
#X obj 81 423 video-sampler \$0-LIVE;
#X msg 214 400 video \$1 \, play;
#X obj 214 379 hradio 15 1 0 5 empty empty empty 0 -8 0 10 -262144
-1 -1 0;
#X text 78 395 // 2 - PLAYBACK;
#X text 78 159 // 1 - RECORD FEW LIVE VIDEOS;
#N canvas 569 345 692 362 _TEST_SAMPLER_MESSAGES_ 0;
#X obj 46 107 s \$0-to-rec;
#X obj 46 247 s \$0-to-rec;
#X msg 46 226 rec \$1;
#X obj 46 138 bng 15 250 50 0 empty empty oneshot 17 7 0 10 -262144
-1 -1;
#X obj 629 152 s \$0-to-rec;
#X obj 627 304 s \$0-to-rec;
#X msg 627 266 rec \$1;
#X obj 627 179 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
#X obj 306 101 s \$0-to-rec;
#X obj 304 253 s \$0-to-rec;
#X msg 304 215 rec \$1;
#X obj 304 128 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X floatatom 369 255 5 0 0 0 - - -;
#X msg 720 287 stop;
#X floatatom 752 200 8 0 0 0 - - -;
#X floatatom 588 240 5 0 0 0 - - -;
#X text 626 107 #2 - RECORD WITH UNKNOWN SIZES;
#X text 364 108 #1 - RECORD 5 SOUNDS OF 2 SECONDS;
#X obj 720 267 delay 2000;
#X obj 627 229 count 4;
#X obj 627 199 rand-del 1000 2000;
#X msg 369 132 auto-stop 1 \, size 1000;
#X msg 629 129 auto-stop 0 \, size 20000;
#X text 761 288 stop the last recording;
#X text 784 127 use a bigger init size;
#X obj 369 209 seq-count 5 1000;
#X connect 3 0 2 0;
#X connect 4 0 22 0;
#X connect 7 0 6 0;
#X connect 8 0 17 0;
#X connect 9 0 3 0;
#X connect 10 0 6 0;
#X connect 15 0 10 0;
#X connect 16 0 7 0;
#X connect 16 0 12 0;
#X connect 16 1 8 0;
#X connect 16 1 15 0;
#X connect 17 0 16 0;
#X connect 17 1 11 0;
#X connect 18 0 1 0;
#X connect 19 0 5 0;
#X connect 22 0 9 0;
#X restore 451 262 pd AUDIO_rec_msg;
#X obj 196 101 tgl 15 0 empty empty rec 17 7 0 10 -262144 -1 -1 0 1
;
#X msg 216 196 size 2000;
#X text 283 194 ms;
#X msg 213 154 rec \$1;
#X obj 213 134 hradio 15 1 0 5 empty empty empty 0 -8 0 10 -262144
-1 -1 1;
#X obj 414 401 route length;
#X floatatom 440 433 5 0 0 0 - - -;
#X obj 59 261 video-rec \$0-LIVE 100;
#X obj 264 323 video-sampler \$0-LIVE;
#X msg 417 322 video 0;
#X floatatom 46 204 5 0 0 0 - - -;
#X msg 397 236 stop;
#X floatatom 429 149 8 0 0 0 - - -;
#X floatatom 265 189 5 0 0 0 - - -;
#X text 303 56 #2 - RECORD WITH UNKNOWN SIZES;
#X text 41 57 #1 - RECORD 5 SOUNDS OF 2 SECONDS;
#X obj 397 216 delay 2000;
#X obj 304 178 count 4;
#X obj 304 148 rand-del 1000 2000;
#X msg 46 81 auto-stop 1 \, size 1000;
#X msg 306 78 auto-stop 0 \, size 20000;
#X text 438 237 stop the last recording;
#X text 461 76 use a bigger init size;
#X obj 46 158 seq-count 5 1000;
#X connect 2 0 1 0;
#X connect 3 0 21 0;
#X connect 6 0 5 0;
#X connect 7 0 16 0;
#X connect 8 0 2 0;
#X connect 9 0 5 0;
#X connect 14 0 9 0;
#X connect 15 0 6 0;
#X connect 15 0 11 0;
#X connect 15 1 7 0;
#X connect 15 1 14 0;
#X connect 16 0 15 0;
#X connect 16 1 10 0;
#X connect 17 0 0 0;
#X connect 18 0 4 0;
#X connect 21 0 8 0;
#X restore 546 330 pd _TEST_SAMPLER_MESSAGES_;
#X connect 0 0 2 0;
#X connect 1 0 2 0;
#X connect 7 0 25 0;
#X connect 12 0 25 1;
#X connect 16 0 26 1;
#X connect 18 0 25 1;
#X connect 19 0 25 1;
#X connect 21 0 25 1;
#X connect 22 0 21 0;
#X connect 23 0 24 0;
#X connect 25 1 13 0;
#X connect 25 2 14 0;
#X connect 26 0 15 0;
#X connect 26 1 23 0;
#X connect 27 0 26 1;
#X connect 7 0 16 0;
#X connect 11 0 16 1;
#X connect 14 0 16 1;
#X connect 15 0 14 0;
#X connect 16 1 12 0;
#X connect 16 2 13 0;
#X connect 18 0 17 0;
#X connect 19 0 18 1;
#X connect 20 0 19 0;
#X coords 0 0 1 1 150 50 0;
#N canvas 331 174 425 304 10;
#N canvas 342 199 425 304 10;
#X declare -path ../core;
#X obj 101 118 cnv 10 138 10 empty empty empty 2 5 1 9 -262110 -1 0
;
#X obj 110 118 tgl 10 0 \$0-rec \$0-rec-in rec 12 5 1 9 -262110 -1
-1 0 1;
#N canvas 320 99 815 534 \$0-COMMANDS 0;
#N canvas 312 103 815 534 \$0-COMMANDS 0;
#X obj 72 238 inlet;
#X obj 203 41 initbang;
#X obj 222 135 f \$2;
......@@ -36,7 +36,10 @@
#X obj 202 294 s \$0-size;
#X obj 360 211 route ms;
#X obj 360 233 s \$0-ms-in;
#X msg 162 237 bank \$1 \, size \$2 \, ms 50;
#X obj 459 404 print;
#X obj 390 50 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 162 237 bank \$1 \, size \$2 \, ms 50 \, id 0;
#X connect 0 0 25 0;
#X connect 1 0 10 0;
#X connect 2 0 3 0;
......@@ -48,7 +51,7 @@
#X connect 6 0 7 0;
#X connect 6 1 4 0;
#X connect 7 0 5 0;
#X connect 8 0 30 0;
#X connect 8 0 32 0;
#X connect 9 0 11 0;
#X connect 10 0 6 0;
#X connect 10 1 2 0;
......@@ -73,7 +76,9 @@
#X connect 26 0 17 0;
#X connect 28 0 29 0;
#X connect 28 1 14 0;
#X connect 30 0 25 0;
#X connect 31 0 10 0;
#X connect 32 0 25 0;
#X connect 32 0 30 0;
#X restore 229 186 pd \$0-COMMANDS;
#X obj 228 165 inlet;
#X obj 137 118 nbx 2 10 0 49 0 0 \$0-id \$0-id-in id 25 6 1 9 -262110
......@@ -87,7 +92,7 @@
#X msg 300 228 set 0;
#X obj 300 259 s \$0-rec-in;
#X obj 47 162 inlet;
#N canvas 288 100 916 648 \$0-PROCESSING 1;
#N canvas 282 103 916 648 \$0-PROCESSING 0;
#X obj 200 292 f;
#X obj 238 291 + 1;
#X msg 248 253 0;
......@@ -106,7 +111,7 @@
#X msg 302 182 clear;
#X obj 302 161 t b b;
#X obj 248 199 oneshot;
#X obj 302 117 r \$0-rec;
#X obj 340 56 r \$0-rec;
#X obj 201 494 s \$1-FRAMES;
#X obj 203 472 pack f f;
#X obj 440 389 r \$0-id;
......@@ -190,7 +195,7 @@
#X obj 699 399 tabread \$0-active;
#X obj 700 442 f;
#X obj 699 421 sel 0;
#X obj 566 280 r \$0-id;
#X obj 599 259 r \$0-id;
#X text 621 331 // Resize first buffers;
#X obj 253 368 s \$0-frame;
#X obj 782 555 print RESIZE;
......@@ -198,9 +203,11 @@
#X obj 594 358 t f f;
#X msg 854 404 0;
#X msg 793 338 0;
#X obj 585 314 print ID;
#X obj 577 449 table \$0-active 50;
#X obj 98 546 print SETBUFFER;
#X obj 338 88 t f f f;
#X obj 584 298 f 0;
#X obj 396 137 sel 1;
#X connect 0 0 1 0;
#X connect 0 0 20 0;
#X connect 0 0 27 1;
......@@ -221,8 +228,7 @@
#X connect 16 0 15 0;
#X connect 16 1 2 0;
#X connect 17 0 2 0;
#X connect 18 0 26 0;
#X connect 18 0 8 0;
#X connect 18 0 65 0;
#X connect 20 0 19 0;
#X connect 21 0 23 1;
#X connect 21 0 20 1;
......@@ -231,7 +237,7 @@
#X connect 27 0 3 0;
#X connect 28 0 46 0;
#X connect 29 0 27 0;
#X connect 29 0 65 0;
#X connect 29 0 64 0;
#X connect 30 0 31 0;
#X connect 33 0 35 2;
#X connect 34 0 44 0;
......@@ -252,23 +258,27 @@
#X connect 52 0 54 0;
#X connect 53 0 35 0;
#X connect 54 0 53 0;
#X connect 55 0 63 0;
#X connect 55 0 60 0;
#X connect 55 0 66 1;
#X connect 59 0 52 0;
#X connect 59 1 53 1;
#X connect 60 0 48 0;
#X connect 60 1 59 0;
#X connect 61 0 35 0;
#X connect 62 0 59 0;
#X connect 65 0 8 0;
#X connect 65 1 26 0;
#X connect 65 2 67 0;
#X connect 66 0 60 0;
#X connect 67 0 66 0;
#X restore 47 187 pd \$0-PROCESSING;
#X obj 194 118 nbx 4 10 -5000 5000 0 0 \$0-ms \$0-ms-in ms -14 5 1
9 -262110 -1 -1 50 256;
#X obj 100 118 bng 10 250 50 0 \$0-write \$0-write-in w 3 5 1 7 -262110
-1 -1;
#X obj 103 128 hsl 135 10 0 1 0 0 \$0-pos \$0-pos-in frame:76/0 5 6
#X obj 103 128 hsl 135 10 0 1 0 0 \$0-pos \$0-pos-in frame:41/0 5 6
1 9 -262110 -1 -1 0 1;
#X obj 47 263 outlet;
#N canvas 267 179 405 564 \$0-BUFFER 1;
#N canvas 265 180 405 564 \$0-BUFFER 0;
#X obj 54 15 _v-buffer \$1-0 1;
#X obj 164 154 _v-buffer \$1-32 1;
#X obj 164 14 _v-buffer \$1-25 1;
......
#N canvas 165 115 540 458 10;
#N canvas 161 117 540 458 10;
#X declare -path ../core;
#X obj 100 116 cnv 15 139 21 empty empty empty 20 12 1 9 -262110 -1
0;
......@@ -17,7 +17,7 @@
#X obj 230 116 bng 10 250 50 0 \$0-reset \$0-reset-in r 4 5 1 9 -262110
-1 -1;
#X text 325 77 COMMANDS \; ---------------------;
#N canvas 144 141 1101 531 \$0-COMMANDS 0;
#N canvas 147 223 1101 508 \$0-COMMANDS 0;
#X obj 70 57 inlet;
#X obj 248 259 s \$0-loop-in;
#X obj 328 238 symbol;
......@@ -263,7 +263,7 @@
#X connect 8 1 2 1;
#X connect 9 0 0 0;
#X restore 329 178 pd \$0-LABEL;
#N canvas 320 84 595 531 \$0-SNAP 0;
#N canvas 316 86 595 531 \$0-SNAP 0;
#X obj 200 292 f;
#X obj 238 291 + 1;
#X msg 248 253 0;
......@@ -272,7 +272,6 @@
#X obj 276 236 r \$0-reset;
#X msg 407 424 resize \$1;
#X obj 65 347 pix_buffer_write \$0-tmp;
#X obj 407 444 pix_buffer \$0-tmp 450;
#X obj 221 137 r \$0-write;
#X obj 238 316 mod;
#X obj 200 22 r \$0-mode;
......@@ -295,37 +294,38 @@
#X msg 302 170 clear;
#X obj 302 146 t b b;
#X obj 248 199 oneshot;
#X obj 407 444 pix_buffer \$0-tmp 2;
#X connect 0 0 1 0;
#X connect 0 0 7 1;
#X connect 0 0 23 0;
#X connect 1 0 10 0;
#X connect 0 0 22 0;
#X connect 1 0 9 0;
#X connect 2 0 0 1;
#X connect 4 0 7 0;
#X connect 5 0 2 0;
#X connect 6 0 8 0;
#X connect 7 0 17 0;
#X connect 9 0 27 0;
#X connect 10 0 0 1;
#X connect 6 0 30 0;
#X connect 7 0 16 0;
#X connect 8 0 26 0;
#X connect 9 0 0 1;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 0 0;
#X connect 14 0 24 0;
#X connect 15 0 6 0;
#X connect 16 0 10 1;
#X connect 17 0 3 0;
#X connect 18 0 19 0;
#X connect 19 0 17 1;
#X connect 24 0 13 1;
#X connect 25 0 26 0;
#X connect 26 0 29 0;
#X connect 27 0 0 0;
#X connect 27 1 30 0;
#X connect 28 0 30 0;
#X connect 29 0 28 0;
#X connect 29 1 2 0;
#X connect 30 0 2 0;
#X connect 12 0 0 0;
#X connect 13 0 23 0;
#X connect 14 0 6 0;
#X connect 15 0 9 1;
#X connect 16 0 3 0;
#X connect 17 0 18 0;
#X connect 18 0 16 1;
#X connect 23 0 12 1;
#X connect 24 0 25 0;
#X connect 25 0 28 0;
#X connect 26 0 0 0;
#X connect 26 1 29 0;
#X connect 27 0 29 0;
#X connect 28 0 27 0;
#X connect 28 1 2 0;
#X connect 29 0 2 0;
#X restore 99 255 pd \$0-SNAP;
#N canvas 303 91 610 620 \$0-PLAY 0;
#N canvas 276 80 537 620 \$0-PLAY 0;
#X obj 49 560 outlet;
#X obj 49 275 gemhead;
#X obj 73 350 openpanel;
......@@ -343,7 +343,7 @@
#X obj 361 72 r \$0-bg-end;
#X obj 194 478 gemhead;
#X obj 194 499 pix_buffer_read \$0-tmp;
#N canvas 460 79 765 656 \$0-METRO 0;
#N canvas 458 80 765 656 \$0-METRO 0;
#X obj 289 36 r \$0-ms;
#X obj 87 107 r \$0-pos;
#X obj 87 183 i;
......@@ -467,7 +467,7 @@
#X obj 53 96 b;
#X obj 117 74 r \$0-mode;
#X obj 49 234 r \$0-mode-play;
#X obj 290 286 r \$0-mode-play;
#X obj 290 296 r \$0-mode-play;
#X obj 194 423 r \$0-mode-play;
#X obj 53 145 s \$0-mode-play;
#X obj 323 330 r \$0-mode;
......@@ -481,10 +481,9 @@
#X obj 194 444 == 2;
#X msg 53 117 1;
#X msg 117 118 2;
#X obj 416 469 inlet;
#X obj 416 482 inlet;
#X obj 200 143 r \$0-video-outside;
#X obj 200 165 sel 1;
#X floatatom 345 427 5 0 0 0 - - -;
#X connect 1 0 9 0;
#X connect 2 0 5 0;
#X connect 3 0 18 0;
......@@ -504,7 +503,6 @@
#X connect 17 0 22 1;
#X connect 22 0 9 1;
#X connect 22 1 16 1;
#X connect 22 1 44 0;
#X connect 23 0 24 0;
#X connect 24 0 39 0;
#X connect 25 0 33 0;
......@@ -525,15 +523,14 @@
#X connect 42 0 43 0;
#X connect 43 0 40 0;
#X restore 114 297 pd \$0-PLAY;
#N canvas 267 163 972 495 \$0-ARGS 0;
#N canvas 330 108 972 495 \$0-ARGS 0;
#X obj 469 341 outlet;
#X obj 343 57 initbang;
#X obj 389 66 initbang;
#X text 434 29 Defaults values;
#X obj 414 100 r \$0-reset;
#X msg 469 243 2000;
#X obj 593 64 s \$0-frames;
#X msg 593 41 100;
#X msg 532 235 video-outside 1 \, video-bank \$1;
#X obj 469 188 route float;
#X obj 469 222 sel 0;
#X obj 469 165 any \$1;
......@@ -543,33 +540,34 @@
#X obj 384 216 f \$2;
#X obj 414 133 t b b b;
#X msg 469 288 size \$1;
#X msg 616 125 mode 0;
#X msg 50 282 ms 50 \, loop 1 \, start 0 \, end 1 \, pos 0 \, on 0
\, auto-pause 0;
#X connect 1 0 15 0;
#X connect 3 0 15 0;
#X connect 4 0 16 0;
#X msg 820 238 on 0 \, mode 0;
#X msg 22 283 ms 50 \, loop 1 \, start 0 \, end 1 \, pos 0 \, auto-pause
0;
#X msg 532 235 video-outside 1 \, video-bank \$1 \, video 0;
#X connect 1 0 14 0;
#X connect 3 0 14 0;
#X connect 4 0 15 0;
#X connect 6 0 5 0;
#X connect 7 0 0 0;
#X connect 8 0 9 0;
#X connect 8 1 11 0;
#X connect 9 0 4 0;
#X connect 9 1 16 0;
#X connect 10 0 8 0;
#X connect 11 0 7 0;
#X connect 12 0 0 0;
#X connect 13 1 12 0;
#X connect 7 0 8 0;
#X connect 7 1 10 0;
#X connect 8 0 4 0;
#X connect 8 1 15 0;
#X connect 9 0 7 0;
#X connect 10 0 18 0;
#X connect 11 0 0 0;
#X connect 12 1 11 0;
#X connect 13 0 12 0;
#X connect 14 0 13 0;
#X connect 15 0 14 0;
#X connect 15 0 18 0;
#X connect 15 1 10 0;
#X connect 15 2 6 0;
#X connect 15 2 17 0;
#X connect 14 0 17 0;
#X connect 14 1 9 0;
#X connect 14 2 6 0;
#X connect 14 2 16 0;
#X connect 15 0 0 0;
#X connect 16 0 0 0;
#X connect 17 0 0 0;
#X connect 18 0 0 0;
#X restore 392 111 pd \$0-ARGS;
#N canvas 312 427 725 300 \$0-BANK 0;
#N canvas 306 430 725 300 \$0-BANK 0;
#X obj 154 235 outlet;
#X obj 154 192 pack f s;
#X obj 81 193 f \$0;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment