Топчер писал(а):Источник цитаты Здравствуйте, подскажите пожалуйста где можно посмотреть пример параметрических программ на токарную обработку,может у Вас имеются? (Fanuc и Siemens) Для примера и наглядного изучения.Спасибо
В токарке мало что можно придумать, стандартных циклов станка хватает. Но вот несколько примеров:
1. Типа прогрев гидравлики перед работой. На одном предприятии каждый станок с утра по 30 минут гоняли по этой проге:
%
O0099(PROGREV)
(,T,A)
G54
G99
M3S200
#1=[0100]
N1
G0G28U0
G28G0W0
T[#1]
G4X1.
G0W-120.
G0U-120.
#1=[#1+0100]
IF[#1GT1212]THEN#1=0100
GOTO1
M30
%
2. При сверлении под углом, с использованием угловых приводных блоков, хотелось имитировать цикл G83/87, вот что вышло:
(CENTROVKA)
T
#1=0.(C BEGIN)
#2=15.(X BEGIN)
#3=14.659(Z BEGIN, BEZ MINUSA)
#4=11.8(X END)
#5=60.(UGOL OT OSI Z)
#6=0.5(Q)
#7=1200(S)
#8=30.(F)
#9=0.5(OTSKOK)
#10=6.(KOL-VO OTV.)
(-------------------)
G54
G98
M19
G97 S[#7] M74
G28 H0.
G0 X[#2+10.] Z30.
Z-[#3]
WHILE[#1 LT 360.]DO2
#12=#2(X)
#13=#3(Z)
G0 C[#1]
M37
G1 X[#2] F200.
M08
#14=[#6*[SIN[#5]]](Q XR)
#15=[#14/TAN[#5]](Q Z)
#16=[#9*[SIN[#5]]](Q+ XR)
#17=[#16/TAN[#5]](Q+ Z)
WHILE[#12 GE [#4+#14*2]]DO1
G1 X[#12-#14*2] Z-[#13+#15] F[#8]
G0 X[#2] Z-[#3]
X[#12-#14*2+#16*2] Z-[#13+#15-#17]
#12=#12-#14*2
#13=#13+#15
END1
(CHIST)
G1 X[#4] Z-[[[#2-#4]/2]/TAN[#5]+#3]
G0 X[#2] Z-[#3]
G0 X[#2+10.] M09
M38
#1=#1+[360./#10]
END2
G0 Z30.
G28 U0. W0.
M75
M18
M01
(00.00.00)
3. Обработка 6-гранника концевой фрезой в горизонтальном приводном блоке (при наличии в станке опции G12.1). Таким способом конечно сильно отгибает фрезу, но за счет универсальности в выборе 6-гранника и диаметра фрезы, прога была очень популярна:
(FREZA KONC. D12.)
(--PROVERIT' NE DUBLIRUETSYA LI KADR N958, N959--)
T0707
#1=12.(DIAMETR FREZYI)
#2=27.(RAZMER 6-GRANNIKA)
#3=0.5(CHERN.S'EM)
#4=19.3(GLUBINA Z,BEZ ZNAKA MINUS)
#11=100.(F PODACHA)
(----------------)
G54
G98
M19
G97S1200M74
G28H0.
#6=[#2/2.](POL 6-GR.)
#7=[#1/2.](POL FREZYI)
#5=[#6/COS[30.]](R OPISANNOY OKRUZHNOSTI)
#9=[#5+#7]
#8=#3
G0X[#9+10.]Z10.
Z1.
G0C0.
Z1.
G0C0.
G12.1
N958
(CHERN.)
IF[#3GE[#5-#6]]GOTO959(PREDOHRANITEL')
G1C[[#9-[0.+#8]]/COS[30.]]X0.F1000.
Z-[#4]
M08
G1X[[#9-[0.+#8]]*2.]C[[#9-[0.+#8]]*TAN[30.]]F[#11]
C-[[#9-[0.+#8]]*TAN[30.]]
X0.C-[[#9-[0.+#8]]/COS[30.]]
X-[[#9-[0.+#8]]*2.]C-[[#9-[0.+#8]]*TAN[30.]]
C[[#9-[0.+#8]]*TAN[30.]]
C[[#9-[0.+#8]]/COS[30.]]X0.
#8=#8+#3
#10=[#9-[0.+#8]]
IF[#10GT[#6+#7]]GOTO958
(CHIST.)
N959
G1C[[#6+#7]/COS[30.]]X0.F[[#11]/2]
X[[#6+#7]*2]C[[#6+#7]*TAN[30.]]
C-[[#6+#7]*TAN[30.]]
C-[[#6+#7]/COS[30.]]X0.
X-[[#6+#7]*2]C-[[#6+#7]*TAN[30.]]
C[[#6+#7]*TAN[30.]]
C[[#6+#7]/COS[30.]]X0.
M09
G13.1
G0Z10.
G28U0.W0.
M75
M18
M01
(00.00.00)