diff --git a/inputs/PD/SimpleSlider_3inputs.pd b/inputs/PD/SimpleSlider_3inputs.pd index 29fa5b5..90d48ee 100644 --- a/inputs/PD/SimpleSlider_3inputs.pd +++ b/inputs/PD/SimpleSlider_3inputs.pd @@ -1,29 +1,87 @@ -#N canvas 0 23 476 360 10; -#X msg -185 112 connect localhost 6448; -#X obj -102 260 packOSC; -#X obj -102 293 udpsend; -#X obj -185 83 loadbang; -#X obj 7 28 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 --1 -1 4700 1; -#X obj 32 27 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 --1 -1 11200 1; -#X obj -24 184 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 --1 -1; -#X obj 56 28 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 --1 -1 2200 1; -#X obj 26 200 pack f f f; -#X msg -100 228 sendtyped /wek/inputs fff \$1 \$2 \$3; -#X text -229 -8 This patch sends 3 inputs to wekinator on port 6448 +#N canvas 492 166 568 419 10; +#X declare -lib oscx; +#X text -256 -12 This patch sends 3 inputs to wekinator on port 6448 \, using message /wek/inputs; -#X text 83 51 Use these sliders to change input values.; +#X obj -71 62 tgl 15 0 \$0-random-toggle empty empty 17 7 0 10 -262144 +-1 -1 0 1; +#X obj -251 65 tgl 15 0 \$0-sliders-on-off \$0-loadbang empty 17 7 +0 10 -262144 -1 -1 0 1; +#X text -256 33 click here to turn the sliders on/off; +#X text -74 116 Either way \, watch the Pd console.; +#N canvas 329 365 450 300 \$0-sliderguts 0; +#X msg -210 -26 connect localhost 6448; +#X obj -210 -46 loadbang; +#X obj -221 210 sendOSC; +#X obj -223 -87 import oscx; +#X msg -222 -67 disconnect; +#X obj -174 49 r \$0-lslider; +#X obj -156 87 r \$0-mslider; +#X obj -127 125 r \$0-rslider; +#X obj -170 210 print; +#X msg -198 183 send /wek/inputs \$1 \$2 \$3; +#X obj -184 164 pack f f f; +#X obj -198 -6 r \$0-random-values; +#X msg -63 -31 \; pd dsp 1; +#X obj -127 145 + 0.0001; +#X obj -156 106 + 0.0001; +#X obj -174 68 + 0.0001; +#X obj -188 13 tgl 15 0 empty \$0-sliders-on-off empty 17 7 0 10 -262144 +-1 -1 0 1; +#X obj -188 30 metro 12; +#X obj -147 -46 s \$0-loadbang; #X connect 0 0 2 0; +#X connect 1 0 0 0; +#X connect 1 0 12 0; +#X connect 1 0 16 0; +#X connect 1 0 18 0; +#X connect 4 0 2 0; +#X connect 5 0 15 0; +#X connect 6 0 14 0; +#X connect 7 0 13 0; +#X connect 9 0 2 0; +#X connect 9 0 8 0; +#X connect 10 0 9 0; +#X connect 11 0 9 0; +#X connect 13 0 10 2; +#X connect 14 0 10 1; +#X connect 15 0 10 0; +#X connect 16 0 17 0; +#X connect 17 0 10 0; +#X restore -79 229 pd \$0-sliderguts; +#X obj -248 117 vsl 45 128 0 127 0 0 \$0-lslider empty empty 0 -9 0 +10 -262144 -1 -1 9800 0; +#X obj -194 117 vsl 45 128 0 127 0 0 \$0-mslider empty empty 0 -9 0 +10 -99865 -1 -1 7800 1; +#X obj -139 117 vsl 45 128 0 127 0 0 \$0-rslider empty empty 0 -9 0 +10 -191407 -1 -1 4100 1; +#N canvas 335 303 450 300 randomguts 0; +#X obj 84 144 noise~; +#X obj 84 163 unsig~; +#X obj 84 183 expr (1 + $f1) * 63.5 * $f2; +#X obj 243 163 r \$0-random-toggle; +#X obj 55 85 noise~; +#X obj 55 104 unsig~; +#X obj 55 124 expr (1 + $f1) * 63.5 * $f2; +#X obj 214 105 r \$0-random-toggle; +#X obj 27 7 noise~; +#X obj 27 26 unsig~; +#X obj 27 66 expr (1 + $f1) * 63.5 * $f2; +#X obj 186 47 r \$0-random-toggle; +#X obj 27 203 pack f f f; +#X obj 27 224 s \$0-random-values; +#X connect 0 0 1 0; #X connect 1 0 2 0; -#X connect 3 0 0 0; -#X connect 4 0 8 0; +#X connect 2 0 12 2; +#X connect 3 0 2 1; +#X connect 4 0 5 0; #X connect 5 0 6 0; -#X connect 5 0 8 1; -#X connect 6 0 8 0; -#X connect 7 0 8 2; -#X connect 7 0 6 0; +#X connect 6 0 12 1; +#X connect 7 0 6 1; #X connect 8 0 9 0; -#X connect 9 0 1 0; +#X connect 9 0 10 0; +#X connect 10 0 12 0; +#X connect 11 0 10 1; +#X connect 12 0 13 0; +#X restore 26 230 pd randomguts; +#X text -253 83 Use these sliders to change input values.; +#X text -75 30 Click here to send random input values;