Ответ на пост «Как стать ЧПУшником. Продолжение.»1
У кого работает отрезками, виноват WHILE, IF и тома подобные операторы. Кому нужна добил спираль до ума. Пользуйтесь:
Спираль Архимеда на ЧПУ
#R0 = 10.0 (начальный радиус)
#Rmax = 50.0
#dr = 0.05 (приращение радиуса на шаг)
#ang = 0.0
#dang = 5.0 (шаг угла в градусах)
G21 G90
G0 Z5
X[#R0] Y0
G1 Z-2.0 F200
WHILE[#R0 LE #Rmax] DO1
#X = [COS[#ang] * #R0]
#Y = [SIN[#ang] * #R0]
G1 X#X Y#Y F300
#ang = [#ang + #dang]
#R0 = [#R0 + #dr]
END 1
(замыкающий круг)
#ang0 = #ang
WHILE[#ang LE [#ang0 + 360]] DO2
#X = [COS[#ang] * #Rmax]
#Y = [SIN[#ang] * #Rmax]
G1 X#X Y#Y F300
#ang = [#ang + #dang]
END 2
G0 Z5
M30
--------
#1 = 10.0 (начальный радиус)
#2 = 50.0 (конечный радиус)
#3 = 0.05 (приращение радиуса на шаг)
#4 = 0.0 (угол)
#5 = 5.0 (шаг угла в градусах)
G21 G90
G0 Z5
X[#1] Y0
G1 Z-2.0 F200
WHILE[#1 LE #2] DO1
#6 = [COS[#4] * #1]
#7 = [SIN[#4] * #1]
G1 X#6 Y#7 F300
#4 = [#4 + #5]
#1 = [#1 + #3]
END 1
(замыкающий круг)
#8 = #4
WHILE[#4 LE [#8 + 360]] DO2
#6 = [COS[#4] * #2]
#7 = [SIN[#4] * #2]
G1 X#6 Y#7 F300
#4 = [#4 + #5]
END 2
G0 Z5
M30