From 863b8cf9aad63acea40ab58d8a73349cbdb82bcb Mon Sep 17 00:00:00 2001
From: Michael Traxler <M.Traxler@gsi.de>
Date: Wed, 22 Oct 2014 15:11:54 +0200
Subject: [PATCH] status, mt

---
 thresholds/thresholds_automatic.pl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/thresholds/thresholds_automatic.pl b/thresholds/thresholds_automatic.pl
index e7d14e5..ff3c8fe 100755
--- a/thresholds/thresholds_automatic.pl
+++ b/thresholds/thresholds_automatic.pl
@@ -30,8 +30,8 @@ my @valid_interval = (0x8000, 0x9000);
 my $interval_step = ($valid_interval[1] - $valid_interval[0])/2;
 my $start_value = int ( ($valid_interval[1] + $valid_interval[0])/2 );
 
-my $sleep_time = 0.2;
-my $accepted_dark_rate = 30;
+my $sleep_time = 1.0;
+my $accepted_dark_rate = 150;
 my $number_of_iterations = 40; # at least 15 are recommended
 
 my $endpoint = 0x0303;
@@ -124,7 +124,7 @@ if (defined $opt_skip && $opt_skip < 15) {
 if ($opt_finetune == true) {
     my $ra_thresh = read_thresholds("padiwa", $chain);
     @current_thresh = @$ra_thresh;
-    #print Dumper \@current_thresh;
+    print Dumper \@current_thresh;
 
     $interval_step = 4;
 
@@ -281,7 +281,7 @@ sub read_thresholds {
     }
 
     $command = $fixed_bits | ($current_channel << 16) ;
-    my $rh_res = send_command($endpoint, $command);
+    my $rh_res = send_command($endpoint, $chain, $command);
     push (@thresh , $rh_res->{$endpoint});
   }
 
-- 
2.43.0