Surfacing Macro

chimaeragh

I tested this macro today. Works nicely, had to edit some parameters for my Ooznest touchprobe input. Thanks a lot

; Adjust probe for low speed probing
M558 K0 P8 C"!e0stop" H20 F120 T300					; Z probe number - Z probe switch type - probe recovery 1s probe speed and travel speed

sinned6915

@cthulhulabs i like this macro! I am trying ot use it by I am encountering a couple of hiccups. I know this is an older thread, but I am hoping you might see this reply.

Are you using a PanelDue in conjunction with your machine?
Where/how are you controlling your spindle?
I am getting funny outputs with the move command prompts on PanelDue. I get the first one for probing Z. but not for any of the other ones. M291 Syntax looks correct. I am trying to get a PC near the machine to see what the console looks like.

M291 P"Insert your surfacing bit into your spindle and position it above the probe plate" R"Probing" S3 X1 Y1 Z1
 
; Set bit above center of probe
G91																			; relative positioning
 
; Probe Z component
G38.2 Z{move.axes[2].userPosition - (var.ProbeThickness + 2.25)}			; seek until the probe circuit is closed Z-axis 25 mm
G0 Z{var.ZClearanceHeight}													; rapid move Z axis 5 mm
 
G10 P1 L{var.CoordSystem} Z{var.ProbeThickness + var.ZClearanceHeight}		; store relative probe offset for coordinates system 1
 
G90																			; Absolute positioning
 
M291 P"Move to the starting X Y position for surfacing" R"Start Position" S3 X1 Y1 Z0
set var.StartX = move.axes[0].userPosition;
set var.StartY = move.axes[1].userPosition;

if var.Debug
	M118 P0 S{"StartX = " ^ var.StartX} L2
	M118 P0 S{"StartY = " ^ var.StartY} L2
 
M291 P"Move to the ending X Y position for surfacing" R"End Position" S3 X1 Y1 Z0
set var.EndX = move.axes[0].userPosition;
set var.EndY = move.axes[1].userPosition;

How or where are you turning your spindle on? As mine is controlled through RRF, I need to insert the tokens to turn off/on. I am thjnking before and after the while loop?

T1 

G90
M03 S5000
G04 S1
G0 X0.0000 Y0.0000 Z3.0000

; Begin surfacing loop
while true

...
...
	M291 P"Surface another layer?" S3 X0 Y0 Z0	; then prompt the user if they want to do another layer

M03 S3500          ; ramp spindle speed down
G04 S1
M03 S1500
G04 S1
M05
G04 S1
G90
G0 X0.0000 Y0.0000 Z3.0000

chimaeragh

@sinned6915 I have modified the macro for an Ooznest Workbee with their latest Firmware (RRF3.3). M3 starts the router and M5 stops it.

; Constants
var Debug = false;
var ProbeThickness = 5;
var CoordSystem	= 20;
var StepOver = 10;
var DepthOfCut = 0.2;
var FeedRate = 8000;
var ZClearanceHeight = 25;

; Variables
var StartX = 0;			; The X starting position
var StartY = 0;			; The Y starting position
var EndX = 0;			; The X ending position
var EndY = 0;			; The Y ending position
var YDir = 0;			; The direction to go in Y
var YDist = 0;			; The distance to go in Y
var YPos = 0;			; The position in Y to move to
var YDistLeft = 0;		; How much we have left to move in Y
var ZDepth = 0;			; How far down we should be in Z
var XSorE = "End"		; Whether X should move towards the start or the end position

; If the printer hasn't been homed, home it
if !move.axes[0].homed || !move.axes[1].homed || !move.axes[2].homed
   G28

; Adjust probe for low speed probing
M558 K0 P8 C"!e0stop" H20 F120 T300					; Z probe number - Z probe switch type - probe recovery 1s probe speed and travel speed
G31 K0 P500 X0 Y0 Z0								; Set trigger value - set offset and trigger height - Z probe number

M291 P"Insert your surfacing bit into your spindle and position it above the probe plate" R"Probing" S3 X1 Y1 Z1

; Set bit above center of probe
G91	; relative positioning

; Probe Z component
G38.2 Z{move.axes[2].userPosition - (var.ProbeThickness + 2.25)}			; seek until the probe circuit is closed Z-axis 25 mm
G0 Z{var.ZClearanceHeight}													; rapid move Z axis 5 mm

G10 P1 L{var.CoordSystem} Z{var.ProbeThickness + var.ZClearanceHeight}		; store relative probe offset for coordinates system 1

G90	; Absolute positioning

M291 P"Move to the starting X Y position for surfacing" R"Start Position" S3 X1 Y1 Z0
set var.StartX = move.axes[0].userPosition;
set var.StartY = move.axes[1].userPosition;

if var.Debug
   M118 P0 S{"StartX = " ^ var.StartX} L2
   M118 P0 S{"StartY = " ^ var.StartY} L2

M291 P"Move to the ending X Y position for surfacing" R"End Position" S3 X1 Y1 Z0
set var.EndX = move.axes[0].userPosition;
set var.EndY = move.axes[1].userPosition;

if var.Debug
   M118 P0 S{"EndX = " ^ var.EndX} L2
   M118 P0 S{"EndY = " ^ var.EndY} L2

M291 P"Are you ready to begin surfacing?" S3 X0 Y0 Z0


; Figure out which direction in Y we are going
if var.EndY < var.StartY
   set var.YDir = -1;
elif var.EndY > var.StartY
   set var.YDir = 1;
else
   set var.YDir = 0;

if var.Debug
   M118 P0 S{"YDir = " ^ var.YDir} L2


set var.YDist = {abs(var.StartY - var.EndY)};
if var.Debug
   M118 P0 S{"YDist = " ^ var.YDist} L2

; Begin surfacing loop
while true
   if var.Debug
   	M118 P0 S"Begin Layer Loop" L2;

   set var.ZDepth = {var.ZDepth - var.DepthOfCut};
   set var.YDistLeft = {var.YDist};

   ; go to the start X and Y position then down to Z Depth
   if var.Debug
   	M118 P0 S{"Move to start X" ^ var.StartX ^ ",Y" ^ var.StartY} L2
   T1
   M3 S17500 ;M42 P1 S1
   G0 X{var.StartX} Y{var.StartY}
   if var.Debug
   	M118 P0 S{"Move to start Z" ^ var.ZDepth} L2
   G1 Z{var.ZDepth}

   ; we should be at the Start X position so move to the End X position
   if var.Debug
   	M118 P0 S{"Move to X" ^ var.EndX} L2
   G1 X{var.EndX} F{var.FeedRate}
   set var.XSorE = "Start"

   while var.YDistLeft > var.StepOver
   	if var.Debug
   		M118 P0 S"Begin Y Loop" L2

   	; move in Y by StepOver
   	set var.YPos = {move.axes[1].userPosition + (var.StepOver * var.YDir)}
   	if var.Debug
   		M118 P0 S{"Move to Y" ^ var.YPos} L2
   	G1 Y{var.YPos} F{var.FeedRate}
   	set var.YDistLeft = {var.YDistLeft - var.StepOver}

   	if var.XSorE == "Start"
   		; move X to the start position
   		if var.Debug
   			M118 P0 S{"Move to X" ^ var.StartX} L2
   		G1 X{var.StartX} F{var.FeedRate}
   		set var.XSorE = "End"
   	else
   		; move X to the end position
   		if var.Debug
   			M118 P0 S{"Move to X" ^ var.EndX} L2
   		G1 X{var.EndX} F{var.FeedRate}
   		set var.XSorE = "Start"

   ; move in Y the rest of the distance left
   set var.YPos = {move.axes[1].userPosition + (var.YDistLeft * var.YDir)}
   if var.Debug
   	M118 P0 S{"Move to Y" ^ var.YPos} L2
   G1 Y{var.YPos} F{var.FeedRate}

   ; one last move in X
   if var.XSorE == "Start"
   	; move X to the start position
   	if var.Debug
   		M118 P0 S{"Move to X" ^ var.StartX} L2
   	G1 X{var.StartX} F{var.FeedRate}
   	set var.XSorE = "End"
   else
   	; move X to the end position
   	if var.Debug
   		M118 P0 S{"Move to X" ^ var.EndX} L2
   	G1 X{var.EndX} F{var.FeedRate}
   	set var.XSorE = "Start"

   G0 Z{var.ZClearanceHeight}					; get out of the way
   M400										; wait for the movement buffer to catch up
   M5 ;M42 P1 S0
   M291 P"Surface another layer?" S3 X0 Y0 Z0	; then prompt the user if they want to do another layer

sinned6915

@chimaeragh thank you. i am downloading now and will try it again.

chimaeragh

@sinned6915 Line 89 selects the tool (T1). If your spindle is set to tool 0 (T0) change it accordingly. Line 90 sends the M3 command to start the spindle.

CthulhuLabs

@sinned6915 sorry for the late reply. Have not been on this forum for a while. No I am not using a PanelDue. I am using a Pi with an HDMI touch screen monitor. As for spindle I am using a Brushless Dewalt Trim Router with the ESC replaced with an ODrive. It currently requires running commands from odrivetool on the Pi.

@chimaeragh what all did you change in your version? I just upgraded to an ODrive Pro and can finally use an ADC input to control my spindle.

chimaeragh

@cthulhulabs My DeWalt is configured as a spindle and is automated via a relay. So I can use M3 to start it and M5 to stop it. (Already modified my Vectric postprocessor for this)
I added M3 and M5 commands into the surfacing loop at line 89 and line 148 of the macro.

T1 ; selects the spindle Tool 1

M3 S17500 ; starts tool

CthulhuLabs

@chimaeragh Cool. There is a variable at the top for the spindle RPMs. Now that my spindle RPM can be controlled by the Duet I plan to add it. You should probably use that in your M3 command.

I am thinking of rewriting this Macro to only cut in one direction to give a more uniform surface finish. Basically cut from Left to Right, raise up, rapid to the next cut, lower and repeat. There would be a flag in it to change it between Left to Right and Right to Left. Might also add a flag to go from top to bottom or bottom to top.

nikki-m

@CthulhuLabs I use your surfacing.g code on a regular basis. Love it.
But is there any way to modify it so that the Depth of Cut could be adjusted by user input?

It would be nice to be able to enter a different value each time I use this macro, without having to edit the code. It would be even nicer if the DOC could be modified on each susbequent pass ("run again"). Perhaps also to limit the input value to between 0.1mm and 3.0mm?

HebigT

@nikki-m

I know you can pass parameters to a macro in the macro call itself (e.g. depth of pass)

Manually choosing this value on each run of the macro may be possible now using M291 on 3.5 beta firmware.

nikki-m

@HebigT Yes, I did look into the M291 function, but sadly, I am still on the v3.3 (awaiting any update from Ooznest)!!
Does this mean that there is no other way to program in a variable DOC? Apart from setting up numerous versions of the macro, each with a different value for the doc?

HebigT

@nikki-m

With 3.3 you should still be able to pass a parameter in the macro call. You’ll just have to modify the macro (hopefully only once!) to assign that parameter to the DOC variable (e.g. var DepthOfCut= {param.y} )
It’ll still be a manual process of entering the parameter each time you start the macro, but it should save you the trouble of having to change the DOC variable within the macro each time.

See the macro parameter section at this link:

https://docs.duet3d.com/User_manual/Reference/Gcode_meta_commands

nikki-m

@HebigT @HebigT I'm not sure I understand what you are saying here.
Is there an actual command (and presumably through a screen interaction) in v3. 3 which allows a user to type in and enter a value, and to then assign this value to an existing variable?

I still cannot find any means of entering an external value. I am still having to resort to having multiple versions of this macro, each wirh different values for doc.

OwenD

@nikki-m
For RRF 3.3 and later you can pass parameters using M98
So you can call your macro using M98 P"mymacro.g" Y0.002
and in the macro you access the parameter using param
e.g.

var depthOfCut = 0.001
if exists(param.Y)
    set var.depthOfCut = param.Y

Nightowl

I'm not sure if I'm being a bit too simplistic here, but this is what I do, after producing the GCode toolpath for surfacing, usually with a 0.15mm depth of cut, or sometimes more...

Run the toolpath. Once complete, if there are still low spots, lower the spindle/motor to Z0, then lower it again to the toolpath's cut depth (0.15mm), reset Z0 and rerun the toolpath.

Continue as necessary, but as you get closer to 'flat', you could reduce the 0.15mm accordingly.

o_lampe

@OwenD
Isn't there a way to start the macro by doubleclicking and ask for the DOC-value from within the macro?

OwenD

@o_lampe
Not unless you update to RRF version 3.5.0b1
Then you can ask for input use M291 as mentioned above

nikki-m

Thank for all your ideas, guys. I does seem that I can't achieve what I want whilst on v3.3.

So I am in the hands of Ooznest and will have to wait to see when / if they decide to release a later version of their firmware.

Of course, this macro would make a great plug-in, and so getting around this data input issue!

CthulhuLabs

So I am working on a new version of this Macro that will prompt for user input with the M291 command. It will make the Macro far more interactive for things like DepthOfCut, RPM, FeedRate, etc. One of the prompts I want to add is to ask if it should work in Pass mode or Depth mode.

In pass mode it will prompt you for the number of passes to take. It will then do that many passes before prompting you whether to surface another layer. Default will obviously be 1.

In Depth mode it will prompt you for how much material to remove. So if your DepthOfCut is say 0.3mm and you enter a depth of 1mm the Macro will do three passes at 0.3mm and then a fourth pass at 0.1mm for a total of 1mm.