Use generic name for scan header.

r1529 | ffr | 2007-02-20 16:06:09 +1100 (Tue, 20 Feb 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-02-20 16:06:09 +11:00
committed by Douglas Clowes
parent b5d26e4560
commit 1d82d1b681
4 changed files with 7 additions and 7 deletions

View File

@ -1,5 +1,5 @@
# $Revision: 1.1 $
# $Date: 2007-02-16 05:43:59 $
# $Revision: 1.2 $
# $Date: 2007-02-20 05:01:44 $
# Author: Mark Lesha (mle@ansto.gov.au)
# Last revision by: $Author: ffr $
@ -161,8 +161,8 @@ MakeHMControl_ANSTO hmc bm hmm
# hmscan run 5 timer 1 (termination controlled by the beam monitor)
# scan2_runb 5 TIME 100 IMMEDIATE (termination controlled by the histogram server)
#
MakeScanCommand hmscan bm $cfPath(scan)/echidna.hdd recover.bin
MakeScanCommand scan2 bm $cfPath(scan)/echidna.hdd recover.bin
MakeScanCommand hmscan bm $cfPath(scan)/scan.hdd recover.bin
MakeScanCommand scan2 bm $cfPath(scan)/scan.hdd recover.bin
#
# Call is: scan2_runa <n>
proc scan2_runa {n} {

View File

@ -1,5 +1,5 @@
namespace eval scanCommand {
#MakeScanCommand escan counter echidna.hdd recover.bin
#MakeScanCommand escan counter scan.hdd recover.bin
variable scanVariable scan_var scanVarStart 0 scanVarStep 1
proc scan_prepare {sobj uobj} {
variable scanVarStart;
@ -119,7 +119,7 @@ proc hdb_hmscan {scanvar scanstart scanincr np mode preset} {
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 function writeheader ::scanCommand::donothing
bmonscan function writepoint ::scanCommand::bm_nxaddpoint

View File

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