Schau Dir das mal an:
!*************************************************************************************************************
!* Macro creates BC for the static load cases of FM2 and solves
!*************************************************************************************************************
/solu
LSCLEAR,ALL
allsel
!*************************************************************************************************************
d,77085,all !* BC for all LC
d,231219,all
d,231255,all
!*************************************************************************************************************
acel,0,0,9.81 !* LC 1, gravity Z
lswrite,01
!*************************************************************************************************************
acel,9.81,0,0 !* LC 2, gravity X
lswrite,02
!*************************************************************************************************************
acel,0,9.81,0 !* LC 3, gravity Y
lswrite,03
!*************************************************************************************************************
acel,6.9367,0,6.9367 !* LC 4, gravity Z+X 45º
lswrite,04
!*************************************************************************************************************
acel,0,6.9367,6.9367 !* LC 5, gravity Z+Y 45º
lswrite,05
!*************************************************************************************************************
lssolve,1,5,1 !* Solve
finish
!*************************************************************************************************************
/post1
SET,1,1,,,, !* Get load step 1
LCWRITE,1, , , !* Write load case
LCFACT,1,3, !* Set load case factor
LCZERO !* Delete results from DB
LCOPER,ADD,1, , , !* Add to DB LC1*3
RAPPND,6,6, !* Create Load case 6 (survival gravity axial)
SET,2,1,,,, !* Get load step 2
LCWRITE,2, , , !* Write load case
LCFACT,2,3, !* Set load case factor
LCZERO !* Delete results from DB
LCOPER,ADD,2, , , !* Add to DB LC2*3
RAPPND,7,7, !* Create Load case 7 (survival gravity lateral X)
SET,3,1,,,, !* Get load step 2
LCWRITE,3, , , !* Write load case
LCFACT,3,3, !* Set load case factor
LCZERO !* Delete results from DB
LCOPER,ADD,3, , , !* Add to DB LC3*3
RAPPND,8,8, !* Create Load case 8 (survival gravity lateral Y)
finish
------------------
Grüsse, Torsten
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP