From 267170167d52cab9e97f879d9127a1cf04f6bb58 Mon Sep 17 00:00:00 2001
From: Martin Peach <mrpeach@users.sourceforge.net>
Date: Tue, 15 Mar 2011 20:53:57 +0000
Subject: This is a version of Claude Heiland-Allen's lua for Pd. The objects
 are named pdlua and pdluax instead of lua and luax. So far it seems to work
 on linux.

svn path=/trunk/externals/pdlua/; revision=15030
---
 examples/peekbag-help.pd | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 examples/peekbag-help.pd

(limited to 'examples/peekbag-help.pd')

diff --git a/examples/peekbag-help.pd b/examples/peekbag-help.pd
new file mode 100644
index 0000000..23a1e36
--- /dev/null
+++ b/examples/peekbag-help.pd
@@ -0,0 +1,40 @@
+#N canvas 229 223 555 414 10;
+#X msg 96 243 60 64;
+#X msg 147 243 60 0;
+#X msg 191 243 62 64;
+#X msg 238 243 62 0;
+#X obj 96 370 print;
+#X text 141 371 Output is in the printout window.;
+#X msg 238 289 clear;
+#X text 148 26 - COLLECTION OF NUMBERS;
+#X text 32 94 The bag object takes (value \, flag) pairs. If the flag
+is true (nonzero) \, the value is added to the collection \; if false
+\, it's removed. The collection may have many copies of the same value.
+You can output the collection (and empty it) with a "flush" message
+\, or just empty it with "clear." You can use this to mimic a sustain
+pedal \, for example.;
+#X msg 237 266 flush;
+#X text 287 243 <-- add or delete elements;
+#X text 291 266 <-- output them;
+#X text 293 290 <-- start over;
+#X obj 96 340 peekbag;
+#X obj 65 309 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 86 27 peekbag;
+#X text 81 64 like;
+#X obj 124 64 bag;
+#X text 159 64 but with a bang for taking a peek.;
+#X msg 237 309 aslist;
+#X text 295 311 <-- get elements in a single list.;
+#X text 33 177 Use a "bang" to take a peek at the bag's content without
+clearing it \, use "aslist" to get the bag's elements in a single list.
+;
+#X connect 0 0 13 0;
+#X connect 1 0 13 0;
+#X connect 2 0 13 0;
+#X connect 3 0 13 0;
+#X connect 6 0 13 0;
+#X connect 9 0 13 0;
+#X connect 13 0 4 0;
+#X connect 14 0 13 0;
+#X connect 19 0 13 0;
-- 
cgit v1.2.1