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