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

Lisp.Вывод значений координат в мультивыноску


Рекомендуемые сообщения

Значения координат точек (X,Y,Z) выводятся в системе координат nanoCAD, округленные до двух знаков после запятой. Вывод координаты Z можно отрегулировать. 

geo_koord_mleader_adapt.lsp

Ссылка на сообщение
Поделиться на другие сайты
  • 2 месяца спустя...
41 минуту назад, Wlad сказал:

а поменять подписание координат местами  вместо х чтоб значение Y писало


... непонятно зачем, но

image.png.d165d195dc4b7ff316e2d168b4a7fd3f.png

Изменено пользователем A.Kudrjashov
Ссылка на сообщение
Поделиться на другие сайты

... я понимаю, что замечание не относится непосредственно к самому Скрипту, а к команде "_MLEADER", но тем не менее.

 

В отличие от AutoCAD, где выноска формируется в плоскости точки привязки:

Спойлер

image.png.6eec02f49674bc43530100eb7de4106d.png


В nanoCAD выноска формируется в плоскости с Z=0.

Спойлер

image.png.b47a9eebb69e79aed18d1ccd8948ac3a.png

 

В результате получаем:

Спойлер

image.png.fc7a248f625e43f6819b03df590198c6.png

 

Изменено пользователем A.Kudrjashov
Ссылка на сообщение
Поделиться на другие сайты
  • 1 месяц спустя...
6 минут назад, vt500 сказал:

А как увеличить число знаков до 3-х

 


xyz  (strcat "X=" (rtos (nth 0 koord) 2 3)"\nY=" (rtos (nth 1 koord) 2 3)

Ссылка на сообщение
Поделиться на другие сайты

Да спасибо уже разобрался это уже переделанный поменяны местами ХУ и округление до 3-х знаков

geo_koord_mleader_adapt.lsp

Ссылка на сообщение
Поделиться на другие сайты
  • 9 месяцев спустя...

Здравствуйте. Извините дилетанта, но значения x/y я должен самостоятельно прописывать? В nanoCad 5.1 происходит именно так...

Ссылка на сообщение
Поделиться на другие сайты

Добрый день! Зачем же... Вы же показываете точку и соответственно координаты её и считываются и пишутся

Ссылка на сообщение
Поделиться на другие сайты

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить в этой теме...

×   Вставлено с форматированием.   Восстановить форматирование

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

Загрузка...
  • Расскажите друзьям

    Нравится Официальный форум компании Нанософт? Расскажите друзьям!
  • Похожий контент

    • От Танюха
      Установлен стиль печати монохром, а на печать выходят цветные линии, что делать?
       
      Для того чтобы распечатать чертеж в монохроме ( черно-былым) необходимо чтобы цвета на чертеже были указаны в индексах. Если цвет задан RGB( 0,0,0), то СТВ-таблицы его не обрабатывают и на печать выходит цвет.
       
      Lisp "layers(1)"  производит автоматическую замену цвета слоя заданного в RGB на индексированный.
       
      Пример работы:
      1. Цвет слоя задан в RGB 
      2. Загрузить lisp
      3. После выполнения команды CHGTCL  в командной строке появится сообщение о заменённых цветах в слоях
      4. В Диалоге Слои цвет задан индексом
       
       
      layers (1).lsp
    • От Vozhich
      Есть программы которая считывает атрибуты блока и заполняет таблицу (например: общие данные).
      Случайно заметил глюк. При очередном открытии файла (после просмотра его автокадом) атрибуты блоков немного "поплыли".
      Помогает команда в командной строке "атробновить". Атрибуты в пространстве модели после этого выглядят нормально. Но программное чтение атрибута не видить его значения.
      При этом в свойствах блока значения атрибутов видно. Чтобы исправить ситуацию приходится ручками заходить в редактирование атрибута блока и не редактируя выйти.
      Что это может быть? и как избежать?
    • От A.Kudrjashov
      В AutoLISP различие результата выполнения функций print и prin1 заключается в частности в том, что функция print предваряет вывод очередной порции текста переводом строки.
      В nanoCAD этого не происходит ! 

       
      TestPrint.lsp
       
      test-print_nanoCAD.txt
       
      test-print_AutoCAD.txt
    • От Танюха
      Отрисовка условного обозначения откосов дороги с возможностью регулировать расстояние между штрихами (2,4).
      Ролик снят в nanoCAD 20.1
      otkgp_1.lsp
    • От Танюха
      Нумерация точек чертежа вручную с возможностью задавать префикс, суффикс и угол поворота текста.
       
      Num_Nc.lsp
×
×
  • Создать...