Warmup Program Gcode

[Phife]

Hello,

I have a CNC machine I built, and I would like to run this warmup program. Someone else made this program for my machine but it was made to run in EMC2 and not Mach. It wont work in Mach3.

Basically its a loop that runs the axis's to their limits and then increases the feedrate by 10 and runs again.

can someone more experienced in Gcode and Mach help me out so I can get this working in Mach?

Here is the code:

(Axis Warmup)
G20 G91

#<_FEEDRATE> = 10

O100 WHILE [#<_FEEDRATE> LE 100]

O110 REPEAT [10]
G1 F[#<_FEEDRATE>] X48.7 Y24.7 Z-8
G1 F[#<_FEEDRATE>] Y-24.7 Z8
G1 F[#<_FEEDRATE>] X-48.7 Y24.7 Z-8
G1 F[#<_FEEDRATE>] X48.7 Y-24.7 Z8
G1 F[#<_FEEDRATE>] Y24.7 Z-8
G1 F[#<_FEEDRATE>] X-48.7 Y-24.7 Z8
O110 ENDREPEAT

#<_FEEDRATE> = [#<_FEEDRATE> + 10]

O100 ENDWHILE

M30



Thanks

[CNCRim]

O100(Axis Warmup)
G20
G28G91Z0
G28G91Y0X0

#100 = 10

WHILE [#100 LE 100] DO 1

G1 X48.7 Y24.7 Z-8 F#100
Y-24.7 Z8
X-48.7 Y24.7 Z-8
X48.7 Y-24.7 Z8
Y24.7 Z-8
X-48.7 Y-24.7 Z8

#100 = #100 + 10

END 1

M30

[Phife]

Originally Posted by CNCRim O100(Axis Warmup) G20 G28G91Z0 G28G91Y0X0 #100 = 10 WHILE [#100 LE 100] DO 1 G1 X48.7 Y24.7 Z-8 F#100 Y-24.7 Z8 X-48.7 Y24.7 Z-8 X48.7 Y-24.7 Z8 Y24.7 Z-8 X-48.7 Y-24.7 Z8 #100 = #100 + 10 END 1 M30

It doesnt work, it gives me a "Unknown word where unary operation could be" Line 5. It doesnt recognize the line with the WHILE command.

Anyone know whats wrong?

[ger21]

Mach3 doesn't support "While". As a workaround, you can create an M code with vb code in it to do what you want, but you'd need to re-write it.

[Phife]

Originally Posted by ger21 Mach3 doesn't support "While". As a workaround, you can create an M code with vb code in it to do what you want, but you'd need to re-write it.

I am not versed in Gcode Mcode or VBcode, how hard would it be to program? Someone out there willing to help me out?

[CNCRim]

Does your control suppose macro? I think best way is keep it simple, instead too fancy. It will keep running until you hit RESET.

G20
G28G91Z0
G28G91Y0X0

G1 X48.7 Y24.7 Z-8 F20.
Y-24.7 Z8
X-48.7 Y24.7 Z-8
X48.7 Y-24.7 Z8
Y24.7 Z-8
X-48.7 Y-24.7 Z8

G28G91Z0
G28G91Y0X0
M99

[Pandinus]

Try this out....
M98 calls the sub 100 (P100) 10 times (L10)
The letter "O" designates the start of sub (O100)
Locate your subs after your program end (M30)
M99 Returns the call from the sub

****************************************

G20
G28G91Z0
G28G91Y0X0

#100 = 10

M98 P100 L10

M30


O100(Axis Warmup)

G1 X48.7 Y24.7 Z-8 F#100
Y-24.7 Z8
X-48.7 Y24.7 Z-8
X48.7 Y-24.7 Z8
Y24.7 Z-8
X-48.7 Y-24.7 Z8

#100 = [#100 + 10]

M99