Я разве говорил, что дело в чертеже. Чертеж, плюс возможно еще какие то исходные данные, нужны для построчного тестирования работы найденного на просторах интернета лиспа.
Для того, чтобы понять, что у нас в нашей сборке, прикладываю файл справки. Правда там не включены и не описаны разделы "Трасса и профиль" и "Конвертирование GeoniCS". И что-то еще изменено и дополнено, но основное описано.
Хотел загрузить мою панель, но 10.2 мб оказывается слишком много. Поэтому загрузил на Яндекс.Диск: https://yadi.sk/d/A48dF6HpiHhZcw Демонстрационная версия на 3 дня. Порядок установки: Инсталляция пакета TopoSurvey Пакет TopoSurvey поставляется неупакованным. Инсталляция пакета производится вручную, установочной программы нет, однако установка довольно проста. Далее описывается порядок установки. ---------------------------------------------------------------------------- 1. Поместите папку "ACAD-надстройки" в C:\ACAD-надстройки. 2. Запустите AutoCAD. В основном меню выбрать пункты Tools > Options (в русской версии Сервис> Настройка). Затем в закладке Files выбрать группу Support File Search Path (Файлы Поддержки), щелкнуть кнопку Add (Добавить) и записать в появившееся новое место путь к папкам: C:\ACAD-надстройки C:\ACAD-надстройки\Survey C:\ACAD-надстройки\Survey\000 C:\ACAD-надстройки\Survey\Block C:\ACAD-надстройки\Survey\Image C:\ACAD-надстройки\Survey\Patern_topo C:\ACAD-надстройки\Survey\TS_lisp Это так называемая прописка программы. 3. Для прописки файла шаблона в основном меню выбрать пункты Tools > Options (в русской версии Сервис> Настройка), или просто набрать в командной строке команду _options. Затем в закладке Files выбрать группу Параметры шаблонов> Шаблон по умолчанию для команды БСОЗДАТЬ. В эту строку нужно поместить ссылку на файл C:\ACAD-надстройки\Survey\3DService.dwt. 4. В основном меню выбрать пункты Tools > Customize > Interface (в русской версии Сервис > Адаптация > Интерфейс), на закладке Адаптация найти пункт Частичные файлы НПИ, навести на него мышь и нажать правую кнопку мыши. В появившемся контекстном меню выбрать пункт Загрузить файл частичной настройки..., затем в диалоговом окне найти и выбрать файл TopoSurvey.cui. После этого он появится в списке файлов Частичных файлов НПИ. Теперь в нижней части окна нажать кнопку Применить и закрыть окно Настройки интерфейса пользователя. После этого в AutoCAD появится панель TopoSurvey. На всякий случай перегрузите AutoCAD. Теперь можно приступать к работе, инсталляция завершена.
В связи с ограниченностью времени на изучение успеваю прочитать только Справку. Понравилось. Не так , чтоб WAU! но все равно хорошо. Есть вопрос для консультации, но это в личку, если позволите?
Почему бы и нет? --- Сообщения объединены, 26 окт 2018, Оригинальное время сообщения: 26 окт 2018 --- В принципе мы делали всё исходя из понятия "под дурака". Так что, читать не обязательно, просто используйте гениальный способ обучения "методом тыка".
Так как: Ссылка в #684 ( http://geodesist.ru/threads/pomogu-...ogrammu-na-autolisp.23877/page-35#post-839749 ) удалена. Демонстрационная версия на 10 дней: https://yadi.sk/d/90pwY_kBy3pxCw
1958, Приветствую! Если есть такая возможность в програмке (которая pt_lay.fas) приблизить отметку к точке на максимально возможное ( в пределах разумного) расстояние ,но не садить на точку.
Здравствуйте. Может кто сделать или есть уже готовое решение, нужно добавить в стандартную команду Смещение (она же Подобие) возможность её использования не только на каждом объекте отдельно, но и применять сразу ко всем выделенным объектам? Желательно, чтобы объекты смещения создавались на отдельном слое.
Без отдельного слоя - ss_off.lsp --- Сообщения объединены, 30 окт 2018, Оригинальное время сообщения: 30 окт 2018 --- С созданием "отдельного" слоя для копий объектов смещения - ss_off_lay.lsp Хотелось бы знать, зачем это надо?
Нужно для создания разбивочного листа на монолитных работах. От фундаментов рисую подобием смещение на 20 - 30 см наружу, затем по вершинам полилиний создаю точки, а их координаты использую для выноса в натуру. Ваш лисп у меня не работает. После указания размера смещения ничего не проиходит. В командной строке появляется следующее: Команда: Команда: SS_OFF_LAY Имя слоя?123 Выберите объекты: найдено: 1 Выберите объекты: Размер и направление смещения?2 ((-1 . <Имя объекта: b6276394a0>) (0 . "LWPOLYLINE") (330 . <Имя объекта: b627e4e1f0>) (5 . "31252") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "123") (62 . 5) (370 . 40) (100 . "AcDbPolyline") (90 . 4) (70 . 0) (43 . 0.0) (38 . 0.0) (39 . 0.0) (10 14.64 1.21) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (10 14.67 1.21) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (10 14.67 1.26) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (10 14.64 1.26) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (210 0.0 0.0 1.0)) Аналогично с вторым лиспом: Команда: SS_OFF Выберите объекты: Противоположный угол: найдено: 3 Выберите объекты: Размер и направление смещения?2 #<%catch-all-apply-error%> Добавил файл с конструктивом в 2007 версии автокада
Курсором надо указать две точки. Я так понял, что вы забиваете расстояние на клавиатуре. В вашем чертеже включены привязки, это вносит путаницу при выполнении лиспа. Поэтому я добавил в лисп отключение/восстановление привязки. Но всё равно, что-то не так с объектами синего цвета. Я не разобрался.
Да, всё верно, на клавиатуре. Попробовал не с клавиатуры, результат аналогичный Команда: SS_OFF_LAY Имя слоя?123 Выберите объекты: найдено: 1 Выберите объекты: Размер и направление смещения? Вторая точка: ((-1 . <Имя объекта: b53b1c64a0>) (0 . "LWPOLYLINE") (330 . <Имя объекта: b53b9789f0>) (5 . "31252") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "123") (62 . 5) (370 . 40) (100 . "AcDbPolyline") (90 . 4) (70 . 0) (43 . 0.0) (38 . 0.0) (39 . 0.0) (10 14.64 1.21) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (10 14.67 1.21) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (10 14.67 1.26) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (10 14.64 1.26) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (210 0.0 0.0 1.0)) --- Сообщения объединены, 30 окт 2018, Оригинальное время сообщения: 30 окт 2018 --- Странно. В новом чертеже всё получилось. Спасибо
