программирование переменными

[Вячеслав Старков 0]

Всем привет, кто может подсказать, сименс 802d фрезерный можно программировать переменными?

Если да , ребята напишите шаблон,  к примеру на обработку паза или кармана.

Заранее спасибо.

[s_liam 66]

Конечно, можно.

Пример можно найти в стандартных циклах стойки. Откройте любой цикл, поглядите.

 

 

Начало программы цикла с 840й стойки - нажмите чтобы показать 

%_N_POCKET1_SPF
;$PATH=/_N_CST_DIR
PROC POCKET1 (REAL RTP,REAL RFP,REAL SDIS,REAL DP,REAL DPR,REAL LENG,REAL WID,REAL CRAD,REAL CPA,REAL CPO,REAL STA1,REAL FFD,REAL FFP1,REAL MID,INT CDIR,REAL FAL,INT VARI,REAL MIDF,REAL FFP2,REAL SSF) SAVE DISPLOF
;VERSION: 06.03.09 Jan 20, 2003
;CHANGE : 06.02.09 Jan 07, 2002
;Rechtecktaschen, nur Stirnfraeser
N10 DEF AXIS _X,_Y,_Z
N12 DEF REAL HH1,HH2,HH3,HH4,HH5,HH6,WZR,HHS,HHF,HHF1,HHL,HHW,HHZ,HHG,HR,HK,HHA,HHO,_SDZI
N14 DEF INT HZ1,HZ2,HZ4,HZE,HZE1
N24 DEF BOOL SOWZ
DEF INT _MIRR=0
N18 _X=$P_AXN1 _Y=$P_AXN2 _Z=$P_AXN3 SDIS=ABS(SDIS) DPR=ABS(DPR) HHL=ABS(LENG) HHW=ABS(WID) HK=SQRT(1.8)
CRAD=ABS(CRAD) MID=ABS(MID) MIDF=ABS(MIDF) VARI=ABS(VARI) HH6=STA1
_MIRR=$P_ACTFRAME[_X,MI]+$P_ACTFRAME[_Y,MI]
IF _MIRR==1
IF CDIR==2
CDIR=CDIR+1
ELSE
CDIR=CDIR-1
ENDIF
ENDIF
IF(_ZSD[1]==0)
_SDZI=SDIS
ENDIF
IF ($P_TOOL==0) AND ($P_SIM==1)
SOWZ=TRUE
MELDUNG(11)
ELSE
SOWZ=FALSE
ENDIF
IF ($P_TOOL==0) AND ($P_SIM==0) GOTOF FEHL6
IF ($P_TOOLR==0) AND ($P_SIM==0) GOTOF FEHL6
IF VARI>2 GOTOF FEHL5 IF(CDIR==2)OR(CDIR==3) GOTOF _MM00
N20 MELDUNG(5)
CDIR=3
_MM00:IF FFP2 GOTOF _MM01
FFP2=FFP1
_MM01:IF SSF<0 GOTOF _M01
HHS=$P_S[0]
_M01:IF SSF>0 GOTOF _MM02
SSF=HHS
_MM02:IF DPR==0 GOTOF _MM1 IF RTP==RFP GOTOF FEHL1
HH2=RFP-((RTP-RFP)/ABS(RTP-RFP)*DPR)
IF DP==0 GOTOF _MM0 IF DP==HH2 GOTOF _MM1A

Hide  

 

Изменено 10 апреля 2017 пользователем s_liam

[Вячеслав Старков 0]

Спасибо, я в шоке, это точно не фанук. 

Голова взорвется разбираться , что  здесь к чему.

я лит. почитал в станке есть встроенные циклы (шаблоны) которые нужно заполнить, будем учиться!!!

     

[s_liam 66]

В 10.04.2017 в 23:48, Вячеслав Старков сказал:

Спасибо, я в шоке, это точно не фанук. 

Голова взорвется разбираться , что  здесь к чему.

я лит. почитал в станке есть встроенные циклы (шаблоны) которые нужно заполнить, будем учиться!!!

     

Да, в общем-то, все просто.

Переменные определяются через команду DEF.

Они бывают нескольких типов.

А далее используйте их в программировании, как душе угодно =) Главное, определить их в самом вначале программы.

Вот строчка с определением

DEF REAL HH1,HH2,HH3,HH4,HH5,HH6,WZR,HHS,HHF,HHF1,HHL,HHW,HHZ,HHG,HR,HK,HHA,HHO,_SDZI

А далее приравнивайте их нужным значениям и стройте сложные логические связи =)

 

HH1=21.545

WZR=-3245.26

 

А цикл обработки кармана - POCKET. Их несколько на Sinumerik. Описание есть в свободном доступе.

Изменено 20 апреля 2017 пользователем s_liam