From 7e3f3bbef327d13b22e7627447316c1fc754380f Mon Sep 17 00:00:00 2001 From: Luke Iannini Date: Thu, 15 May 2008 08:55:25 +0000 Subject: implemented savebang idea from HCS svn path=/trunk/abstractions/senderfruit/; revision=9806 --- core/savebang-help.pd | 9 +++++++++ core/savebang.pd | 11 +++++++++++ 2 files changed, 20 insertions(+) create mode 100644 core/savebang-help.pd create mode 100644 core/savebang.pd diff --git a/core/savebang-help.pd b/core/savebang-help.pd new file mode 100644 index 0000000..bd3bca7 --- /dev/null +++ b/core/savebang-help.pd @@ -0,0 +1,9 @@ +#N canvas 976 723 373 150 10; +#X obj 102 90 savebang; +#X obj 102 116 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X text 8 8 [savebang] outputs a bang when its containing patch is +saved. The bang is output before the file is saved \, making it useful +for clearing temporary data. Original idea by Hans-Christoph Steiner +\; requires [tot]; +#X connect 0 0 1 0; diff --git a/core/savebang.pd b/core/savebang.pd new file mode 100644 index 0000000..3d19f33 --- /dev/null +++ b/core/savebang.pd @@ -0,0 +1,11 @@ +#N canvas 736 201 223 185 10; +#X msg 26 47 capture 1; +#X obj 68 97 route menusave; +#X obj 26 21 loadbang; +#X obj 26 73 tot .parent; +#X obj 68 122 outlet; +#X text 25 155 Idea by hans-christoph steiner; +#X connect 0 0 3 0; +#X connect 1 0 4 0; +#X connect 2 0 0 0; +#X connect 3 2 1 0; -- cgit v1.2.1