linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Regenerate the affected drivers

Browse Source
This commit is contained in:
Douglas Clowes
2014-10-22 16:03:22 +11:00
parent ff260fd737
commit d41e77cc79
20 changed files with 296 additions and 296 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
site_ansto/instrument/bilby/config/motors/shutters_sct.tcl
View File

@@ -222,10 +222,10 @@ proc ::scobj::shutters::mkDriver { sct_controller name device_class simulation_f
if {[string equal -nocase "${simulation_flag}" "false"]} {
${sct_controller} poll ${scobj_hpath}/fast_shutter 1
hsetprop ${scobj_hpath}/%s simulated false
hsetprop ${scobj_hpath}/fast_shutter simulated false
} else {
::scobj::shutters::sics_log 9 "simulation_flag=${simulation_flag} => No poll/write for shutters"
hsetprop ${scobj_hpath}/%s simulated true
hsetprop ${scobj_hpath}/fast_shutter simulated true
}
# Start of var: rough_100
@@ -249,10 +249,10 @@ proc ::scobj::shutters::mkDriver { sct_controller name device_class simulation_f
if {[string equal -nocase "${simulation_flag}" "false"]} {
${sct_controller} poll ${scobj_hpath}/rough_100 1
${sct_controller} write ${scobj_hpath}/rough_100
hsetprop ${scobj_hpath}/%s simulated false
hsetprop ${scobj_hpath}/rough_100 simulated false
} else {
::scobj::shutters::sics_log 9 "simulation_flag=${simulation_flag} => No poll/write for shutters"
hsetprop ${scobj_hpath}/%s simulated true
hsetprop ${scobj_hpath}/rough_100 simulated true
}
# Start of var: rough_40
@@ -276,10 +276,10 @@ proc ::scobj::shutters::mkDriver { sct_controller name device_class simulation_f
if {[string equal -nocase "${simulation_flag}" "false"]} {
${sct_controller} poll ${scobj_hpath}/rough_40 1
${sct_controller} write ${scobj_hpath}/rough_40
hsetprop ${scobj_hpath}/%s simulated false
hsetprop ${scobj_hpath}/rough_40 simulated false
} else {
::scobj::shutters::sics_log 9 "simulation_flag=${simulation_flag} => No poll/write for shutters"
hsetprop ${scobj_hpath}/%s simulated true
hsetprop ${scobj_hpath}/rough_40 simulated true
}
hsetprop ${scobj_hpath} data "true"

20
site_ansto/instrument/bilby/config/motors/tank_sct.tcl
View File

@@ -230,10 +230,10 @@ proc ::scobj::tank::mkDriver { sct_controller name device_class simulation_flag
if {[string equal -nocase "${simulation_flag}" "false"]} {
${sct_controller} poll ${scobj_hpath}/pos 1
hsetprop ${scobj_hpath}/%s simulated false
hsetprop ${scobj_hpath}/pos simulated false
} else {
::scobj::tank::sics_log 9 "simulation_flag=${simulation_flag} => No poll/write for tank"
hsetprop ${scobj_hpath}/%s simulated true
hsetprop ${scobj_hpath}/pos simulated true
}
hsetprop ${scobj_hpath} data "true"
@@ -260,10 +260,10 @@ proc ::scobj::tank::mkDriver { sct_controller name device_class simulation_flag
if {[string equal -nocase "${simulation_flag}" "false"]} {
${sct_controller} poll ${scobj_hpath}/limits/forward 1
hsetprop ${scobj_hpath}/%s simulated false
hsetprop ${scobj_hpath}/limits/forward simulated false
} else {
::scobj::tank::sics_log 9 "simulation_flag=${simulation_flag} => No poll/write for tank"
hsetprop ${scobj_hpath}/%s simulated true
hsetprop ${scobj_hpath}/limits/forward simulated true
}
# Start of var: reverse
@@ -282,10 +282,10 @@ proc ::scobj::tank::mkDriver { sct_controller name device_class simulation_flag
if {[string equal -nocase "${simulation_flag}" "false"]} {
${sct_controller} poll ${scobj_hpath}/limits/reverse 1
hsetprop ${scobj_hpath}/%s simulated false
hsetprop ${scobj_hpath}/limits/reverse simulated false
} else {
::scobj::tank::sics_log 9 "simulation_flag=${simulation_flag} => No poll/write for tank"
hsetprop ${scobj_hpath}/%s simulated true
hsetprop ${scobj_hpath}/limits/reverse simulated true
}
hsetprop ${scobj_hpath}/limits data "true"
hsetprop ${scobj_hpath}/limits klass "@none"
@@ -311,10 +311,10 @@ proc ::scobj::tank::mkDriver { sct_controller name device_class simulation_flag
if {[string equal -nocase "${simulation_flag}" "false"]} {
${sct_controller} poll ${scobj_hpath}/switches/forward 1
hsetprop ${scobj_hpath}/%s simulated false
hsetprop ${scobj_hpath}/switches/forward simulated false
} else {
::scobj::tank::sics_log 9 "simulation_flag=${simulation_flag} => No poll/write for tank"
hsetprop ${scobj_hpath}/%s simulated true
hsetprop ${scobj_hpath}/switches/forward simulated true
}
# Start of var: reverse
@@ -333,10 +333,10 @@ proc ::scobj::tank::mkDriver { sct_controller name device_class simulation_flag
if {[string equal -nocase "${simulation_flag}" "false"]} {
${sct_controller} poll ${scobj_hpath}/switches/reverse 1
hsetprop ${scobj_hpath}/%s simulated false
hsetprop ${scobj_hpath}/switches/reverse simulated false
} else {
::scobj::tank::sics_log 9 "simulation_flag=${simulation_flag} => No poll/write for tank"
hsetprop ${scobj_hpath}/%s simulated true
hsetprop ${scobj_hpath}/switches/reverse simulated true
}
hsetprop ${scobj_hpath}/switches data "true"
hsetprop ${scobj_hpath}/switches klass "@none"