Homing via VB

[swarfboy]

Can I control the "bounce off" distance after an axis is homed using VB?
Can I control the homing speed using VB, besides setting the % in the homing and limits dialog?

Currently I am using DoButton(22), DoButton(23), DoButton(24) to home X,Y and Z.

My tool probing at 20mm/min is much more accurate and repeatable then my homing at 400mm/min.
Its either the inductive switches I use for homing or the fact that I home at a higher speed than I probe.
I'd like to be able to home at high speed and then back of the switch and home again at a slow speed and see
if this method improves my problem. I assume there is some sort of latency when homing probing at higher speeds
,if not then I'll try some new switches which are mechanical like my tool probe.

[poppabear]

Yes,

  You can put a custom VB driven homning routing in your home button in screen designer.

scott

[swarfboy]

So I found the parameters for setting speed of homing how bout the bounce off after homing?

SetParam(XRefPer, 40)    ' X 40 % speed for homing
SetParam(YRefPer, 40)    ' Y 40 % speed for homing
SetParam(ZRefPer, 40)     ' Z 40 % speed for homing
SetParam(XHomingBounceOffDistance, 10)  ?
SetParam(YHomingBounceOffDistance, 10)  ?
SetParam(ZHomingBounceOffDistance, 10)  ?

[poppabear]

'you can put this in your Macro pump it will only run right after your ref leds light ups, change the offset value to + or - and the amount:
' leave your first three lines in your ref button for setparam.

'macropump.m1s
Refcount = GetUserDRO(2000)
 
If GetOEMLED(807) and GetOEMLED(808) and GetOEMLED(809) and Refcount=0 Then
Code "X10 Y10 Z10"
SetUserDRO(2000,1)
End If

If GetOEMLed(800) Then
SetUserDRO(2000,0)
End If

'Scott