Hello Guest it is April 28, 2024, 01:12:26 AM

Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - Ford Prefect

Pages: « 1 2 3 4 5 6 7 »
41
General Mach Discussion / Re: AIRCRAFT PROPELLER
« on: September 17, 2016, 01:04:46 PM »

https://grabcad.com/library/tag/propeller

I have no idea what you need but maybe this will help. :)

42
General Mach Discussion / Re: Help needed v carve to mach3
« on: September 16, 2016, 05:52:55 PM »
is it all the same for all axis?

I am asking because I get confused sometimes, it goes like this

open your tape measure and pull it out for 1/2 a meter and it says 50 but its not 50mm its 500mm,

my guts say check your dimensions in the drawing programme

43
General Mach Discussion / Re: Help needed v carve to mach3
« on: September 16, 2016, 04:11:39 PM »
how much too big? like 10 times?

I suppose you have tuned your machine?

44
General Mach Discussion / Re: using auto tool zero with xbox controller
« on: September 16, 2016, 04:23:17 AM »
I have figured it out last night took me a while, I ended up downloading a pdf called

Mach3 V3.x Programmer Reference Draft v0.11a.pdf at the bottom of page 15

See also:   DoButton(), DoOEMButton()   
Mach3 v3.x VB Programmers Reference Manual 
Page 16
DoOEMButton Sub DoOEMButton(OEMButtonCode As Integer) 
This function allows a macro to execute any on-screen button function which has an assigned Button OEM code.  The specified function is invoked exactly as if the user had clicked the corresponding onscreen button with the mouse.  Note that no actual on-screen button need exist for this function to work.  This is simply an easy means to execute any of the “OEM Button” functions through VB. 
Arguments: OEMButtonCode must be one of the pre-defined Mach3 OEM Button Code constants (see VB Constants), or other value or expression that evaluates to one of those values.
Return Value:  None
Example: ‘ Define OEM codes for Mist On and Mist Off

Dim OEMButtonMistOn As Integer OEMButtonMistOn = 226
Dim OEMButtonMistOff As Integer OEMButtonMistOff = 227
‘ Turn Mist coolant on for 3 seconds
DoOEMButton(OEMButtonMistOn)
Sleep(3000)
DoOEMButton(OEMButtonMistOff)


See also:   DoButton(), DoOEMButton(), DoMenu()



so I figured this was the way to go


------*******------


   rem title DoOEMButton (278) 'feedrate -

   rem Define OEM codes feedrate down

Dim OEMButtonfeedrateDown  As Integer
OEMButtonfeedrateDown = 278

   rem Turn the feedrate down

DoOEMButton(OEMButtonfeedrateDown)
DoOEMButton(OEMButtonfeedrateDown)

------*******------

if you need bigger increments just add more of the last 2 lines

45
General Mach Discussion / Re: using auto tool zero with xbox controller
« on: September 15, 2016, 06:58:53 AM »
got a bit nearer, still doesnt work though

rem code start
DoOEMButton (1014) 'feedrate reset

46
General Mach Discussion / Re: Offsets :)
« on: September 15, 2016, 06:55:55 AM »
or a jack in a box with a boxing glove on a spring that shoots out and bonks you if you do stuff wrong

am I allowed to say bonk anymore its been 35 years since i lived in the UK

47
General Mach Discussion / Re: using auto tool zero with xbox controller
« on: September 14, 2016, 12:50:38 PM »
At present I use the mouse to increase and decrease the feedrate speeds, I wanna use these commands from the XBoxC

I looked up the OEM codes for

feedrate reset = 1014
feedrate +      =277
feedrate -       =278

I will make three files as per documentation
Macro-XBtn1.mls Macro-XBtn2.mls Macro-XBtn3.mls
and assign them to buttons etc on the xbox 360 controller

my question is:-

what do I write in Macro-XBtn1.mls if I want the to "for example" reset the feedrate

regards


48
General Mach Discussion / Re: Setting up tools in tool table
« on: September 12, 2016, 04:17:51 AM »
did you restart mach3 after making changes, its not always neccessary, just a thought

49
General Mach Discussion / Re: Run a macro from a button press??
« on: September 11, 2016, 01:23:06 PM »
I asked the same question last month and used this thread as a way forward, it pertains to useing a xbox 360 controller, I hope it helps

http://www.machsupport.com/forum/index.php/topic,32445.0.html

regards

50
General Mach Discussion / Re: proper edit code for cnc mill touch plate
« on: September 09, 2016, 05:04:45 AM »
Rem Auto Tool Zero Z- Metric Version
DownStroke = -25 'Set the down stroke to find probe
DownFeedRate = 100 'Set the down FeedRate
RetractStroke = 15 'Set the retract Stroke
RetractFeedRate = 300 'Set the retract FeedRate

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
PlateThickness = 20 '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" ' this delay gives me time to get from computer to hold probe in place
Code "G90 G31 Z" &DownStroke &" F" &DownFeedRate 'probing move
While IsMoving() 'wait while it happens
Wend
ZProbePos = GetVar(2002) 'get the axact point the probe was hit
If Abs(ZprobePos) <= Abs(DownStroke)-0.1 Then 'Check if the probe has been found
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 P1" 'Pause for Dro to update.
Code "G1 Z" &PlateThickness + RetractStroke &" F" &RetractFeedRate 'retract
While IsMoving ()
Wend
Code "(Z axis is now zeroed)" 'puts this message in the status bar
Else
Code "G0 Z0" 'retract to start pos
While IsMoving ()
Wend
Code "(Z-Plate not found, check connection or stroke and try again)" 'puts this message in the status bar
End If
Else
Code "(Z-Plate is grounded, check connection and try again)" 'this goes in the status bar if aplicable
End If
Code "F" &CurrentFeed 'Returns to prior feed rate
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
 
...................***********.......................


please look at this video for help

https://www.youtube.com/watch?v=G4DeVa8rzA0

Pages: « 1 2 3 4 5 6 7 »