Раздел: Документация
0 ... 12 13 14 15 16 17 18 ... 33 ET,1,BEAM4 !* Задание опций элемента KEYOPT,1,2,0 KEYOPT,1,6,0 KEYOPT,1,7,0 KEYOPT,1,9,9 ! 9 промежуточных точек для построения эпюр KEYOPT,1,10,0 !* Задание констант элемента. Сечение первое ! Через запятую заданы: ! Площадь сечения: B1*H1 ! Момент инерции сечения Izz: (B1*H1**3)/12 ! Момент инерции сечения Iyy: (H1*B1**3)/12 ! Высота сечения вдоль оси z: B1 ! Высота сечения вдоль оси y: H1 ! Угол поворота сечения вдоль продольной оси: -90 ! Начальная деформация: 0 ! Момент инерции сечения Ixx: (H1*B1**3)/12+(B1*H1**3)/12 R,1, B1*H1, (H1*B1**3)/12, (B1*H1**3)/12, H1, B1, -90 , RMORE, ,(B1*H1**3)/12+(H1*B1**3)/12, , , , , !* Задание констант элемента. Сечение второе R,2, B1*B1, (B1**4)/12, (B1**4)/12, B1, B1, , RMORE, ,(B1**4)/6, , , , , !* Присвоение атрибутов линии и числа разбиений на элементы LSEL,S,LOC,Y,0 ! Выделить линию ! Присвоить атрибуты: материал, номер констант, номер типа элемента LATT, 1, 1, 1, 0 LESIZE,ALL, , ,10,1, ! Присвоить число разбиений на элементы: 10 на линию !* LSEL,INVE ! Обратить выделение LATT, 2, 2, 1, 0 ! Присвоить атрибуты LESIZE,ALL, , ,5,1, ! Присвоить число разбиений на элементы: 5 на линию ALLSEL,ALL ! Выделить все LMESH,ALL ! Построить сетку FINISH ! Выход из препроцессора  Группа операторов управления экраном, позволяющая просмотреть построенное сечение балки и присвоенные атрибуты. ! ******* /PNUM,MAT,1 ! Пронумеровать линии по свойствам материала /ESHAPE,1.0 ! Показать форму сечения /REPLOT ! Перерисовать ! ****** Замечание. На этом этапе для контроля зайдите в Utility Menu > PlotCtrls > Pan Zoom Rotate. В меню Pan Zoom Rotate выберем Box Zoom и растянем мышью область около какого-либо узла. Получим следующую картину.  /SOLU ! Вход в процессор решения !* Условия закрепления узлов ! Выделить узел с координатами (0, 0, 0) NSEL,S,LOC,X,0 NSEL,R,LOC,Y,0 NSEL,R,LOC,Z,0 ! Закрепить у всех (ALL) выделенных узлов степени свободы UX,UY,UZ D,ALL, , , , , ,UX,UY,UZ ! Выделить узел с координатами (0, 0, с) NSEL,S,LOC,X,0 NSEL,R,LOC,Y,0 NSEL,R,LOC,Z,C ! Закрепить у всех (ALL) выделенных узлов степени свободы UX,UY,UZ D,ALL, , , , , ,UX,UY,UZ ! Выделить узел с координатами (b+2*a, 0, 0) NSEL,S,LOC,X,B+2*A NSEL,R,LOC,Y,0 NSEL,R,LOC,Z,0 ! Закрепить у всех (ALL) выделенных узлов степени свободы UX,UY,UZ D,ALL, , , , , ,UX,UY,UZ ! Выделить узел с координатами (b+2*a, 0, с) NSEL,S,LOC,X,B+2*A NSEL,R,LOC,Y,0 NSEL,R,LOC,Z,C ! Закрепить у всех (ALL) выделенных узлов степени свободы UX,UY,UZ D,ALL, , , , , ,UX,UY,UZ !* Задание локальных нагрузок ! Выделить узел с координатами (a, 0, 0) NSEL,S,LOC,X,A NSEL,R,LOC,Z,0 NSEL,R,LOC,Y,0 ! Приложить нагрузку по координате Y величины -P F,ALL,FY,-P, ! Выделить узел с координатами (a, c, 0) NSEL,S,LOC,X,A NSEL,R,LOC,Z,C NSEL,R,LOC,Y,0 ! Приложить нагрузку по координате Y величины -P F,ALL,FY,-P ! Выделить узел с координатами (a+b, 0, 0) NSEL,S,LOC,X,A+B NSEL,R,LOC,Z,0 NSEL,R,LOC,Y,0 ! Приложить нагрузку по координате Y величины -P F,ALL,FY,-P ! Выделить узел с координатами (a+b, c, 0) NSEL,S,LOC,X,A+B NSEL,R,LOC,Z,C NSEL,R,LOC,Y,0 ! Приложить нагрузку по координате Y величины -P F,ALL,FY,-P ALLSEL,ALL LSWRITE,1, ! Записать приложенную нагрузку, как первый шаг нагружения ! Приложение распределенной нагрузки Распределенная нагрузка прикладывается только на элементы, но элементы можно выделить, только зная, на которой линии они находятся. Поэтому: LSEL,S,LOC,X,a ! Выделяем слой с координатой X = a LSEL,A,LOC,X,a+b ! Добавляем слой с координатой X = a + b LSEL,R,LOC,Y,0 ! Из слоя выделяем линии с координатой Y = 0 ESLL,S ! Выделяем элементы на выделенных линиях SFBEAM,ALL,1,PRES,q,q, , , , , ! Приложить распределенную нагрузку ALLSEL, ALL ! Выделить все LSWRITE,2, ! Записать, как второй шаг нагружения ! Учет веса в ANSYS производится с помощью задания поля ускорений ! В данном случае по Y: 9,8 ACEL,0,9.8,0, ! Ускорение по X, Y, Z LSWRITE,3, ! Записать, как третий шаг нагружения !* Запуск на решение LSSOLVE,1,3,1, ! Решать, используя пошаговое нагружение с 1 по 3 с шагом 1 FINISH ! Выход из процессора решения !* Вход в постпроцессор /POST1 ! Результаты постпроцессорной обработки, ! вводить поблочно в окно ANSYS Input 0 ... 12 13 14 15 16 17 18 ... 33
|
