Добро пожаловать!

Войдите или зарегистрируйтесь сейчас!

Войти

Выноска длины полилинии

Тема в разделе "Autocad", создана пользователем wert, 9 авг 2018.

  1. zvezdochiot

    Форумчанин

    Регистрация:
    27 июн 2014
    Сообщения:
    5.921
    Симпатии:
    2.092
    Адрес:
    г. Москва
    #61
  2. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
    Я эту тему на dwg.ru видел, отвечать не стал, так как надоела уже эта нумерация.
     
    #62
    zvezdochiot нравится это.
  3. Антон.гео-автокад

    Регистрация:
    7 окт 2022
    Сообщения:
    4
    Симпатии:
    0
    Добрый день.

    Как изменить, чтобы текст выводил в две строки, верхняя "марка кабеля" нижняя "L=", это получается с мультивыноской,
    1. прописываю "_leader" на "_mleader", мвыноску делает, но текст не выдаёт?
    2. где в коде прописать для мтекста высоту текста, стиль, выравнивание, также свойства и для мультивыноски?

    Спасибо.
     

    Вложения:

    #63
  4. TulGeo

    Форумчанин

    Регистрация:
    11 окт 2018
    Сообщения:
    144
    Симпатии:
    84
    Адрес:
    Тула
    меткой характерной линии и всё
     
    #64
  5. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
    Пожалуйста! ::biggrin24.gif::
    Пробуйте.
     

    Вложения:

    • mll.LSP
      Размер файла:
      1,4 КБ
      Просмотров:
      13
    #65
    Миразиз и Антон.гео-автокад нравится это.
  6. Антон.гео-автокад

    Регистрация:
    7 окт 2022
    Сообщения:
    4
    Симпатии:
    0
    Добрый день.

    1. Куда добавить прибавку дополнительных Х метров, чтобы в мвыноске итоговые суммировались L=длина полилинии+Х м?
    2. Получится, чтобы длина в мвыноске менялась, если изменилась длина полилинии, т.е. автоматически или после реген?
    Снимок мвыноска.JPG

    Спасибо.
     
    #66
  7. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
    А что такое Х метров? Откуда они берутся?

    Возможно, но надо подумать.
     
    #67
  8. Антон.гео-автокад

    Регистрация:
    7 окт 2022
    Сообщения:
    4
    Симпатии:
    0
    Х метров это цифра, число, например 3. Чтобы в мвыноске итоговое значение суммировалось: длина полилинии 14.16 м и +3 м - "L=17.16 м"
     
    #68
  9. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
    Лайк поставить не забудьте. Я старался.
     

    Вложения:

    • mlf.LSP
      Размер файла:
      1,9 КБ
      Просмотров:
      14
    #69
    Миразиз, Misha_E, dimrin и 2 другим нравится это.
  10. Антон.гео-автокад

    Регистрация:
    7 окт 2022
    Сообщения:
    4
    Симпатии:
    0
    Этот вариант совсем другой. Приходиться больше действий для ввода делать (каждый раз вводить Х доп метры, марку кабеля).
    Но тоже пригодится.

    Лучше в самом коде mll.LSP прописать Х доп метры (а уже для каждого варианта вручную менять эту цифру).

    Надо начинать самому autolisp изучать.

    Спасибо за потраченное время.
     
    #70
  11. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
    1. Учите, и обрящете, толцыте, и отверзется.
    2. Учитесь формулировать вашу задачу и запросы.
    3. Попробуйте такой вариант:
     

    Вложения:

    • fml.LSP
      Размер файла:
      2 КБ
      Просмотров:
      14
    #71
  12. Elena95-97

    Форумчанин

    Регистрация:
    31 май 2022
    Сообщения:
    28
    Симпатии:
    1
    1958, подскажите, плз, как в вашем len_line.LSP из поста #3 подправить длину в м, потому что по факту длина выдаётся в мм (а подписывается в м),
    т.е. 500 мм записываются как 550 м, а надо, чтобы было 0.50 м. Спасибо!
     
    #72
  13. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
    Могу сказать, что это "изюминка" проектировщиков - чертить все в мм.
    Замените строчку (vl-cmdf "_leader" pt pause "" (strcat (rtos len_curve 2 2) " м") "")
    на (vl-cmdf "_leader" pt pause "" (strcat (rtos (/ len_curve 1000) 2 2) " м") "")
     
    #73
    Elena95-97 нравится это.
  14. Elena95-97

    Форумчанин

    Регистрация:
    31 май 2022
    Сообщения:
    28
    Симпатии:
    1
    Да черчу в мм, а все вычисления произвожу в м, в м кв. Спасибо за подсказку и быструю реакцию. Ставлю лайк!
    --- Сообщения объединены, 31 янв 2023, Оригинальное время сообщения: 31 янв 2023 ---
    1958, попыталась поменять мм на м в другом Вашем лиспе LL.lsp
    строчку (setq s (strcat "L" k "=" (rtos s 2 2) "m"))
    заменяю на (setq s (strcat "L" k "=" (rtos (/ len_curve 1000) 2 2) " м")),
    но, наверное, неправильно, ставится всё одной длиной, прошу помощи...
     
    #74
  15. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
    Должно быть так: (setq s (strcat "L" k "=" (rtos (/ s 1000) 2 2) "m"))
     
    #75
    Elena95-97 нравится это.
  16. Elena95-97

    Форумчанин

    Регистрация:
    31 май 2022
    Сообщения:
    28
    Симпатии:
    1
    Спасибо, 1958!
     
    #76
  17. Elena95-97

    Форумчанин

    Регистрация:
    31 май 2022
    Сообщения:
    28
    Симпатии:
    1
    1958, Ваш лисп LL.lsp проставляет длину всех полилиний, отрезков, дуг, окр. и т.д. автоматом в чертеже без выбора (так что применять надо с осторожностью, т.к. может подписать и то, что не нужно), а есть возможность добавить в лисп возможность одиночного и множественного выбора, а высоту текста назначить по умолчанию, например, 2.5 (или текущим стилем текста)? И можно убрать L и k, оставить только значение длины. Спасибо.
     
    #77
  18. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
     

    Вложения:

    • lll.LSP
      Размер файла:
      1,8 КБ
      Просмотров:
      17
    #78
    Миразиз и Elena95-97 нравится это.
  19. Elena95-97

    Форумчанин

    Регистрация:
    31 май 2022
    Сообщения:
    28
    Симпатии:
    1
    Здорово, огромное спасибо, 1958, за лисп LLL, если можно, маленький нюанс, текст немного далеко от линии, где-то на 3.5, а лучше было бы на 1.5 мм... и перевод в м у меня опять не получился...
     
    #79
  20. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
    Найдите строчку (setq pt (polar p (+ a (/ pi 2)) (* 2 h))). Поиграйтесь с последней 2.
     
    #80
    Elena95-97 нравится это.

Поделиться этой страницей

  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление