Problem- macro code inside of a subroutine

[brockmo]

any ideas why this code will run in graphics but chokes on the first calculation at runtime?

Thanks so much!!!!

bp

%
O9999
L100
# R8 = COS(V8)*V9
# R9 = SIN(V8)*V9
M99
M30
G80G90G17G40
M6T1
E1X0Y0S2200M3
# V8 = 90
# V9 = 1
GOH1Z1.M8
L101
G82G98R0+.1Z-.5F5.X+R8Y+R9
# V8 = 180
L101
X+R8Y+R9
L101
X+R8Y+R9
G80
G0Z1.M5M9
G9G49Z0
G0E0X0Y0
M30
%

[Neal]

Brockmo--
On the line "G0H1Z1.M8" you entered the letter O for the G0 instead of the number zero.

Neal

[brockmo]

thanks for such thorough error checking but I'm afraid that this was a typo that I made only on this example. The "real" program executed perfectly when the subs were taken out.

P.S. I did use { #set deb } to check variable values and all looked well.

Thanks again!

[brockmo]

the following code works! I changed the last line to an M2 instead M30 and removed the modal safety line.

Thanks again Neal!

BTW, are there any fadal macro gurus lurking on cnczone?

%
O9999
L100
# R8 = COS(V8)*V9 'X coordinate
# R9 = SIN(V8)*V9 'Y coordinate
M99
M30
M6T1
# V8 = 90 'angle of hole
# V9 = 1 'bolt circle radius
L101
E1X+R8Y+R9S2200M3
G0H1Z1.M8
G82G98R0+.1Z-.5F5.
# V8 = 180
L101
X+R8Y+R9
# V8 = 270
# V9 = 1.5
L101
X+R8Y+R9
# V8 = 0
L101
X+R8Y+R9
# V8 = 30
L101
X+R8Y+R9
G80
G0Z1.M5M9
G90G49Z0
G0E0X0Y0
M2
%

[Neal]

Brockmo--
I teach the macro programming classes. Let me know if I can be of help.

Neal

[brockmo]

the shop I work for produces a lot of parts with similar shapes such as bolts with hex shaped tops and drilling radial holes through tubes. None of the parts share dimensions but they are so similar that some setups require only changing fixture offsets or tools lengths. I would like to prevent some of the time waste and errors made when drawing hex's and simple bolt circles. It is easy to make the control do the math for you and not have to use a calculator or leave the machine to use the one installation of surfCAM.

Situation 1: hex head on a bolt; print gives flat-to-flat or inscribed circle. - worked this one out today....but not terribly elegant yet.

2: drill through a tube(radial); drilling through second wall requires cutting air or using a negative R0 value which makes it difficult to clear chips. - I have written this out on paper but have yet to try it.

3: drill simple bolt circles using only given circle radius or dia and angle of hole. usually on the head or face of a bolt or nut. - could get away with using a G68 but that would be cheating

[Scanfab]

The L100 subprogram should have last line M17 not M99. Or does M99 also work???

[brockmo]

well....I've always used M99 for the end of subroutines and subprograms. I suppose that this is poor form, however, it was the way I was initially taught to code a subroutine. This method seems to work fine!