big overhaul

This commit is contained in:
Thaddeus Hughes
2026-04-05 20:51:43 -05:00
parent f39f90977d
commit ad1f8719d6
121 changed files with 2457 additions and 1700 deletions

View File

@@ -19,22 +19,20 @@ G54 ; absolute coordinates
o200 sub ;[Y][Z]
G0 Z[#<_z_clearance>]
G0 X[#<_x_start>-#<_td>] Y[#1]
G0 X[#<_x_start>-#5410] Y[#1]
G0 Z[#2]
G1 X[#<_x_end>+#<_td>]
G1 X[#<_x_end>+#5410]
G0 Y[-#1]
G1 X[#<_x_start>-#<_td>]
G1 X[#<_x_start>-#5410]
o200 endsub
#<_td> = 0.75
#<_r_adj> = [#<_r> - #<_td>/2]
#<theta> = ACOS[[#<_z_ctr>-#<_td>/2]/#<_r_adj>]
#<_r_adj> = [#<_r> - #5410/2]
#<theta> = ACOS[[#<_z_ctr>-#5410/2]/#<_r_adj>]
;#<z_bot> = [#<_z_ctr> - #<_r_adj>]
#<y_top> = [#<_r_adj>*SIN[#<theta>]]
o10 if [#<op> EQ 1]
#<_td> = 0.5
F5
o200 call [0][-.35]
@@ -50,7 +48,7 @@ o10 elseif [#<op> EQ 2]
#<t> = #<theta>
; o105 while [#<t> LT #<theta>]
o200 call [SIN[#<t>]*#<_r_adj>][#<_z_ctr>-COS[#<t>]*#<_r_adj>-#<_td>/2]
o200 call [SIN[#<t>]*#<_r_adj>][#<_z_ctr>-COS[#<t>]*#<_r_adj>-#5410/2]
#<t> = [#<t> + 2]
; o105 endwhile
@@ -75,34 +73,35 @@ o10 elseif [#<op> EQ 3]
o101 if [#<i> MOD 2]
G1 X#<x> Y+#<y_top> Z0
G2 X#<x> Y-#<y_top> Z0 J0 K[#<_z_ctr>-#<_td>/2]
G2 X#<x> Y-#<y_top> Z0 J0 K[#<_z_ctr>-#5410/2]
o101 else
G1 X#<x> Y-#<y_top> Z0
G3 X#<x> Y+#<y_top> Z0 J0 K[#<_z_ctr>-#<_td>/2]
G3 X#<x> Y+#<y_top> Z0 J0 K[#<_z_ctr>-#5410/2]
o101 endif
o100 endwhile
o10 elseif [#<op> EQ 11]
#<_td> = [3/16]
F4
#<_z_top> = 0.0
#<_z_bot> = -0.4
;o<slot_chop> call [1.476][-.232] [1.476][+.232] [5.5/25.4] [0.0][-0.4]
o<slot> call [2.264][-.232] [2.264][+.232] [7.0/25.4] [0.0][-0.4]
o<slot> call [2.264][-.232] [2.264][+.232] [8.5/25.4] [0.0][-0.4]
o<slot> call [2.264][-.232] [2.264][+.232] [10.0/25.4] [0.0][-0.4]
o<slot> call [0] [2.264][-.232] [2.264][+.232] [7.0/25.4]
o<slot> call [0] [2.264][-.232] [2.264][+.232] [8.5/25.4]
o<slot> call [0] [2.264][-.232] [2.264][+.232] [10.0/25.4]
;o<slot_chop> call [3.051][-.232] [3.051][+.232] [5.5/25.4] [0.0][-0.4]
o10 elseif [#<op> EQ 12]
#<_td> = [5/25.4]
F4
o<slot> call [1.476][-.232] [1.476][+.232] [9.5/25.4] [0.0][-3.2/25.4]
o<slot> call [2.264][-.232] [2.264][+.232] [14/25.4] [0.0][-3.2/25.4]
o<slot> call [3.051][-.232] [3.051][+.232] [9.5/25.4] [0.0][-3.2/25.4]
#<_z_top> = 0.0
#<_z_bot> = -3.2/25.4
o<slot> call [0] [1.476][-.232] [1.476][+.232] [9.5/25.4]
o<slot> call [0] [2.264][-.232] [2.264][+.232] [14/25.4]
o<slot> call [0] [3.051][-.232] [3.051][+.232] [9.5/25.4]
o10 elseif [#<op> EQ 21]
#<_td> = [7/16]
#<_rc> = 0.3
#<_yr> = 1.005
@@ -111,8 +110,8 @@ o10 elseif [#<op> EQ 21]
#<t> = 0
o300 while [#<t> LT 90]
#<y> = [#<_yr>-#<_rc>+[#<_rc>+#<_td>/2]*COS[#<t>]]
#<z> = [-#<_rc>+[#<_rc>+#<_td>/2]*SIN[#<t>]-#<_td>/2]
#<y> = [#<_yr>-#<_rc>+[#<_rc>+#5410/2]*COS[#<t>]]
#<z> = [-#<_rc>+[#<_rc>+#5410/2]*SIN[#<t>]-#5410/2]
o200 call [#<y>][#<z>]