- Timestamp:
- Feb 23, 2012, 2:01:29 PM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/MultiChannelUSB/UserInterface.tcl
r165 r167 438 438 my set rate_val(inst) 0.0 439 439 my set rate_val(mean) 0.0 440 441 ${config}.chan_frame.entr_value configure -text 0.0 442 443 ${config}.chan_frame.axisy_value configure -text 0.0 444 ${config}.chan_frame.axisx_value configure -text 0.0 440 445 441 446 # my cntr_reset … … 455 460 $graph grid configure -hide no 456 461 $graph legend configure -hide yes 457 $graph axis configure x -min 0 -max 4096458 462 459 463 set config [frame ${master}.config -width 170] … … 540 544 grid columnconfigure ${config}.chan_frame 1 -weight 1 541 545 542 # enable zooming543 Blt_ZoomStack $graph544 545 546 my crosshairs $graph 546 547 … … 582 583 HstDisplay instproc axis_update args { 583 584 my instvar axis graph 585 $graph axis configure x -min 0 -max 4096 586 Blt_ZoomStack $graph 584 587 if {$axis} { 585 588 $graph axis configure y -min 1 -max 1E10 -logscale yes … … 657 660 658 661 HstDisplay instproc cntr_reset {} { 659 my instvar controller number after_handle660 my instvar cntr_val cntr_bak cntr_old yvec_bak yvec_old 662 my instvar controller config number after_handle 663 my instvar cntr_val cntr_bak cntr_old yvec_bak yvec_old rate_val 661 664 662 665 my cntr_stop … … 672 675 set yvec_old 0.0 673 676 677 set rate_val(inst) 0.0 678 set rate_val(mean) 0.0 679 ${config}.chan_frame.entr_value configure -text 0.0 680 674 681 my acquire 675 682 … … 924 931 my set recs_val 100 925 932 my set recs_bak 100 933 934 ${config}.chan_frame.mean_value configure -text [format {%.2e} 0.0] 935 ${config}.chan_frame.entr_value configure -text 0.0 936 937 ${config}.chan_frame.axisy_value configure -text 0.0 938 ${config}.chan_frame.axisx_value configure -text 0.0 926 939 927 940 # my cntr_reset … … 941 954 $graph grid configure -hide no 942 955 $graph legend configure -hide yes 943 $graph axis configure x -min 0 -max 10000944 956 945 957 set config [frame ${master}.config -width 170] … … 1017 1029 grid columnconfigure ${config}.chan_frame 1 -weight 1 1018 1030 1019 # enable zooming1020 Blt_ZoomStack $graph1021 1022 1031 my crosshairs $graph 1023 1032 … … 1159 1168 ${config}.reset configure -state active 1160 1169 1161 ${config}.start configure -state active1162 1170 ${config}.cntr_field configure -state normal 1163 1171 ${config}.recs_field configure -state normal … … 1253 1261 CntDisplay instproc axis_update args { 1254 1262 my instvar axis graph 1263 $graph axis configure x -min 0 -max 10000 1264 Blt_ZoomStack $graph 1255 1265 if {$axis} { 1256 1266 $graph axis configure y -min 1 -max 1E5 -logscale yes … … 1386 1396 trace add variable [myvar last] write [myproc last_update] 1387 1397 1388 ${config}.chan_frame.chan1_check select 1389 ${config}.chan_frame.chan2_check select 1390 ${config}.chan_frame.chan3_check select 1391 ${config}.chan_frame.chan4_check select 1392 ${config}.chan_frame.chan5_check select 1393 ${config}.chan_frame.chan6_check select 1398 for {set i 1} {$i <= 6} {incr i} { 1399 ${config}.chan_frame.chan${i}_check select 1400 ${config}.chan_frame.chan${i}_value configure -text 0.0 1401 } 1402 ${config}.chan_frame.axisx_value configure -text 0.0 1394 1403 1395 1404 ${config}.thrs_check select
Note:
See TracChangeset
for help on using the changeset viewer.