From fa7ab600fffb4f08701af9973fb3345a70e9d0bc Mon Sep 17 00:00:00 2001 From: Christian Pointner Date: Sat, 23 Jul 2011 18:59:59 +0000 Subject: now using A as start sign git-svn-id: https://svn.spreadspace.org/mur.sat@49 7de4ea59-55d0-425e-a1af-a3118ea81d4c --- software/tests/beacon/decode.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'software/tests/beacon/decode.pl') diff --git a/software/tests/beacon/decode.pl b/software/tests/beacon/decode.pl index 17c026d..b2b1446 100755 --- a/software/tests/beacon/decode.pl +++ b/software/tests/beacon/decode.pl @@ -25,7 +25,7 @@ foreach(@beacons) { my $cntval = unpack("n", MIME::Base32::decode($cnt . "=")) >> 1; my $csval_recv = unpack("C", MIME::Base32::decode($checksum . "=")) >> 3; - my $csval_calc = ord('E') - ord(' '); + my $csval_calc = ord('A') - ord(' '); my @values = unpack("C*", $preamble); @values = (@values, unpack("C*", $cnt)); foreach(@values) { $csval_calc ^= $_ - ord(' '); } -- cgit v1.2.3