Topics

1

SmoothStepper USB / Auto zero with ESS not working correctly

« on: April 01, 2018, 07:46:01 AM »

Hi,
I've set my Mill with a ESS and everything is working perfectly, since I'm upgrading everything else I wanted to set up
an auto zero, I have my touch pad set up giving the input light at "digitize" lighting, everything was going great.
But when I added the script to the auto zero button and pressed it the following happens:
1  Press Auto Zero
2  Dwell
3  Zeros Z
4  Moves down
5  Touches plate
6  Stops
7  Moves back to where it had originally zeroed (STEP 3)
8  then retracts to the setting I had asked it to retract to
9  Stops says Z is Zeroed

So this is my problem the starting Zero is usless to me as it could be anywhere

Not know much about basic, here is the script that I got from Gurubrew on youtube which was a great video

CurrentFeed = GetOemDRO(818) 'Get the current feedrate to return to later
CurrentAbsInc = GetOemLED(48) 'Get the current G90/G91 state
CurrentGmode = GetOemDRO(819) 'Get the current G0/G1 state

If GetOemLed (825)=0 Then 'Check to see if the probe is already grounded or faulty
DoOEMButton (1010) 'zero the Z axis so the probe move will start from here
Code "G4 P3" ' this delay gives me time to get from computer to hold probe in place
Code "G90 G31Z-4. F50" 'probing move, can set the feed rate here as well as how far to move
While IsMoving() 'wait while it happens
Wend
ZProbePos = GetVar(2002) 'get the exact point the probe was hit
Code "G0 Z" &ZProbePos 'go back to that point, always a very small amount of overrun
While IsMoving ()
Wend
Call SetDro (2, 1.5) ' change 1.5mm to your plate thickness and then adjust for final accuracy
Sleep 200 'Pause for Dro to update.
Code "G1 Z1. F50" 'put the Z retract height you want here, must be greater than the touch plate thickness
While IsMoving ()
Wend
Code "(Z axis is now zeroed)" 'puts this message in the status bar
Code "F" &CurrentFeed 'Returns to prior feed rate
Else
Code "(Z-Plate is grounded, check connection and try again)" 'this goes in the status bar if applicable
End If
If CurrentAbsInc = 0 Then 'if G91 was in effect before then return to it
Code "G91"
End If
If CurrentGMode = 0 Then 'if G0 was in effect before then return to it
Code "G0"
End If  

I had read on a differant post that the line that starts with "Call setdro (2,1.5) should be a 0 instead of a 2 but that didnt make any differance

Any help would be great
Thanks
Joe