quick shortcut object for running AppleScript

svn path=/trunk/externals/hcs/; revision=13693

2 files changed, 19 insertions, 0 deletions

diff --git a/grabbag/osascript-help.pd b/grabbag/osascript-help.pd
new file mode 100644
index 0000000..a9ec61d
--- /dev/null
+++ b/grabbag/osascript-help.pd
@@ -0,0 +1,9 @@
+#N canvas 264 225 450 300 10;
+#X obj 47 213 osascript;
+#X text 21 23 run AppleScripts on Mac OS X;
+#X msg 33 99 tell application "safari" to open location "http://puredata.info"
+;
+#X msg 64 152 tell application "firefox" to open location "http://puredata.info"
+;
+#X connect 2 0 0 0;
+#X connect 3 0 0 0;
diff --git a/grabbag/osascript.pd b/grabbag/osascript.pd
new file mode 100644
index 0000000..e72b90c
--- /dev/null
+++ b/grabbag/osascript.pd
@@ -0,0 +1,10 @@
+#N canvas 288 314 450 300 10;
+#X obj 81 29 inlet;
+#X obj 81 263 motex/system;
+#X msg 81 232 osascript -e '\$1' &;
+#X obj 81 108 list;
+#X obj 81 137 zexy/list2symbol;
+#X connect 0 0 3 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;