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;