From 3faf17f7b713905f582def227df90dac15f3468d Mon Sep 17 00:00:00 2001 From: "N.N." Date: Tue, 10 Jul 2007 07:47:46 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r7969, which included commits to RCS files with non-trunk default branches. svn path=/trunk/abstractions/s-abstractions/; revision=7970 --- s-midimemory.pd | 68 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 68 insertions(+) create mode 100644 s-midimemory.pd (limited to 's-midimemory.pd') diff --git a/s-midimemory.pd b/s-midimemory.pd new file mode 100644 index 0000000..bc21ec6 --- /dev/null +++ b/s-midimemory.pd @@ -0,0 +1,68 @@ +#N canvas 32 141 598 499 10; +#X obj 81 239 f; +#X floatatom 161 63 5 0 0 0 - - -; +#X obj 9 64 moses 127; +#X obj 51 156 spigot; +#X msg 13 90 1; +#X msg 49 89 0; +#X obj 20 27 t f f; +#X floatatom 118 224 5 0 0 0 - - -; +#X obj 104 158 spigot; +#X msg 69 216 bang; +#X obj 299 287 spigot; +#X msg 97 90 1; +#X msg 144 92 0; +#X obj 350 350 line; +#X obj 386 73 table \$0-knobmem \$1; +#X obj 161 40 mod \$1; +#X obj 243 16 inlet; +#X obj 17 5 inlet; +#X obj 53 484 outlet; +#X obj 276 231 tabread \$0-knobmem; +#X obj 352 316 pack f 50; +#X obj 93 264 tabwrite \$0-knobmem; +#X obj 301 106 \$3; +#X obj 301 81 loadbang; +#X obj 300 131 select 0; +#X msg 299 156 127; +#X obj 315 178 s \$0-height; +#X obj 63 5 r \$0-height; +#X obj 160 17 r \$2/tick; +#X obj 396 275 r \$2/ticklength; +#X text 322 6 args: [length] [timername] [height]; +#X connect 0 0 21 0; +#X connect 1 0 8 0; +#X connect 1 0 19 0; +#X connect 1 0 21 1; +#X connect 2 0 4 0; +#X connect 2 0 12 0; +#X connect 2 0 18 0; +#X connect 2 1 5 0; +#X connect 2 1 11 0; +#X connect 3 0 7 0; +#X connect 4 0 3 1; +#X connect 4 0 8 1; +#X connect 5 0 3 1; +#X connect 5 0 8 1; +#X connect 6 0 2 0; +#X connect 6 1 3 0; +#X connect 7 0 0 1; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 20 0; +#X connect 11 0 10 1; +#X connect 12 0 10 1; +#X connect 13 0 18 0; +#X connect 15 0 1 0; +#X connect 16 0 15 0; +#X connect 17 0 6 0; +#X connect 19 0 10 0; +#X connect 20 0 13 0; +#X connect 22 0 24 0; +#X connect 23 0 22 0; +#X connect 24 0 25 0; +#X connect 24 1 26 0; +#X connect 25 0 26 0; +#X connect 27 0 2 1; +#X connect 28 0 15 0; +#X connect 29 0 20 1; -- cgit v1.2.1