Call the slit homing routines for controllers 3 and 4

r1095 | ffr | 2006-08-31 16:31:19 +1000 (Thu, 31 Aug 2006) | 2 lines
This commit is contained in:
Ferdi Franceschini
2006-08-31 16:31:19 +10:00
committed by Douglas Clowes
parent 3f02061d09
commit 19f1a18bb8

View File

@@ -1,9 +1,10 @@
# $Revision: 1.11 $ # $Revision: 1.12 $
# $Date: 2006-08-25 05:13:06 $ # $Date: 2006-08-31 06:31:19 $
# Author: Ferdi Franceschini (ffr@ansto.gov.au) # Author: Ferdi Franceschini (ffr@ansto.gov.au)
# Last revision by: $Author: ffr $ # Last revision by: $Author: ffr $
#START SERVER CONFIGURATION SECTION #START SERVER CONFIGURATION SECTION
source common/dmc2280_util.tcl
source server_config.tcl source server_config.tcl
#END SERVER CONFIGURATION SECTION #END SERVER CONFIGURATION SECTION
@@ -61,6 +62,12 @@ set dmc2280_controller3(port) 1034
set dmc2280_controller4(host) 137.157.201.69 set dmc2280_controller4(host) 137.157.201.69
set dmc2280_controller4(port) 1034 set dmc2280_controller4(port) 1034
# Run slit homing routines on controllers 3 and 4
connect dmc2280_controller3
sendCmd $channel(dmc2280_controller3 "XQ#HOME,1")
connect dmc2280_controller4
sendCmd $channel(dmc2280_controller4 "XQ#HOME,1")
#Motor mom DMC2280 [params \ #Motor mom DMC2280 [params \
# host $dmc2280_controller1(host)\ # host $dmc2280_controller1(host)\
# port $dmc2280_controller1(port)\ # port $dmc2280_controller1(port)\