init setup pelican config
r3299 | jgn | 2011-12-01 09:48:44 +1100 (Thu, 01 Dec 2011) | 1 line
This commit is contained in:
committed by
Douglas Clowes
parent
42166b51ac
commit
ec7389b6fd
@@ -88,7 +88,7 @@ proc ::scobj::hv::getParaFunc {} {
|
||||
# @brief Read and record the parameters' values from the HV device
|
||||
proc ::scobj::hv::rdParaStateFunc {basePath} {
|
||||
set replyStr [sct result]
|
||||
broadcast "Reply from hv_get: $replyStr"
|
||||
#broadcast "Reply from hv_get: $replyStr"
|
||||
|
||||
if {[string first "Error" $replyStr] != -1} {
|
||||
broadcast "ERROR: cannot get the current parameters setting from the HV device, check again!"
|
||||
@@ -105,7 +105,7 @@ proc ::scobj::hv::rdParaStateFunc {basePath} {
|
||||
hset $basePath/hv2 $paraArr(hv2)
|
||||
hset $basePath/i2 $paraArr(i2)
|
||||
|
||||
broadcast "HV1:$paraArr(hv1); I1:$paraArr(i1); HV2:$paraArr(hv2); I2:$paraArr(i2)\n"
|
||||
#broadcast "HV1:$paraArr(hv1); I1:$paraArr(i1); HV2:$paraArr(hv2); I2:$paraArr(i2)\n"
|
||||
|
||||
sct utime readtime
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user