This commit was generated by cvs2svn to compensate for changes in r4059,

which included commits to RCS files with non-trunk default branches.

svn path=/trunk/externals/pdp/; revision=4060

4 files changed, 419 insertions, 2 deletions

diff --git a/abstractions/pdp_conv_emboss.pd b/abstractions/pdp_conv_emboss.pd
index 427ee45..5346bde 100644
--- a/abstractions/pdp_conv_emboss.pd
+++ b/abstractions/pdp_conv_emboss.pd
@@ -1,4 +1,4 @@
-#N canvas 222 642 591 233 10;
+#N canvas 172 505 641 290 10;
 #X obj 30 55 inlet;
 #X obj 29 206 outlet;
 #X obj 29 93 pdp_conv;
@@ -15,6 +15,7 @@ an emboss effect using the convolution mask (-1 0 0 \; 0 0 0 \; 0 0
 1) the right inlet sets the chroma offset.;
 #X msg 218 60 vmask 0 0 1;
 #X msg 108 60 vmask -1 0 0;
+#X msg 108 128 chanmask 1;
 #X connect 0 0 2 0;
 #X connect 0 0 5 0;
 #X connect 2 0 3 0;
@@ -31,4 +32,6 @@ an emboss effect using the convolution mask (-1 0 0 \; 0 0 0 \; 0 0
 #X connect 10 0 6 2;
 #X connect 12 0 5 0;
 #X connect 13 0 2 0;
-#X connect 13 0 7 0;
+#X connect 13 0 14 0;
+#X connect 14 0 6 0;
+#X connect 14 0 7 0;
diff --git a/abstractions/pdp_qt_control.pd b/abstractions/pdp_qt_control.pd
new file mode 100644
index 0000000..7bb2de8
--- /dev/null
+++ b/abstractions/pdp_qt_control.pd
@@ -0,0 +1,147 @@
+#N canvas 287 151 577 553 10;
+#X obj 390 48 inlet;
+#X text 315 10 nb of frames;
+#X text 313 23 connect pdp_qt's 3rd outlet here;
+#X obj 390 99 s \$0-frames;
+#X obj 8 9 inlet;
+#X msg 150 186 pp;
+#X msg 53 85 set l;
+#X msg 104 87 set pp;
+#X msg 160 87 set r;
+#N canvas 821 623 335 233 randplay 0;
+#X obj 82 122 random;
+#X obj 111 96 r \$0-frames;
+#X msg 73 81 bang;
+#X obj 69 39 inlet;
+#X obj 82 153 outlet;
+#X text 154 24 random frame playback;
+#X connect 0 0 4 0;
+#X connect 1 0 0 1;
+#X connect 2 0 0 0;
+#X connect 3 0 2 0;
+#X restore 377 288 pd randplay;
+#N canvas 418 263 365 227 loopplay 0;
+#X obj 63 79 f 0;
+#X obj 63 101 + 1;
+#X obj 63 147 mod;
+#X obj 70 121 r \$0-frames;
+#X msg 62 59 bang;
+#X obj 62 30 inlet;
+#X obj 63 182 outlet;
+#X text 166 33 normal looped playback;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 0 1;
+#X connect 2 0 6 0;
+#X connect 3 0 2 1;
+#X connect 4 0 0 0;
+#X connect 5 0 4 0;
+#X restore 59 284 pd loopplay;
+#X obj 4 35 route bang;
+#N canvas 253 244 365 227 rloopplay 0;
+#X obj 63 79 f 0;
+#X obj 63 147 mod;
+#X obj 96 129 r \$0-frames;
+#X msg 62 59 bang;
+#X obj 62 30 inlet;
+#X obj 63 182 outlet;
+#X obj 63 101 + 1;
+#X obj 133 79 r \$0-frames;
+#X obj 132 102 - 1;
+#X text 166 33 reverse looped playback;
+#X connect 0 0 6 0;
+#X connect 1 0 0 1;
+#X connect 1 0 5 0;
+#X connect 2 0 1 1;
+#X connect 3 0 0 0;
+#X connect 4 0 3 0;
+#X connect 6 0 1 0;
+#X connect 7 0 8 0;
+#X connect 8 0 6 1;
+#X restore 152 284 pd rloopplay;
+#X msg 215 87 set rl;
+#N canvas 0 0 450 300 addjitter 0;
+#X obj 150 65 inlet;
+#X obj 177 244 outlet;
+#X obj 259 66 inlet;
+#X obj 259 90 abs;
+#X obj 225 173 r \$0-frames;
+#X obj 186 201 mod;
+#X obj 259 113 + 1;
+#X obj 211 139 random 1;
+#X text 32 26 add jitter. sort of. something like the nervous effect.
+;
+#X obj 160 115 t f b;
+#X obj 185 169 +;
+#X connect 0 0 9 0;
+#X connect 2 0 3 0;
+#X connect 3 0 6 0;
+#X connect 4 0 5 1;
+#X connect 5 0 1 0;
+#X connect 6 0 7 1;
+#X connect 7 0 10 1;
+#X connect 9 0 10 0;
+#X connect 9 1 7 0;
+#X connect 10 0 5 0;
+#X restore 148 395 pd addjitter;
+#X obj 150 426 outlet;
+#X obj 53 60 route loop pingpong random rloop nervous;
+#X obj 95 419 print;
+#N canvas 751 514 434 327 pingpongplay 1;
+#X obj 117 73 r \$0-frames;
+#X msg 62 59 bang;
+#X obj 62 30 inlet;
+#X obj 56 243 outlet;
+#X text 120 13 pingpong (palindrome) looped playback;
+#X obj 118 121 * 2;
+#X obj 55 191 -;
+#X obj 55 213 abs;
+#X obj 63 79 f 0;
+#X floatatom 113 203 5 0 0 0 - - -;
+#X obj 58 108 + 1;
+#X obj 62 141 mod;
+#X obj 117 98 - 1;
+#X connect 0 0 12 0;
+#X connect 1 0 8 0;
+#X connect 2 0 1 0;
+#X connect 5 0 11 1;
+#X connect 6 0 7 0;
+#X connect 7 0 3 0;
+#X connect 7 0 9 0;
+#X connect 8 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 6 0;
+#X connect 11 0 8 1;
+#X connect 12 0 5 0;
+#X connect 12 0 6 1;
+#X restore 249 284 pd pingpongplay;
+#X obj 150 217 route l rl pp r;
+#X text 60 12 left input: metro and control;
+#X text 49 465 loop modes: loop (normal) \, rloop (reverse loop) \,
+pingpong (palindrome) \, random. send a nervous <amount> message to
+add some random jitter.;
+#X obj 390 75 abs;
+#X connect 0 0 22 0;
+#X connect 4 0 11 0;
+#X connect 5 0 19 0;
+#X connect 6 0 5 0;
+#X connect 7 0 5 0;
+#X connect 8 0 5 0;
+#X connect 9 0 14 0;
+#X connect 10 0 14 0;
+#X connect 11 0 5 0;
+#X connect 11 1 16 0;
+#X connect 12 0 14 0;
+#X connect 13 0 5 0;
+#X connect 14 0 15 0;
+#X connect 16 0 6 0;
+#X connect 16 1 7 0;
+#X connect 16 2 8 0;
+#X connect 16 3 13 0;
+#X connect 16 4 14 1;
+#X connect 18 0 14 0;
+#X connect 19 0 10 0;
+#X connect 19 1 12 0;
+#X connect 19 2 18 0;
+#X connect 19 3 9 0;
+#X connect 22 0 3 0;
diff --git a/abstractions/pdp_qtloop2~.pd b/abstractions/pdp_qtloop2~.pd
new file mode 100644
index 0000000..237f60c
--- /dev/null
+++ b/abstractions/pdp_qtloop2~.pd
@@ -0,0 +1,190 @@
+#N canvas 526 20 677 778 10;
+#X obj 82 83 inlet;
+#X obj 255 82 inlet;
+#X obj 103 506 pdp_loop;
+#X obj 154 702 outlet;
+#X obj 18 473 r \$0-loopin;
+#X obj 24 145 s \$0-filename;
+#X text 60 59 bang or hot frame;
+#X text 142 727 packet outlet;
+#X msg 132 137 bang;
+#X obj 82 111 route open bang;
+#X obj 103 554 pdp_convert image/YCrCb/*;
+#X obj 294 214 s \$0-playaudioframe;
+#X obj 294 237 outlet;
+#X obj 132 375 mod;
+#X obj 178 345 r \$0-nbframes;
+#X obj 418 363 outlet;
+#X obj 495 137 outlet~;
+#X obj 581 133 outlet~;
+#N canvas 98 558 711 881 more_logic 0;
+#X obj 215 518 pdp_qt;
+#X obj 246 772 symbol \$0-L;
+#X obj 340 773 symbol \$0-R;
+#X msg 246 797 dump \$1 0;
+#X msg 340 797 dump \$1 1;
+#X msg 140 473 open \$1;
+#X obj 21 367 symbol;
+#X obj 216 729 t f b;
+#X obj 232 490 r \$0-qtin;
+#X obj 340 833 s \$0-qtin;
+#X obj 245 318 s \$0-loopin;
+#X obj 21 338 r \$0-filename;
+#X obj 215 692 s \$0-loopin;
+#X text 337 227 new movie loaded \, nb of frames received here;
+#X text 268 730 dump audio;
+#X text 374 288 set loop size;
+#X obj 215 463 until;
+#X text 262 465 dump frames;
+#X obj 215 258 t f f;
+#X msg 245 289 size \$1 \, record;
+#X text 374 303 start recording;
+#X obj 199 435 f 0;
+#X obj 252 551 s \$0-nbframes;
+#X obj 215 227 r \$0-nbframes;
+#X msg 21 494 DONE;
+#X obj 21 671 print pdp_qtloop~;
+#X obj 215 661 pdp_convert bitmap/yv12/*;
+#X obj 215 348 t f f;
+#X obj 233 601 pack 0 0;
+#X obj 21 393 t b b b s;
+#X msg 233 627 decoding frame \$1 of \$2;
+#X obj 233 576 + 1;
+#X text 407 661 images are stored in 12bpp;
+#X obj 217 173 outlet~;
+#X obj 340 172 outlet~;
+#X obj 217 106 * 1920;
+#X obj 217 41 r \$0-playaudioframe;
+#X text 215 18 restart audio playback from frame #;
+#X text 277 106 samplerate / framerate;
+#X obj 32 32 table \$0-L;
+#X obj 32 56 table \$0-R;
+#N canvas 367 318 450 300 fracframemodulo 0;
+#X obj 93 43 inlet;
+#X obj 93 274 outlet;
+#X obj 93 97 /;
+#X obj 109 67 r \$0-nbframes;
+#X obj 123 147 int;
+#X obj 93 122 t f f;
+#X obj 93 179 -;
+#X obj 109 220 r \$0-nbframes;
+#X obj 93 248 *;
+#X connect 0 0 2 0;
+#X connect 2 0 5 0;
+#X connect 3 0 2 1;
+#X connect 4 0 6 1;
+#X connect 5 0 6 0;
+#X connect 5 1 4 0;
+#X connect 6 0 8 0;
+#X connect 7 0 8 1;
+#X connect 8 0 1 0;
+#X restore 217 68 pd fracframemodulo;
+#X obj 216 144 tabreadmix~ \$0-L;
+#X obj 340 143 tabreadmix~ \$0-R;
+#X obj 518 73 inlet;
+#X connect 0 0 26 0;
+#X connect 0 1 31 0;
+#X connect 0 2 22 0;
+#X connect 1 0 3 0;
+#X connect 2 0 4 0;
+#X connect 3 0 9 0;
+#X connect 4 0 9 0;
+#X connect 5 0 0 0;
+#X connect 6 0 29 0;
+#X connect 7 1 1 0;
+#X connect 7 1 2 0;
+#X connect 8 0 0 0;
+#X connect 11 0 6 0;
+#X connect 16 0 0 0;
+#X connect 18 0 27 0;
+#X connect 18 1 19 0;
+#X connect 19 0 10 0;
+#X connect 21 0 16 0;
+#X connect 23 0 18 0;
+#X connect 24 0 25 0;
+#X connect 26 0 12 0;
+#X connect 27 0 21 1;
+#X connect 27 0 28 1;
+#X connect 28 0 30 0;
+#X connect 29 0 24 0;
+#X connect 29 1 7 0;
+#X connect 29 2 21 0;
+#X connect 29 3 5 0;
+#X connect 30 0 25 0;
+#X connect 31 0 28 0;
+#X connect 35 0 42 0;
+#X connect 35 0 43 0;
+#X connect 36 0 41 0;
+#X connect 41 0 35 0;
+#X connect 42 0 33 0;
+#X connect 43 0 34 0;
+#X connect 44 0 43 1;
+#X connect 44 0 42 1;
+#X restore 495 104 pd more_logic;
+#X obj 132 170 f;
+#X obj 132 287 t f f;
+#X text 240 61 cold frame;
+#X obj 162 375 mod;
+#X obj 162 319 + 1;
+#X obj 118 613 pdp_route;
+#X obj 154 661 pdp_mix;
+#X text 273 257 frame nb outlet;
+#X msg 176 461 0;
+#X msg 208 461 1;
+#X obj 176 488 f;
+#X text 215 408 get current and next frame from pdp_loop;
+#X obj 132 219 int;
+#X obj 206 267 -;
+#X obj 132 196 t f f f;
+#X obj 132 249 t f f;
+#X text 277 317 crossfade fraction;
+#X obj 206 317 s \$0-frac;
+#X obj 198 631 r \$0-frac;
+#X obj 206 292 * -1;
+#X obj 103 408 t f b;
+#X obj 162 408 t f b;
+#X text 397 385 nb frames outlet;
+#X text 249 19 like pdp_qtloop~ but uses tabreadmix~ from creb;
+#X obj 497 77 inlet;
+#X text 479 57 grain size;
+#X connect 0 0 9 0;
+#X connect 1 0 19 1;
+#X connect 2 0 10 0;
+#X connect 4 0 2 0;
+#X connect 8 0 19 0;
+#X connect 9 0 5 0;
+#X connect 9 1 8 0;
+#X connect 9 2 19 0;
+#X connect 10 0 24 0;
+#X connect 13 0 39 0;
+#X connect 14 0 13 1;
+#X connect 14 0 22 1;
+#X connect 14 0 15 0;
+#X connect 18 0 16 0;
+#X connect 18 1 17 0;
+#X connect 19 0 33 0;
+#X connect 20 0 13 0;
+#X connect 20 1 23 0;
+#X connect 22 0 40 0;
+#X connect 23 0 22 0;
+#X connect 24 0 25 0;
+#X connect 24 1 25 1;
+#X connect 25 0 3 0;
+#X connect 27 0 29 0;
+#X connect 28 0 29 0;
+#X connect 29 0 24 1;
+#X connect 31 0 34 0;
+#X connect 32 0 38 0;
+#X connect 33 0 31 0;
+#X connect 33 1 32 1;
+#X connect 33 2 12 0;
+#X connect 33 2 11 0;
+#X connect 34 0 20 0;
+#X connect 34 1 32 0;
+#X connect 37 0 25 2;
+#X connect 38 0 36 0;
+#X connect 39 0 2 0;
+#X connect 39 1 27 0;
+#X connect 40 0 2 0;
+#X connect 40 1 28 0;
+#X connect 43 0 18 0;
diff --git a/abstractions/pdp_xv_keycursor.pd b/abstractions/pdp_xv_keycursor.pd
new file mode 100644
index 0000000..a10a708
--- /dev/null
+++ b/abstractions/pdp_xv_keycursor.pd
@@ -0,0 +1,77 @@
+#N canvas 135 108 708 682 10;
+#X obj 19 103 print;
+#X obj 19 67 pdp_xv;
+#X obj 111 168 route keypress;
+#X obj 367 215 table \$0-x;
+#X obj 87 394 tabwrite \$0-x;
+#X obj 396 335 tabread \$0-x;
+#X obj 486 335 tabread \$0-y;
+#X obj 409 383 pack s 0 0;
+#X obj 183 392 tabwrite \$0-y;
+#X obj 77 260 route motion;
+#X obj 88 367 unpack 0 0;
+#X obj 444 215 table \$0-y;
+#X obj 87 339 spigot;
+#X msg 157 311 0;
+#X msg 125 312 1;
+#X obj 157 288 route keyrelease;
+#X msg 385 360 movecursor;
+#X msg 409 412 \$1 \$2 \$3;
+#X obj 18 468 outlet;
+#X obj 17 128 t a a;
+#X obj 403 277 t b f f;
+#X obj 88 426 outlet;
+#X obj 152 423 outlet;
+#X obj 267 428 outlet;
+#X obj 239 231 t f f;
+#X obj 409 438 s \$0-control;
+#X obj 19 40 r \$0-control;
+#X obj 20 16 inlet;
+#X text 182 53 a keyboard/mouse controller using pdp_xv;
+#X text 180 76 hold a key while moving the mouse to update the x/y
+controller value. hint: turn off keyboard autoropeat using "xset r
+off" in a terminal window.;
+#X text 252 454 scan code;
+#X text 82 450 x coord;
+#X text 151 449 y coord;
+#X text 9 494 plain events;
+#X obj 450 119 inlet;
+#X obj 450 143 unpack 0 0 0;
+#X obj 382 175 tabwrite \$0-x;
+#X obj 480 175 tabwrite \$0-y;
+#X connect 1 0 0 0;
+#X connect 1 0 19 0;
+#X connect 2 0 24 0;
+#X connect 2 1 9 0;
+#X connect 5 0 7 1;
+#X connect 6 0 7 2;
+#X connect 7 0 17 0;
+#X connect 9 0 12 0;
+#X connect 9 1 15 0;
+#X connect 10 0 4 0;
+#X connect 10 0 21 0;
+#X connect 10 1 8 0;
+#X connect 10 1 22 0;
+#X connect 12 0 10 0;
+#X connect 13 0 12 1;
+#X connect 14 0 12 1;
+#X connect 15 0 13 0;
+#X connect 16 0 7 0;
+#X connect 17 0 25 0;
+#X connect 19 0 18 0;
+#X connect 19 1 2 0;
+#X connect 20 0 16 0;
+#X connect 20 1 5 0;
+#X connect 20 2 6 0;
+#X connect 24 0 4 1;
+#X connect 24 0 8 1;
+#X connect 24 0 23 0;
+#X connect 24 0 14 0;
+#X connect 24 1 20 0;
+#X connect 26 0 1 0;
+#X connect 27 0 1 0;
+#X connect 34 0 35 0;
+#X connect 35 0 36 0;
+#X connect 35 1 37 0;
+#X connect 35 2 37 1;
+#X connect 35 2 36 1;