VetCAD

Программа для обнуления Z координаты всех объектов AutoCAD, включая 3DSOLID и 3DSPLINE

    0 оценок

Jurasic (Jurasic@yandex.ru)

размещено: 21 Марта 2004
Скачал эту великолепную программку с сайта http://www.cadstudio.cz
Посмотрите какая красота мысли и очень короткий код.
Программа написана для обнуления Z координаты ВСЕХ объектов AutoCAD, включая 3DSOLID и 3DSPLINE,
причем в двух последних случаях без возможности отмены.
Я сделал малюсенькую доработку, чтобы она не портила трехмерку...
;Первоначальный вариант программы "плющит" все без разбора.

;;;(defun C:FLATTEN ()
;;; (command "_.UCS" "")
;;; (command "_.move" "_all" "" '(0 0 1e99) ""
;;; "_.move" "_p" "" '(0 0 -1e99) "")
;;; (princ)
;;;)

Чтобы посмотреть как это происходит - загрузите первоначальную версию программы.
В чертеже должна быть трехмерка

P.S.

1. бывают непонятные глюки - мелкие дуги программа ИНОГДА кидает в т. 0,0,0
2. Важно: команда UNDO для трехмерки и трехмерных сплайнов не работает - это навсегда :))


Jurasic (Jurasic@yandex.ru)
13 09 02

Комментарии

Комментарии могут оставлять только зарегистрированные участники
Авторизоваться
Комментарии 1-3 из 3
Rost , 23 августа 2005 в 00:02
#1
Спасибо мил человек!
Мля... наконец то порядок в чертежах на фирме наведу.
Кароче тема такая:
На фирме появились несколько новых проектов, начинали их делать молодые ССИКУХИ из МАРхИ, нет бы с нуля чертить так они туда из всего что нашлось всего по немногу налили, кароче координата Z скачет +- несколько сот метров, все мучеются но терпят. пришел конец мучениям, девок тех уже нет, осталось в чертежах порядок навести.
upaneofit@mail.ru , 30 ноября 2005 в 18:38
#2
а как ее установить?
nata_mara , 14 декабря 2010 в 14:54
#3
Кто-нибудь ее ставил на 2010 ACAD?
У меня в автозагрузках есть но кад при обращении к ней выдает, что кад не знает этой команды...
zip

0.1 МБ