Welcome, Guest. Please login or register.
Did you miss your activation email?
October 21, 2018, 06:59:20 PM

Login with username, password and session length
Search:     Advanced search
* Home Help Search Calendar Links Login Register
+  Machsupport Forum
|-+  Support
| |-+  Members Docs
| | |-+  Simple touch off plate drawing
Pages: 1   Go Down
Author Topic: Simple touch off plate drawing  (Read 8166 times)
0 Members and 1 Guest are viewing this topic.
South Carolina, US
Offline Offline

Posts: 5,419

Precision Chaos

View Profile WWW
« on: January 04, 2009, 12:48:28 PM »

This is a drawing of a simple touch plate with instructions on how to set up Mach. I have posted the macro I use to take advantage of it as well as a couple of screen shots to help I hope. The script could be enhanced a little with a sleep command and also to check to see if the z is less than 0 but it works pretty well as is. The Auto Tool Zero button is one I added in screen 4. (This is a much nicer screen editor than screen 4 that Klauss has done an amazing job with.  Go here to watch the videos and download MachScreen). http://www.kd-dietz.com/klausphp/pages/eng/machscreen/description/ms_description.html# It is a VB button and you can just paste the code into it with Mach up, go to the operator tab, edit button script. The button will begin to blink. Now click on the button, paste the code in, save and then close the editor. If everything else is right your auto touch off routine should work now.

The blue LED beside the button is one I added to make sure if I touch my plate to my tool that Mach will see it. This is not necessary but I think this is important because a broken wire or bad connection has the potential to crash your z axis, break your tool, etc.

Please note, there are a lot of better macros floating around for this.  2/4/13  

 'Auto touch off macro

CurrentFeed = GetOemDRO(818) 'Get the current feedrate.
PlateThickness =0.059
ProbeFeed = 5

Code "G90 F" &ProbeFeed

If GetOemLed (825)=0 Then
Code "G4 P2" 'Time to get to the z-plate
Code "G31Z-5 F" &ProbeFeed
While IsMoving()
Code "G4 P0.25"
ZProbePos = GetVar(2002)
Code "G0 Z" &ZProbePos
While IsMoving ()
Call SetDro (2, PlateThickness)
Code "G4 P0.5" 'Pause for Dro to update.
Code "G0 Z0.25" 'Change the Z retract height here
Code "(Z axis is now zeroed)"
Code "F" &CurrentFeed
Code "(Z-Plate is grounded, check connection and try again)"
Exit Sub
End If    


* OFFICE_2009-01-04ScreenHunter__12.47.451.jpg (115.51 KB, 1071x662 - viewed 2083 times.)

* OFFICE_2009-01-04ScreenHunter__13.03.102.jpg (65.88 KB, 717x425 - viewed 1539 times.)

* OFFICE_2009-01-04ScreenHunter__13.03.303.jpg (30.03 KB, 338x345 - viewed 1539 times.)
* Auto_touch_off.txt (0.59 KB - downloaded 917 times.)
« Last Edit: January 30, 2014, 03:36:39 PM by Chaoticone » Logged

Grin If you could see the things I have in my head, you would be laughing too. Grin
My guard dog is not what you need to worry about!
Pages: 1   Go Up
Jump to:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.20 | SMF © 2013, Simple Machines Valid XHTML 1.0! Valid CSS!