Конусная спираль в sinumerik 840d sl

[schemesoft 0]

Здравствуйте!

 

Мучает меня один вопрос. Как написать цикл при помощи R параметров, который описывает траекторию конусной спирали?

 

Станок фрезерный, стойка sinumerik 840d sl.

[ilya_w 85]

Как написать цикл при помощи R параметров, который описывает траекторию конусной спирали?

На конус есть программка, но не спираль, окружностями. Тут много зависит от припуска, конус как-никак. 

[A_1 235]

Мы делали участками винтовых дуг по 10 градусов, непрерывной линией.

R-параметрами указывали все данные конуса, верхний диаметр, глубину, угол, шаг винтовой линии.

Величину сектора в 10 градусов можно тоже изменить, для большей точности.

[schemesoft 0]

Мы делали участками винтовых дуг по 10 градусов, непрерывной линией.

R-параметрами указывали все данные конуса, верхний диаметр, глубину, угол, шаг винтовой линии.

Величину сектора в 10 градусов можно тоже изменить, для большей точности.

У вас не сохранилась программа? не могу сам сообразить...

[A_1 235]

Tlch1 ("FREZA_20",-90,0)
Mcmills1
G0 G54
G95 S3=2000 F0.1 M3=3
G0 X200 Y0 Z600
Y20
X50
Z70
M3=8

R24=50        ;Xc
R25=20        ;Yc
R21=0.5       ;Z nachaln.
R26=-10       ;Z konechn.
R4=100        ;Z bezopasn.
R7=45.6       ;D otv.
R27=10        ;Ugol konusa
R19=0.2       ;Shag
R37=$P_TOOLR  ;R instr.

R49=R7/2-R37
R50=270
R51=R50-(R21-R26)/R19*360
G0 X=R24 Y=R25
G0 Z=R21+2
G1 Z=R21
X=R24+R49*COS(R50) Y=R25+R49*SIN(R50)
R43=10; STEP
R44=R50; BEGIN
R45=R51; END
WHILE(R44>R45)
R44=R44-R43
IF(R44<R45)
R44=R45
ENDIF
R52=R21+(R44-R50)/360*R19
R53=R49+TAN(R27)*(R52-R21)
R47=R24+R53*COS(R44)
R48=R25+R53*SIN(R44)
G2 X=R47 Y=R48 Z=R52 CR=R53
ENDWHILE
G1 X=R24 Y=R25
G0 Z=R4
M3=5 M3=9
Home
M30

[schemesoft 0]

Tlch1 ("FREZA_20",-90,0)

Mcmills1

G0 G54

G95 S3=2000 F0.1 M3=3

G0 X200 Y0 Z600

Y20

X50

Z70

M3=8

R24=50        ;Xc

R25=20        ;Yc

R21=0.5       ;Z nachaln.

R26=-10       ;Z konechn.

R4=100        ;Z bezopasn.

R7=45.6       ;D otv.

R27=10        ;Ugol konusa

R19=0.2       ;Shag

R37=$P_TOOLR  ;R instr.

R49=R7/2-R37

R50=270

R51=R50-(R21-R26)/R19*360

G0 X=R24 Y=R25

G0 Z=R21+2

G1 Z=R21

X=R24+R49*COS(R50) Y=R25+R49*SIN(R50)

R43=10; STEP

R44=R50; BEGIN

R45=R51; END

WHILE(R44>R45)

R44=R44-R43

IF(R44<R45)

R44=R45

ENDIF

R52=R21+(R44-R50)/360*R19

R53=R49+TAN(R27)*(R52-R21)

R47=R24+R53*COS(R44)

R48=R25+R53*SIN(R44)

G2 X=R47 Y=R48 Z=R52 CR=R53

ENDWHILE

G1 X=R24 Y=R25

G0 Z=R4

M3=5 M3=9

Home

M30

Благодарю. Буду разбираться.

[A_1 235]

Добавьте G64

...

G0 G54 G64

...

 

 

[#1= 0]

В 19.04.2016 в 13:46, A_1 сказал:

Tlch1 ("FREZA_20",-90,0)
Mcmills1
G0 G54
G95 S3=2000 F0.1 M3=3
G0 X200 Y0 Z600
Y20
X50
Z70
M3=8

R24=50        ;Xc
R25=20        ;Yc
R21=0.5       ;Z nachaln.
R26=-10       ;Z konechn.
R4=100        ;Z bezopasn.
R7=45.6       ;D otv.
R27=10        ;Ugol konusa
R19=0.2       ;Shag
R37=$P_TOOLR  ;R instr.

R49=R7/2-R37
R50=270
R51=R50-(R21-R26)/R19*360
G0 X=R24 Y=R25
G0 Z=R21+2
G1 Z=R21
X=R24+R49*COS(R50) Y=R25+R49*SIN(R50)
R43=10; STEP
R44=R50; BEGIN
R45=R51; END
WHILE(R44>R45)
R44=R44-R43
IF(R44<R45)
R44=R45
ENDIF
R52=R21+(R44-R50)/360*R19
R53=R49+TAN(R27)*(R52-R21)
R47=R24+R53*COS(R44)
R48=R25+R53*SIN(R44)
G2 X=R47 Y=R48 Z=R52 CR=R53
ENDWHILE
G1 X=R24 Y=R25
G0 Z=R4
M3=5 M3=9
Home
M30

Здравствуйте! Откуда в R50=270 ,взялось число 270?  И М3=8 М3=5 М3=9 ... М3 это же направление вращения шпинделя.Что дают эти равенства? Спасибо за внимание. 

[A_1 235]

1 час назад, #1= сказал:

Откуда в R50=270 ,взялось число 270?  И М3=8 М3=5 М3=9

Добрый день.

270 - это угол перемещения к начальной точки траектории.

M3=8/5/9 - так в нашем станке записываются команды включения, выключения СОЖ и шпинделя, т.к. он многоканальный.

Приведенный способ получения траектории для фрезерования конической поверхности не является оптимальным, т.к. имеет погрешности. Есть способ лучше - позволяющий получить математически точную траекторию. Он рассмотрен в ролике "Конус одним кадром" на канале по ссылке ниже.

Изменено 5 ноября 2018 пользователем A_1