From fe1393869e4f77f5e7b2587d45628892bf97a762 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Fri, 17 Mar 2006 02:00:39 +0000
Subject: started sketch of a fancy audio amp slider with an embedded vu meter
 and a slider that changes color based on the level;  needs some tweaking

svn path=/trunk/externals/hcs/; revision=4715
---
 gui/asl.pd           | 52 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 gui/help/asl-help.pd |  5 +++++
 2 files changed, 57 insertions(+)
 create mode 100644 gui/asl.pd
 create mode 100644 gui/help/asl-help.pd

(limited to 'gui')

diff --git a/gui/asl.pd b/gui/asl.pd
new file mode 100644
index 0000000..ee10add
--- /dev/null
+++ b/gui/asl.pd
@@ -0,0 +1,52 @@
+#N canvas 162 102 438 654 10;
+#X obj 100 102 vsl 20 120 1.12 112 0 0 empty \$0-asl empty 0 -8 0 8
+-124993 -262140 -262140 11900 0;
+#X obj 99 22 inlet;
+#X obj 27 314 outlet;
+#X obj 181 567 send \$0-asl;
+#X obj 178 267 moses 1;
+#X obj 177 430 trigger bang float;
+#X obj 222 287 trigger float bang;
+#X msg 342 430 0;
+#X obj 178 504 rgb->pd 0 0 0;
+#X msg 177 460 0;
+#X msg 15 418 0 0 0;
+#X msg 59 417 1 0 0;
+#X msg 105 416 0 1 0;
+#X msg 22 470 0 0 1;
+#X obj 222 326 * 4;
+#X obj 242 367 -;
+#X msg 242 347 1 \$1;
+#X obj 222 307 - 1;
+#X obj 254 398 mapping/curve 3;
+#X obj 121 103 vu 15 120 empty empty -1 -8 0 8 -66577 -1 1 0;
+#X msg 71 469 1 1 1;
+#X msg 183 536 color \$1 -1.67772e+07 -1.67772e+07;
+#X obj 178 246 / 100;
+#X floatatom 124 283 5 0 0 0 - - -;
+#X connect 0 0 2 0;
+#X connect 0 0 22 0;
+#X connect 1 0 0 0;
+#X connect 4 0 5 0;
+#X connect 4 1 6 0;
+#X connect 5 0 9 0;
+#X connect 5 1 8 1;
+#X connect 6 0 17 0;
+#X connect 6 1 7 0;
+#X connect 7 0 8 2;
+#X connect 8 0 21 0;
+#X connect 9 0 8 0;
+#X connect 10 0 8 0;
+#X connect 11 0 8 0;
+#X connect 12 0 8 0;
+#X connect 13 0 8 0;
+#X connect 14 0 16 0;
+#X connect 14 0 8 0;
+#X connect 15 0 8 1;
+#X connect 16 0 15 0;
+#X connect 17 0 14 0;
+#X connect 20 0 8 0;
+#X connect 21 0 3 0;
+#X connect 22 0 4 0;
+#X connect 22 0 23 0;
+#X coords 0 -1 1 1 37 125 1 100 100;
diff --git a/gui/help/asl-help.pd b/gui/help/asl-help.pd
new file mode 100644
index 0000000..6695880
--- /dev/null
+++ b/gui/help/asl-help.pd
@@ -0,0 +1,5 @@
+#N canvas 642 427 458 308 10;
+#X obj 142 80 asl;
+#X floatatom 269 196 5 0 0 0 - - -;
+#X obj 269 56 asl;
+#X connect 2 0 1 0;
-- 
cgit v1.2.1