Радиально направленные элементы.

[12Х18Н10Т 25]

Добрый вечер, господа.

Столкнулся с такой проблемой. Имеется, грубо говоря, цилиндрический стрингерный отсек. Обечайку моделирую поверхностью, а стрингеры балками. У каждой линии есть своя система координат. Возможно ли сделать так, что бы система координат каждой линии смотрела как бы в центр отсека или придётся для каждой линии поворачивать вручную?

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

[hr4d 87]

Напиши макрос небольшой, чтобы повернул по порядку все.

[12Х18Н10Т 25]

То есть, лёгкими методами нельзя, принял) Ладно, полез изучать макросы! Давно надо было уже.

[AlexKaz 1 850]

Элементы разворачиваются к оси с помощью атрибутов.

Кажется это нужный код, вытащил из логов.

Код

FINISH   
/CLEAR   
/FILNAME,PR4_0   
/prep7   
*afun,deg! устанавливаем единицей измерения углов
!в тригонометрических функциях – градусы
! Определяем параметры для дальнейшего использования:  
! Все размеры в СИ (в метрах)    
*SET,H1,12   
*SET,H2,6    
*SET,R1,6    
*SET,R2,3    
*SET,N,12    
K,1,0,0  
!CIRCLE,1,R1,,,,N    
K,,,H1   
K,,R1    
K,,R1,H1
L,3,4    
K,,R2,-H2    
L,3,5    
ldiv,2   
K,,0,1   
AROTAT,all,,,,,,1,2,,n   
ET,1,SHELL181    
ET,2,BEAM188
!Характеристики нижней секции  
MP,EX,1,3E7  
MP,NUXY,1,0.3    
MP,EMIS,1,1  
!характеристики верхней секции    
MP,EX,2,2E11
MP,NUXY,2,0.29   
MP,ALPX,2,8.4E-5
MP,DENS,2,7350   
MP,KXX,2,38.6    
MP,C,2,625   
!геометрия секций
sect,1,shell,,   
secdata, 0.1,2,0.0,3 !secoffset,MID   !seccontrol,,,, , , ,  
sect,2,shell,,   
secdata, 0.0375,1,0.0,3 !secoffset,MID   !seccontrol,,,, , , ,   
sect,3,shell,,   
secdata, 0.025,1,0.0,3  !secoffset,MID   !seccontrol,,,, , , ,   
SECTYPE,   4, BEAM, RECT, , 0   !SECOFFSET, CENT
SECDATA,0.2,0.3,2,2,0,0,0,0,0,0,0,0  
asel,s,loc,y,0,H1    
aatt,2,,1,,1
!TYPE,   1   
!MAT,       2    
!REAL,   !ESYS,       0  
!SECNUM,   1
MSHAPE,0,2D  
MSHKEY,1
AMESH,all    
lsel,s,loc,y,0,-H2/10    
lsel,a,loc,y,-h2/2 !-h2/10,-h2/10+h2/10  
lsel,a,loc,y,-h2
TYPE,   2    
MAT,       1
SECNUM,   4  
!MSHKEY,1    
lMESH,all    
!asel,all    
lsel,s,loc,y,0   
lsel,a,loc,y,-H2/2   
lsel,a,loc,y,-H2
latt,2,,2,,,4    
lmesh,all    
lsel,s,loc,y,-H2/4   
lsel,a,loc,y,-3*H2/4
latt,2,,2,,1,,4  
lMESH,all    
asel,s,loc,y,0,-H2/2
TYPE,   1    
MAT,       1
REAL,    
ESYS,       0    
SECNUM,   2  
MSHAPE,0,2D  
MSHKEY,1
aMESH,all    
asel,s,loc,y,-H2/2,-H2   
TYPE,   1    
MAT,       1
REAL,   !ESYS,       0   
SECNUM,   3  
MSHAPE,0,2D  
MSHKEY,1
aMESH,all    
/ESHAPE,1.0  
/replot

Hide  

 

[ALF007 7]

Автор, а вы не пытались перейти в цилиндрическую систему координат? Как то считал задачу по отсеку фюзеляжа(в классике Ансиса). Но я перешел в цилиндрическую систему и полегчало.