Фрезеровка шестигранной цапфы, переделать УП с fanuc на Sinumerik

[Igor_B]

Доброго времени суток, может кто нибудь помочь переделать программу для фрезеровки шестигранника со стойки фанук, для Сименс

Код: Выделить всё

%
O1113(SHESTIGRANNIK LUBOI FREZEROVKA);
G17G21G40G49; 
G54G80G90G94;
;
#1=40.9(SHESTIGRANNIK); 
#2=50.(DIAMETR FREZI);
#3=48.(DIAMETR ZAGOTOVKI);
#4=22.5(GLUBINA FREZEROVANIYA);
#5=5.(SHAG UGLUBLENIYA);
#6=550.(OBOROTI FREZI); 
#7=200.(PODACHA MM/MIN);
; 
T4M6;
; 
#8=[[#1+#2]/2]; 
#9=[#8/0.866];
; 
#10=[#9-#2/2];
#11=[#9+5.];
IF[#3/2GT#10]THEN#11=[#3/2+#2/2+5.];
; 
#12=#5;
#13=[#4/#5];
#14=0;
#15=5.(RADIUS);
;
WHILE[#12LE#4]DO1;
G0X0Y#11; 
G43H4Z-#12;
S#6M3;
M8; 
G01X0Y#9F#7;
X[#9*0.866]Y[#9*0.5],R#15; 
Y-[#9*0.5],R#15; 
X0Y-#9,R#15; 
X-[#9*0.866]Y-[#9*0.5],R#15; 
Y[#9*0.5],R#15;
X0Y#9;
#12=[#12+#5]; 
#14=[#14+1];
IF[#12GT#4]THEN#12=#4;
IF[#14GE#13]GOTO1;
END1;
;
N1M05;
M09;
G91G28Z0.;
G28Y0.; 
G90;
M30;
%

Или может у кого готовая есть

[Predator]

Igor_B, Станок какой? Вертикальный, трехосевой, с поворотной осью или без неё?
Да и на сколько помню в Синумерик можно встроенными средствами (циклами) сделать. По крайней мере на 840D.

[Igor_B]

Predator, Станок вертикальный, трехосевой стойка 808D, там нет стандартного шестигранника, только прямоугольная и круглая цапфа.

[Predator]

Можно эту же программу переделать, нужно заменить «#» на «R», если присвоение переменной, тогда «R=», «END1» на «ENDWHILE», квадратные скобки на обычные круглые. Пример: #12=[#12+#5]; = R12=(R12+R5).
N1 заменить на метку (меткой может быть произвольный набор символов), например: METKA:, а GO TO 1 на GOTOF METKA
Также замени условные операторы:

Код: Выделить всё

EQ	= 
NE	<>
GT	> 
LT	< 
GE	>=
LE	<=

Посмотри здесь в теме примеры программ. Например, программа сверления отверстий на заданном диаметре.

Fanuc: Сверление массива отверстий на заданном диаметре – пример УП
Та же программа для Sinumerik: Сверление массива отверстий на заданном диаметре – пример УП

ПС: Пишу с мобильного, потому всю программу переписать нет возможности. Будут вопросы, спрашивай.

[Predator]

Igor_B, Вот такой цикл должен быть на стройке, как в видео. Выше я об этом писал.

https://m.youtube.com/watch?v=ilQ7llwNo3o

[Igor_B]

на 808-ой стойке нет такого цикла

[Predator]

Igor_B, Значит перепиши фануковскую УП, как я тебе выше сообщением написал.

[Igor_B]

Predator, Полазил ещё по интернетам короче все сделал, все получилось, оставлю тут то что получилось, может таким же ищущим понадобится.

[Predator]

Igor_B, Может кому-то и пригодится.

[BenAflek]

Положу в закладки, а то заказы всякие бывают.