Перейти к содержанию

Поиск сообщества

Показаны результаты для тегов 'lisp'.

  • Поиск по тегам

    Введите теги через запятую.
  • Поиск по автору

Тип контента


Форумы

  • Общие форумы
    • Принципы распространения продуктов Нанософт
    • Общие вопросы
    • Скачать полезное
    • Обсуждение любых САПР
  • Тематические форумы
    • nanoCAD как платформа
    • nanoCAD СПДС
    • nanoCAD Электро
    • nanoCAD ОПС
    • nanoCAD СПДС Железобетон
    • nanoCAD СПДС Металлоконструкции
    • nanoCAD СПДС Стройплощадка
    • nanoCAD СКС
    • nanoCAD Механика
    • nanoCAD Геоника
    • nanoCAD ВК
    • nanoCAD Отопление
    • nanoCAD Конструкторский BIM
    • nanoCAD Конструкции (модуль КЖ)
    • nanoTDMS
    • nanoCAD Схемы
    • nanoCAD ЛЭП
    • NormaCS
    • Функциональные расширения nanoCAD
    • Портал Технической поддержки
    • Обработка данных лазерного сканирования
  • Программы членов Клуба разработчиков
    • KDM-INFO
    • Проектное бюро "Фордевинд"
    • VetCAD++
  • Не о программах
    • Юмор
    • Вопросы и пожелания по работе форума
    • Вопросы и пожелания по работе сайта
    • Новостная лента сайта nanoCAD.ru

Блоги

  • Фишки и трюки nanoCAD
  • Простые вещи, которые ускорят вашу работу

Поиск результатов в...

Поиск контента, содержащего...


Дата создания

  • Начало

    Конец


Дата обновления

  • Начало

    Конец


Фильтр по количеству...

Регистрация

  • Начало

    Конец


Группа


Сайт


ICQ


Skype


Город


Интересы

Найдено: 23 результата

  1. Почему-то нету кнопки прикрепить в этой ветке форума у меня) Лисп удаления дублирующихся блоков во всём чертеже: https://ftp.nanosoft...665d415e5ade6d2 UPD. Кнопка появилась)) pl_bl-del-copy.LSP
  2. Выравнивание всех выбранных отрезков, начерченных с некоторым отклонением от 90 градусов по вертикали или горизонтали. (Исправление чертежей, начерченных "кривыми ручками"). Данная программа работает как в AUTOCAD, так и NANOCAD. Большое спасибо Автору программы! -------------------------------------------------------------------------- ;; Программа для выравнивания отрезков по осям X и Y ;; Если отрезки не будут лежать в плоскости МСК ;; результат работы не определен. -------------------------------------------------------------------------- Автор программы: Программу разработал Александр Ривилис по запросу участника форума caduser.ru под ником Forma. Ссылка на первоисточник: http://www.caduser.ru/forum/index.php?PAGE_NAME=read&FID=44&TID=20481&MID=114446&phrase_id=592044#message114446 Прикрепленный файл: l_align_xy.lsp С уважением.
  3. Актуальна ли эта http://bushman-andrey.blogspot.ru/2012/08/lisp-autocad.html проблема для NC?
  4. Коллеги. Доброго дня. Может, я не совсем верно определил тему, где написать свое сообщение. Но тем не менее... И надеюсь не стоит объяснять, что такое программа GEOBRIDGE. Но на всякий случай: https://geobridge.ru/docs По этой ссылке Вы можете узнать подробнее о программном продукте GEOBRIDGE. Вопрос прост: Есть ли те, кто хотел бы увидеть и приобрести GEOBRIDGE специально разработанный для платформы NАNOCAD? Так как разработка программ не дешевая задача, то необходимо определить потребность в ней. Напомню, что программа GEOBRIDGE рекомендована ГГО КГА (Геолого геодезическим отделом Комитета по градостроительству и архитектуре г. Санкт-Петербург) для выполнения камеральных геодезических работ, а также полностью соответствуют требованиям ГАУ "Леноблгосэкспертиза". Поскольку GEOBRIDGE устанавливается на данный момент лишь на платформу AutoCAD и только на полноценную дорогостоящую версию, то и возникла идея разработки программы и для других платформ. На данный момент выбрана платформа NАNOCAD, как наиболее перспективная. Прошу в комментариях высказаться за или против, подкрепив свою точку зрения доказательными аргументами. Спасибо.
  5. Функция назначенная на выполнение при активации элемента типа :popup_list, выполняется не только при активации данного элемента, но и сразу же при запуске основного модуля. Функции назначенные на выполнение при активации элементов типа :list_box, :button выполняется, как и положено, только при активации элемента на который они назначены. Протестировано на NCadSDK81_3712.2221.3574. В приложении тестовый пример и скрин результата. После старта приложения popuptst , не дожидаясь активации раскрывающегося списка POP2 , сразу же появляется ответ функции popact, как будто элемент :popup_list pop2 был активирован. Как сделать так, что бы функции назначенные на элементы типа :popup_list выполнялись ТОЛЬКО при активации соответствующих элементов ? DCL файл почему-то запрещено присоединять к сообщению. Вот его текст. popuptst.DCL popuptst : dialog { label = "Тест выпадающих списков"; width = 30; //:popup_list { :list_box { key = "pop1"; label = "pop1"; } :button { key = "bpop1"; label = "get 1"; } :popup_list { key = "pop2"; label = "pop2"; } :button { key = "bpop2"; label = "get 2"; } :popup_list { key = "pop3"; label = "pop3"; } :button { key = "bpop3"; label = "get 3"; } ok_cancel; } popuptst.LSP
  6. Так как на текущий момент размеры проставляемые в nanocad не учитывают ПСК, то текст в некоторых случаях вставляется в перевернутом виде! Для решения этой проблемы, а также для возможности в дальнейшем изменить ориентацию размерного текста согласно текущей ПСК, есть решение в виде скрипта на LISP (как бы его не любили). Команда запуска DimOrientUCS (Autocad также поддерживается) DimOrientUCS.LSP
  7. Добрый день. Роясь в автокадовских лиспах и проверяя их на совместимость с NanoCad 7 8, обнаружил очень полезный лисп, расставляющий выноски с координатами указанных точек по чертежу. В версии 7.0х64 Лисп отрабатывает почти до конца, но ничего не отрисовывает. В версии 8.0х64 выноска отрисовывается, но Nanocad вылетает с неустранимой ошибкой Может есть тут кто умный, разбирающийся в Lispе, кто переделает скрипт? vinoska.lsp
  8. Добрый день. Добавлю еще несколько Лисов, работающих в NanoCad 1. Расстановка блоков в вершины полилинии. Выставляет блоки по вершинам полилинии. точка привязки блока в вершине. Имя блока задается во время выполнения скрипта. 2. Нумерация вершин полилинии от 1 вершины с задаваемым начальным номером 3. Экспорт координт вершин полилини в Excel Блоки в вершины.zip Нумерация вершин полилинии.zip Экспорт координат полилинии в Excel.zip
  9. Выложу то, на чём у меня сейчас работает моя недоавтоматизация. Писалось всё с 2009 года, поэтому код неказистый. Но по принципу "работает - и ладно" используется и не трогается без особой необходимости. Комментарии написал минимально. Но зато с примером использования. Лисп я вообще не перевариваю, но нужно было что-то скриптовое с нормальным взаимодействием с объектами ACAD2006-8. А начинал с VBA. Как это всё работает, и тем более, как я это собрал в кучу - загадка Добавлю загрузчик лиспов из папки (автор - Зуенко Виталий) и простенький пример использования цикла - заполняет вертикальную шкалу по параметрам, запрашиваемым у пользователя из командной строки (можно и горизонтальную, функция внутри позволяет выбирать). Авось, кому пригодится это добро в начинаниях. PAV.lsp LSPloader.lsp Шкала.lsp
  10. Итак. Нужно в Нанокаде очищать форматирование объектов Мтекст. Пытался найти программиста чтобы реализовал, но расценки не порадовали, поэтому буду пытаться сам. Пойдем простым логическим путем. Нашел рабочую лиспину (кому интересно см. вложение) на cadusers, пытаюсь запустить в Нанокад. Не работает естественно... "Сервер ActiveX вернул ошибку: Библиотека не зарегистрирована." Отсюда вопросы: Как узнать какую библиотеку он хочет? Отладчик есть у нанокада? Библиотека наверняка автокадовская, если я ее найду и зарегистрирую будет работать? Стоит ли этим вообще заниматься, если я последний раз программировал лет 20 назад? Спасибо! UnFormatMtext.lsp
  11. Только начинаю разбираться с NanoCAD, посему прошу сильно не пиннать) Форум прочел, но ответа на свой вопрос не нашел( Есть файл .lsp, добавлен в автозагрузку, для запуска функций из него - нужно в командной строке LSP - О - функция Хотелось бы этот процесс упростить, путем добавления пользовательского меню, с кнопками вызывающими функии из моего файла. Как это делать с JS и VBS - посмотрел в примерах, все работает, а вот с LISP как быть? Помогите пожалуйста, может быть примером кто поделиться?
  12. Скрипт dgnpurge удаляющий словарь с типами линий DGN - актуально для чертежей полученных из программных продуктов Bentley Inc. Во первых снижает объем чертежа. Во вторых исключает зависание продукта nanocad при сохранении (в т.ч. автосохранении). Пример чертежа Черная дыра.zip Сам скрипт dgnpurge.LSP
  13. Есть программки на Лиспе, где загружаются типы линий из внешнего файла с помощью следующего кода: (command "-linetype" "load" "DOT" "acadiso.lin" "") В AutoCAD это работает, в нане - появляется диалоговое окно. Какие еще есть варианты?
  14. Программа подсчета суммы длин участков. Работает как в Автокаде, так и в наноКаде. Автор, прости, я не знаю тебя. Прими огромную благодарность за труд! Команда: calcl CALCL.LSP
  15. Тема очень хорошая, жаль что не популярная. Внесу и свою лепту. Скрипт вычисляющий суммарную и среднюю длину для отрезков и дуг. Автор Протасов Георгий. mlength.lsp
  16. Лисп, преобразовывающий сплайны в полилинии. Автор Tony Hotchkiss. spline-to-pline.lsp
  17. Никак не могу сообразить как сабж установить программно. Допустим после установки nanoCAD по умолчанию в новом чертеже имеем 1:100. А если надо 2:1 или 1:1 ?
  18. А что собственно поддерживает DCL? В SDK только четыре простейших примера. На сайте и в хелпе ничего не нашел. На лисп хоть есть список функций. Не могу вывести на экран вот такое окошко: ddsetup : dialog { label = "Формат листа"; : boxed_radio_column { label = "Параметры вставки"; : radio_button { label = "Вставить лист и настроить чертеж"; // mnemonic = "LS"; key = "ListAndSet"; } : radio_button { label = "Только вставить лист"; // mnemonic = "IL"; key = "InsertList"; } : radio_button { label = "Только настроить чертеж"; // mnemonic = "SD"; key = "SetDrawing"; } : popup_list { label = "Масштаб:"; key = "lscale"; edit_width = 24; // mnemonic = "S"; } } : boxed_column { label = "Лист"; : radio_row { : radio_button { label = "Первый лист"; // mnemonic = "p1"; key = "page1"; is_enabled=false; } : radio_button { label = "Следующий лист"; // mnemonic = "p2"; key = "page2"; is_enabled=false; } } : popup_list { label = "Формат:"; key = "format"; edit_width = 24; // mnemonic = "f"; is_enabled=false; } : radio_row { : radio_button { label = "Горизонтальный"; // mnemonic = "h"; key = "hor"; is_enabled=false; } : radio_button { label = "Вертикальный"; // mnemonic = "V"; key = "ver"; is_enabled=false; } } : toggle { label = "Только рамка"; // mnemonic = "B"; key = "bonly"; is_enabled=false; } : spacer { width = 2; } : text { key = "disp"; value = "xy"; width = 30; is_enabled=false; } : toggle { label = "Указать точку вставки"; // mnemonic = "bp"; key = "basepoint"; is_enabled=false; } } : boxed_radio_column { label = "Настройки чертежа"; : edit_box { label = "Ширина полилинии:"; // mnemonic = "W"; key = "lwid"; edit_width = 5; edit_limit = 10; is_enabled=false; } : toggle { label = "Настроить размерные стили"; // mnemonic = "DS"; key = "DimStyle"; is_enabled=false; } : toggle { label = "Настроить текстовые стили"; // mnemonic = "TS"; key = "TextStyle"; is_enabled=false; } } ok_cancel; } Вызываю диалог кодом, передранным с helloworld.lsp: (defun qqq () (setq dcl_id (load_dialog "DDSETUP.DCL")) (new_dialog "ddsetup" dcl_id) (start_dialog) (unload_dialog dcl_id) ) (defun c:qqq () (qqq) ) Сначала нанокад ругался на mnemonic, ну закомментировал. Теперь нанокад молча чего-то делает, но на экран ничего не выводит. Подозреваю, что не выполняется какой-то из элементов диалога, но какой именно не понятно.
  19. Что-то не пойму, usc (пск) нормально вроде работает если использовать вручную. Но как только используешь вызов этой команды из lisp функции, то чепуха получается. Вот в такой строке (command "_UCS" <начало пск> <точка по оси X> "") после ввода второй точки имеем поворот по оси Z. Глюк?
  20. После набора в командной строке _dtext, последовательно вводим стиль и/или выравнивание однострочного текста. А также высоту и угол поворота текста. Все нормально работает (судя по поиску на форуме, раньше были проблемы при редактировании). Ежкин кот (код), с LISP'а вызвать проблематично. (command "_dtext" <X,Y,Z> <высота> <угол поворота> "qwerty") работает до ввода строки "qwerty". Опосля получаем пустоту. Т.е. при вводе строки программно - string'а вообще нет. Та же последовательность при вводе вручную - строка есть. Что делать?!
  21. Отличная тема, спасибо большое! Привык к таким полезностям в автокаде, теперь, работая в нанокаде, ощущаю что их очень не хватает! PS: как подгружать lisp'ы?
  22. Возможен ли вызов сабж? В Автокаде делается так: ;Очистка от всех блоков (command "_-purge" "_b" "*" "_n")
  23. Привет всем! В новой версии появилась поддержка Lisp (пусть и в тестовом режиме). Есть программа, которая нормально выполнялась на автокаде. Запуск в Нанокаде Механике 4.0 приводит к зависанию самого Nano. Судя по командной строке зависает в цикле выполнения. Разработчики или энтузиасты, может гляните? Что надо переделать, чтобы работала под NanoCAD? TrueGear.zip
×
×
  • Создать...