[Bdod]

Всем доброго времени суток!
Нужна помощь, есть 3DГрань и линия проходящая сквозь нее, нужно найти точку пересечения, или привязаться к этой точке... как это можно сделать?
[ATTACH]1171963109.dwg[/ATTACH]

[Хмурый]

Вот
[ATTACH]1171963897.dwg[/ATTACH]

[Огурец]

Уважаемый Bdod!

Я потому и не работаю с плоскостями (ну может в исключительных случаях, для формования рельефа), что постоянно возникают вопросы, которых нет и не может быть в твердотельном или каркасном проектировании. Плюньте вы на них, и делайте всё в телах.

[Bdod]

Сообщение от Огурец Уважаемый Bdod! Я потому и не работаю с плоскостями (ну может в исключительных случаях, для формования рельефа), что постоянно возникают вопросы, которых нет и не может быть в твердотельном или каркасном проектировании. Плюньте вы на них, и делайте всё в телах.

Уважаемый Огурец!
Я бы с превеликим удовольствием работал бы с телами, но это просто невозможно (см. мои мучения по превращению плоскостей в тело http://dwg.ru/forum/viewtopic.php?p=...ghlight=#88647)

[Bdod]

Сообщение от Хмурый Вот [ATTACH]1171963897.dwg[/ATTACH]

Может и так... ну и как это сделать... я так понимаю это элементарно,.. но я не знаю как?

[Chief Justice]

Вот один из вариантов:
В основании линии рисуем круг, перпендикулярно этой самой линии...
Выдавливаем круг с использованием линии как пути ( линия остается)...
Далее плоскостью по трем точкам существующей плоскости делим получившийся цилиндр...
Цилиндр взрываем, остается круг, центр которого и есть точка пересечения прямой с плоскостью...

[Mikhail]

Я так делал с помощью доп. построения цилиндра (выдавливание по линии), а затем его Section. Центр плоскости и есть точка пересечения.
Может как то еще можно.
p.s. опередили

[DY]

Из Хелпа АвтоГАДа:

Для определения точек пересечения служат функции ill и ilp. ill(p1,p2,p3,p4) Определение координат точки пересечения двух линий: (p1,p2) и (p3,p4). Все точки считаются трехмерными. ilp(p1,p2,p3,p4,p5) Определение координат точки пересечения линии (p1,p2) и плоскости, проходящей через три точки (p3,p4,p5).

Или я не прав? - надо только построением?

[Хмурый]

Надо выбрать вначале стиль точки. Для чего переменную PDMODE выставить в 35 , например. Или вызвать команду '_ddptype и указать тип точки
Затем отключаем ВСЕ привязки
Вводим команду _point
Затем включаем геометрический калькуллятор

Код:

[Выделить все]

'cal

Enter и на приглашение вводим выражение

Код:

[Выделить все]

ilp (cur,cur,cur,cur,cur)

Enter Указываем точки в след. последовательности Первые две точки на линии, остальные три - на плоскости. (Включать привязки через Shift+Прав. кн.)

[Bdod]

поробуемс...

[Bdod]

Сообщение от Хмурый Надо выбрать вначале стиль точки. Для чего переменную PDMODE выставить в 35 , например. Или вызвать команду '_ddptype и указать тип точки Затем отключаем ВСЕ привязки Вводим команду _point Затем включаем геометрический калькуллятор Код: [Выделить все] 'cal Enter и на приглашение вводим выражение Код: [Выделить все] ilp (cur,cur,cur,cur,cur) Enter Указываем точки в след. последовательности Первые две точки на линии, остальные три - на плоскости. (Включать привязки через Shift+Прав. кн.)

получилось,... тока привязки отключать не обязательно, (иначе почему то не работало, выбираешь р1, р2, а потом сбрасывает)...

[Bdod]

метод хороший, а упростить его можно...
или можно ли как то настроить "привязки" пересечения линии и грани, ведь пересечение двух линий в пространстве он ловит...

[Хмурый]

Смотри, если включен магнит- жди неправильных результатов

[Хмурый]

Это макрос на кнопку от Андрея С
чтобы не вводить вручную.

Код:

[Выделить все]

_non;'_cal;ilp (cur,cur,cur,cur,cur);

[Bdod]

Сообщение от Хмурый Это макрос на кнопку от Андрея С чтобы не вводить вручную. Код: [Выделить все] _non;'_cal;ilp (cur,cur,cur,cur,cur);

а если вот так вот
_point;'_cal;ilp (cur,cur,cur,cur,cur); - то сразу получится точка где надо

тока вот я не как не пойму почему нельзя пользоватся включенными привязками??

[Хмурый]

Когда я строил точку пересечения в тврем примере- то она притянулась первый раз к середине линии. Пришлось строить повторно при отключеной привязке. Это происходит при включенной рпции притягивания к ближайшей точке привязки (см. рис.)

Макрос можно использовать в прозрачном режиме и не обязательно с точкой, а скажем с линией или полилинией или другим примитивом
[ATTACH]1171967917.jpg[/ATTACH]

[Bdod]

Сообщение от Хмурый Когда я строил точку пересечения в тврем примере- то она притянулась первый раз к середине линии. Пришлось строить повторно при отключеной привязке. Это происходит при включенной рпции притягивания к ближайшей точке привязки (см. рис.) Макрос можно использовать в прозрачном режиме и не обязательно с точкой, а скажем с линией или полилинией или другим примитивом [ATTACH]1171967917.jpg[/ATTACH]

магнит у меня был включен, точка при этом многократном повторе попадала туда куда нужно, ну раз нужно его выключить зхначит выключим...

Вопрос снимается. Всем, особенно Хмурый, огромное спасибо!

[Андрей С.]

В приведенном Хмурым макросе _none стоит как раз для того, чтобы не отключать привязку при пользовании им.

[T34GTS]

А может кто привести пример простенькой программы на лиспе чтоб точки создавались на нескольких линиях в местах пересечения несколькими плоскостями?

[АлексЮстасу]

Сообщение от Хмурый Код: [Выделить все] _non;'_cal;ilp (cur,cur,cur,cur,cur);

Это можно сделать как (command...)? В каком виде в нем нужно записать координаты точек, если они вычислены?

[МишаИнженер]

При решении данной проблемы должны помочь следующие картинки:
https://cf.ppt-online.org/files/slid...S/slide-10.jpg
https://catchsuccess.ru/wp-content/u...be3f94b3e.jpeg
https://s0.showslide.ru/s_slide/0b06...86a607ae7.jpeg
Нажмите в прилагаемом файле последовательно кнопки:
1) "Получить координаты 3 точек" эта команда задает координаты 3 точек плоскости
2) "Получить координаты точек линии" эта команда задает точки линии
Точки пересечения линии и плоскости будут находиться в таблице с названием: "Координаты точки линии на плоскости"
Внизу будет вычислено расстояние от точки до плоскости. Если это расстояние равно 0, значит координаты вычислены правильно.
Программа VBA (Офис 32) настроена на работу с AutoCAD 2013.
Что надо начертить в этой точке? Может какой-то дополнительный объект?

[АлексЮстасу]

Сообщение от МишаИнженер При решении данной проблемы должны помочь следующие картинки: https://cf.ppt-online.org/files/slid...S/slide-10.jpg https://catchsuccess.ru/wp-content/u...be3f94b3e.jpeg https://s0.showslide.ru/s_slide/0b06...86a607ae7.jpeg Нажмите в прилагаемом файле последовательно кнопки: 1) "Получить координаты 3 точек" эта команда задает координаты 3 точек плоскости 2) "Получить координаты точек линии" эта команда задает точки линии Точки пересечения линии и плоскости будут находиться в таблице с названием: "Координаты точки линии на плоскости" Внизу будет вычислено расстояние от точки до плоскости. Если это расстояние равно 0, значит координаты вычислены правильно. Программа VBA (Офис 32) настроена на работу с AutoCAD 2013. Что надо начертить в этой точке? Может какой-то дополнительный объект?

Класс!
1. В каком виде нужно записывать вычисленные координаты точек для вызова калькулятора ilp (cur,cur,cur,cur,cur), если его вызывать в (command ...)?
2. В одной старой теме есть два соответствующих лиспа: от gile - https://forums.autodesk.com/t5/visua...746467#M291429 и от Kent1Cooper - https://forums.autodesk.com/t5/visua...747106#M291440.
С этими лиспами есть проблемы. У gile, похоже, есть ошибки, и точки, попадающие в грани, могут считаться вне. У Kent1Cooper точки на вершинах граней могут считаться не на гранях. (Выяснилось, что у Kent1Cooper делается сравнение без учета погрешностей вычисления).
---
Еще нашел решение на lisp - https://forums.autodesk.com/t5/autoc...28132#M1094570

[виктор ермаков]

Добрый день. Нахождение точки пересечения с помощью лисп:
(command "_.cal" "test210524=1+1"); инициализирует команду кальк, без инициализации дальнейший код может не срабатывать
(setq pt1 (getpoint);первая точка отрезка пересекающего 3д грань
pt2 (getpoint);вторая точка отрезка пересекающего 3д грань
pt3 (getpoint);первая точка 3д грани
pt4 (getpoint);вторая точка 3д грани
pt5 (getpoint);третья точка 3д грани
)
(C:CAL "p6=ilp(pt1,pt2,pt3,pt4,pt5)")
(setq pt_int p6)