Initial configuration.
r1158 | ffr | 2006-10-16 09:50:25 +1000 (Mon, 16 Oct 2006) | 2 lines
This commit is contained in:
Ferdi Franceschini
committed by
Douglas Clowes
Douglas Clowes
parent
075fcaa226
commit
74ad3d225f
167
site_ansto/instrument/qld/hipadaba_koala_configuration.tcl
Normal file
167
site_ansto/instrument/qld/hipadaba_koala_configuration.tcl
Normal file
@@ -0,0 +1,167 @@
|
||||
# $Revision: 1.1 $
|
||||
# $Date: 2006-10-15 23:50:25 $
|
||||
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
|
||||
# Last revision by: $Author: ffr $
|
||||
|
||||
source motParList.tcl
|
||||
#-------------------------------------------------------------------------
|
||||
# Install the SICS Hipadaba
|
||||
#-------------------------------------------------------------------------
|
||||
proc makeHdbMotor {root treename sicsname} {
|
||||
global parList;
|
||||
append motName $root "/" $treename
|
||||
eval hmake $motName spy none
|
||||
eval hmakescript "$motName/position" \"$sicsname\" \"run $sicsname\" float
|
||||
foreach par $parList {
|
||||
set parName [format "%s/%s" $motName $par]
|
||||
eval hmakescript $parName \"$sicsname $par\" \"$sicsname $par\" float
|
||||
}
|
||||
}
|
||||
proc makeHdbVirtMotor {root treename sicsname} {
|
||||
append motName $root "/" $treename
|
||||
eval hmake $motName spy none
|
||||
eval hmakescript "$motName/position" \"$sicsname\" \"run $sicsname\" float
|
||||
}
|
||||
#------------------------------------------------------------------------
|
||||
proc hdbReadOnly {} {
|
||||
error "Parameter is READ ONLY"
|
||||
}
|
||||
#-------------------------------------------------------------------------
|
||||
InstallHdb
|
||||
hmake /slits spy none
|
||||
hmake /slits/1 spy none
|
||||
|
||||
makeHdbMotor /slits/1 ss1u ss1u
|
||||
makeHdbMotor /slits/1 ss1d ss1d
|
||||
makeHdbMotor /slits/1 ss1l ss1l
|
||||
makeHdbMotor /slits/1 ss1r ss1r
|
||||
makeHdbVirtMotor /slits/1 ss1vg ss1vg
|
||||
makeHdbVirtMotor /slits/1 ss1vo ss1vo
|
||||
makeHdbVirtMotor /slits/1 ss1hg ss1hg
|
||||
makeHdbVirtMotor /slits/1 ss1ho ss1ho
|
||||
|
||||
proc xhlist {opt args} {
|
||||
clientput {
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<sdo:datagraph xmlns:hipadaba="http://www.psi.ch/sics/hipadaba" xmlns:sdo="commonj.sdo">
|
||||
<changeSummary xmlns=""/>
|
||||
<hipadaba:Instrument id="koala"
|
||||
label="Koala">
|
||||
<part id="slits" label="Slits System">
|
||||
<part id="1" label="Primary Slit System">
|
||||
<device id="ss1u">
|
||||
<property dataType="Float" id="position" privilege="USER"/>
|
||||
<property dataType="Float" id="accesscode" privilege="USER"/>
|
||||
<property dataType="Float" id="failafter" privilege="USER"/>
|
||||
<property dataType="Float" id="fixed" privilege="USER"/>
|
||||
<property dataType="Float" id="hardlowerlim" privilege="READ_ONLY"/>
|
||||
<property dataType="Float" id="hardupperlim" privilege="READ_ONLY"/>
|
||||
<property dataType="Float" id="ignorefault" privilege="USER"/>
|
||||
<property dataType="Float" id="interruptmode" privilege="USER"/>
|
||||
<property dataType="Float" id="maxretry" privilege="USER"/>
|
||||
<property dataType="Float" id="movecount" privilege="USER"/>
|
||||
<property dataType="Float" id="precision" privilege="USER"/>
|
||||
<property dataType="Float" id="sign" privilege="USER"/>
|
||||
<property dataType="Float" id="softlowerlim" privilege="USER"/>
|
||||
<property dataType="Float" id="softupperlim" privilege="USER"/>
|
||||
<property dataType="Float" id="softzero" privilege="USER"/>
|
||||
<property dataType="Float" id="accel" privilege="USER"/>
|
||||
<property dataType="Float" id="decel" privilege="USER"/>
|
||||
<property dataType="Float" id="home" privilege="MANAGER"/>
|
||||
<property dataType="Float" id="maxaccel"/>
|
||||
<property dataType="Float" id="maxdecel"/>
|
||||
<property dataType="Float" id="maxspeed"/>
|
||||
<property dataType="Float" id="speed" privilege="USER"/>
|
||||
</device>
|
||||
<device id="ss1d">
|
||||
<property dataType="Float" id="position" privilege="USER"/>
|
||||
<property dataType="Float" id="accesscode" privilege="USER"/>
|
||||
<property dataType="Float" id="failafter" privilege="USER"/>
|
||||
<property dataType="Float" id="fixed" privilege="USER"/>
|
||||
<property dataType="Float" id="hardlowerlim" privilege="READ_ONLY"/>
|
||||
<property dataType="Float" id="hardupperlim" privilege="READ_ONLY"/>
|
||||
<property dataType="Float" id="ignorefault" privilege="USER"/>
|
||||
<property dataType="Float" id="interruptmode" privilege="USER"/>
|
||||
<property dataType="Float" id="maxretry" privilege="USER"/>
|
||||
<property dataType="Float" id="movecount" privilege="USER"/>
|
||||
<property dataType="Float" id="precision" privilege="USER"/>
|
||||
<property dataType="Float" id="sign" privilege="USER"/>
|
||||
<property dataType="Float" id="softlowerlim" privilege="USER"/>
|
||||
<property dataType="Float" id="softupperlim" privilege="USER"/>
|
||||
<property dataType="Float" id="softzero" privilege="USER"/>
|
||||
<property dataType="Float" id="accel" privilege="USER"/>
|
||||
<property dataType="Float" id="decel" privilege="USER"/>
|
||||
<property dataType="Float" id="home" privilege="MANAGER"/>
|
||||
<property dataType="Float" id="maxaccel"/>
|
||||
<property dataType="Float" id="maxdecel"/>
|
||||
<property dataType="Float" id="maxspeed"/>
|
||||
<property dataType="Float" id="speed" privilege="USER"/>
|
||||
</device>
|
||||
<device id="ss1l">
|
||||
<property dataType="Float" id="position" privilege="USER"/>
|
||||
<property dataType="Float" id="accesscode" privilege="USER"/>
|
||||
<property dataType="Float" id="failafter" privilege="USER"/>
|
||||
<property dataType="Float" id="fixed" privilege="USER"/>
|
||||
<property dataType="Float" id="hardlowerlim" privilege="READ_ONLY"/>
|
||||
<property dataType="Float" id="hardupperlim" privilege="READ_ONLY"/>
|
||||
<property dataType="Float" id="ignorefault" privilege="USER"/>
|
||||
<property dataType="Float" id="interruptmode" privilege="USER"/>
|
||||
<property dataType="Float" id="maxretry" privilege="USER"/>
|
||||
<property dataType="Float" id="movecount" privilege="USER"/>
|
||||
<property dataType="Float" id="precision" privilege="USER"/>
|
||||
<property dataType="Float" id="sign" privilege="USER"/>
|
||||
<property dataType="Float" id="softlowerlim" privilege="USER"/>
|
||||
<property dataType="Float" id="softupperlim" privilege="USER"/>
|
||||
<property dataType="Float" id="softzero" privilege="USER"/>
|
||||
<property dataType="Float" id="accel" privilege="USER"/>
|
||||
<property dataType="Float" id="decel" privilege="USER"/>
|
||||
<property dataType="Float" id="home" privilege="MANAGER"/>
|
||||
<property dataType="Float" id="maxaccel"/>
|
||||
<property dataType="Float" id="maxdecel"/>
|
||||
<property dataType="Float" id="maxspeed"/>
|
||||
<property dataType="Float" id="speed" privilege="USER"/>
|
||||
</device>
|
||||
<device id="ss1r">
|
||||
<property dataType="Float" id="position" privilege="USER"/>
|
||||
<property dataType="Float" id="accesscode" privilege="USER"/>
|
||||
<property dataType="Float" id="failafter" privilege="USER"/>
|
||||
<property dataType="Float" id="fixed" privilege="USER"/>
|
||||
<property dataType="Float" id="hardlowerlim" privilege="READ_ONLY"/>
|
||||
<property dataType="Float" id="hardupperlim" privilege="READ_ONLY"/>
|
||||
<property dataType="Float" id="ignorefault" privilege="USER"/>
|
||||
<property dataType="Float" id="interruptmode" privilege="USER"/>
|
||||
<property dataType="Float" id="maxretry" privilege="USER"/>
|
||||
<property dataType="Float" id="movecount" privilege="USER"/>
|
||||
<property dataType="Float" id="precision" privilege="USER"/>
|
||||
<property dataType="Float" id="sign" privilege="USER"/>
|
||||
<property dataType="Float" id="softlowerlim" privilege="USER"/>
|
||||
<property dataType="Float" id="softupperlim" privilege="USER"/>
|
||||
<property dataType="Float" id="softzero" privilege="USER"/>
|
||||
<property dataType="Float" id="accel" privilege="USER"/>
|
||||
<property dataType="Float" id="decel" privilege="USER"/>
|
||||
<property dataType="Float" id="home" privilege="MANAGER"/>
|
||||
<property dataType="Float" id="maxaccel"/>
|
||||
<property dataType="Float" id="maxdecel"/>
|
||||
<property dataType="Float" id="maxspeed"/>
|
||||
<property dataType="Float" id="speed" privilege="USER"/>
|
||||
</device>
|
||||
<device id="ss1vg">
|
||||
<property dataType="Float" id="position" privilege="USER"/>
|
||||
</device>
|
||||
<device id="ss1vo" label="">
|
||||
<property dataType="Float" id="position" privilege="USER"/>
|
||||
</device>
|
||||
<device id="ss1hg">
|
||||
<property dataType="Float" id="position" privilege="USER"/>
|
||||
</device>
|
||||
<device id="ss1ho" label="">
|
||||
<property dataType="Float" id="position" privilege="USER"/>
|
||||
</device>
|
||||
</part>
|
||||
</part>
|
||||
</hipadaba:Instrument>
|
||||
</sdo:datagraph>
|
||||
} "value"
|
||||
}
|
||||
publish xhlist spy
|
||||
|
||||
Reference in New Issue
Block a user