From: hadaq <hadaq@hades33.gsi.de>
Date: Mon, 16 Sep 2024 16:09:31 +0000 (+0200)
Subject: fix address lookup
X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=21d17782d6661147590ebb2a97b1b132cf870243;p=hades_mdc_settings.git

fix address lookup
---

diff --git a/scripts/MDC.pm b/scripts/MDC.pm
index 1f1fd57..afa7250 100644
--- a/scripts/MDC.pm
+++ b/scripts/MDC.pm
@@ -41,7 +41,7 @@ sub get_position {
   my $addr = shift @_;
   my ($p,$s,$b,$e);
   
-  if($addr > 0x8000) {
+  if(($addr&0xf000) == 0x8000) {
     $e = 5;
     $b = $addr & 0xf;
     $s = (($addr>>4)&0xf)%6;
@@ -52,7 +52,7 @@ sub get_position {
     $e = $addr & 0x3;
     $b = ($addr>>4) & 0xf;
     $s = (($addr>>8)&0xf)%6;
-    $p = (($addr>>12)==0x01)?0:2;
+    $p = (($addr>>12)&1)?2:0;
     $p += 1 if (($addr>>8)&0xf)>=6;
     }