From: Andreas Neiser <neiser@kph.uni-mainz.de>
Date: Fri, 25 Jul 2014 07:12:10 +0000 (+0200)
Subject: Make adc.pl bitbanging aware of $board
X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=c10e377fa4a2a9198b5b25529d4dfe9fe6b6e84f;p=daqtools.git

Make adc.pl bitbanging aware of $board
---

diff --git a/tools/adc.pl b/tools/adc.pl
index 8519ac3..ce05e7b 100755
--- a/tools/adc.pl
+++ b/tools/adc.pl
@@ -60,15 +60,15 @@ sub sendcmd {
 
 sub bitbangtestsequence {
   #power down
-  trb_register_write(0xf30a,0xe080,0x00);
+  trb_register_write($board,0xe080,0x00);
   usleep(200000);
 
   #power on
-  trb_register_write(0xf30a,0xe080,0x01);
+  trb_register_write($board,0xe080,0x01);
   usleep(100000);
 
   #sck and csb high
-  trb_register_write(0xf30a,0xe080,0x51);
+  trb_register_write($board,0xe080,0x51);
   usleep(100000);
 
 
@@ -78,18 +78,18 @@ sub bitbangtestsequence {
   for my $i (@data) {
 
     #csb low
-    trb_register_write(0xf30a,0xe080,0x11);
+    trb_register_write($board,0xe080,0x11);
 
     for my $j (0..23) {
       my $b = ($i>>(23-$j)) & 1;
         $b = $b << 5;
 
-      trb_register_write(0xf30a,0xe080,0x01 | $b);
-      trb_register_write(0xf30a,0xe080,0x11 | $b);
+      trb_register_write($board,0xe080,0x01 | $b);
+      trb_register_write($board,0xe080,0x11 | $b);
       }
 
     #csb high
-    trb_register_write(0xf30a,0xe080,0x51);
+    trb_register_write($board,0xe080,0x51);
 
     }
   }