My Patch

#N canvas 429 38 599 417 10;

#N canvas 17 22 1007 713 SMOOOOKE 0;

#X obj 7 45 cnv 15 155 250 empty empty empty 20 12 0 14 -24198 -66577

0;

#X obj 7 390 pix_texture;

#X obj 19 50 bng 25 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

-1;

#X text 61 14 open a supported;

#X obj 32 244 unpack 0 0 0;

#X floatatom 22 267 5 0 0 3 length - -;

#X floatatom 71 267 5 0 0 3 width - -;

#X floatatom 121 267 5 0 0 3 height - -;

#X obj 76 225 bng 15 250 50 0 empty empty end_reached 20 7 0 10 -262144

-1 -1;

#X floatatom 58 190 5 0 10000 1 frame# - -;

#X obj 19 79 openpanel;

#X msg 19 99 open \$1;

#X obj 7 412 rectangle 4 3;

#X obj 7 208 pix_film;

#X msg 25 142 auto \$1;

#X obj 25 124 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

;

#X msg 36 166 colorspace Grey;

#X floatatom 776 350 0 0 0 0 - - -;

#X obj 359 157 gemhead;

#X obj 751 498 text3d hello world;

#X text 654 39 3-D polygonal text;

#X obj 501 194 sel 0 1 2 3 4;

#X msg 516 64 1;

#X msg 561 40 0;

#X obj 516 125 metro 250;

#X obj 516 156 random 7;

#X obj 794 280 metro 20;

#X obj 760 399 rotateXYZ;

#X obj 797 453 loadbang;

#X obj 776 309 i;

#X obj 808 309 + 1;

#X obj 838 309 % 360;

#X obj 665 108 t f;

#X msg 488 262 text SMOOOOOOKE;

#X msg 522 289 text Tasty;

#X msg 488 319 text Smooth and delicious;

#X msg 501 415 text Men smoke them;

#X obj 880 309 i;

#X obj 912 309 + 1;

#X obj 942 309 % 360;

#X obj 671 309 i;

#X obj 703 309 + 1;

#X obj 733 309 % 360;

#X floatatom 880 354 0 0 0 0 - - -;

#X floatatom 671 347 0 0 0 0 - - -;

#X obj 703 280 metro 50;

#X obj 893 281 metro 70;

#X obj 753 605 colorRGB;

#X floatatom 769 569 5 0 0 0 - - -;

#X floatatom 814 569 5 0 0 0 - - -;

#X floatatom 862 570 5 0 0 0 - - -;

#X text 9 -3 Example:;

#X text 62 25 movie-clip;

#X obj 6 20 gemhead;

#X obj 171 8 inlet;

#X obj 225 7 inlet;

#X obj 499 489 inlet;

#X obj 331 7 inlet;

#X obj 542 489 inlet;

#X obj 586 489 inlet;

#X obj 8 465 inlet;

#X obj 213 579 gemwin;

#X msg 208 364 create;

#X msg 217 393 destroy;

#X msg 243 459 1;

#X msg 247 483 0;

#N canvas 87 154 247 179 Gem.init 0;

#X obj 118 46 loadbang;

#X msg 118 81 reset;

#X obj 118 113 outlet;

#X connect 0 0 1 0;

#X connect 1 0 2 0;

#X restore 243 556 pd Gem.init;

#X obj 50 490 inlet;

#X obj 277 7 inlet;

#X msg 431 242 text Don't be a square \, Bob.;

#X msg 597 214 text Newports \, Tom?;

#X msg 773 474 font vera.ttf;

#X obj 773 244 translateXYZ 0 0 1;

#X obj 6 363 pix_kaleidoscope;

#X obj 170 136 cnv 15 175 215 empty empty empty 20 12 0 14 -106138

-66577 0;

#X floatatom 178 139 5 0 64 1 segments - -;

#X floatatom 193 159 5 0 0 1 sourceAngle - -;

#X floatatom 224 235 5 0 0 1 outputAngle - -;

#X floatatom 270 331 5 0.1 10 1 sap - -;

#X floatatom 254 315 5 0 1 1 rlp - -;

#X obj 239 294 pack;

#X obj 293 294 t b f;

#X floatatom 239 255 4 0 100 0 - - -;

#X floatatom 291 255 4 0 100 0 - - -;

#X obj 239 274 * 0.01;

#X obj 291 274 * 0.01;

#X obj 209 216 pack;

#X obj 263 216 t b f;

#X floatatom 209 177 4 0 100 0 - - -;

#X floatatom 261 177 4 0 100 0 - - -;

#X obj 209 196 * 0.01;

#X obj 261 196 * 0.01;

#X connect 1 0 12 0;

#X connect 2 0 10 0;

#X connect 4 0 5 0;

#X connect 4 1 6 0;

#X connect 4 2 7 0;

#X connect 9 0 13 1;

#X connect 10 0 11 0;

#X connect 11 0 13 0;

#X connect 13 0 73 0;

#X connect 13 1 4 0;

#X connect 13 2 8 0;

#X connect 14 0 13 0;

#X connect 15 0 14 0;

#X connect 16 0 13 0;

#X connect 17 0 27 2;

#X connect 18 0 47 0;

#X connect 18 0 72 0;

#X connect 21 0 69 0;

#X connect 21 1 33 0;

#X connect 21 2 34 0;

#X connect 21 3 35 0;

#X connect 21 4 36 0;

#X connect 21 5 70 0;

#X connect 22 0 32 0;

#X connect 23 0 32 0;

#X connect 24 0 25 0;

#X connect 25 0 21 0;

#X connect 26 0 29 0;

#X connect 27 0 19 0;

#X connect 28 0 71 0;

#X connect 29 0 30 0;

#X connect 29 0 17 0;

#X connect 30 0 31 0;

#X connect 31 0 29 1;

#X connect 32 0 24 0;

#X connect 32 0 26 0;

#X connect 32 0 45 0;

#X connect 32 0 46 0;

#X connect 33 0 19 0;

#X connect 34 0 19 0;

#X connect 35 0 19 0;

#X connect 36 0 19 0;

#X connect 37 0 38 0;

#X connect 37 0 43 0;

#X connect 38 0 39 0;

#X connect 39 0 37 1;

#X connect 40 0 41 0;

#X connect 40 0 44 0;

#X connect 41 0 42 0;

#X connect 42 0 40 1;

#X connect 43 0 27 3;

#X connect 44 0 27 1;

#X connect 45 0 40 0;

#X connect 46 0 37 0;

#X connect 47 0 19 0;

#X connect 48 0 47 1;

#X connect 49 0 47 2;

#X connect 50 0 47 3;

#X connect 53 0 13 0;

#X connect 54 0 2 0;

#X connect 55 0 15 0;

#X connect 56 0 48 0;

#X connect 57 0 23 0;

#X connect 58 0 49 0;

#X connect 59 0 50 0;

#X connect 60 0 62 0;

#X connect 60 0 64 0;

#X connect 62 0 61 0;

#X connect 63 0 61 0;

#X connect 64 0 61 0;

#X connect 65 0 61 0;

#X connect 66 0 61 0;

#X connect 67 0 63 0;

#X connect 68 0 22 0;

#X connect 69 0 19 0;

#X connect 70 0 19 0;

#X connect 71 0 19 0;

#X connect 72 0 27 0;

#X connect 73 0 1 0;

#X connect 75 0 73 1;

#X connect 76 0 73 2;

#X connect 77 0 73 4;

#X connect 78 0 73 7;

#X connect 79 0 73 6;

#X connect 80 0 73 5;

#X connect 81 0 80 0;

#X connect 81 1 80 1;

#X connect 82 0 84 0;

#X connect 83 0 85 0;

#X connect 84 0 80 0;

#X connect 85 0 81 0;

#X connect 86 0 73 3;

#X connect 87 0 86 0;

#X connect 87 1 86 1;

#X connect 88 0 90 0;

#X connect 89 0 91 0;

#X connect 90 0 86 0;

#X connect 91 0 87 0;

#X restore 197 218 pd SMOOOOKE;

#X obj 108 177 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0

1;

#X obj 124 22 bng 15 250 50 0 empty empty empty 0 -6 0 10 -262144 -1

-1;

#X obj 183 92 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0

1;

#X obj 243 129 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0

1;

#X floatatom 280 161 5 0 0 0 - - -;

#X floatatom 326 160 5 0 0 0 - - -;

#X floatatom 377 161 5 0 0 0 - - -;

#X text 102 3 insertvideo;

#X text 291 144 R;

#X text 338 143 G;

#X text 389 145 B;

#X text 87 159 create;

#X text 227 111 off(text);

#X obj 147 178 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0

1;

#X text 137 157 destroy;

#X text 183 75 on(video);

#X obj 209 108 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0

1;

#X text 207 92 on(text);

#X connect 1 0 0 0;

#X connect 2 0 0 2;

#X connect 3 0 0 3;

#X connect 4 0 0 5;

#X connect 5 0 0 6;

#X connect 6 0 0 7;

#X connect 7 0 0 8;

#X connect 14 0 0 1;

#X connect 17 0 0 4;