565267647b
Two extra temperature controllers have been added. r2148 | mle | 2007-09-04 15:46:58 +1000 (Tue, 04 Sep 2007) | 3 lines
70 lines
2.1 KiB
Tcl
70 lines
2.1 KiB
Tcl
# Put extra config info here.
|
|
# Just some examples for now
|
|
bmon_distance -1.0
|
|
Title "precommissioning tests"
|
|
Sample "No Sample"
|
|
# Selected wavelength in Angstroms
|
|
crystal_wavelength_A "0.0"
|
|
crystal_type "Unknown"
|
|
## LAKESHORE
|
|
|
|
#source util/dmc2280/dmc2280_util.tcl
|
|
#First Lakshore340 tempcontroller creation
|
|
MakeRS232Controller sertemp1 127.0.0.1 4001
|
|
sertemp1 timeout 20000
|
|
sertemp1 sendterminator 0xd
|
|
sertemp1 replyterminator 0xd
|
|
EvFactory new tc1 lakeshore340 sertemp1 1 1
|
|
tc1 tolerance 0.2
|
|
tc1 UpperLimit 500
|
|
tc1 LowerLimit 4
|
|
tc1 sensor 3
|
|
tc1 control 3
|
|
#Second Lakshore340 tempcontroller creation
|
|
MakeRS232Controller sertemp2 127.0.0.1 4002
|
|
sertemp2 timeout 20000
|
|
sertemp2 sendterminator 0xd
|
|
sertemp2 replyterminator 0xd
|
|
EvFactory new tc2 lakeshore340 sertemp2 1 1
|
|
tc2 tolerance 0.2
|
|
tc2 UpperLimit 500
|
|
tc2 LowerLimit 4
|
|
tc2 sensor 3
|
|
tc2 control 3
|
|
#First Julabo tempcontroller creation
|
|
MakeRS232Controller sertemp3 127.0.0.1 4003
|
|
sertemp3 timeout 20000
|
|
sertemp3 sendterminator 0xd 0xa
|
|
sertemp3 replyterminator 0xd
|
|
EvFactory new tc3 lh45 sertemp3 1 1
|
|
tc3 tolerance 0.5
|
|
tc3 UpperLimit 110
|
|
tc3 LowerLimit -30
|
|
#Second Julabo tempcontroller creation
|
|
MakeRS232Controller sertemp4 127.0.0.1 4004
|
|
sertemp4 timeout 20000
|
|
sertemp4 sendterminator 0xd 0xa
|
|
sertemp4 replyterminator 0xd
|
|
EvFactory new tc4 lh45 sertemp4 1 1
|
|
tc4 tolerance 0.5
|
|
tc4 UpperLimit 110
|
|
tc4 LowerLimit -30
|
|
|
|
sicslist setatt tc1 long_name tempone
|
|
sicslist setatt tc2 long_name temptwo
|
|
sicslist setatt tc3 long_name tempthree
|
|
sicslist setatt tc4 long_name tempfour
|
|
#END SERVER CONFIGURATION SECTION
|
|
|
|
sicslist setatt tc1 units kelvin
|
|
sicslist setatt tc2 units kelvin
|
|
sicslist setatt tc3 units Celsius
|
|
sicslist setatt tc4 units Celsius
|
|
sicslist setatt tc1 savecmd ::nexus::evcontroller::save
|
|
sicslist setatt tc1 sdsinfo ::nexus::evcontroller::sdsinfo
|
|
sicslist setatt tc2 savecmd ::nexus::evcontroller::save
|
|
sicslist setatt tc2 sdsinfo ::nexus::evcontroller::sdsinfo
|
|
sicslist setatt tc3 savecmd ::nexus::evcontroller::save
|
|
sicslist setatt tc3 sdsinfo ::nexus::evcontroller::sdsinfo
|
|
sicslist setatt tc4 savecmd ::nexus::evcontroller::save
|
|
sicslist setatt tc4 sdsinfo ::nexus::evcontroller::sdsinfo |