Приложение к AutoCAD
1. Версия программы
Версии нет, и, по всей видимости, автор не будет дальше заниматься программой.
2. Назначение
Под названием Geom объединены 2 независимо друг от друга функционирующих лиспа: момент_инерции.lsp и площадь_контура.lsp.
МОМЕНТ_ИНЕРЦИИ.LSP позволяет делать расчёт геометрических характеристик сечения, составленного из замкнутых полилиний, с построением эллипса инерции и отрисовкой осей.
ПЛОЩАДЬ_КОНТУРА.LSP позволяет определять площадь сложного составного сечения с указанием точки внутри сечения. Можно ипользовать как определитель площади заштрихованной области.
3. Интерфейс
 |
4. Об авторе
Сергей Пурошев г.Донецк @-mail : psw@asc.inep.net т. 335-46-49
Geom скачан с сайта http://helpstud.narod.ru/ из раздела Download, подраздел Дополнения для AutoCAD (VBA, Lisp), файл geom.zip.
5. Порядок установки
Для функционирования приложений необходима подгрузка расширенного лиспа. Для того, чтобы расширенный лисп подгружался при каждом запуске AutoCAD необходимо в файле acad.lsp (если его нет, то надо создать в Support) первой строкой прописать (VL-LOAD-COM). Далее нужно загрузить приложения: Tools®Load Applications®Contents®Add®файлы Момент_инерции.lsp и Площадь_контура.lsp. Эти файлы должны быть в директории, указанной в перечне Support file search path.
6. Инструкция по использованию
6.1 Использование Момент_инерции.lsp
Лисп работает только с замкнутыми полилиниями. Если объект начерчен не из замкнутых полилиний, то его можно преобразовать в них при помощи команды boundary. Работа начинается с вызова команды _i1, после чего приложение просит выбрать замкнутые полилинии. Затем на объекте вырисовываются в текущем слое центральные оси (красным цветом), главные оси (жёлтым цветом) и эллипс инерции (зелёным цветом). Вылетает текстовое окно AutoCAD с результатами расчёта геометрических характеристик сечения, где названия характеристик написаны по-русски, а значения показаны в единицах чертежа, что следует учесть перед началом построения сечения. Например, если требуется получить значения геометрических характеристик в см, то сечение нужно рисовать в масштабе 1:10 (если единицы чертежа – мм). Координаты центра тяжести сечения в результатах расчёта приводятся относительно начала координат чертежа.
6.2 Использование Площадь_контура.lsp
Приложение вызывается командой _k1, после чего запрашивается точка внутри контура. После ввода точки область, ограниченная внешним контуром и островами заливается (видимо для наглядности) и предлагается нажать любую клавишу. После нажатия клавиши в текстовом поле AutoCAD выдаётся площадь той самой области в единицах чертежа.
7.2 Результат работы приложения
7.2.1 Составное сечение
 |
РЕЗУЛЬТАТЫ РАСЧЕТА (в см)
**********************************************
Площадь сечения ............, = 146.265
Периметр сечения ..........., = 65.1327
Координата Х ц.т............, = 238.621
Координата Y ц.т............, = 321.458
**********************************************
Момент инерции Jx..........., = 1353.06
Момент инерции Jy..........., = 7179.35
Момент инерции Jxy.........., = 0.000470802
Радиус инерции ix..........., = 3.0415
Радиус инерции iy..........., = 7.00603
**********************************************
Момент сопротивления Wxdown., = 225.51
Момент сопротивления Wxup..., = 225.51
Момент сопротивления Wyleft., = 814.796
Момент сопротивления Wyrigh., = 544.354
**********************************************
Момент инерции Jmax........., = 7179.35
Момент инерции Jmin........., = 1353.06
Радиус инерции imax........., = 7.00603
Радиус инерции imin........., = 3.0415
Угол гл. центр. осей..., град = 0.00
**********************************************
7.1.2 Сечение с круглой дыркой
Результата нет, приложение не решает эту задачу.
7.1.3 Расчёт площади фасадов
 |
***********************
Площадь: 1374.73451754
7.1.4 Двутавровая балка (расчёт г.х.)
 |
РЕЗУЛЬТАТЫ РАСЧЕТА (в см)
**********************************************
Площадь сечения ............, = 12.0705
Периметр сечения ..........., = 38.9282
Координата Х ц.т............, = 542.117
Координата Y ц.т............, = 299.425
**********************************************
Момент инерции Jx..........., = 198.933
Момент инерции Jy..........., = 18.3658
Момент инерции Jxy.........., = 7.93844e-005
Радиус инерции ix..........., = 4.05967
Радиус инерции iy..........., = 1.23351
**********************************************
Момент сопротивления Wxdown., = 39.7866
Момент сопротивления Wxup..., = 39.7866
Момент сопротивления Wyleft., = 6.67846
Момент сопротивления Wyrigh., = 6.67846
**********************************************
Момент инерции Jmax........., = 198.933
Момент инерции Jmin........., = 18.3658
Радиус инерции imax........., = 4.05967
Радиус инерции imin........., = 1.23351
Угол гл. центр. осей..., град = 0.00
**********************************************
8 Заключение о работе приложения
8.1 Момент_инерции.lsp
Приложение считает одиночные и составные сечения, но у него два недостатка:
1) Одиночное круглое сечение считается не полностью, только его характеристики:
¨ площадь сечения, периметр сечения;
¨ координата Х ц.т, координата Y ц.т;
¨ момент инерции Jx;
¨ момент инерции Jy;
¨ момент инерции Jxy;
¨ радиус инерции ix;
¨ радиус инерции iy
После этого приложение выдаёт ошибку: {Момент сопротивления Wxdown., = ; error: divide by zero}, и остальные характеристики не считает. При расчёте труб возникает такая же ошибка. Но если производить расчёт составного сечения из нескольких круглых сечений или из комбинацией круглых и некруглых сечений, то проблем не возникает.
2) Расчёт сечений с дырками невозможен данным приложением, поскольку при попытке задать сечение с дыркой приложение выдаёт характеристики только внешней фигуры.
Вывод: приложение может быть использовано для расчёта геометрических характеристик любых одиночных и составных сечений из замкнутых полилиний, за исключением расчёта геометрических характеристик одиночных кругов и сечений с дырками.
8.2 Площадь_фасадов
Приложение в целом выполняет свою задачу и рассчитывает площадь заданной фигуры за вычетом островов, но в данном автором описании сказано, что оно может быть использовано для вычисления площади заштрихованной области. Это не следует понимать, как то, что можно использовать штриховку отдельно от образовавшего её контура и вычислить её площадь – приложение этого не делает.
При использовании программы можно использовать и линии, и окружности, и полилинии, и многоугольники для отрисовки внешнего контура и островов – всё это приложение понимает. Но нельзя использовать сплайны и эллипсы – приложение выдаст ошибку:
error: bad argument type: consp nil
Выдается такой запрос:
При нажатии Enter выдаётся следующее:
1 loop extracted.
1 Region created.
BOUNDARY created 1 region
В результате из заданной области приложение задаёт регион, но площадь не считает. При повторной попытке вызвать приложение уже для региона повторяет те же самые действия, что и после первой попытки.
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.