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

Use generic name for scan header.

Browse Source 
r1532 | ffr | 2007-02-20 16:15:49 +1100 (Tue, 20 Feb 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-02-20 16:15:49 +11:00
committed by Douglas Clowes
parent 3ea7556258
commit 8d2488b9de
3 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

0
site_ansto/instrument/hipd/config/scan/wombat.hdd → site_ansto/instrument/hipd/config/scan/scan.hdd
View File

6
site_ansto/instrument/hipd/config/scan/scan.tcl
View File

@ -1,5 +1,5 @@
namespace eval scanCommand { namespace eval scanCommand {
#MakeScanCommand escan counter echidna.hdd recover.bin
variable scanVariable scan_var scanVarStart 0 scanVarStep 1 variable scanVariable scan_var scanVarStart 0 scanVarStep 1
proc scan_prepare {sobj uobj} { proc scan_prepare {sobj uobj} {
variable scanVarStart; variable scanVarStart;
@ -107,7 +107,7 @@ proc hdb_hmscan {scanvar scanstart scanincr np mode preset} {
hmscan clear hmscan clear
hmscan configure script hmscan configure script
hmscan add $scanvar scanstart scanincr hmscan add $scanvar $scanstart $scanincr
set status [catch {hmscan run $np $mode $preset} msg] set status [catch {hmscan run $np $mode $preset} msg]
hmscan configure soft hmscan configure soft
if {$status == 0} { if {$status == 0} {
@ -119,7 +119,7 @@ proc hdb_hmscan {scanvar scanstart scanincr np mode preset} {
publish hdb_hmscan user publish hdb_hmscan user
MakeScanCommand bmonscan bm $cfPath(scan)/echidna.hdd recover.bin MakeScanCommand bmonscan bm $cfPath(scan)/scan.hdd recover.bin
bmonscan configure script bmonscan configure script
bmonscan function writeheader ::scanCommand::donothing bmonscan function writeheader ::scanCommand::donothing
bmonscan function writepoint ::scanCommand::bm_nxaddpoint bmonscan function writepoint ::scanCommand::bm_nxaddpoint

2
site_ansto/instrument/hipd/script_validator/config/hmm/hmm_configuration.tcl
View File

@ -14,7 +14,7 @@ hmm configure Counter counter
hmm configure init 0 hmm configure init 0
hmm init hmm init
MakeScanCommand hmscan bm echidna.hdd recover.bin MakeScanCommand hmscan bm scan.hdd recover.bin
proc hs_prepare {scanobjectname userobjectname} {} proc hs_prepare {scanobjectname userobjectname} {}
proc hs_finish {scanobjectname userobjectname} {} proc hs_finish {scanobjectname userobjectname} {}