From: ian <ian>
Date: Sun, 11 May 2008 19:59:13 +0000 (+0000)
Subject: get waggler encoding right
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=f960fb7329a844c75302df613eaf6a2b527c4e64;p=trains.git

get waggler encoding right
---

diff --git a/layout/data2safety b/layout/data2safety
index 66b1e0d..c090387 100755
--- a/layout/data2safety
+++ b/layout/data2safety
@@ -328,7 +328,7 @@ sub boob2objnum_waggle {
     # waggle command is      1010 1sss OSS wwwwV
     # so waggler objnum is   sss SS wwww
     $boardnum= (($boardnum & 0x07) << 2) | ($boardnum >> 3);
-    return ($boardnum << ($maxwaggleixln2+1)) | $obj;
+    return ($boardnum << $maxwaggleixln2) | $obj;
 }
 
 sub boob2objnum_pt {