Newport XPS-Q8 - Page 46

XPS-Q8 Tcl Manual
return
}
# Initialize single axis group
set code [catch "GroupInitialize $socketID $SlaveGroup"]
if {$code != 0} {
DisplayErrorAndClose $socketID $code "Single axis
GroupInitialize" $telnetOut
return
}
# Home single axis group
set code [catch "GroupHomeSearch $socketID $SlaveGroup"]
if {$code != 0} {
DisplayErrorAndClose $socketID $code "Single axis
GroupHomeSearch" $telnetOut
return
}
# Kill XY group
set code [catch "GroupKill $socketID $XYGroup"]
if {$code != 0} {
DisplayErrorAndClose $socketID $code "XY GroupKill"
$telnetOut
return
}
# Initialize XY group
set code [catch "GroupInitialize $socketID $XYGroup"]
if {$code != 0} {
DisplayErrorAndClose $socketID $code "XY GroupInitialize"
$telnetOut
return
}
# Home XY group
set code [catch "GroupHomeSearch $socketID $XYGroup"]
if {$code != 0} {
DisplayErrorAndClose $socketID $code "XY GroupHomeSearch"
$telnetOut
return
}
# Set slave (single axis group) with its master
# (positioner from any group : XY here)
set code [catch "SingleAxisSlaveParametersSet $socketID $SlaveGroup
$MasterPositioner $MasterRatio"]
if {$code != 0} {
DisplayErrorAndClose $socketID $code
"SingleAxisSlaveParametersSet" $telnetOut
return
}
# Enable master-slave mode (group must be ready)
set code [catch "SingleAxisSlaveModeEnable $socketID $SlaveGroup"]
if {$code != 0} {
EDH0307En1041 — 10/17
40