From 8724ea74a1936886a6507bfa2d8989d82bf066bf Mon Sep 17 00:00:00 2001 From: musil Date: Wed, 9 Mar 2005 17:16:00 +0000 Subject: sync with last iem 1.15 ! svn path=/trunk/externals/iemlib/; revision=2611 --- iemabs/test_dollarg.pd | 84 +++++++++++++++++++++++++------------------------- 1 file changed, 42 insertions(+), 42 deletions(-) (limited to 'iemabs/test_dollarg.pd') diff --git a/iemabs/test_dollarg.pd b/iemabs/test_dollarg.pd index dced4d5..d2121c3 100644 --- a/iemabs/test_dollarg.pd +++ b/iemabs/test_dollarg.pd @@ -1,42 +1,42 @@ -#N canvas 75 94 754 539 10; -#X obj 126 224 dollarg; -#X obj 126 40 inlet; -#X obj 32 387 outlet; -#X obj 415 374 outlet; -#X obj 251 150 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 --1; -#X floatatom 420 352 5 0 0 0 - - -; -#X obj 25 310 prepend set; -#X msg 25 339 aa bb cc dd ee ff gg 33 44 55 66 77 88 99; -#X floatatom 247 181 5 0 0 0 - - -; -#X text 60 480 (c) musil@iem.kug.ac.at; -#X text 102 493 IEM KUG; -#X text 77 505 graz \, austria 2002; -#X text 11 6 dollarg; -#X text 93 7 receives the parent initial arguments \, like a -$n; -#X text 250 61 into internal buffer and to output; -#X text 83 406 or output float or symbol of list-atom at index (if -input:; -#X text 235 47 at creation-time dollarg copy parent initial arguments -; -#X text 302 88 pargs = parent arguments; -#X text 302 101 n_pa = number of pargs; -#X text 468 347 output n_pa (if input: n = 0 \, or bang); -#X text 471 363 or output index of parg (if input: n != 0); -#X text 475 378 or output 0 (if input: n > n_pa); -#X text 82 389 output list of pargs (if input: n = 0 \, or bang); -#X text 485 402 -n_pa <= n <= n_pa); -#X text 276 149 if (input == bang) -> dollarg output all pargs; -#X text 302 181 if (input = 0) -> dollarg output all pargs; -#X text 302 195 if (input > 0) -> dollarg output the n-th parg; -#X text 526 207 (n_pa + 1 + input)-th parg; -#X text 304 208 if (input < 0) -> dollarg output the; -#X connect 0 0 2 0; -#X connect 0 0 6 0; -#X connect 0 1 3 0; -#X connect 0 1 5 0; -#X connect 1 0 0 0; -#X connect 4 0 0 0; -#X connect 6 0 7 0; -#X connect 8 0 0 0; +#N canvas 75 94 754 539 10; +#X obj 126 224 dollarg; +#X obj 126 40 inlet; +#X obj 32 387 outlet; +#X obj 415 374 outlet; +#X obj 251 150 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X floatatom 420 352 5 0 0 0 - - -; +#X obj 25 310 prepend set; +#X msg 25 339 aa bb cc dd ee ff gg 33 44 55 66 77 88 99; +#X floatatom 247 181 5 0 0 0 - - -; +#X text 60 480 (c) musil@iem.kug.ac.at; +#X text 102 493 IEM KUG; +#X text 77 505 graz \, austria 2002; +#X text 11 6 dollarg; +#X text 93 7 receives the parent initial arguments \, like a +$n; +#X text 250 61 into internal buffer and to output; +#X text 83 406 or output float or symbol of list-atom at index (if +input:; +#X text 235 47 at creation-time dollarg copy parent initial arguments +; +#X text 302 88 pargs = parent arguments; +#X text 302 101 n_pa = number of pargs; +#X text 468 347 output n_pa (if input: n = 0 \, or bang); +#X text 471 363 or output index of parg (if input: n != 0); +#X text 475 378 or output 0 (if input: n > n_pa); +#X text 82 389 output list of pargs (if input: n = 0 \, or bang); +#X text 485 402 -n_pa <= n <= n_pa); +#X text 276 149 if (input == bang) -> dollarg output all pargs; +#X text 302 181 if (input = 0) -> dollarg output all pargs; +#X text 302 195 if (input > 0) -> dollarg output the n-th parg; +#X text 526 207 (n_pa + 1 + input)-th parg; +#X text 304 208 if (input < 0) -> dollarg output the; +#X connect 0 0 2 0; +#X connect 0 0 6 0; +#X connect 0 1 3 0; +#X connect 0 1 5 0; +#X connect 1 0 0 0; +#X connect 4 0 0 0; +#X connect 6 0 7 0; +#X connect 8 0 0 0; -- cgit v1.2.1