Основы анализа конструкций в ANSYS. Конюхов А.В. - 57 стр.

K,1,0,0,,
K,2,a,0,,
K,3,a+b,0,,
K,4,a+b,-c,,
!* Построение линий
LSTR, 1, 2
LSTR, 2, 3
LSTR, 3, 4
ALLSEL, ALL
!* Задаем тип элемента
ET,1,BEAM3
! Задание опций элемента
KEYOPT,1,6,0
KEYOPT,1,9,9
KEYOPT,1,10,0
! Задание констант элемента
R,1, PI*D**2/4, PI*D**4/64,D, , , ,
! Свойства материала
UIMP,1,EX, , ,2e11, ! Модуль Юнга
UIMP,1,DENS, , ,7800, ! Плотность материала
UIMP,1,NUXY, , ,0.3, ! Коэффициент Пуассона
!* Построение сетки
LESIZE, ALL, , , 10, 1, ! Задание числа разбиений
LMESH,ALL ! Построение сетки
!* Задаем условия закрепления узлов
NSEL,S,LOC,X,0
NSEL,R,LOC,Y,0
D,ALL, , , , , , ,UX, UY
!
NSEL,S,LOC,X,A
NSEL,R,LOC,Y,0
D,ALL, , , , , , ,UY
!
NSEL,S,LOC,X,A+B
NSEL,R,LOC,Y,-C
D,ALL, , , , , ,UX,UY
!* Задание силы
NSEL,S,LOC,X,A+B
NSEL,R,LOC,Y,0
F,ALL,FX,-P,
!
ALLSEL, ALL
!
/SOLU
!* Анализ на собственные частоты
ANTYPE,2
!*
MODOPT,SUBSP,4 ! Спецификация метода решения и количества частот
EQSLV,FRONT ! Тип решателя
MXPAND,4, , ,0 ! Записывать решения 4 собственных форм