Changeset 182 for trunk/3DEES/UserInterface.tcl

Timestamp:

Jan 17, 2014, 10:18:16 AM (11 years ago)

Author:

demin

Message:

reorder channels

File:

• trunk/3DEES/UserInterface.tcl (modified) (7 diffs)

trunk/3DEES/UserInterface.tcl

@@ -69 +69 @@
     variable cfgThrs
     array set cfgThrs {
-        0  20
-        6  2000
-        1  20
-        7  2000
-        2  20
-        8  200
-        9  2000
-        10 3000
-        3  20
-        11 200
-        12 2000
-        13 3000
-        4  20
-        14 200
-        15 2000
-        16 3000
-        5  20
-        17 200
-        18 2000
-        19 3000
+        0  8
+        6  50
+        1  8
+        7  50
+        2  10
+        8  31
+        9  52
+        10 79
+        3  60
+        11 135
+        12 171
+        13 233
+        4  249
+        14 348
+        15 495
+        16 693
+        5  505
+        17 606
+        18 707
+        19 808
     }
 
@@ -97 +97 @@
     array set inpCodes {
         0 {r}
-        1 {f}
-        2 {d}
-        3 {c}
+        1 {c}
+        2 {a}
+        3 {f}
     }
 
@@ -351 +351 @@
                 set column [expr {$num + 1}]
                 set value $cfgCodes(${ch}_${num})
-                puts "${ch} ${num} ${value}"
                 spinbox ${config(thrs)}.thrs_${value} -from 0 -to 4095 \
                   -increment 10 -width 10 -textvariable [myvar thrs($value)] \
@@ -376 +375 @@
                 set column [expr {$num + 1}]
                 set value $cfgCodes(${ch}_${num})
-                puts "${ch} ${num} ${value}"
                 spinbox ${config(bins)}.thrs_${value} -from 0 -to 4095 \
                   -increment 10 -width 10 -textvariable [myvar thrs($value)] \
@@ -511 +509 @@
         $config(4).chan_0_4 select
         $config(5).chan_0_5 select
-        $config(6).chan_0_1 select
+        $config(6).chan_2_1 select
 
         foreach {ch dummy} [array get adcCodes] {
@@ -564 +562 @@
         grid $config(key).r -row 0 -column 0 -sticky news
 
-        label $config(key).f -text "f - filtered signal"
+        label $config(key).f -text "c - filtered and clipped signal"
         grid $config(key).f -row 0 -column 1 -sticky news
 
-        label $config(key).d -text "d - deconvoluted signal"
+        label $config(key).d -text "a - amplitude"
         grid $config(key).d -row 0 -column 2 -sticky news
 
-        label $config(key).c -text "c - clipped signal"
+        label $config(key).c -text "f - amplitude flag"
         grid $config(key).c -row 0 -column 3 -sticky news
 
@@ -983 +981 @@
 
         ${config}.thrs_check select
-        ${config}.thrs_field set 100
+        ${config}.thrs_field set 30
     }