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

Julabo sct driver to use @@NOREPLY@@

Browse Source
This commit is contained in:
Douglas Clowes
2014-07-15 18:51:43 +10:00
parent acec319ee3
commit fd7d369ea2
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
site_ansto/instrument/config/environment/temperature/julabo_lh45.sct
View File

@@ -94,14 +94,14 @@ driver julabo_lh45_gen = {
# Put a space between command and param
set cmd "${cmd_str} ${par}"
# Hack to get a response
set cmd "${cmd}\r\nversion"
set cmd "${cmd}@@NOREPLY@@"
%%}
code Write_function setValue = {%%
# Put a space between command and param
set cmd "${cmd_str} ${par}"
# Hack to get a response
set cmd "${cmd}\r\nversion"
set cmd "${cmd}@@NOREPLY@@"
%%}
#
# This code is after database creation

4
site_ansto/instrument/config/environment/temperature/sct_julabo_lh45_gen.tcl
View File

@@ -311,7 +311,7 @@ proc ::scobj::julabo_lh45_gen::setPoint {tc_root nextState cmd_str} {
# Put a space between command and param
set cmd "${cmd_str} ${par}"
# Hack to get a response
set cmd "${cmd}\r\nversion"
set cmd "${cmd}@@NOREPLY@@"
# setPoint hook code ends
if { [hpropexists [sct] geterror] } {
debug_log ${tc_root} 9 "[sct] error: [sct geterror]"
@@ -344,7 +344,7 @@ proc ::scobj::julabo_lh45_gen::setValue {tc_root nextState cmd_str} {
# Put a space between command and param
set cmd "${cmd_str} ${par}"
# Hack to get a response
set cmd "${cmd}\r\nversion"
set cmd "${cmd}@@NOREPLY@@"
# setValue hook code ends
if { [hpropexists [sct] geterror] } {
debug_log ${tc_root} 9 "[sct] error: [sct geterror]"