[PD-cvs] externals/hcs mouse_region.pd, NONE, 1.1 mouse_region-help.pd, NONE, 1.1

[Hans-Christoph Steiner]

Update of /cvsroot/pure-data/externals/hcs
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25315

Added Files:
	mouse_region.pd mouse_region-help.pd 
Log Message:
implemented object to use in mapping curve help files, but it ended up fighting with the interaction with the array.  Could be useful elsewhere tho.

--- NEW FILE: mouse_region-help.pd ---
#N canvas 227 186 598 404 10;
#X obj 33 173 pointer_position;
#X obj 33 145 tgl 15 1 empty empty empty 0 -6 0 10 -262144 -1 -1 1
1;
#X msg 52 144 bang;
#X obj 342 136 cnv 15 100 60 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 48 84 keyup;
#X obj 48 105 select 32;
#X text 124 41 give mouse coordinates only after clicking and dragging
in a region.;
#X obj 145 295 unpack float float;
#X floatatom 144 325 5 0 0 0 - - -;
#X floatatom 252 326 5 0 0 0 - - -;
#X obj 146 248 mouse_region 342 443 137 194;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 4 0 5 0;
#X connect 5 0 2 0;
#X connect 7 0 8 0;
#X connect 7 1 9 0;
#X connect 10 0 7 0;

--- NEW FILE: mouse_region.pd ---
#N canvas 138 197 732 550 10;
#N canvas 224 109 399 332 constrain 0;
#X obj 15 12 inlet;
#X obj 112 254 outlet;
#X obj 15 52 unpack float float float float;
#X obj 45 116 receive \$0-xmin;
#X obj 75 137 receive \$0-xmax;
#X obj 15 137 moses;
#X obj 45 157 moses;
#X obj 112 225 pack float float;
#X obj 200 137 moses;
#X obj 230 157 moses;
#X obj 260 137 receive \$0-ymax;
#X obj 230 116 receive \$0-ymin;
#X connect 0 0 2 0;
#X connect 2 0 5 0;
#X connect 2 1 8 0;
#X connect 3 0 5 1;
#X connect 4 0 6 1;
#X connect 5 1 6 0;
#X connect 6 0 7 0;
#X connect 7 0 1 0;
#X connect 8 1 9 0;
#X connect 9 0 7 1;
#X connect 10 0 9 1;
#X connect 11 0 8 1;
#X restore 100 461 pd constrain mouse messages;
#N canvas 0 22 470 320 set 0;
#X obj 75 26 inlet;
#X obj 108 115 send \$0-xmax;
#X obj 19 115 send \$0-xmin;
#X obj 200 114 send \$0-ymin;
#X obj 291 114 send \$0-ymax;
#X obj 74 52 unpack float float float float;
#X connect 0 0 5 0;
#X connect 5 0 2 0;
#X connect 5 1 1 0;
#X connect 5 2 3 0;
#X connect 5 3 4 0;
#X restore 93 437 pd set xmin xmax ymin ymax;
#X text 173 396 xmin xmax ymin ymax;
#X msg 84 410 273 103 473 303;
#X obj 83 15 inlet xmin;
#X obj 234 14 inlet xmax;
#X obj 385 14 inlet ymin;
#X obj 536 14 inlet ymax;
#X obj 448 436 outlet events;
#X obj 83 83 unpack float float float float;
#X obj 83 137 purepd/float_argument \$1;
#X obj 234 137 purepd/float_argument \$2;
#X obj 398 83 loadbang;
#X obj 83 58 route list;
#X obj 385 137 purepd/float_argument \$3;
#X obj 536 137 purepd/float_argument \$4;
#N canvas 0 22 601 552 constrain 0;
#X obj 10 24 inlet data;
#X obj 101 24 inlet xmin;
#X obj 182 24 inlet xmax;
#X obj 293 24 inlet ymin;
#X obj 404 24 inlet ymax;
#X obj 91 343 outlet;
#X obj 61 110 unpack float float float float;
#X obj 61 155 moses;
#X obj 91 175 moses;
#X obj 91 293 pack float float;
#X obj 194 155 moses;
#X obj 224 175 moses;
#X obj 251 198 bang;
#X obj 251 220 float;
#X obj 191 198 bang;
#X obj 191 220 float;
#X obj 118 198 bang;
#X obj 118 220 float;
#X obj 51 198 bang;
#X obj 51 220 float;
#X connect 0 0 6 0;
#X connect 1 0 7 1;
#X connect 1 0 19 1;
#X connect 2 0 8 1;
#X connect 2 0 17 1;
#X connect 3 0 10 1;
#X connect 3 0 15 1;
#X connect 4 0 11 1;
#X connect 4 0 13 1;
#X connect 6 0 7 0;
#X connect 6 1 10 0;
#X connect 7 0 18 0;
#X connect 7 1 8 0;
#X connect 8 0 9 0;
#X connect 8 1 16 0;
#X connect 9 0 5 0;
#X connect 10 0 14 0;
#X connect 10 1 11 0;
#X connect 11 0 9 1;
#X connect 11 1 12 0;
#X connect 12 0 13 0;
#X connect 13 0 9 1;
#X connect 14 0 15 0;
#X connect 15 0 9 1;
#X connect 16 0 17 0;
#X connect 17 0 9 0;
#X connect 18 0 19 0;
#X connect 19 0 9 0;
#X restore 448 383 pd constrain mouse messages;
#N canvas 0 22 351 249 get 0;
#X obj 139 110 outlet;
#X msg 89 54 capture 1;
#X obj 89 33 loadbang;
#X obj 89 75 toxy/tot .top;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 3 2 0 0;
#X restore 35 222 pd get events;
#X obj 86 275 bang;
#X obj 37 332 spigot;
#N canvas 95 390 538 391 constrain 0;
#X obj 113 352 outlet;
#X obj 10 24 inlet data;
#X obj 101 24 inlet xmin;
#X obj 182 24 inlet xmax;
#X obj 293 24 inlet ymin;
#X obj 404 24 inlet ymax;
#X obj 61 110 unpack float float float float;
#X obj 61 155 moses;
#X obj 91 175 moses;
#X obj 214 155 moses;
#X obj 244 175 moses;
#X obj 204 212 bang;
#X obj 113 330 &&;
#X obj 238 212 bang;
#X msg 238 235 1;
#X msg 204 235 0;
#X obj 58 212 bang;
#X obj 92 212 bang;
#X msg 92 235 1;
#X msg 58 235 0;
#X connect 1 0 6 0;
#X connect 2 0 7 1;
#X connect 3 0 8 1;
#X connect 4 0 9 1;
#X connect 5 0 10 1;
#X connect 6 0 7 0;
#X connect 6 1 9 0;
#X connect 7 0 16 0;
#X connect 7 1 8 0;
#X connect 8 0 17 0;
#X connect 8 1 16 0;
#X connect 9 0 11 0;
#X connect 9 1 10 0;
#X connect 10 0 13 0;
#X connect 10 1 11 0;
#X connect 11 0 15 0;
#X connect 12 0 0 0;
#X connect 13 0 14 0;
#X connect 14 0 12 1;
#X connect 15 0 12 1;
#X connect 16 0 19 0;
#X connect 17 0 18 0;
#X connect 18 0 12 0;
#X connect 19 0 12 0;
#X restore 137 290 pd constrain mousedown;
#X obj 35 253 route motion mouseup mouse;
#X msg 86 296 0;
#X connect 3 0 1 0;
#X connect 4 0 13 0;
#X connect 5 0 11 0;
#X connect 6 0 14 0;
#X connect 7 0 15 0;
#X connect 9 0 10 0;
#X connect 9 1 11 0;
#X connect 9 2 14 0;
#X connect 9 3 15 0;
#X connect 10 0 16 1;
#X connect 10 0 20 1;
#X connect 11 0 16 2;
#X connect 11 0 20 2;
#X connect 12 0 11 0;
#X connect 12 0 10 0;
#X connect 12 0 14 0;
#X connect 12 0 15 0;
#X connect 13 0 9 0;
#X connect 13 1 10 0;
#X connect 14 0 16 3;
#X connect 14 0 20 3;
#X connect 15 0 16 4;
#X connect 15 0 20 4;
#X connect 16 0 8 0;
#X connect 17 0 21 0;
#X connect 18 0 22 0;
#X connect 19 0 16 0;
#X connect 20 0 19 1;
#X connect 21 0 19 0;
#X connect 21 1 18 0;
#X connect 21 2 20 0;
#X connect 22 0 19 1;