#N canvas 868 288 351 414 10; #X obj 39 324 pd~; #N canvas 209 160 485 630 gather-args 0; #N canvas 0 22 450 300 ioTestArgument 0; #X obj 173 228 list append \$1; #X obj 128 168 select s; #X obj 128 78 t b b; #X obj 238 138 makefilename $%d-test; #X msg 238 108 1; #X obj 128 118 symbol \$1-test; #X obj 173 198 b; #X obj 173 258 outlet; #X text 19 181 no arg given ->; #X text 197 180 <- there is \$1; #X obj 128 18 r \$0.check-arg; #X connect 0 0 7 0; #X connect 1 1 6 0; #X connect 2 0 5 0; #X connect 2 1 4 0; #X connect 3 0 1 1; #X connect 4 0 3 0; #X connect 5 0 1 0; #X connect 6 0 0 0; #X connect 10 0 2 0; #X restore 216 89 pd ioTestArgument; #X obj 153 111 list append; #X obj 153 39 t b b; #X obj 180 63 s \$0.check-arg; #N canvas 0 22 450 300 ioTestArgument 0; #X obj 128 168 select s; #X obj 128 78 t b b; #X obj 238 138 makefilename $%d-test; #X obj 173 198 b; #X obj 173 258 outlet; #X text 19 181 no arg given ->; #X text 197 180 <- there is \$1; #X obj 128 18 r \$0.check-arg; #X obj 128 118 symbol \$2-test; #X msg 238 108 2; #X obj 173 228 list append \$2; #X connect 0 1 3 0; #X connect 1 0 8 0; #X connect 1 1 9 0; #X connect 2 0 0 1; #X connect 3 0 10 0; #X connect 7 0 1 0; #X connect 8 0 0 0; #X connect 9 0 2 0; #X connect 10 0 4 0; #X restore 216 139 pd ioTestArgument; #X obj 153 161 list append; #N canvas 0 22 450 300 ioTestArgument 0; #X obj 128 168 select s; #X obj 128 78 t b b; #X obj 238 138 makefilename $%d-test; #X obj 173 198 b; #X obj 173 258 outlet; #X text 19 181 no arg given ->; #X text 197 180 <- there is \$1; #X obj 128 18 r \$0.check-arg; #X msg 238 108 3; #X obj 128 118 symbol \$3-test; #X obj 173 228 list append \$3; #X connect 0 1 3 0; #X connect 1 0 9 0; #X connect 1 1 8 0; #X connect 2 0 0 1; #X connect 3 0 10 0; #X connect 7 0 1 0; #X connect 8 0 2 0; #X connect 9 0 0 0; #X connect 10 0 4 0; #X restore 216 189 pd ioTestArgument; #X obj 153 211 list append; #N canvas 0 22 450 300 ioTestArgument 0; #X obj 128 168 select s; #X obj 128 78 t b b; #X obj 238 138 makefilename $%d-test; #X obj 173 198 b; #X obj 173 258 outlet; #X text 19 181 no arg given ->; #X text 197 180 <- there is \$1; #X obj 128 18 r \$0.check-arg; #X obj 173 228 list append \$4; #X obj 128 118 symbol \$4-test; #X msg 238 108 4; #X connect 0 1 3 0; #X connect 1 0 9 0; #X connect 1 1 10 0; #X connect 2 0 0 1; #X connect 3 0 8 0; #X connect 7 0 1 0; #X connect 8 0 4 0; #X connect 9 0 0 0; #X connect 10 0 2 0; #X restore 216 239 pd ioTestArgument; #X obj 153 261 list append; #N canvas 0 22 450 300 ioTestArgument 0; #X obj 128 168 select s; #X obj 128 78 t b b; #X obj 238 138 makefilename $%d-test; #X obj 173 198 b; #X obj 173 258 outlet; #X text 19 181 no arg given ->; #X text 197 180 <- there is \$1; #X obj 128 18 r \$0.check-arg; #X obj 128 118 symbol \$5-test; #X msg 238 108 5; #X obj 173 228 list append \$5; #X connect 0 1 3 0; #X connect 1 0 8 0; #X connect 1 1 9 0; #X connect 2 0 0 1; #X connect 3 0 10 0; #X connect 7 0 1 0; #X connect 8 0 0 0; #X connect 9 0 2 0; #X connect 10 0 4 0; #X restore 216 289 pd ioTestArgument; #X obj 153 311 list append; #N canvas 0 22 450 300 ioTestArgument 0; #X obj 128 168 select s; #X obj 128 78 t b b; #X obj 238 138 makefilename $%d-test; #X obj 173 198 b; #X obj 173 258 outlet; #X text 19 181 no arg given ->; #X text 197 180 <- there is \$1; #X obj 128 18 r \$0.check-arg; #X obj 128 118 symbol \$6-test; #X msg 238 108 6; #X obj 173 228 list append \$6; #X connect 0 1 3 0; #X connect 1 0 8 0; #X connect 1 1 9 0; #X connect 2 0 0 1; #X connect 3 0 10 0; #X connect 7 0 1 0; #X connect 8 0 0 0; #X connect 9 0 2 0; #X connect 10 0 4 0; #X restore 216 339 pd ioTestArgument; #X obj 153 361 list append; #N canvas 0 22 450 300 ioTestArgument 0; #X obj 128 168 select s; #X obj 128 78 t b b; #X obj 238 138 makefilename $%d-test; #X obj 173 198 b; #X obj 173 258 outlet; #X text 19 181 no arg given ->; #X text 197 180 <- there is \$1; #X obj 128 18 r \$0.check-arg; #X obj 128 118 symbol \$7-test; #X msg 238 108 7; #X obj 173 228 list append \$7; #X connect 0 1 3 0; #X connect 1 0 8 0; #X connect 1 1 9 0; #X connect 2 0 0 1; #X connect 3 0 10 0; #X connect 7 0 1 0; #X connect 8 0 0 0; #X connect 9 0 2 0; #X connect 10 0 4 0; #X restore 216 389 pd ioTestArgument; #X obj 153 411 list append; #N canvas 0 22 450 300 ioTestArgument 0; #X obj 128 168 select s; #X obj 128 78 t b b; #X obj 238 138 makefilename $%d-test; #X obj 173 198 b; #X obj 173 258 outlet; #X text 19 181 no arg given ->; #X text 197 180 <- there is \$1; #X obj 128 18 r \$0.check-arg; #X obj 128 118 symbol \$8-test; #X msg 238 108 8; #X obj 173 228 list append \$8; #X connect 0 1 3 0; #X connect 1 0 8 0; #X connect 1 1 9 0; #X connect 2 0 0 1; #X connect 3 0 10 0; #X connect 7 0 1 0; #X connect 8 0 0 0; #X connect 9 0 2 0; #X connect 10 0 4 0; #X restore 216 439 pd ioTestArgument; #X obj 153 461 list append; #N canvas 0 22 450 300 ioTestArgument 0; #X obj 128 168 select s; #X obj 128 78 t b b; #X obj 238 138 makefilename $%d-test; #X obj 173 198 b; #X obj 173 258 outlet; #X text 19 181 no arg given ->; #X text 197 180 <- there is \$1; #X obj 128 18 r \$0.check-arg; #X obj 128 118 symbol \$9-test; #X msg 238 108 9; #X obj 173 228 list append \$9; #X connect 0 1 3 0; #X connect 1 0 8 0; #X connect 1 1 9 0; #X connect 2 0 0 1; #X connect 3 0 10 0; #X connect 7 0 1 0; #X connect 8 0 0 0; #X connect 9 0 2 0; #X connect 10 0 4 0; #X restore 216 489 pd ioTestArgument; #X obj 153 511 list append; #X obj 153 533 outlet; #X obj 153 14 inlet; #X connect 0 0 1 1; #X connect 1 0 5 0; #X connect 2 0 1 0; #X connect 2 1 3 0; #X connect 4 0 5 1; #X connect 5 0 7 0; #X connect 6 0 7 1; #X connect 7 0 9 0; #X connect 8 0 9 1; #X connect 9 0 11 0; #X connect 10 0 11 1; #X connect 11 0 13 0; #X connect 12 0 13 1; #X connect 13 0 15 0; #X connect 14 0 15 1; #X connect 15 0 17 0; #X connect 16 0 17 1; #X connect 17 0 19 0; #X connect 18 0 19 1; #X connect 19 0 20 0; #X connect 21 0 2 0; #X restore 39 57 pd gather-args; #N canvas 0 22 621 363 list-l2s 0; #X msg 327 196 set %s; #X obj 235 244 t a; #X obj 118 252 makefilename %s; #X obj 96 62 t b a b; #X obj 96 283 symbol; #X msg 142 22 a b c d 1 2; #X obj 118 158 route symbol float; #X obj 118 186 symbol; #X obj 178 190 makefilename %d; #X obj 96 21 inlet; #X obj 96 313 outlet; #X obj 395 192 makefilename 1%s%%s; #X obj 395 165 symbol \$1; #X msg 405 123 bang; #X obj 395 89 loadbang; #X msg 395 228 set set \, adddollsym \$1; #X msg 235 265 set \$1 %s; #N canvas 0 22 533 407 drip 0; #X obj 64 206 list split 1; #X obj 64 123 until; #X obj 64 181 list append; #X obj 194 206 bang; #X text 146 90 First store list \, then start the loop; #X text 163 118 "until" bangs its output until told to stop by a "bang" to its right inlet.; #X text 182 160 Store the remaining list.; #X text 239 205 third outlet of "split" tells us to stop.; #X obj 64 243 outlet; #X obj 64 57 inlet; #X text 237 44 From list-help.pd; #X obj 143 243 outlet; #X obj 64 86 t b a; #X connect 0 0 8 0; #X connect 0 1 2 1; #X connect 0 2 3 0; #X connect 0 2 11 0; #X connect 1 0 2 0; #X connect 2 0 0 0; #X connect 3 0 1 1; #X connect 9 0 12 0; #X connect 12 0 1 0; #X connect 12 1 2 1; #X restore 118 123 pd drip; #X obj 447 124 inlet; #X text 393 309 by Frank Barknecht; #X connect 0 0 2 0; #X connect 1 0 16 0; #X connect 2 0 1 0; #X connect 2 0 4 1; #X connect 3 0 4 0; #X connect 3 1 17 0; #X connect 3 2 0 0; #X connect 4 0 10 0; #X connect 5 0 3 0; #X connect 6 0 7 0; #X connect 6 1 8 0; #X connect 7 0 2 0; #X connect 8 0 2 0; #X connect 9 0 3 0; #X connect 11 0 15 0; #X connect 12 0 11 0; #X connect 13 0 12 0; #X connect 14 0 12 0; #X connect 15 0 16 0; #X connect 16 0 2 0; #X connect 17 0 6 0; #X connect 18 0 12 0; #X restore 39 153 pd list-l2s; #X obj 102 130 makefilename %c; #X msg 102 106 32; #X obj 113 274 inlet~; #X obj 69 273 inlet; #X obj 163 274 inlet~; #X obj 39 371 outlet; #X obj 89 371 outlet~; #X obj 145 371 outlet~; #X obj 39 16 loadbang; #X obj 39 252 list trim; #X obj 39 229 list append pd~.subprocess.pd; #X obj 39 206 list prepend pd~ start -send; #X msg 39 176 "ARGS \$1"; #X obj 39 37 t b b b; #X msg 169 54 \; pd dsp 1; #X connect 0 0 8 0; #X connect 0 1 9 0; #X connect 0 2 10 0; #X connect 1 0 2 0; #X connect 2 0 15 0; #X connect 3 0 2 1; #X connect 4 0 3 0; #X connect 5 0 0 0; #X connect 6 0 0 0; #X connect 7 0 0 1; #X connect 11 0 16 0; #X connect 12 0 0 0; #X connect 13 0 12 0; #X connect 14 0 13 0; #X connect 15 0 14 0; #X connect 16 0 1 0; #X connect 16 1 4 0; #X connect 16 2 17 0;