This lets us make run and drive wrappers for the fermi motors on pelican by renaming the SICS run and drive.
62 lines
2.2 KiB
Tcl
62 lines
2.2 KiB
Tcl
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
|
|
|
|
# Required by server_config.tcl
|
|
VarMake Instrument Text Internal
|
|
Instrument quokka
|
|
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
|
|
|
|
fileeval $cfPath(motors)/motor_configuration.tcl
|
|
|
|
|
|
fileeval $cfPath(source)/source.tcl
|
|
source $cfPath(hipadaba)/hipadaba_configuration.tcl
|
|
fileeval $cfPath(motors)/positmotor_configuration.tcl
|
|
fileeval $cfPath(velsel)/velsel.tcl
|
|
fileeval $cfPath(parameters)/parameters.tcl
|
|
fileeval $cfPath(plc)/plc.tcl
|
|
fileeval $cfPath(optics)/optics.tcl
|
|
fileeval $cfPath(counter)/counter.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_lakeshore_340.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_lakeshore_336.tcl
|
|
fileeval $cfPath(hmm)/hmm_configuration.tcl
|
|
fileeval $cfPath(nexus)/nxscripts.tcl
|
|
fileeval $cfPath(hmm)/detector.tcl
|
|
fileeval $cfPath(scan)/scan.tcl
|
|
fileeval $cfPath(commands)/commands.tcl
|
|
fileeval $cfPath(anticollider)/anticollider.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_julabo_lh45.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_qlink.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_watlow_st4.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_rvasm2.tcl
|
|
#fileeval $cfPath(environment)/magneticField/sct_oxford_ips.tcl
|
|
fileeval $cfPath(environment)/temperature/sct_oxford_itc.tcl
|
|
fileeval $cfPath(environment)/magneticField/oxford_labview.tcl
|
|
fileeval $cfPath(environment)/magneticField/sct_bruker_BEC1.tcl
|
|
fileeval $cfPath(environment)/environment.tcl
|
|
fileeval $cfPath(environment)/sct_rheometer.tcl
|
|
fileeval $cfPath(environment)/sct_protek_common.tcl
|
|
fileeval $cfPath(beamline)/spin_flipper.tcl
|
|
fileeval $cfPath(commands)/pulser.tcl
|
|
fileeval $cfPath(commands)/hvcommands.tcl
|
|
|
|
source gumxml.tcl
|
|
|
|
::utility::mkVar ::anticollider::protect_detector text manager protect_detector false detector true false
|
|
::anticollider::protect_detector "true"
|
|
|
|
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
|