TCP Speed Output Sample Program

This section shows sample programs that starts or stops the TCP speed output.

Starting TCP Speed Output

This is an example of the starting program for analog output of PORT#0 and PORT#1.

Start output by specifying 250.0 m/s as a maximum speed.

!TITLE "OutputTCPSpeed_Start.pcs"

Sub Main

	Dim lPort As long
	Dim dMaxVelocity As Double

	'TakeArm Keep = 0

	dMaxVelocity = 250.0

	'PORT#0 Start analog output
	lPort = 0
	OutputTCPSpeed lPort, dMaxVelocity

	'PORT#1 Start analog output
	lPort = 1
	OutputTCPSpeed lPort, dMaxVelocity

	'GiveArm

End Sub

Stopping TCP Speed Output

This is an example of the stopping program for analog output of PORT#0 and PORT#1.

Stop output by specifying 0 as a maximum speed.

'!TITLE "OutputTCPSpeed_Stop.pcs"	

Sub Main	

	Dim lPort As long
	Dim dMaxVelocity As Double

	'TakeArm Keep = 0

	dMaxVelocity = 0.0

	'PORT#0 Stop analog output
	lPort = 0
	OutputTCPSpeed lPort, dMaxVelocity

	'PORT#1 Stop analog output
	lPort = 1
	OutputTCPSpeed lPort, dMaxVelocity

	'GiveArm

End Sub