From 5f5d8fc7c21ec918f67fd2673676c63f77dd244a Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Fri, 28 Apr 2006 10:39:10 +0000 Subject: object for creating date symbol in ISO format svn path=/trunk/externals/hcs/; revision=5013 --- ISOdate.pd | 40 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 40 insertions(+) create mode 100755 ISOdate.pd (limited to 'ISOdate.pd') diff --git a/ISOdate.pd b/ISOdate.pd new file mode 100755 index 0000000..6862f20 --- /dev/null +++ b/ISOdate.pd @@ -0,0 +1,40 @@ +#N canvas 385 266 642 440 10; +#X obj 93 84 zexy/date -----------; +#X obj 93 31 inlet; +#X obj 93 58 bang; +#X obj 93 229 outlet; +#N canvas 0 0 458 308 addzero 0; +#X obj 134 16 inlet; +#X obj 139 263 outlet; +#X obj 136 80 moses 10; +#X obj 13 195 zexy/makesymbol -0%s; +#X obj 142 193 zexy/makesymbol -%s; +#X connect 0 0 2 0; +#X connect 2 0 3 0; +#X connect 2 1 4 0; +#X connect 3 0 1 0; +#X connect 4 0 1 0; +#X restore 205 135 pd addzero; +#X obj 93 202 zexy/makesymbol %s%s%s; +#X obj 93 175 pack float symbol symbol; +#N canvas 0 0 458 308 addzero 0; +#X obj 134 16 inlet; +#X obj 139 263 outlet; +#X obj 136 80 moses 10; +#X obj 13 195 zexy/makesymbol -0%s; +#X obj 142 193 zexy/makesymbol -%s; +#X connect 0 0 2 0; +#X connect 2 0 3 0; +#X connect 2 1 4 0; +#X connect 3 0 1 0; +#X connect 4 0 1 0; +#X restore 136 135 pd addzero; +#X connect 0 0 6 0; +#X connect 0 1 7 0; +#X connect 0 2 4 0; +#X connect 1 0 2 0; +#X connect 2 0 0 0; +#X connect 4 0 6 2; +#X connect 5 0 3 0; +#X connect 6 0 5 0; +#X connect 7 0 6 1; -- cgit v1.2.1