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

Provide a runscan_reset_position variable so we can make the "runscan" command behaviour instrument specific. It defaults to false, which means that the scan motor position won't be reset on scan finish.

Browse Source 
r2242 | ffr | 2007-11-07 15:51:37 +1100 (Wed, 07 Nov 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-11-07 15:51:37 +11:00
committed by Douglas Clowes
parent b6d7cb5e1b
commit 6c63380822
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
site_ansto/instrument/config/scan/scan_common_1.tcl
View File

@@ -319,10 +319,12 @@ sicslist setatt ::scan::hdb_bmonscan long_name bmonscan
sicslist setatt ::scan::hdb_hmscan long_name hmscan sicslist setatt ::scan::hdb_hmscan long_name hmscan
namespace eval scan { namespace eval scan {
namespace export runscan namespace export runscan
VarMake ::scan::runscan_reset_position Text internal
::scan::runscan_reset_position false
proc runscan {scanvar start stop numpoints mode preset {savetype "save"} } { proc runscan {scanvar start stop numpoints mode preset {savetype "save"} } {
variable save_filetype variable save_filetype
variable reset_position variable reset_position
set reset_position "true" set reset_position [SplitReply [::scan::runscan_reset_position]]
if {[is_drivable $scanvar] == 0} { if {[is_drivable $scanvar] == 0} {
return -code error "The scan variable <$scanvar> must be drivable" return -code error "The scan variable <$scanvar> must be drivable"
} }