diff --git a/site_ansto/instrument/config/hmm/hmm_configuration_common_1.tcl b/site_ansto/instrument/config/hmm/hmm_configuration_common_1.tcl index b107b3d1..079c3bea 100644 --- a/site_ansto/instrument/config/hmm/hmm_configuration_common_1.tcl +++ b/site_ansto/instrument/config/hmm/hmm_configuration_common_1.tcl @@ -1,5 +1,5 @@ -# $Revision: 1.20 $ -# $Date: 2007-10-31 05:39:00 $ +# $Revision: 1.21 $ +# $Date: 2007-10-31 22:03:54 $ # Author: Ferdi Franceschini # Based on the examples in the hs_test.tcl sample configuration by Mark Lesha. # http://gumtree.ansto.gov.au:9080/nbicms/bragg-systems/histogram-server/hs_test.tcl/view @@ -976,7 +976,7 @@ proc ::histogram_memory::post_count {} {} ## # @brief Choose method for controlling acquisition duration. - proc ::histogram_memory::count_method {text:time,monitor,unlimited,period,count,frame method} { + proc ::histogram_memory::count_method {method} { set modes [list time monitor unlimited period count frame] if {[lsearch $modes $method] == -1} { return -code error "Count mode, $method, must be one of $modes" @@ -990,7 +990,7 @@ proc ::histogram_memory::post_count {} {} # # @param preset: The interpretation of the preset depends on the count method. # @see count_method - proc ::histogram_memory::count_size {float: preset} { + proc ::histogram_memory::count_size {preset} { hmm configure FAT_COUNT_SIZE [expr 100.0 * $preset] hmm init 0 hmm init @@ -999,7 +999,7 @@ proc ::histogram_memory::post_count {} {} # @brief Set stop condition for histogram memory # # @param condition - proc ::histogram_memory::stop_condition {text:immediate,period condition} { + proc ::histogram_memory::stop_condition {condition} { array set count_stop {immediate IMMEDIATE period AT_END_OF_PERIOD} hmm configure FAT_COUNT_STOP $count_stop($condition) hmm init 0