All pastes #776714 Raw Edit

Unnamed

public text v1 · immutable
#776714 ·published 2007-11-16 06:37 UTC
rendered paste body
G17 G20 G40 G54 G80 G90 G94

o010 sub

(***EDIT***)

#<cntrbore_dia>	=.24
#<cntrbore_z>	=-.15
#<thruhole_dia>	=.15
#<thruhole_z>	=-.275

#<tool_dia>	=.125
#<feed_xy>	=10.
#<feed_z>	=.3
#<z_pass>	=.005
#<z_rapid_xy>	=.02
#<z_rapid_z>	=.01
#<z_clear>	=1.

(**********)

#<tool_rad>     =[#<tool_dia>/2]

#<cntrbore_rad>	=[#<cntrbore_dia>/2]
#<cntrbore_cbr>	=[#<cntrbore_rad>-#<tool_rad>]
#<cntrbore_csr>	=[#<cntrbore_cbr>/2]
#<cntrbore_top>	=[#2+#<cntrbore_cbr>]
#<cntrbore_bot>	=[#2-#<cntrbore_cbr>]

#<thruhole_rad> =[#<thruhole_dia>/2]
#<thruhole_cbr> =[#<thruhole_rad>-#<tool_rad>]
#<thruhole_csr> =[#<thruhole_cbr>/2]
#<thruhole_top> =[#2+#<thruhole_cbr>]
#<thruhole_bot> =[#2-#<thruhole_cbr>]

#<z_now>	=0

G0 Z[#<z_clear>]
X[#1] Y[#2]
Z[#<z_rapid_z>]

o011 while [#<z_now> GT #<cntrbore_z>]
G1 Z[#<z_now>] F[#<feed_z>]
G2 X[#1] Y[#<cntrbore_top>] R[#<cntrbore_csr>] F[#<feed_xy>]
X[#1] Y[#<cntrbore_bot>] R[#<cntrbore_cbr>]
X[#1] Y[#<cntrbore_top>] R[#<cntrbore_cbr>]
X[#1] Y[#2] R[#<cntrbore_csr>]
#<z_now>=[#<z_now>-#<z_pass>]
o011 endwhile

#<z_now>=[#<cntrbore_z>]
G1 Z[#<z_now>] F[#<feed_z>]
G2 X[#1] Y[#<cntrbore_top>] R[#<cntrbore_csr>] F[#<feed_xy>]
X[#1] Y[#<cntrbore_bot>] R[#<cntrbore_cbr>]
X[#1] Y[#<cntrbore_top>] R[#<cntrbore_cbr>]
X[#1] Y[#2] R[#<cntrbore_csr>]
#<z_now>=[#<z_now>-#<z_pass>]

o012 while [#<z_now> GT #<thruhole_z>]
G1 Z[#<z_now>] F[#<feed_z>]
G2 X[#1] Y[#<thruhole_top>] R[#<thruhole_csr>] F[#<feed_xy>]
X[#1] Y[#<thruhole_bot>] R[#<thruhole_cbr>]
X[#1] Y[#<thruhole_top>] R[#<thruhole_cbr>]
X[#1] Y[#2] R[#<thruhole_csr>]
#<z_now>=[#<z_now>-#<z_pass>]
o012 endwhile

#<z_now>=[#<thruhole_z>]
G1 Z[#<z_now>] F[#<feed_z>]
G2 X[#1] Y[#<thruhole_top>] R[#<thruhole_csr>] F[#<feed_xy>]
X[#1] Y[#<thruhole_bot>] R[#<thruhole_cbr>]
X[#1] Y[#<thruhole_top>] R[#<thruhole_cbr>]
X[#1] Y[#2] R[#<thruhole_csr>]


G0 Z[#<z_clear>]
o010 endsub

o010 call [1.575] [2.75]
o010 call [2.325] [2.75]
o010 call [3.075] [2.75]
o010 call [3.825] [2.75]
o010 call [4.575] [2.75]
o010 call [5.325] [2.75]
o010 call [6.075] [2.75]

o010 call [1.575] [3.6]
o010 call [2.325] [3.6]
o010 call [3.075] [3.6]
o010 call [3.825] [3.6]
o010 call [4.575] [3.6]
o010 call [5.325] [3.6]
o010 call [6.075] [3.6]

M30