• На форуме с 8 июля 2008г.
  • Сообщений: 9
  • Спасибо: 0

Тема: Точность отображения высот при экспорте из CREDO в AutoCAD

При экспорте точек из CREDO_DAT 3.04 в AutoCAD,высоты точек поверхности отображаются с точностью до миллиметров. А на топоплане должно быть до сантиметров (например, не 90.123 м а 90.12 м) Приходится вручную редактировать каждую отметку: убирать миллиметры... Если в съемке несколько тысяч пикетов    - это долго и муторно. Возможно ли изменить настройки Credo, чтобы он экспортировал сантиметры или средствами AutoCAD убрать тысячные сразу у всех отметок?

  • off
  • off
  • Активный участник
  • Откуда: Ростов-на-Дону
  • На форуме с 24 июня 2006г.
  • Сообщений: 264
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

> Алексей
насчет настроек кредо не знаю но для округления текста где-то здесь есть лиспик: выбрал все отметки, задал разряд и готово.

  • На форуме с 8 июля 2008г.
  • Сообщений: 9
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

> off
спасибо за ответ. Стал искать и нашел такой лисп:
"(defun c:tx ( / nameset setlength namtxtrun
txtzir para txtstr txtstr txtnum txtnew );
(setq nameset (ssget "_:L" '(( 0 . "TEXT"))))
(setq setlength (sslength nameset))
(setq i -1)
(repeat setlength
(setq i (1+ i))
(setq namtxtrun (ssname nameset i))
(setq txtzir (entget namtxtrun))
(setq para (assoc 1 txtzir))
(setq txtstr (cdr para))
(setq txtnum (atof txtstr))
(setq txtnew (rtos txtnum 2 1))
(setq para_new (cons 1 txtnew))
(setq txtNew (subst para_new para txtzir))
(entmod txtNew)
(entupd (cdr (assoc -1 txtNew)))
)
)"
Работает, но он округляет с тысячных долей сразу до десятых, а мне надо до сотых... как его можно исправить?

  • На форуме с 8 июля 2008г.
  • Сообщений: 9
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

все разобрался...
надо было исправить "rtos txtnum 2 1" на "rtos txtnum 2 2", вторая цифра - число знаков после запятой...

  • off
  • off
  • Активный участник
  • Откуда: Ростов-на-Дону
  • На форуме с 24 июня 2006г.
  • Сообщений: 264
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

> Алексей
Все верно. Я делал так же.

  • Mirniy
  • Восстановленный участник
  • На форуме с 18 апреля 2007г.
  • Сообщений: 13
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

Вот еще лиспик, он удобнее
(defun prc ();Устанавливаем точность округления
  (setq prec0 (if (null prec) 0 prec))
  (if (vl-catch-all-error-p (vl-catch-all-apply '(lambda ()
    (setq prec (vla-getInteger util (strcat "Точноcть округления: <" (itoa prec0) ">? "))))))
    (setq prec prec0));if
);defun
;
(defun c:RndTxt (/ adoc util ass kw)
  (vl-load-com)
  (setq adoc (vla-get-ActiveDocument (vlax-get-acad-object))
  util (vla-get-utility adoc); утилита выбора
        ass (vla-get-activeselectionset adoc)); набор
  (vla-clear ass); очистка набора от прежней грязи
  (print "\nВыберите текст для округления: ")
  (vla-SelectOnScreen ass; выбор текстовых объектов
    (vlax-safearray-fill (vlax-make-safearray vlax-vbinteger '(0 . 0)) '(0))
    (vlax-safearray-fill (vlax-make-safearray vlax-vbvariant '(0 . 0)) '("*TEXT")))
  (vlax-for txt ass; очистка набора от буквенно-цифровых элементов
    (if (wcmatch (vla-get-TextString txt) "*@*")
      (vla-removeItems ass (vlax-make-variant (vlax-safearray-fill (vlax-make-safearray vlax-vbobject '(0 . 0)) (list txt))))));vlax-for
  (print (strcat "Можно округлить " (itoa (vla-get-count ass)) " чисел"))
  (vla-InitializeUserInput util 128 "Да Нет")
  (setq kw (vla-getKeyWord util "Округлять скопом [Да/Нет]: <Да>?"))
  (if (= kw "") (setq kw "Да"))
  (vla-StartUndoMark adoc)
  (if (= kw "Да") (progn (prc) (vlax-for txt ass (vla-put-TextString txt (rtos (atof (vla-get-TextString txt)) 2 prec))));progn
    (vlax-for txt ass
(vla-highlight txt T)(prc) (vla-put-TextString txt (rtos (atof (vla-get-TextString txt)) 2 prec))));if
  (vla-EndUndoMark adoc)
);end

  • На форуме с 8 июля 2008г.
  • Сообщений: 9
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

спасибо, действительно удобнее!

  • Илья
  • Восстановленный участник
  • На форуме с 6 августа 2002г.
  • Сообщений: 60
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

В Credo можно округлять отображение отметок и координат и до сантиметров, и до метров. Все в настройках.

  • На форуме с 22 марта 2007г.
  • Сообщений: 46
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

Илье (и всем пользователям CREDO_DAT). Да, именно так - как настроена точность представления в DATe, так вы и получаете в DXF. НО! Только с версии 3.11 и выше. Подробнее см. здесь: ftp://ftp.credo-dialogue.com/CREDO_DAT_dop.pdf

  • Илья
  • Восстановленный участник
  • На форуме с 6 августа 2002г.
  • Сообщений: 60
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

Петрович. Ты не прав, у меня CREDO 3.0 и там тоже все можно настроить.

  • На форуме с 8 июля 2008г.
  • Сообщений: 9
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

2 Илья
Петрович прав,я думаю, просто вы что-то путаете. Я узнавал,  такая проблема у всех, кто пользуется версией ниже 3.1, вы первый, кто утверждает обратное...

  • На форуме с 22 марта 2007г.
  • Сообщений: 46
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

Илье.
Конечно, во всех версиях (даже самых старых) можно настроить точность представлениия углов, расстояний и координат. Но речь идет об экспорте в DXF, а этот экспорт в корне переработан был и для вывода данных, и для отображения отметок, и для отображения топографических объектов в версии 3.1. Естественно, это еще не все, впереди более полный экспорт, работа идет.

  • Илья
  • Восстановленный участник
  • На форуме с 6 августа 2002г.
  • Сообщений: 60
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

Господа, я не знаю про что вы, а я про это:
http://smages.com/c8/f3/c8f31b987f1f351 … dc.jpg.htm

  • Илья
  • Восстановленный участник
  • На форуме с 6 августа 2002г.
  • Сообщений: 60
  • Спасибо: 0

Re: Точность отображения высот при экспорте из CREDO в AutoCAD

Да, был не прав. В CREDO отметки округляются, а в AutoCad все равно три знака после запятой(((