diff --git a/site_ansto/instrument/hrpd/echidna_configuration.tcl b/site_ansto/instrument/hrpd/echidna_configuration.tcl index b87024d6..d97cb42a 100644 --- a/site_ansto/instrument/hrpd/echidna_configuration.tcl +++ b/site_ansto/instrument/hrpd/echidna_configuration.tcl @@ -1,10 +1,14 @@ -# $Revision: 1.1 $ -# $Date: 2006-10-13 06:39:42 $ +# $Revision: 1.2 $ +# $Date: 2006-10-26 00:32:22 $ # Author: Ferdi Franceschini (ffr@ansto.gov.au) # Last revision by: $Author: ffr $ #START SERVER CONFIGURATION SECTION source dmc2280_util.tcl +set quieckport quieck-echidna +set serverport server-echidna +set interruptport interrupt-echidna +set telnetport telnet-echidna source server_config.tcl #END SERVER CONFIGURATION SECTION @@ -45,27 +49,27 @@ Instrument lock #setHomeandRange -motor ephi -home 0 -lowrange 0 -uprange 360 # Setup addresses of Galil DMC2280 controllers. -set dmc2280_controller1(host) 137.157.201.2 -set dmc2280_controller1(port) 1034 +set dmc2280_controller1(host) mc1-echidna +set dmc2280_controller1(port) pmc1-echidna -set dmc2280_controller2(host) 137.157.201.3 -set dmc2280_controller2(port) 1034 +set dmc2280_controller2(host) mc2-echidna +set dmc2280_controller2(port) pmc2-echidna -set dmc2280_controller3(host) 137.157.201.4 -set dmc2280_controller3(port) 1034 +set dmc2280_controller3(host) mc3-echidna +set dmc2280_controller3(port) pmc3-echidna -set dmc2280_controller4(host) 137.157.201.5 -set dmc2280_controller4(port) 1034 +set dmc2280_controller4(host) mc4-echidna +set dmc2280_controller4(port) pmc4-echidna # Run slit homing routines on controllers 3 and 4 -if [catch {dmc_connect dmc2280_controller3} ] { - dmc_sendCmd dmc2280_controller3 "XQ#HOME,1" - dmc_close dmc2280_controller3 -} -if [catch {dmc_connect dmc2280_controller4} ] { - dmc_sendCmd dmc2280_controller4 "XQ#HOME,1" - dmc_close dmc2280_controller4 -} +#if [catch {dmc_connect dmc2280_controller3} ] { +# dmc_sendCmd dmc2280_controller3 "XQ#HOME,1" +# dmc_close dmc2280_controller3 +#} +#if [catch {dmc_connect dmc2280_controller4} ] { +# dmc_sendCmd dmc2280_controller4 "XQ#HOME,1" +# dmc_close dmc2280_controller4 +#} # Monochromator omega, rotate Motor mom DMC2280 [params \