linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Get chopper config from chopper.tcl

Browse Source 
r1469 | ffr | 2007-02-12 16:57:50 +1100 (Mon, 12 Feb 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-02-12 16:57:50 +11:00
committed by Douglas Clowes
parent 96b066502b
commit 8290ec3982
1 changed files with 3 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
site_ansto/instrument/reflectometer/platypus_configuration.tcl
View File

@@ -1,5 +1,5 @@
# $Revision: 1.5 $ # $Revision: 1.6 $
# $Date: 2006-11-09 22:50:42 $ # $Date: 2007-02-12 05:57:50 $
# Author: Ferdi Franceschini (ffr@ansto.gov.au) # Author: Ferdi Franceschini (ffr@ansto.gov.au)
# Last revision by: $Author: ffr $ # Last revision by: $Author: ffr $
@@ -18,23 +18,7 @@ VarMake Instrument Text Internal
Instrument Platypus Instrument Platypus
Instrument lock Instrument lock
# Chopper NCS013 communications fileeval chopper.tcl
set chopper_controller(host) 137.157.202.130
set chopper_controller(port) 10000
set chopper_controller(user) NCS
set chopper_controller(password) NCS013
# CHOPPER
MakeChopper chopperController tcpdocho [params \
host $chopper_controller(host) \
port $chopper_controller(port) \
nchopper 4 \
timeout 30 \
user $chopper_controller(user) \
password $chopper_controller(password) \
]
fileeval motor_configuration.tcl fileeval motor_configuration.tcl
fileeval gen_hipadaba.tcl fileeval gen_hipadaba.tcl
fileeval extraconfig.tcl fileeval extraconfig.tcl