# This is the channel Trigger Hold Off register 0x1n74 for {set i 0} {$i < $NumChans} {incr i} { variable Ch$i.TrigHoldOff 0 } proc GetTrigHoldOff {} { variable NumChans for {set i 0} {$i < $NumChans} {incr i} { variable Ch$i.TrigHoldOff set Ch$i.TrigHoldOff [ReadRegister Ch$i.TrigHoldOff] } } proc SetTrigHoldOff {w} { variable NumChans for {set i 0} {$i < $NumChans} {incr i} { if {$w < $NumChans && $w != $i} {continue} variable Ch$i.TrigHoldOff WriteRegister Ch$i.TrigHoldOff [set Ch$i.TrigHoldOff] } } proc SaveTrigHoldOff {} { variable NumChans for {set i 0} {$i < $NumChans} {incr i} { DBSetValue Ch$i.TrigHoldOff [ReadRegister Ch$i.TrigHoldOff] } } proc RestTrigHoldOff {} { variable NumChans for {set i 0} {$i < $NumChans} {incr i} { variable Ch$i.TrigHoldOff set Ch$i.TrigHoldOff [DBGetValue Ch$i.TrigHoldOff] WriteRegister Ch$i.TrigHoldOff [DBGetValue Ch$i.TrigHoldOff] } } proc DrawTrigHoldOff {} { variable NumChans variable Name set html "" append html "
" append html "
| Channel | " append html "Channel n Trigger Hold Off (1730)8ns step; (1725 16ns step) | " append html "
| $i | " append html "" append html " |