выноска координат одной клавишей по иксам и игрекам

Тема в разделе "Autodesk", создана пользователем dkuroch, .

ГЕОДЕЗИСТ.RU
  1. #1
    РЕбята дайте ссылку или где можно скачать программулю под автокад чтоб одним щелчком сделать выноску координат в автокаде очень нужно замучался вручную выписовать их просто очень много я трачу просто свое попросту свое время помогите пожалуйста!!!!!!!
     
  2. X-Y-H

    X-Y-H Модератор Команда форума

  3. #3
    Добрый день Семен я извиняюсь что побеспокоил у меня к вам просьба на сайте геодезист.ru я скачал несколько программ к автокаду я не знаю ваша разработка или нет но когда открываешь программки AxeAndPointZ_v3.5 PloskHi_v0.1 com2acad_v2.1 PloskH для упрощения отрисовки исполнительных съемок там присутствует еще одна программка выноска координат одной клавишей по иксам и игрикам для меня очень нужная функция именно она и нужна совсем устал вручную выписывать координаты в день бывает до 500 координат выписываю все сайты облазил никто не знает помогите пожалуйста где можно скачать или купить дайте пожалуйста ответ буду очень благодарен заранее огромное спасибо
     
    Последнее редактирование модератором:
  4. borik

    borik Форумчанин

    #4
    dkuroch,
    Надо на чертеже подписать X,Y,H или тестовый файл сформировать?
     
  5. teas

    teas Форумчанин

    #5
    А импорт из автокада в текстовый файл пробовали?
     
  6. #6
    надо не текстовый файл а чтоб поставить выноску а автокаде размерную на ней будет указана координата Х и У
     

    Вложения:

  7. borik

    borik Форумчанин

    #7
    dkuroch,
    (defun c:geo_koord_mleader (/ pod_z koord xyz)
    (initget "Да Нет Lf Ytn _ Y N Y N")
    (setq
    pod_z (getkword "\nПодписывать Z [Да/Нет] <Нет>? : ")
    )
    (while (and
    (setq koord (getpoint "\nТочка <Выход>"))
    )
    (setq
    xyz (strcat "Y=" (rtos (nth 0 koord) 2 3)"\nX=" (rtos (nth 1 koord) 2 3)(if
    (= pod_z "Y")
    (strcat "\nZ=" (rtos (nth 2 koord) 2 3))
    ""
    ))
    )
    (VL-cmdf "_mleader" koord pause xyz "")
    )
    )
    (princ "Вызов фукции: geo_koord_mleader")
    Спасибо автору!!!
     

    Вложения:

  8. #8
    borik, я извеняюсь это прописка или в командной строке надо набрать
     
  9. borik

    borik Форумчанин

    #9
    dkuroch,
    Файлик внизу - это лисп.Скачай и пользуйся.
    В раскрытом коде последняя строка (_geo_koord_mleader)- команда для запуска из командной строки ACADа...
     
  10. #10
    borik подскажите куда этот файл в автокаде вкрячить я не сильно специалист в этой программе
     
  11. #11
    я просто в акаде набираю а команда не срабатывает_geo_koord_mleader
     
  12. borik

    borik Форумчанин

    #12
    dkuroch,
    Создай папку "Мои лиспы", сохрани в неё нужный лисп.
    Запускаем ACAD - сервис - приложения: указываем папку "Мои лиспы", выбираем нужный лисп, нажимаем - загрузить-.
    Повтори для автозагрузки (смотри в окне - приложения-): лисп будет грузиться автоматом при открытии ACADа...
    В ком.строке набираешь: _geo_koord_mleader и будет тебе счастье!::wink24.gif::
    Удачи!
     
    men нравится это.
  13. sergtor

    sergtor Форумчанин

    #13
  14. Qvinto

    Qvinto Форумчанин

    #14
    При условии что он пропишет путь к этой заветной папке к вспомогательным файлам в настройках. Я все лиспы гружу в папку C:\Program Files\AutoCAD Civil 3D XXXX\Support
     
  15. borik

    borik Форумчанин

    #15
    Qvinto, Support - это, конечно, "цивильнее" ::smile24.gif::,
    но у меня эта папка лежит вообще на другом диске, и всё работает ( на Civil 2008) ...
    Мне так легче в ней порядок поддерживать ::wink24.gif:: ...
    Удачи!
     
  16. #16
    Огромное спасибо
     
  17. chehoff

    chehoff Форумчанин

    #17
    По поводу Автозагрузки лиспов: некоторые лиспы автоматически не грузятся, а после того как слетел автокад(при попытке автозагрузки лиспа) я лучше каждый день буду загружать необходимый мне лисп!
     
  18. Qvinto

    Qvinto Форумчанин

    #18
    Это какие такие лиспы не грузятся?
    У всех грузятся, а у вас Автокад вылетает?
     
  19. chehoff

    chehoff Форумчанин

    #19
    Конечно не факт, что автокад слетел из-за лиспа. Но то,что, атозагрузка то сохраняет лисп то нет- это было у меня на ноуте в течение всего года, и знаменитый лисп" Тopcons" все никак не хотел включаться,потом вылетела фатальная ошибка, командная строка написала" какая-то фигня, что то работает неправильно..., после этого загружаю лиспы поштучно, так надежней.
     
  20. Qvinto

    Qvinto Форумчанин

    #20
    А макрос на кнопочку прописать не пробовали? Допустим, у вас есть лисп XXX,lsp делаете в адаптации кнопочку и в команде прописываете ей такой вот макрос ^C^C^P(if (not c:XXX)(load "XXX,lsp" ));^PXXX;
    Это избавит вас от рутинной и суетливой работы по ручной загрузке лиспов.
     
    Appostol2007, chehoff и borik нравится это.
  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление
  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление