From 098c0e96d0a28b7ad5ca8faef014a7f7c881fc2c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?= Date: Thu, 27 Nov 2008 09:27:31 +0000 Subject: an abstraction that provides versioning of it's parent svn path=/trunk/externals/iem/iemguts/; revision=10395 --- examples/versioning.pd | 82 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 82 insertions(+) create mode 100644 examples/versioning.pd (limited to 'examples') diff --git a/examples/versioning.pd b/examples/versioning.pd new file mode 100644 index 0000000..3d87734 --- /dev/null +++ b/examples/versioning.pd @@ -0,0 +1,82 @@ +#N canvas 474 208 450 587 10; +#X msg 151 401 savetofile \$1.pd .; +#X obj 198 105 canvasname 1; +#X obj 124 68 savebangs 2; +#X obj 151 421 sendcanvas 1; +#N canvas 159 471 450 398 versioning 0; +#X obj 114 39 inlet; +#X obj 114 262 outlet; +#X text 179 266 new name; +#X text 164 39 old name; +#X obj 114 129 list split 1; +#X obj 114 217 list append; +#N canvas 0 0 450 455 reversion 0; +#X obj 78 394 outlet; +#N canvas 437 238 450 300 symbolize 0; +#X obj 72 50 inlet; +#X obj 72 262 outlet; +#X obj 181 124 symbol; +#X obj 72 147 makefilename %d; +#X obj 72 177 t s; +#X obj 72 100 route float bang; +#X msg 126 121 0; +#X connect 0 0 5 0; +#X connect 2 0 4 0; +#X connect 3 0 4 0; +#X connect 4 0 1 0; +#X connect 5 0 3 0; +#X connect 5 1 6 0; +#X connect 5 2 2 0; +#X connect 6 0 3 0; +#X restore 78 83 pd symbolize; +#X obj 78 363 l2s :; +#X obj 78 126 s2l :; +#X obj 78 46 inlet next; +#X obj 78 148 t l l; +#X obj 110 171 list length; +#X obj 110 193 - 1; +#X obj 78 215 list split; +#X obj 78 339 list append; +#X obj 152 265 + 1; +#X obj 152 243 t f; +#X obj 152 311 t l b; +#X obj 152 288 list append 0; +#X connect 1 0 3 0; +#X connect 2 0 0 0; +#X connect 3 0 5 0; +#X connect 4 0 1 0; +#X connect 5 0 8 0; +#X connect 5 1 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 1; +#X connect 8 0 9 0; +#X connect 8 1 11 0; +#X connect 9 0 2 0; +#X connect 10 0 13 0; +#X connect 11 0 10 0; +#X connect 12 0 9 1; +#X connect 12 1 13 1; +#X connect 13 0 12 0; +#X restore 154 171 pd reversion; +#X obj 328 62 inlet branch!; +#X obj 114 102 s2l |; +#X obj 114 239 l2s |; +#X connect 0 0 8 0; +#X connect 4 0 5 0; +#X connect 4 1 6 0; +#X connect 5 0 9 0; +#X connect 6 0 5 1; +#X connect 8 0 4 0; +#X connect 9 0 1 0; +#X restore 198 293 pd versioning; +#X symbolatom 222 252 10 0 0 0 - - -; +#X msg 222 228 bang; +#X obj 119 291 t s s; +#X connect 0 0 3 0; +#X connect 1 0 4 0; +#X connect 2 1 1 0; +#X connect 4 0 7 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 7 0 1 0; +#X connect 7 1 0 0; -- cgit v1.2.1