8d066dec11
The post_count callback should be called when the count ends. quokka_configuration.tcl Added lakeshore 336, qlink, and rheometer configurations. quokka sct_flipper.tcl Report "-1" for fields which return corrupt or invalid readings. quokka environment.tcl Implement histogram memory pre_count and post_count callbacks to record temperature before and after an acquisition. quokka motor_configuration.tcl Set correct max speed for detector motor, ie it is now 53mm/s instead of 40 wombat_configuration.tcl Added lakeshore 336 driver and julabo and qlink. r3034 | ffr | 2010-12-03 11:07:49 +1100 (Fri, 03 Dec 2010) | 17 lines
64 lines
2.2 KiB
Tcl
64 lines
2.2 KiB
Tcl
|
|
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
|
|
|
|
# Required by server_config.tcl
|
|
VarMake Instrument Text Internal
|
|
Instrument wombat
|
|
Instrument lock
|
|
|
|
#START SERVER CONFIGURATION SECTION
|
|
source util/dmc2280/dmc2280_util.tcl
|
|
source sics_ports.tcl
|
|
source server_config.tcl
|
|
#END SERVER CONFIGURATION SECTION
|
|
|
|
########################################
|
|
# INSTRUMENT SPECIFIC CONFIGURATION
|
|
|
|
source $cfPath(hipadaba)/hipadaba_configuration.tcl
|
|
fileeval $cfPath(motors)/motor_configuration.tcl
|
|
fileeval $cfPath(motors)/sct_oscmotor.tcl
|
|
source instrument_vars.tcl
|
|
|
|
fileeval $cfPath(source)/source.tcl
|
|
fileeval $cfPath(motors)/positmotor_configuration.tcl
|
|
fileeval $cfPath(plc)/plc.tcl
|
|
fileeval $cfPath(counter)/counter.tcl
|
|
#TODO Provide method for choosing environment controller
|
|
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(environment)/temperature/sct_qlink.tcl
|
|
fileeval $cfPath(environment)/temperature/west400.tcl
|
|
fileeval $cfPath(hmm)/hmm_configuration.tcl
|
|
fileeval $cfPath(nexus)/nxscripts.tcl
|
|
fileeval $cfPath(scan)/scan.tcl
|
|
fileeval $cfPath(commands)/commands.tcl
|
|
fileeval $cfPath(commands)/pulser.tcl
|
|
fileeval $cfPath(commands)/hvcommands.tcl
|
|
fileeval $cfPath(anticollider)/anticollider.tcl
|
|
fileeval $cfPath(hmm)/hmm_rapid.tcl
|
|
source gumxml.tcl
|
|
|
|
|
|
##########################################################
|
|
# Current driver for Lakeshore temperature controllers #
|
|
##########################################################
|
|
# driverName shortName IP-address port LineTerminator Tolerance1 Tolerance2 optional_Verbose
|
|
add_sct_ls340 tc1 137.157.201.86 4001 "\r" 5.0 5.0
|
|
# add_sct_ls336 tc1 137.157.201.85 7777 "\r\n" 5.0 5.0
|
|
|
|
# add_sct_ls336 tc1 137.157.201.86 7777 "\r\n" 5.0 5.0
|
|
|
|
# The Alice Thing
|
|
# add_qlink qlink 137.157.201.86 4004 5
|
|
# add_sct_ls340 tc1 137.157.201.86 4002 "\r" 5.0 5.0
|
|
# add_lh45 tc2 137.157.201.86 4003 1
|
|
|
|
# ::environment::temperature::add_west400 137.157.201.88
|
|
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
|