Generated sct tcl drivers from sct templates.

This commit is contained in:
Ferdi Franceschini
2014-08-06 10:59:14 +10:00
parent 18c862a609
commit 639e4dc3c8
31 changed files with 426 additions and 131 deletions

View File

@@ -387,25 +387,34 @@ proc ::scobj::pfeiffer_hg::mkDriver { sct_controller name } {
hfactory ${scobj_hpath}/status plain user int
hsetprop ${scobj_hpath}/status control true
hsetprop ${scobj_hpath}/status data true
hsetprop ${scobj_hpath}/status mutable false
hsetprop ${scobj_hpath}/status mutable true
hsetprop ${scobj_hpath}/status nxsave true
hsetprop ${scobj_hpath}/status oldval 0
hsetprop ${scobj_hpath}/status klass "parameter"
hsetprop ${scobj_hpath}/status sdsinfo "::nexus::scobj::sdsinfo"
hsetprop ${scobj_hpath}/status type "part"
hsetprop ${scobj_hpath}/status nxalias "${name}_status"
hsetprop ${scobj_hpath} data "true"
hsetprop ${scobj_hpath} klass "@none"
hsetprop ${scobj_hpath} type "part"
hfactory ${scobj_hpath}/pressure plain spy none
hsetprop ${scobj_hpath}/pressure data "true"
hsetprop ${scobj_hpath}/pressure klass "@none"
hsetprop ${scobj_hpath}/pressure type "part"
hfactory ${scobj_hpath}/pressure/sensor plain user float
hsetprop ${scobj_hpath}/pressure/sensor read ${ns}::sendPR1 ${scobj_hpath} readPR1 {PR1}
hsetprop ${scobj_hpath}/pressure/sensor readPR1 ${ns}::readPR1 ${scobj_hpath}
hsetprop ${scobj_hpath}/pressure/sensor control true
hsetprop ${scobj_hpath}/pressure/sensor data true
hsetprop ${scobj_hpath}/pressure/sensor mutable false
hsetprop ${scobj_hpath}/pressure/sensor mutable true
hsetprop ${scobj_hpath}/pressure/sensor nxsave true
hsetprop ${scobj_hpath}/pressure/sensor permlink data_set "P${permlink_device_number}S01"
hsetprop ${scobj_hpath}/pressure/sensor @description "P${permlink_device_number}S01"
hsetprop ${scobj_hpath}/pressure/sensor oldval 0.0
hsetprop ${scobj_hpath}/pressure/sensor klass "parameter"
hsetprop ${scobj_hpath}/pressure/sensor pid_control "/sample/tc9/Valve/Setpoint"
hsetprop ${scobj_hpath}/pressure/sensor pid_deriv "0"
hsetprop ${scobj_hpath}/pressure/sensor pid_dvalue "0.0"
@@ -430,7 +439,7 @@ proc ::scobj::pfeiffer_hg::mkDriver { sct_controller name } {
hsetprop ${scobj_hpath}/pressure/setpoint driveable pressure/sensor
hsetprop ${scobj_hpath}/pressure/setpoint control true
hsetprop ${scobj_hpath}/pressure/setpoint data true
hsetprop ${scobj_hpath}/pressure/setpoint mutable false
hsetprop ${scobj_hpath}/pressure/setpoint mutable true
hsetprop ${scobj_hpath}/pressure/setpoint nxsave true
hsetprop ${scobj_hpath}/pressure/setpoint lowerlimit 0
hsetprop ${scobj_hpath}/pressure/setpoint upperlimit 1000
@@ -438,6 +447,7 @@ proc ::scobj::pfeiffer_hg::mkDriver { sct_controller name } {
hsetprop ${scobj_hpath}/pressure/setpoint permlink data_set "P${permlink_device_number}SP01"
hsetprop ${scobj_hpath}/pressure/setpoint @description "P${permlink_device_number}SP01"
hsetprop ${scobj_hpath}/pressure/setpoint oldval 0.0
hsetprop ${scobj_hpath}/pressure/setpoint klass "parameter"
hsetprop ${scobj_hpath}/pressure/setpoint sdsinfo "::nexus::scobj::sdsinfo"
hsetprop ${scobj_hpath}/pressure/setpoint settle_time "90"
hsetprop ${scobj_hpath}/pressure/setpoint type "drivable"
@@ -450,6 +460,7 @@ proc ::scobj::pfeiffer_hg::mkDriver { sct_controller name } {
::scobj::pfeiffer_hg::sics_log 9 "[environment_simulation] => No poll/write for pfeiffer_hg"
}
hsetprop ${scobj_hpath} klass environment
hsetprop ${scobj_hpath} data true
hsetprop ${scobj_hpath} debug_threshold 5
if {[string equal -nocase [SplitReply [environment_simulation]] "false"]} {
ansto_makesctdrive ${name}_pressure_setpoint ${scobj_hpath}/pressure/setpoint ${scobj_hpath}/pressure/sensor ${sct_controller}