From ba4c5729b2ed1513bc45c837adde0050703b4b18 Mon Sep 17 00:00:00 2001
From: "B. Bogart" <bbogart@users.sourceforge.net>
Date: Wed, 1 Apr 2009 16:13:22 +0000
Subject: Added "home" message to centre head.

svn path=/trunk/abstractions/ptz-camera/; revision=10947
---
 dperception-help.pd |  6 +++---
 dperception.pd      | 52 +++++++++++++++++++++++++++++-----------------------
 2 files changed, 32 insertions(+), 26 deletions(-)

diff --git a/dperception-help.pd b/dperception-help.pd
index 7b9afbb..7fa8591 100644
--- a/dperception-help.pd
+++ b/dperception-help.pd
@@ -1,4 +1,4 @@
-#N canvas 0 0 638 970 10;
+#N canvas 0 0 638 540 10;
 #X obj 41 414 dperception 0;
 #X text 20 20 dperception is an abstraction to control directed perception
 pan/tilt units. Requires zexy and comport.;
@@ -16,10 +16,10 @@ pan/tilt units. Requires zexy and comport.;
 #X text 190 236 pan & tilt: 1 to 4000;
 #X msg 174 318 pan -3071 \, tilt -888;
 #X msg 174 345 pan 3071 \, tilt 586;
-#X msg 174 371 pan 0 \, tilt 0;
 #X text 331 372 Centre;
 #X text 331 345 Upper Left;
 #X text 331 318 Lower Right;
+#X msg 174 371 home;
 #X connect 2 0 0 0;
 #X connect 4 0 0 0;
 #X connect 5 0 2 0;
@@ -30,4 +30,4 @@ pan/tilt units. Requires zexy and comport.;
 #X connect 12 0 0 0;
 #X connect 14 0 0 0;
 #X connect 15 0 0 0;
-#X connect 16 0 0 0;
+#X connect 19 0 0 0;
diff --git a/dperception.pd b/dperception.pd
index 6546f1d..d37c8ce 100644
--- a/dperception.pd
+++ b/dperception.pd
@@ -1,4 +1,4 @@
-#N canvas 0 0 638 949 10;
+#N canvas 39 0 638 949 10;
 #X obj 102 418 list append 10;
 #X obj 35 321 list prepend 112 112;
 #X obj 102 442 list trim;
@@ -57,10 +57,10 @@ use with [comport];
 #X connect 21 0 17 0;
 #X restore 35 294 pd int2ascii;
 #X text 28 219 pan: -3071 to 3071;
-#X obj 102 513 sel 42 33;
-#X obj 102 560 print dperception;
-#X msg 102 537 ACK;
-#X msg 132 537 ERROR;
+#X obj 102 553 sel 42 33;
+#X obj 102 600 print dperception;
+#X msg 102 577 ACK;
+#X msg 132 577 ERROR;
 #X obj 23 240 moses -3071;
 #X obj 216 320 list prepend 116 112;
 #N canvas 0 0 638 970 int2ascii 0;
@@ -118,7 +118,6 @@ use with [comport];
 on a PTU-D46 with factory limits.;
 #X obj 102 488 comport \$1 9600;
 #X obj 136 466 inlet;
-#X obj 62 87 route pan tilt panspeed tiltspeed;
 #N canvas 0 0 638 970 int2ascii 0;
 #X obj 64 196 symbol2list symbol;
 #X msg 169 173 symbol;
@@ -228,33 +227,40 @@ use with [comport];
 #X obj 216 269 moses 587;
 #X obj 379 269 moses 4001;
 #X obj 549 270 moses 4001;
+#X obj 102 527 spigot 0;
+#X obj 62 87 route pan tilt panspeed tiltspeed home;
+#X msg 242 113 0;
 #X connect 0 0 2 0;
 #X connect 1 0 0 0;
 #X connect 2 0 3 0;
 #X connect 3 0 20 0;
-#X connect 6 0 22 0;
+#X connect 6 0 36 0;
 #X connect 7 0 1 0;
 #X connect 9 0 11 0;
 #X connect 9 1 12 0;
 #X connect 11 0 10 0;
 #X connect 12 0 10 0;
-#X connect 13 1 32 0;
+#X connect 13 1 31 0;
 #X connect 14 0 0 0;
 #X connect 15 0 14 0;
-#X connect 17 1 33 0;
-#X connect 20 0 9 0;
+#X connect 17 1 32 0;
+#X connect 20 0 35 0;
 #X connect 21 0 20 0;
-#X connect 22 0 13 0;
-#X connect 22 1 17 0;
-#X connect 22 2 30 0;
-#X connect 22 3 31 0;
-#X connect 23 0 24 0;
-#X connect 24 0 0 0;
-#X connect 26 0 28 0;
-#X connect 28 0 0 0;
+#X connect 22 0 23 0;
+#X connect 23 0 0 0;
+#X connect 25 0 27 0;
+#X connect 27 0 0 0;
+#X connect 29 1 33 0;
 #X connect 30 1 34 0;
-#X connect 31 1 35 0;
-#X connect 32 0 7 0;
-#X connect 33 0 15 0;
-#X connect 34 0 26 0;
-#X connect 35 0 23 0;
+#X connect 31 0 7 0;
+#X connect 32 0 15 0;
+#X connect 33 0 25 0;
+#X connect 34 0 22 0;
+#X connect 35 0 9 0;
+#X connect 36 0 13 0;
+#X connect 36 1 17 0;
+#X connect 36 2 29 0;
+#X connect 36 3 30 0;
+#X connect 36 4 37 0;
+#X connect 37 0 7 0;
+#X connect 37 0 15 0;
-- 
cgit v1.2.1