ID : 246
AVec
Function
To return approach vector.
Syntax
AVec(homogeneous translation type)
Guaranteed entry
- Homogeneous translation type
- Designate homogeneous translation type data.
Return value
Return approach vector by vector type data.
Description
Approach vector is extracted from homogeneous translation type data.
ReturnValue = AVec( T(X, Y, Z, Ox, Oy, Oz, Ax, Ay, Az, Fig))
'ReturnValue : V(Ax, Ay, Az)
Attention
-
Example
'!TITLE "Acquiring Approach Vector"
' Acquisition of approach vector in the current position
Sub Sample_AVec
Dim aaa As Trans
Dim bbb As Vector
aaa = CurTrn
' Assign approach vector in the current position to bbb
bbb = AVec( aaa )
' Display approach vector in the current position on the message output window
PrintDbg bbb
End Sub
ID : 246