[PD-cvs] externals/mapping/pd segment.pd,NONE,1.1

[Hans-Christoph Steiner]

Update of /cvsroot/pure-data/externals/mapping/pd
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31294/pd

Added Files:
	segment.pd 
Log Message:
arg, this is the broken version, I should have checked it in when it worked

--- NEW FILE: segment.pd ---
#N canvas 328 208 857 557 10;
#X obj 8 28 inlet;
#X obj 6 4 namecanvas \$0-segment;
#X obj 360 290 pack float float;
#X obj 467 270 *;
#X msg 475 224 1;
#X obj 360 311 trigger list list;
#X obj 274 178 +;
#X msg 273 157 1;
#X msg 304 157 0;
#X obj 273 135 until;
#X obj 167 4 inlet;
#X obj 360 262 * 125;
#X obj 360 240 - 1;
#N canvas 407 40 498 348 clear 0;
#X obj 21 28 inlet;
#X text 72 28 do it bang;
#X obj 21 71 trigger bang bang bang bang;
#X obj 26 260 outlet;
#X text 80 259 to namecanvas [send];
#X msg 306 203 vis 1 \, editmode 1;
#X msg 153 167 cut;
#X msg 216 157 mouse 5 480 0 0 \, mouseup 2000 435 0;
#X msg 30 165 editmode 0;
#X connect 0 0 2 0;
#X connect 2 0 8 0;
#X connect 2 1 6 0;
#X connect 2 2 7 0;
#X connect 2 3 5 0;
#X connect 5 0 3 0;
#X connect 6 0 3 0;
#X connect 7 0 3 0;
#X connect 8 0 3 0;
#X restore 287 65 pd clear dynamic objects;
#X obj 320 401 send \$0-segment;
#X obj 287 84 send \$0-segment;
#X obj 167 46 trigger float bang;
#X obj 167 25 route float;
#X text -3 416 -----------------------------------------------------------
;
#X text -3 481 -----------------------------------------------------------
keep the above area clear for automatic editing;
#X text 411 416 -----------------------------------------------------------
;
#X text 412 481 -----------------------------------------------------------
;
#X obj 304 178 float;
#X msg 333 334 obj \$1 460 outlet;
#X msg 473 333 obj \$1 440 disjoin \$2;
#N canvas 0 22 567 496 connect 0;
#X obj 290 16 inlet;
#X obj 234 398 outlet;
#X obj 339 238 pack float float;
#X msg 338 262 connect \$1 0 \$2 0;
#X obj 446 218 + 1;
#X obj 289 181 trigger float float;
#X obj 289 134 * 2;
#X obj 199 239 pack float float;
#X msg 199 263 connect \$2 1 \$1 0;
#X obj 306 218 - 2;
#X text 117 119 object count;
#X obj 289 161 +;
#X obj 141 218 select 0;
#X msg 60 263 connect 0 0 \$1 0;
#X msg 60 243 32;
#X msg 61 199 set \$1;
#X obj 193 158 + 2;
#X obj 208 95 loadbang;
#X msg 208 118 30;
#X connect 0 0 6 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 2 1;
#X connect 5 0 2 0;
#X connect 5 0 12 0;
#X connect 5 1 4 0;
#X connect 5 1 9 0;
#X connect 6 0 11 0;
#X connect 7 0 8 0;
#X connect 8 0 1 0;
#X connect 9 0 7 1;
#X connect 11 0 5 0;
#X connect 12 0 14 0;
#X connect 12 1 7 0;
#X connect 13 0 1 0;
#X connect 14 0 13 0;
#X connect 15 0 14 0;
#X connect 16 0 12 1;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 11 1;
#X connect 18 0 16 0;
#X restore 185 290 pd connect messages;
#X obj 273 114 trigger float bang;
#X obj 484 250 /;
#X obj 508 224 expr $f2 - $f1 + 1;
#X obj 274 198 trigger float float float bang float;
#X obj 575 75 float_argument \$1;
#X msg 299 45 bang;
#X connect 2 0 5 0;
#X connect 3 0 2 1;
#X connect 4 0 27 0;
#X connect 5 0 23 0;
#X connect 5 1 24 0;
#X connect 6 0 22 0;
#X connect 6 0 29 0;
#X connect 7 0 6 0;
#X connect 8 0 22 0;
#X connect 9 0 7 0;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 11 0;
#X connect 13 0 15 0;
#X connect 16 0 26 0;
#X connect 16 1 13 0;
#X connect 17 0 16 0;
#X connect 22 0 6 1;
#X connect 23 0 14 0;
#X connect 24 0 14 0;
#X connect 25 0 14 0;
#X connect 26 0 9 0;
#X connect 26 1 8 0;
#X connect 27 0 3 1;
#X connect 28 0 27 1;
#X connect 29 0 25 0;
#X connect 29 1 12 0;
#X connect 29 2 3 0;
#X connect 29 3 4 0;
#X connect 29 4 28 0;
#X connect 30 0 26 0;
#X connect 30 0 28 1;
#X connect 31 0 13 0;