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

P=1000 ! Локально приложенная сила
T=50 ! Температура стержня
! Построение ключевых точек
K,1,0,0,a,
K,2,0,0,0,
K,3,b,0,0,
K,4,b,0,a,
K,5,b/2,-h,a/2,
K,6,b/2,0,a/2,
! Построение линий
LSTR,       5,    1
LSTR,       5,    2
LSTR,       5,    3
LSTR,       5,    4
LSTR,       5,    6
! Спецификация экрана – изометрическая проекция
/VIEW, 1 ,1,1,1
/ANG, 1
/REP,FAST
LPLOT
! Задание элемента
ET,1,LINK8 ! Пространственный стержневой элемент
!* Задание констант элемента
R,1,2e-4, , ! Номер констант, площадь сечения
!*
R,2,1e-4,0,
!* Задание свойств первого материала
UIMP,1,EX, , ,2e11, ! Модуль упругости
UIMP,1,NUXY, , ,0.3, ! Коэффициент Пуассона
!* Задание свойств второго материала
UIMP,2,EX, , ,6e8, ! Модуль упругости
UIMP,2,NUXY, , ,0.3, ! Коэффициент Пуассона
UIMP,2,ALPX, , ,12e-6, ! Коэффициент температурного расширения
! Выделить линию с координатами X = b/2, Z = a/2
LSEL,S,LOC,X,b/2
LSEL,R,LOC,Z,a/2
! Присвоить выделенной линии атрибуты:
! номер элемента, номер констант, номер материала
LATT,2,2,1, , , ,
! Обратить выделение – остаются выделенными оставшиеся линии
LSEL,INVE
! Присвоить выделенной группе линий атрибуты:
! номер элемента, номер констант, номер материала
LATT,1,1,1, , , ,
! Выделить все
ALLSEL,ALL
! Присвоить число делений на элементы – один элемент на линию
LESIZE,ALL, , ,1, , , , ,1
! Построить сетку на всех линиях
LMESH, ALL