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

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

  1. zvezdochiot

    zvezdochiot Форумчанин

  2. 1958

    1958 Форумчанин

    Я эту тему на dwg.ru видел, отвечать не стал, так как надоела уже эта нумерация.
     
    zvezdochiot нравится это.
  3. Добрый день.

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

    Спасибо.
     

    Вложения:

  4. TulGeo

    TulGeo Форумчанин

    меткой характерной линии и всё
     
  5. 1958

    1958 Форумчанин

    Пожалуйста! ::biggrin24.gif::
    Пробуйте.
     

    Вложения:

    • mll.LSP
      Размер файла:
      1,4 КБ
      Просмотров:
      21
  6. Добрый день.

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

    Спасибо.
     
  7. 1958

    1958 Форумчанин

    А что такое Х метров? Откуда они берутся?

    Возможно, но надо подумать.
     
  8. Х метров это цифра, число, например 3. Чтобы в мвыноске итоговое значение суммировалось: длина полилинии 14.16 м и +3 м - "L=17.16 м"
     
  9. 1958

    1958 Форумчанин

    Лайк поставить не забудьте. Я старался.
     

    Вложения:

    • mlf.LSP
      Размер файла:
      1,9 КБ
      Просмотров:
      18
    desty, Миразиз, Misha_E и 3 другим нравится это.
  10. Этот вариант совсем другой. Приходиться больше действий для ввода делать (каждый раз вводить Х доп метры, марку кабеля).
    Но тоже пригодится.

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

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

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

    1958 Форумчанин

    1. Учите, и обрящете, толцыте, и отверзется.
    2. Учитесь формулировать вашу задачу и запросы.
    3. Попробуйте такой вариант:
     

    Вложения:

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

    Elena95-97 Форумчанин

    1958, подскажите, плз, как в вашем len_line.LSP из поста #3 подправить длину в м, потому что по факту длина выдаётся в мм (а подписывается в м),
    т.е. 500 мм записываются как 550 м, а надо, чтобы было 0.50 м. Спасибо!
     
  13. 1958

    1958 Форумчанин

    Могу сказать, что это "изюминка" проектировщиков - чертить все в мм.
    Замените строчку (vl-cmdf "_leader" pt pause "" (strcat (rtos len_curve 2 2) " м") "")
    на (vl-cmdf "_leader" pt pause "" (strcat (rtos (/ len_curve 1000) 2 2) " м") "")
     
    Elena95-97 нравится это.
  14. Elena95-97

    Elena95-97 Форумчанин

    Да черчу в мм, а все вычисления произвожу в м, в м кв. Спасибо за подсказку и быструю реакцию. Ставлю лайк!
    --- Сообщения объединены, 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) " м")),
    но, наверное, неправильно, ставится всё одной длиной, прошу помощи...
     
  15. 1958

    1958 Форумчанин

    Должно быть так: (setq s (strcat "L" k "=" (rtos (/ s 1000) 2 2) "m"))
     
    Elena95-97 нравится это.
  16. Elena95-97

    Elena95-97 Форумчанин

    Спасибо, 1958!
     
  17. Elena95-97

    Elena95-97 Форумчанин

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

    1958 Форумчанин

     

    Вложения:

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

    Elena95-97 Форумчанин

    Здорово, огромное спасибо, 1958, за лисп LLL, если можно, маленький нюанс, текст немного далеко от линии, где-то на 3.5, а лучше было бы на 1.5 мм... и перевод в м у меня опять не получился...
     
  20. 1958

    1958 Форумчанин

    Найдите строчку (setq pt (polar p (+ a (/ pi 2)) (* 2 h))). Поиграйтесь с последней 2.
     
    Elena95-97 нравится это.
  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление
  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление