diff options
author | Luke Iannini <lukeiannini@users.sourceforge.net> | 2008-10-26 08:22:12 +0000 |
---|---|---|
committer | Luke Iannini <lukeiannini@users.sourceforge.net> | 2008-10-26 08:22:12 +0000 |
commit | 204cb1b74aeec62614a3de516ab67779618e9a36 (patch) | |
tree | b1d404adb3d313e3ed6a8410fbcf6b9f79faf83f /sfruit/list-slice.pd | |
parent | 2ded32118bbf25d3bdaa95acded1fffe22be2329 (diff) |
continued reorg
svn path=/trunk/abstractions/sfruit/; revision=10349
Diffstat (limited to 'sfruit/list-slice.pd')
-rw-r--r-- | sfruit/list-slice.pd | 56 |
1 files changed, 56 insertions, 0 deletions
diff --git a/sfruit/list-slice.pd b/sfruit/list-slice.pd new file mode 100644 index 0000000..255bbd3 --- /dev/null +++ b/sfruit/list-slice.pd @@ -0,0 +1,56 @@ +#N canvas 73 356 492 370 10; +#X declare -lib list-abs; +#X obj 308 24 import list-abs; +#X obj 57 14 inlet; +#X obj 85 318 outlet; +#X obj 114 15 inlet start-at-idx; +#X obj 102 237 spigot; +#X obj 201 87 inlet end-at-idx; +#X obj 187 237 spigot; +#X obj 114 79 t a a; +#X obj 57 99 list-splat; +#X obj 85 290 list-splat; +#X obj 122 56 list append \$1; +#X obj 122 36 loadbang; +#X obj 187 214 f; +#X obj 102 262 list-len; +#X obj 187 261 expr $f2 - $f1; +#X obj 209 108 loadbang; +#X obj 209 128 list append \$2; +#X obj 135 214 == 0; +#X obj 220 214 > 0; +#X obj 297 261 spigot; +#X obj 330 214 < 0; +#X obj 85 167 t a a b b; +#X obj 297 213 f; +#X obj 201 149 t a a a a a; +#X connect 1 0 8 0; +#X connect 3 0 7 0; +#X connect 4 0 13 0; +#X connect 5 0 23 0; +#X connect 6 0 14 0; +#X connect 7 0 8 1; +#X connect 7 1 12 1; +#X connect 8 1 21 0; +#X connect 9 0 2 0; +#X connect 10 0 7 0; +#X connect 11 0 10 0; +#X connect 12 0 6 0; +#X connect 13 0 9 1; +#X connect 14 0 9 1; +#X connect 15 0 16 0; +#X connect 16 0 23 0; +#X connect 17 0 4 1; +#X connect 18 0 6 1; +#X connect 19 0 9 1; +#X connect 20 0 19 1; +#X connect 21 0 9 0; +#X connect 21 1 4 0; +#X connect 21 2 12 0; +#X connect 21 3 22 0; +#X connect 22 0 19 0; +#X connect 23 0 17 0; +#X connect 23 1 18 0; +#X connect 23 2 14 1; +#X connect 23 3 22 1; +#X connect 23 4 20 0; |