Усовершенствование конструкции гидростойки, страница 10

! Определение макс напряжения в рабочей зоне

LSEL,S,,,2,5,1                 !Выбор линий рабочей части гидростойки

NSLL,S,1                        !Выбрать узлы принадлежащие активным линейным объектам

*GET,NUM,NODE,0,COUNT           !NUM присваивается кол. активных узлов

*GET,MNNOD,NODE,,NUM,MIN   !MNNOD присваиваем мин. номер узла

*GET,MXNOD,NODE,,NUM,MAX  !MXNOD присваиваем макс. номер узла

!INDEX=0

SigMAXR=0

*DO,INODE,MNNOD,MXNOD        !Цикл по узлам от MNNOD до MXNOD

 *GET,KOO,NODE,INODE,NSEL    !присваивается KOO  1, если узел активен

                                                             !1, если узел неактивен 

  *IF,KOO,EQ,1,THEN                       !Если KOO=1, то

   *GET,SigMaxRN,NODE,INODE,S,EQV!SigMAXRN присваиваем номер узла INODE

   *IF,SigMAXRN,GT,SigMaxR,THEN !Если SigMAXRN> SigMaxR,то

     SigMAxR=SigMAXRN

!     Index=INODE

   *ENDIF 

 *ENDIF                                              !Конец если

*ENDDO                                             !Конец цикла DO

! Определение макс напряжения во всем цилиндре

alls               !Активизация всех объектов

*GET,NUM,NODE,0,COUNT           !NUM присваивается кол. активных узлов

*GET,MNNOD,NODE,,NUM,MIN   !MNNOD присваиваем мин. номер узла

*GET,MXNOD,NODE,,NUM,MAX  !MXNOD присваиваем макс. номер узла

!INDEX=0

SigMAXV=0

*DO,INODE,MNNOD,MXNOD        !Цикл по узлам от MNNOD до MXNOD

 *GET,KOO,NODE,INODE,NSEL    !присваивается KOO  1, если узел активен

                                                                                           !1, если узел неактивен 

  *IF,KOO,EQ,1,THEN                       !Если KOO=1, то

   *GET,SigMaxVN,NODE,INODE,S,EQV !SigMAXVN присваиваем номер узла INODE

   *IF,SigMAXVN,GT,SigMaxV,THEN       !Если SigMAXVN> SigMaxV,то

     SigMAxV=SigMAXVN

!     Index=INODE

   *ENDIF

 *ENDIF                                              !Конец если

*ENDDO                                             !Конец цикла DO

Определение деформации в районе поршня

NSEL,S,LOC,X,Rc

NSEL,r,LOC,Y,LC-dck-h+0.015,lc-dck-h-0.080

*GET,NUM,NODE,0,COUNT           !NUM присваивается кол. активных узлов

*GET,MNNOD,NODE,,NUM,MIN   !MNNOD присваиваем мин. номер узла

*GET,MXNOD,NODE,,NUM,MAX  !MXNOD присваиваем макс. номер узла

!INDEX=0

dRp=0

*DO,INODE,MNNOD,MXNOD                    !Цикл по узлам от MNNOD до MXNOD

 *GET,KOO,NODE,INODE,NSEL                !присваивается KOO  1, если узел активен

   *IF,KOO,EQ,1,THEN                      !Если KOO=1, то

   *GET,dRpN,NODE,INODE,u,x     !dRpN присваиваем номер узла INODE

 *IF,dRpN,LT,dRp,THEN                 !Если dRpN<dRp, то

    dRp=DRpN

    INDEX=INODE

*ENDIF

 *ENDIF                                              !Конец если

*ENDDO                                             !Конец цикла DO

Определение деформации в 1 уплотнении

KSEL,s,,,3

NSLK,s,1

*GET,MNNOD,NODE,,NUM,MIN   !MNNOD присваиваем номер узла

   *GET,dR1,NODE,MNNOD,u,X      !dR1 присваиваем номер узла

AVPRIN,0,volu, 

ETABLE, ,VOLU, 

!* 

SSUM

!* 

*GET,tvol,SSUM,ITEM,VOLU 

/OUT                                                              !Закрыть файл

finish                                                              !Выход из постпроцессора

*LIST,result,lis                                              !Вывести листинг файла

Производится решение модели с заданными граничными условиями. M_M: Solution => Current LS. По результатам, выводим рисунок напряженно-деформированного состояния гидроцилиндра (см. рис.2.7.).

Рис. 2.7. Напряженно-деформированное состояние гидроцилиндра

На следующем этапе проводим оптимизацию модели с помощью программы ANSYS.

2.10.  Постпроцессор

Определение максимальногоэквивалентного напряжения.