| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
Поиск в этой теме |
08.05.2023, 17:13 | #1 | |
Autocad lisp проблема с командой intersect
Регистрация: 11.04.2023
Сообщений: 5
|
||
Просмотров: 770
|
|
||||
Регистрация: 11.04.2023
Сообщений: 5
|
Через командную строку в лиспе посмотрел, выдает имя этому примитиву. А при построении в autocad пишет следующее:
Команда: _union Выберите объекты: найдено: 1 Выберите объекты: найдено: 1, всего: 2 Выберите объекты: найдено: 1, всего: 3 Выберите объекты: найдено: 1 (1 повторно), всего: 3 |
|||
|
||||
Регистрация: 11.04.2023
Сообщений: 5
|
_$ print rect2
#<SUBR @000000cbb91ae700 PRINT> <Имя объекта: 7ff6d6c33550> _$ print rect4 #<SUBR @000000cbb91ae700 PRINT> <Имя объекта: 7ff6d6c335e0> _$ print cil4 #<SUBR @000000cbb91ae700 PRINT> <Имя объекта: 7ff6d6c335e0> _$ print cil5 #<SUBR @000000cbb91ae700 PRINT> <Имя объекта: 7ff6d6c33620> Дублируется rect4 и cil4, а как это исравить? |
|||
|
||||
Регистрация: 15.08.2005
г. Норильск
Сообщений: 470
|
Сорри, в программе я вижу:
Цитата:
Цитата:
__________________
Счастливо, Алексей! |
|||
|
||||
Регистрация: 11.04.2023
Сообщений: 5
|
Забыл изменить код на форуме. Пока пытался понять в чём проблема, немного его поменял. Но сути не меняет. Что в старом, что в новом проблема при объединении. Один элемент дублируется
Код:
Последний раз редактировалось Кулик Алексей aka kpblc, 09.05.2023 в 18:30. |
|||
|
||||
Регистрация: 15.08.2005
г. Норильск
Сообщений: 470
|
Навскидку:
Цитата:
модифицирует имеющийся. Поэтому в переменной rect4 сейчас что угодно (вероятно, один из созданных ранее цилиндров), но только не "свежеотзеркаленный" элемент.
__________________
Счастливо, Алексей! |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,855
|
Я бы серьезно задумался на предмет использования vla-методов для создания / удаления / ... твердых тел.
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
Регистрация: 11.04.2023
Сообщений: 5
|
Когда-нибудь я моет и дойду до использования vla-методов...
Вообщем изменил код так, что rect3 будет строиться без отображения с удалением. Может есть более изысканные методы решения данного вопроса, но объединить получилось ----- добавлено через 45 сек. ----- (command "_ucs" (list 0 (- 0 (+ H1 (/ (- L1 (* 2 H1)) 2.0)))) "") ;;;(command "_.mirror3D" rect3 "" "_ZX" (mapcar '+ (list 0 0 0) bpt) "_Yes") ;;;(setq rect3 (entlast)) (command "_.mirror3D" cil4 "" "_ZX" (mapcar '+ (list 0 0 0) bpt) "_No") (setq cil5 (entlast)) ;;;(command "_.mirror3D" cil3 "" "_ZX" (mapcar '+ (list 0 0 0) bpt) "_No") ;;;(setq cil5 (entlast)) (command "_ucs" (list 0 (- 0 (+ H1 (/ (- L1 (* 2 H1)) 2.0)))) "") (command "_rectang" (list (/ P 2) 0) (list H2 H1)) (command "_extrude" (entlast) "" H3) (setq rect3 (entlast)) (command "_union" rect2 cil4 cil5 rect3 "") ----- добавлено через ~2 мин. ----- Всем спасибо |
|||
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
LISP. Плагин создания кабельных линий и генерации КЖ раздела КИПиА. Протестировано на AutoCAD 2015...2022 и офис 2013...2019. NanoCAD 23 | petro_f | Готовые программы | 230 | 13.12.2023 22:10 |
LISP. Плагин сборки в чертёж отмеченных областей из других файлов чертежей, с разбивкой объектов MagiCAD и SPDS. Протестировано в AutoCAD 2015, 2018 MagiCAD2016 в AutoCAD 2015 | petro_f | Готовые программы | 20 | 28.07.2020 14:21 |
Проблема с переключением видеоадаптеров в AutoCAD 11/12 | nikitaryabko | AutoCAD | 6 | 08.01.2012 15:47 |
проблема с написанием программы на Lisp | Voyager | LISP | 9 | 07.04.2010 10:12 |
Проблема с XREF в Autocad 2005(2004). Помогите, кто знает. | 0leg | AutoCAD | 10 | 13.01.2006 17:53 |