Помогу бесплатно разработать любую программу на autolisp.

акад - МАССИВПРЯМОУГ хоть бантиками с шагом микрон.

 

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

 

А если так попробовать:
1. Задать свою систему координат.
2. построить точку по широте и долготе.
3. От нее построить точку на 6" больше по широте. И следом точку на 6" больше по долготе.
4. Измерить расстояние от исходной точки до второй и третьей.
Зная эти расстояния и направления создать нужный массив. Полагаю, что на небольшом участке по площади больших ошибок не будет.
5. Заменить точки на блоки кресты.

 

Не совсем так. Надо от первой точки построить вторую точку со сдвигом на 6" и по широте и по долготе.
Посмотрите как у меня построена внешняя рамка для м.1:25000 в голом автокаде при помощи лисп (бился над ним пару месяцев).

 

наверное, но нужен большой участок( а там погрешности точно будут.

--- Сообщения объединены, 15 апр 2022, Оригинальное время сообщения: 15 апр 2022 ---

да, круто! а тут такой же принцип массива? то есть вычисляется расстояние в метрах между параллелями/меридианами?

 

Нет. Делается пересчет из прямоугольных координат СК-42 в широту/долготу WGS-84 угловых точек рамки. Далее вычисляется разница точек по широте и долготе, интерполируется по длине сторон рамки и делается оформление.

 

Здравствуйте, уважаемые форумчане!
Помогите макросом удлинить горизонтальную полочку выноски ровно вдвое, но в сторону, противоположную от конца полочки. Это обычная полилиния. Цель - чтобы указатель выноски (косая линия) не перекрывала числовые данные. И надо предусмотреть выбор нескольких выносок рамкой.
Для тех, кто уже в теме: значительно облегчил задачу из поста #1220. Там действительно невозможно обработать прокси.
Моя благодарность всем откликнувшимся.

 

День добрый!
Вопрос: существует ли лисп, который показывает дату вставки примитивов в автокад? Пример: ткнул в точку и показывает, в свойствах, дату добавления элемента в чертеж. Как geomprops, только для дат. Где-то такое видел, но не могу найти.

 

Всем привет!
Нужно перебрать все блоки в чертеже и применить к ним определённую команду.

Попробовал сделать так: (раскрыть) Попробовал сделать так: (свернуть)

Код:

(defun c:z00 (/ blk)
(while (setq blk (tblnext "BLOCK" (not blk)))
(if (= (logand (cdr (assoc 70 blk)) (+ 1 4 8 16 32 64)) 0) ;Check for not unnamed / xref
(progn (command "._BEDIT" (cdr (assoc 2 blk)))
(command "._totalpurge")
(command "._BSAVE" "._BCLOSE"))))
(princ))

Запинается на блоке 20150901_Projet-DS. Чертёж тут.
Помогите исправить, пожалуйста.

 

Вопрос из предыдущего поста снимаю - адаптировал под свою задачу OverkillInBlocks.lsp.
Кстати, хороший лисп - рекомендую.

 

Коллеги добрый день.
Может кто нибудь помочь с лиспом который показывает выноской площадь выбранной штриховки?

 

FOXXX591, по ходу, ты форум вообще не читаешь.
https://geodesist.ru/resources/mleader.260/

 

О Игорь вернулся)). Только ты так мог написать. Спасибо за ссылку, нифига не читаю, весь в работе как всегда.

 

Наш самый скоростной поиск по форуму!!!

 

Добрый день! Существует ЛИСП который при синхронизации атрибутов блоков оставляет атрибуты на своем месте? Нужно применить синхронизацию отметкам, которые уже разнесены на плане. Сделать нужно так, как говорится в конце видео:

 

доброго времени суток! подскажите пожалуйста, существует ли лисп (для автокада) подготовки инженерных ведомостей пересечения трассой объектов: коммуникаций, угодий, водных преград, и т.д.. как бы это автоматизировать с составление профиля? помогите пожалуйста!!!

 

Добрый день, подскажите, есть лисп который записывает Z беря его из близ лежащих текстов и записывает в точку, замысел в обратном, что бы из точки или блока бралась Z и менялся близлежащий текст

 

Где-то тут я уже выкладывал. Повторюсь.

 

Здравствуйте. Нужен ЛИСП, который привяжет вершины существующей 3д полилинии к существующим ближайшим блокам, желательно в английском варианте.
Пример чертежа, для которого требуется ЛИСП прилагаю. Нужно, чтобы вершины полилиний точно совпали с блоками. Координаты вершин и блоков совпадают до см, различия в мм. На чертежах используются координаты с точностью 0,00

 

спасибо за ответ, не раскрыл тему до конца, ссори мой косяк. Надо что бы скопом и текст не пересоздавался а менялся существующий, что бы если он был повернут, поворот остался.

--- Сообщения объединены, 25 июл 2022, Оригинальное время сообщения: 25 июл 2022 ---