16e744be12
This lets us make run and drive wrappers for the fermi motors on pelican by renaming the SICS run and drive.
55 lines
1.9 KiB
Tcl
55 lines
1.9 KiB
Tcl
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
|
|
|
|
# Required by server_config.tcl
|
|
VarMake Instrument Text Internal
|
|
Instrument platypus
|
|
Instrument lock
|
|
|
|
#START SERVER CONFIGURATION SECTION
|
|
source util/dmc2280/dmc2280_util.tcl
|
|
source sics_ports.tcl
|
|
source server_config.tcl
|
|
MakeDrive
|
|
#END SERVER CONFIGURATION SECTION
|
|
|
|
########################################
|
|
# INSTRUMENT SPECIFIC CONFIGURATION
|
|
|
|
source $cfPath(hipadaba)/hipadaba_configuration.tcl
|
|
fileeval $cfPath(motors)/motor_configuration.tcl
|
|
fileeval $cfPath(motors)/sct_batmotor.tcl
|
|
|
|
|
|
fileeval $cfPath(source)/source.tcl
|
|
fileeval $cfPath(motors)/positmotor_configuration.tcl
|
|
fileeval $cfPath(parameters)/parameters.tcl
|
|
fileeval $cfPath(plc)/plc.tcl
|
|
fileeval $cfPath(counter)/counter.tcl
|
|
fileeval $cfPath(environment)/magneticField/sct_bruker_BEC1.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_lakeshore_336.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_lakeshore_340.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_julabo_lh45.tcl
|
|
fileeval $cfPath(hmm)/hmm_configuration.tcl
|
|
fileeval $cfPath(nexus)/nxscripts.tcl
|
|
fileeval $cfPath(hmm)/detector.tcl
|
|
fileeval $cfPath(scan)/scan.tcl
|
|
fileeval $cfPath(chopper)/chopper.tcl
|
|
fileeval $cfPath(commands)/commands.tcl
|
|
fileeval $cfPath(anticollider)/anticollider.tcl
|
|
fileeval $cfPath(beamline)/polanal.tcl
|
|
source gumxml.tcl
|
|
|
|
::utility::mkVar ::anticollider::protect_detector text manager protect_detector false detector true false
|
|
::anticollider::protect_detector "true"
|
|
|
|
# Driver for Bruker BEC1 power supply (1-Tesla Magnet)
|
|
# driver short-name IP-address MoxaPort Tolerance(Amps)
|
|
#add_bruker_BEC1 ma1 137.157.202.152 4444 0.1
|
|
#add_sct_ls340 tc1 137.157.202.150 4001 "\r" 5.0 5.0
|
|
|
|
server_init
|
|
###########################################
|
|
# WARNING: Do not add any code below server_init, if you do SICS may fail to initialise properly.
|
|
|
|
# You can add extra-configuration code in ../extraconfig.tcl
|