XPS-Q8 Tcl Manual
after 1000
}
}
# Stop external gathering and save data
set code [catch "GatheringExternalStopAndSave $socketID"]
if {$code != 0} {
DisplayErrorAndClose $socketID $code
"GatheringExternalStopAndSave" $telnetOut
return
}
# Close TCP socket
set code [catch "TCP_CloseSocket $socketID"]
}
This is what gets displayed in a Telnet window for the above example and when the
trigger in receives a signal every second. For details about Telnet connections, see
Section 4 Principle of a Tcl script redirection to a telnet session:
EDH0307En1041 — 10/17
36