Machsupport Forum

Mach Discussion => VB and the development of wizards => Topic started by: JimInWoodstock on April 19, 2013, 11:11:17 AM

Title: Using laser pointer to set x/y origin
Post by: JimInWoodstock on April 19, 2013, 11:11:17 AM

I am sure that this has been covered (probably many times) in the forum, but I can't locate what I need.

I want to use a laser pointer bolted to the carriage to set the x-y origin.

So the steps would be

Manually position the laser dot to the desired point on the part with the jog controls.
Add a button to do the following:
Move the carriage some predetermined amount (distance between the laser dot and the cutter center).
Zero the x and y dro.

I am sure that this is trivial, but I don't have very much expertise in VB.
Thanks

Title: Re: Using laser pointer to set x/y origin
Post by: Overloaded on April 19, 2013, 02:06:27 PM

Check this out ..............

http://www.machsupport.com/forum/index.php/topic,5762.msg38609.html#msg38609

might help,
Russ

Title: Re: Using laser pointer to set x/y origin
Post by: ger21 on April 19, 2013, 10:14:56 PM

Or do this, which sets the zero position, but doesn't actually move it to zero. Just use the appropriate X and Y offsets.

XOffset = 3.43   'X offset from laser crosshair to spindle
YOffset = 4.322   'Y offset from laser crosshair to spindle


SetOEMDRO(800,XOffset)
SetOEMDRO(801,YOffset)

Sleep(125)