UKI_pd/uki-video/ev-glsl/ev_glsl.pd

#N canvas 441 22 655 349 10;
#X obj 10 11 cnv 15 600 18 empty empty EXTENDED_VIEW_GLSL_MODULE 3
10 0 14 -99865 -262144 0;
#X text 383 272 (c)2012 Marian Weger \; /part of EXTENDED VIEW toolkit/
gpl v3;
#X obj 380 62 inlet gemlist;
#N canvas 332 22 659 729 glsl 0;
#X obj 188 289 glsl_vertex;
#X msg 90 272 print;
#X obj 188 576 glsl_program;
#X obj 293 515 pack 0 0;
#X msg 90 423 print;
#X obj 293 471 change;
#X obj 338 316 change;
#X msg 293 539 link \$1 \$2;
#X msg 90 559 print;
#X obj 188 440 glsl_fragment;
#X floatatom 293 495 2 0 0 0 ID - -;
#X floatatom 338 369 2 0 0 0 ID - -;
#X obj 51 34 route bang;
#X obj 188 131 gemhead 1;
#X msg 188 153 1;
#X obj 188 177 change;
#X obj 188 201 t b;
#X obj 397 627 change;
#X obj 397 648 t b;
#X obj 421 368 symbol;
#X obj 421 343 t b;
#X msg 397 579 0;
#X obj 51 55 t b b b;
#X msg 471 395 open glsl/gaussian_blur_horizontal.frag;
#X obj 444 132 loadbang;
#X obj 397 132 t b;
#X obj 51 11 inlet gemlist;
#X obj 188 670 outlet gemlist;
#X obj 138 11 inlet shader-data;
#X obj 398 670 outlet shader-init;
#X obj 293 567 print [glsl] \$1;
#X msg 234 259 open glsl/gaussian_blur_horizontal.vert;
#X obj 70 458 t b;
#X obj 90 210 t b;
#X msg 234 226 set open glsl/\$1.vert;
#X msg 471 368 set open glsl/\$1.frag;
#X obj 444 175 t l l;
#X obj 444 154 list append \$1;
#X connect 0 0 9 0;
#X connect 0 1 6 0;
#X connect 1 0 0 0;
#X connect 2 0 27 0;
#X connect 2 1 17 0;
#X connect 3 0 7 0;
#X connect 4 0 9 0;
#X connect 5 0 10 0;
#X connect 6 0 11 0;
#X connect 6 0 20 0;
#X connect 7 0 2 0;
#X connect 7 0 30 0;
#X connect 8 0 2 0;
#X connect 9 0 2 0;
#X connect 9 1 5 0;
#X connect 10 0 3 0;
#X connect 11 0 3 1;
#X connect 12 0 22 0;
#X connect 12 1 0 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 31 0;
#X connect 17 0 18 0;
#X connect 18 0 29 0;
#X connect 19 0 23 0;
#X connect 20 0 19 0;
#X connect 21 0 17 0;
#X connect 22 0 25 0;
#X connect 22 1 32 0;
#X connect 22 2 33 0;
#X connect 23 0 9 0;
#X connect 24 0 37 0;
#X connect 25 0 21 0;
#X connect 26 0 12 0;
#X connect 28 0 2 0;
#X connect 31 0 0 0;
#X connect 32 0 10 0;
#X connect 33 0 31 0;
#X connect 34 0 31 0;
#X connect 35 0 23 0;
#X connect 36 0 34 0;
#X connect 36 1 35 0;
#X connect 37 0 36 0;
#X restore 419 156 pd glsl;
#X obj 545 133 inlet shader-ctl;
#X obj 482 156 glsl/\$1.ctl;
#X obj 380 187 outlet gemlist;
#X obj 10 102 cnv 15 360 60 empty empty creation_arguments: 5 12 0
12 -162280 -1 0;
#X text 13 124 1st: shader name;
#X obj 10 175 cnv 15 360 70 empty empty inlets/outlets 5 12 0 12 -233017
-66577 0;
#X text 15 195 Inlet 1: GEMlist;
#X text 205 195 Outlet 1: GEMlist;
#X text 15 210 Inlet 2: Shader controls;
#X obj 419 90 r /ev/glsl/\$0/state;
#N canvas 0 22 450 300 init 0;
#X obj 147 62 loadbang;
#X obj 147 84 f \$0;
#X msg 147 106 \; /ev/glsl/\$1/state 1 \;;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X restore 282 58 pd init;
#X obj 10 255 cnv 15 360 70 empty empty GUI_controls 5 12 0 12 -204800
-66577 0;
#X text 15 285 on/off --- on (shader active) \, off (shader inactive)
;
#X obj 41 55 cnv 15 223 19 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 46 57 tgl 15 0 /ev/glsl/\$0/state /ev/glsl/\$0/state on/off
17 7 0 10 -4034 -1 -1 1 1;
#X obj 380 118 kdemux2;
#X connect 2 0 19 0;
#X connect 3 0 6 0;
#X connect 3 1 5 0;
#X connect 4 0 5 1;
#X connect 5 0 3 1;
#X connect 13 0 19 1;
#X connect 19 0 6 0;
#X connect 19 1 3 0;
#X coords 0 -1 1 1 225 38 1 40 40;