Auto zero tool script voor Mach 3

[Mercwilly]

Hallo Allemaal,

Is er iemand die het (een) script heeft voor Mach 3, metrisch, voor de auto zero functie van X, Y, en Z voor een freesmachine?
Hopelijk heeft iemand het, of kan hij me zeggen waar ik het zou kunnen vinden.

Groeten,

Willem

[benkr]

Hoe stel je je de werking van zo'n script voor?
Vertel eens wat duidelijker wat je precies wil.

[Hessel Oosten]

Ik vond dit nog:

Hessel

///

Code: Selecteer alles

CurrentFeed = GetOemDRO(818) 'Get the current feedrate to return to later
PlateThickness = GetUserDRO(1151) 'Z-plate thickness DRO

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 P2" ' two second delay
Code "G31 Z-20 F100" 'Z goes down a max of 20mm at 100mm/min
While IsMoving() 'wait while it happens
Wend
ZProbePos = GetVar(2002) 'get the axact 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, PlateThickness) 'set the Z axis DRO to whatever is set as plate thickness
Code "G4 P0.25" 'Pause for Dro to update.
Code "G0 Z6.35" 'retract Z to 6.35mm
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 aplicable
Exit Sub
End If

[benkr]

Dat is alleen voor de Z-as, vandaar mijn vraag aan de TS.

[Hessel Oosten]

Zou misschien het te modificeren of aan te vullen zijn voor andere assen ?

Hessel