| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Как создать точки на пересечении линий?

Как создать точки на пересечении линий?

Ответ
Поиск в этой теме
Непрочитано 21.03.2020, 10:21 #1
Как создать точки на пересечении линий?
Ust
 
Инженер-конструктор
 
Ульяновск
Регистрация: 05.01.2008
Сообщений: 259

Нашёл тему и код в котором на пересечении линий создаются окружности. Подскажите как отредактировать код чтобы на месте пересечения создавались точки.

Вложения
Тип файла: lsp mil.lsp (1.9 Кб, 20 просмотров)

Просмотров: 1203
 
Непрочитано 21.03.2020, 11:33
#2
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,787


Замени
Код:
[Выделить все]
 (vlax-invoke acsp 'addcircle pp (getvar "dimtxt"))
на
Код:
[Выделить все]
 (vlax-invoke acsp 'addpoint pp)
Пишу без проверок.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 21.03.2020, 12:01
#3
Ust

Инженер-конструктор
 
Регистрация: 05.01.2008
Ульяновск
Сообщений: 259


Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
Замени
Код:
[Выделить все]
 (vlax-invoke acsp 'addcircle pp (getvar "dimtxt"))
на
Код:
[Выделить все]
 (vlax-invoke acsp 'addpoint pp)
Пишу без проверок.
Так я догадался сделать, но не работает.
P.S. Извиняюсь. Всё работает. Я только Circle менял на Point. Огромное спасибо.
Ust вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Как создать точки на пересечении линий?

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Линии электрических соединений Shoorup Программирование 23 07.02.2015 15:13
LISP Есть дерево из линий, нужно на концы линий нарисовать метки Golem-iq LISP 16 06.03.2012 00:44
Создать из таблицы Excel (x,y,z,№) точки в AutoCAD Leonid.77 AutoCAD 2 29.10.2011 01:44
Как на лиспе начертить много линий по заданным координатам из одной точки topograf83 LISP 4 26.09.2009 22:53
Поставить точки в местах пересечений Юта Программирование 15 15.07.2009 16:01