Parker Hannifin acr-motion max api users guide Manual Do Utilizador

Página de 22
API Users Guide
API Command Descriptions  -  13
Returns
(Integer) 1 on Success, 0 on Failure
Arguments
Global CurrentAxis as Integer
0 = Axis0 
1=Axis1
2=Axis2
VB Example:
‘ To Jog an Axis Place Code in “
MouseDown
” Event
Private Sub JogPB_MouseDown (Button As Integer, Shift As Integer, X As Single,   Y As Single)
 Ret = AX_JogMinus (CurrentAxis
‘ Jog Axis Minus @ Normal Speed
End Sub
‘ To Stop Jogging Place Code in “
MouseUP
” Event
Private Sub JogPB_MouseUp (Button As Integer, Shift As Integer, X As Single,   Y As Single)
 Ret = AX_JogStop
 
‘ Stops All Jogging/All Axis
End Sub
Ret = AX_JogMinus (CurrentAxis
‘ Jog Axis Minus @ Normal Speed
Ret = AX_JogPlus (CurrentAxis)
‘ Jog Axis Minus @ Normal Speed
Ret = AX_JogMinusFast (CurrentAxis)
‘ Jog Axis Minus @ Fast Speed
Ret = AX_JogPlusFast (CurrentAxis
‘ Jog Axis Minus @ Fast Speed
Ret = AX_JogStop
 
‘ Stops All Jogging
Declaration:
Public Declare Function AX_JogMinus Lib _
"MotionCore.DLL" (ByVal CurrentAxis as Integer) As Integer
Public Declare Function AX_JogPlus Lib _
"MotionCore.DLL" (ByVal CurrentAxis as Integer) As Integer
Public Declare Function AX_JogMinusFast Lib _
"MotionCore.DLL" (ByVal CurrentAxis as Integer) As Integer
Public Declare Function AX_JogPlusFast Lib _
"MotionCore.DLL" (ByVal CurrentAxis as Integer) As Integer
AX_HomeAxis
Description
Calls the 
Homing Subroutines
 located in Prog0 of our AcroBasic Template
Axis0 is at prog0 line 100
Axis1 is at Prog0 line 200
Axis2 is at Prog0 line 300
Returns
(Integer) 1 on Success, 0 on Failure
Arguments
Global CurrentAxis as Integer
0 = Axis0 
1=Axis1
2=Axis2
Declaration
Public Declare Function AX_HomeAxis Lib _
"MotionCore.DLL" (ByVal CurrentAxis as Integer) As Integer"
VB Example:
ret = AX_HomeAxis (CurrentAxis)
‘Home the Selected Axis