Parker Hannifin acr-motion max api users guide Home Theater Server User Manual


 
10 - API Command Descriptions API Users Guide
AbsReadout (0).Caption = Format(((EncoderArray(0) * Val(Resolution0)) - WorkOffsetsArray(0)), "00.0000")
AbsReadout(1).Caption = Format(((EncoderArray(1) * Val(Resolution1)) - WorkOffsetsArray(1)), "00.0000")
AbsReadout(2).Caption = Format(((EncoderArray(2) * Val(Resolution2)) –
WorkOffsetsArray(2) - CurLength), "00.0000")
AbsReadout(3).Caption = Format(((EncoderArray(3) * Val(Resolution3)) - WorkOffsetsArray(3)), "000.000")
End sub
Declaration: Public Declare Function AX_GetEncoderCounts Lib "MotionCore.DLL" _
(ByRef EncoderArray as Long) As Integer
AX_GetDistanceToGoCoordinates
Description Extract Distance to Go information from DLL in array
Returns (Integer) 1 on Success, 0 on Failure
Arguments Global DTGArray (0 To 8) As Long
VB Example: Ret = AX_GetDistanceToGoCoordinates (DTGArray(0))
Declaration: Public Declare Function AX_GetDistanceToGoCoordinates Lib _
"MotionCore.DLL" (ByRef lDTGArray As Long) As Integer
AX_GetAxisVelocity
Description Extract Master velocity from DLL
Returns (Integer) 1 on Success, 0 on Failure
Arguments Global MasterVel (0 To 8) As Double
VB Example:
Ret = AX_GetAxisVelocity(mastervel(0)) 'Get Master velocity
‘ Display Current Profile Feedrate
FeedsReadout (3). Caption = Format (mastervel (0), "0000.00")
Declaration: Public Declare Function AX_GetAxisVelocity Lib _
"MotionCore.DLL" (ByRef DMasterVel as Double) As Integer
(Bit Functions)
AX_BitOn
Description Turns on any bit except the Inputs
Returns (Integer) 1 on Success, 0 on Failure
Arguments Global BitNum as Integer
VB Example: Call Ax_BitOn (512) ‘set Kill Moves to Card
Declaration: Public Declare Function AX_BitOn Lib _
"MotionCore.DLL" (ByVal BitNum as Integer) As Integer