ID : 5066
GetPathPointCount
Function
To return the number of path points at the designated path.
Syntax
GetPathPointCount(path number)
Guaranteed Entry
- Path number
- Designate path number (1 to 20) by integer type data.
Return Value
Return the number of path points at the designated path by integer type data.
Description
Return the number of path points at the designated path.
Related Terms
Free Curve Interpolation, Path Point Registration Function, LoadPathPoint, AddPathPoint, ClrPathPoint, GetPathPoint
Attention
-
Example
#Define Home P(300,0,300,180,0,180,-1)
#Define PartsNum I[10]
#Define BasePathNum 10
Sub Main
Dim PathNum As Integer 'Path data for each part number
Dim Pos As Position
Dim n As Integer
LoadPathPoint BasePathNum 'Initialization (Back to basic path data)
PathNum = Int(PartsNum / 1000) 'Set a path number for the part number (4th digit)
For n = 1 To GetPathPointCount(PathNum)
Pos = GetPathPoint(PathNum, n) 'Load path point data of the part number
AddPathPoint BasePathNum, Pos 'Add path point to the basic path
Next
TakeArm
Move S, BasePathNum, Speed = Mps(150) 'Move the robot by free curve interpolation
Move P, Home
End Sub
ID : 5066