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

Regenerate SCT drivers

Browse Source
This commit is contained in:
Douglas Clowes
2014-11-13 12:35:46 +11:00
parent 4b9ed0bf7f
commit 3450b4cbf9
42 changed files with 140 additions and 486 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
site_ansto/instrument/config/environment/omron_hldc_sct.tcl
View File

@@ -201,9 +201,7 @@ proc ::scobj::omron_hldc::mkDriver { sct_controller name device_class simulation
sicslist setatt ${name} long_name ${name}
set scobj_hpath /sics/${name}
# Start of unnamed group
# Start of var: distance
hfactory ${scobj_hpath}/distance plain user float
hsetprop ${scobj_hpath}/distance read ${ns}::getValue ${scobj_hpath} read_mm {0201C02030008001}
hsetprop ${scobj_hpath}/distance read_mm ${ns}::read_mm ${scobj_hpath}
@@ -225,7 +223,6 @@ proc ::scobj::omron_hldc::mkDriver { sct_controller name device_class simulation
hsetprop ${scobj_hpath}/distance simulated true
}
# Start of var: id
hfactory ${scobj_hpath}/id plain user text
hsetprop ${scobj_hpath}/id read ${ns}::getValue ${scobj_hpath} read_id {0501}
hsetprop ${scobj_hpath}/id read_id ${ns}::read_id ${scobj_hpath}
@@ -250,7 +247,6 @@ proc ::scobj::omron_hldc::mkDriver { sct_controller name device_class simulation
hsetprop ${scobj_hpath} data "true"
hsetprop ${scobj_hpath} klass "@none"
hsetprop ${scobj_hpath} type "part"
# End of unnamed group
hsetprop ${scobj_hpath} klass ${device_class}
hsetprop ${scobj_hpath} data true
hsetprop ${scobj_hpath} debug_threshold 5
@@ -294,8 +290,8 @@ proc add_omron_hldc {name ip_address tcp_port} {
::scobj::omron_hldc::add_driver ${name} "environment" ${simulation_flag} ${ip_address} ${tcp_port}
}
clientput "file evaluation of sct_omron_hldc.tcl"
::scobj::omron_hldc::sics_log 9 "file evaluation of sct_omron_hldc.tcl"
clientput "file evaluation of omron_hldc_sct.tcl"
::scobj::omron_hldc::sics_log 9 "file evaluation of omron_hldc_sct.tcl"
proc ::scobj::omron_hldc::read_config {} {
set catch_status [ catch {
@@ -367,7 +363,7 @@ proc ::scobj::omron_hldc::read_config {} {
}
makesctcontroller sct_${name} aqadapter ${asyncqueue}
}
${ns}::mkDriver sct_${name} ${device_class} ${simulation_flag} ${ip_address} ${tcp_port}
${ns}::mkDriver sct_${name} ${name} ${device_class} ${simulation_flag} ${ip_address} ${tcp_port}
}
}
}