| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Обнуление координаты Z (аналог FLATTEN )

LISP. Обнуление координаты Z (аналог FLATTEN )

Ответ
Поиск в этой теме
Непрочитано 08.10.2008, 16:06 #1
LISP. Обнуление координаты Z (аналог FLATTEN )
VVA
 
Инженер LISP
 
Минск
Регистрация: 11.05.2005
Сообщений: 6,788

Программа написана Joe Burke и опубликована здесь: SuperFlatten
Там же будут публиковаться последующие версии. Начиная с версии 1.2c адаптирована к локализованным версиям Автокада.
Первая версия публиковалась здесь: Проклятая Z координата
Запускать:
SF или SuperFlatten
Кроме того с помощью опций можно устанавливать:
Rename blocks - переименовывать блоки, объекты в которых нужно плющить
Explodable blocks - сделать все блоки расчленяемыми
Overkill - запускает Express'овскую команду Overkill
Proxies - плющит прокси объекты
Должна работать начиная с 2000 версии Автокада. Для корректной работы всех опций нужен Автокад 2006 и позже и установленные Express Tools

1. SuperFlatten 2.0b beta VVA.rar - Обработка блоков, в имени которых есть UNICOD символы

2. Другие варианты см. #2

Вложения
Тип файла: zip SuperFlatten 1.2g.zip (27.4 Кб, 27 просмотров)
Тип файла: zip SuperFlatten 2.0c.zip (30.1 Кб, 98 просмотров)


Последний раз редактировалось VVA, 15.06.2019 в 23:19. Причина: Добавлена версия SuperFlatten 2.0c
Просмотров: 113095
 
Автор темы   Непрочитано 08.10.2008, 16:18
#2
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Некоторые отзывы о работе программы можно почитать здесь: Удаление дублированных элементов чертежа
Другие варианты обнуления координаты Z:
1. FLATTEN из Express Tools
2. Начиная с 2007-й версии команда _Flatshot (для тел и поверхностей)
3. Еще один вариант обнуления Z. Ссылка на команду Z0
Цитата:
Поэтому в свое время сделал команду обнуления Z путем замены на Z=0 во всех примитивах по dxf кодам 10 11 12 13 14 38, исключая 3DSOLID и дополнительно обрабатывая размеры (10 11 12 13 14). Объекты "плющатся" только в текущем пространстве. Содержимое блоков не обрабатывается (не стояло такой задачи). Ссылку добавил в 1-й пост. В твоем чертеже боки не испортило.
4. Небольшим лиспиком
Код:
[Выделить все]
(defun C:FLATTEN1 ()
 (command "_.UCS" "")
 (command "_.move" "_all" "" '(0 0 1e99) ""
 "_.move" "_p" "" '(0 0 -1e99) "")
 (princ)
)
5. Вариантами этой программы
http://dwg.ru/dnl/25
http://dwg.ru/dnl/296
6. Вариант Lee MAC (аналог п.3 с обработкой блокировки слоев)
Код:
[Выделить все]
(defun c:flat  (/ ss ssObj j)
  (vl-load-com)
  (vlax-map-collection
    (vla-get-Layers
      (vla-get-ActiveDocument
        (vlax-get-acad-object)))
    '(lambda (x) (vla-put-lock x :vlax-false)))
  (if (setq ss (ssget "_X" (list (cons 410 (getvar "CTAB")))))
    (progn
      (setq ssObj (mapcar 'vlax-ename->vla-object
                          (mapcar 'cadr (ssnamex ss))) j 0)
      (foreach Obj  ssObj
        (foreach n  '(1e99 -1e99)
          (if (vl-catch-all-error-p
                (vl-catch-all-apply
                  '(lambda (x)
                     (vla-move x (vlax-3d-point (list 0 0 0))
                                 (vlax-3d-point (list 0 0 n))))
                  (list Obj)))
            nil
            (setq j (1+ j)))))
      (princ (strcat "\n" (rtos (/ j 2.0)) " Objects Flattened.")))
    (princ "\n<!> No Objects Found <!>"))
  (princ))

7. Утилита от Stolmachev (без проверки): "Утюг" ZZ (ещё один, почти универсальный, flatten)
__________________
Как использовать код на Лиспе читаем здесь

Последний раз редактировалось VVA, 14.12.2014 в 09:11. Причина: Добавлен п.6
VVA вне форума  
 
Непрочитано 19.06.2009, 10:49
#3
Hans667

сети
 
Регистрация: 12.04.2007
SPb
Сообщений: 534
Отправить сообщение для Hans667 с помощью AIM Отправить сообщение для Hans667 с помощью Skype™


а есть лиспик для обнуления какой хочу координаты.Конкретно "Y".Или проецирующей на какую нить определенную плоскость?
__________________
Errare humanum est, insipientis perseverare
Hans667 вне форума  
 
Непрочитано 19.06.2009, 11:31
#4
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 36,589


Пост 2, п.1 и 2.
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 09.03.2011, 15:29
#5
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Superflatten обновилась до версии 2.0 beta
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 04.04.2011, 14:36
#6
Apelsinov

Проектировщик ВК. LISP-любитель.
 
Регистрация: 15.12.2003
Москва
Сообщений: 1,117
<phrase 1=


Занудства ради, пару замечаний по программе:
- Нет опции скрытия невидимых линий (во Flatten есть, коряво, но все-же есть)
- Странно работает опция переименования блоков, я так понимаю, что при выборе этой опции выбранные блоки должны оставаться блоками, но с другим именем, но происходит не так - выбранные блоки 0-го уровня вложенности разбиваются (не все, возможно дело в из динамичности, или в содержании атрибутов), а вложенные блоки модифицируются, не разбиваются, но при этом и не переименовываются
Apelsinov вне форума  
 
Непрочитано 15.04.2011, 11:06
#7
andrk


 
Регистрация: 14.04.2011
Сообщений: 5


Не могу понять почему, но при выполнении команды _flatshot, выскакивает "Отсутствуют тела или поверхности, которые можно спроецировать." Объекты я выбираю все предварительно. У меня акад 2011. Подскажите плиз..
Очень нужно обнулить Z.
andrk вне форума  
 
Автор темы   Непрочитано 15.04.2011, 11:18
1 | #8
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


andrk, Почитай внимательно п.2 из #2
Цитата:
2. Начиная с 2007-й версии команда _Flatshot (для тел и поверхностей)
Если твои объекты не тела и поверхности (о чем тебе и сообщается), то это не твой случай. Пробуй код из #1 или варианты 1,3-5 из #2
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 15.04.2011, 11:37
#9
andrk


 
Регистрация: 14.04.2011
Сообщений: 5


расскажите, пожалуйста, как его применять? этот код. прям просто в командной строке что ли?
andrk вне форума  
 
Автор темы   Непрочитано 15.04.2011, 11:40
#10
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


andrk, Подними глаза на 1 строчку выше (или ниже) и пройдись по ссылке в моей подписи
....................................................................|
....................................................................|
....................................................................|
....................................................................V
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 15.04.2011, 12:06
#11
andrk


 
Регистрация: 14.04.2011
Сообщений: 5


попробовал superflatten 2.0 beta...
если выбираю часть каких-то объектов, то все хорошо.
но вот когда делаю через выбрать все, чтобы быть уверенным, то выскакивает:
"Команда: _superflatten
найдено: 39944
Analyzing selection... |
Error: Ошибка Automation. Ключ не найден"
Прокомментируйте пжста..
andrk вне форума  
 
Автор темы   Непрочитано 15.04.2011, 14:47
#12
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Цитата:
Сообщение от andrk Посмотреть сообщение
попробовал superflatten 2.0 beta..
Попробуй версию 1.2, выполник п. 1,2,3
Если не поможет, то
1. Предварительно чертежу сделай _purge и _audit.
2. Проверь на отсутствие proxy.
3. Выставь переменную Demandload=0, закрой и открой снова рисунок.
4. повтори команду
5. если все равно будет ошибка, есть еще п. 1,3,4,5
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 29.04.2011, 13:50
#13
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


У меня следующая проблема. Никогда такого не было. А здесь пришел инжиниринг, где попался блок (см. вложение). Методом тыка я его нашел. Хотел зайти в редактор блока, а нетушки. Не получилось. Аудит ничего не дал. Думаю, что в аналогах будет то же. А эта программа видно, что мощная
Выберите объекты:
Analyzing selection... \
Error: Ошибка Automation. Ключ не найден
Помогите пожалуйста...
Вложения
Тип файла: dwg
DWG 2007
block.dwg (97.9 Кб, 23360 просмотров)
Вовочка вне форума  
 
Непрочитано 29.04.2011, 14:20
#14
Хмурый


 
Регистрация: 29.10.2004
СПб
Сообщений: 15,998


Вовочка, что-то я проблему не понял. Редактор блоков блок открывает, точка вставки блока- 0,0,0, т. е. z-координата нулевая, так что всё в порядке
Хмурый вне форума  
 
Непрочитано 29.04.2011, 15:06
#15
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


По поводу редактора блоков, я перемудрил. Вернул в предыдущее значение переменную - DEMANDLOAD. Но не в этом проблемма. Суть: есть чужие чертежи (100 штук) иностранные. Тоесть препираться с исполнителем из-за бугра будет долго. В этих чертежах есть НЕЕЕЕЕЕЕЕЕСКОЛЬКО примитивов которые не лежат на нуле. Мне нужно всю эту работу сплющить. Но сами понимаете, что проганять через пальчики 100 чертежей неправильно. Я создал связку BAT->SCR->LSP (самое время поблагодарить Д. Эббота) где лиспом выступает суперфлаттен. Перед этим тестил СФ (SuperFlatten). Нарадоватся не мог. Тут мне один исполнитель говорит, что моя связка еще сыровата и требует усовершенствования. Дал мне чертеж. Сделал я вид спереди. Действительно, - плющить надо. Действия: EXPLODEALLPROXY, аудит с исправлением ошибок, тройной _purge, аудит с исправлением ошибок. Загрузка СФ. Запуск СФ. Сколько объектов "_all" с подтверждением. И мне кад говорит:
Analyzing selection... |
Error: Ошибка Automation. Ключ не найден
...и не сплющил. методом отбора дружественных по отношению к СФ примитивов я пришел к тому, что на чертеже остался один блок (уже видели). удалил я хлам ("очистить" + " проверить") и остался с носом, кад твердит все то же:
Analyzing selection... |
Error: Ошибка Automation. Ключ не найден
Итог, как так меня этот блок полностью устраивает (вы видите, что он плоский), но в подальшей жизни, может еще какой то такой попадется и я на запрос СФа буду говорить "_all" и ничего не буду иметь. Про запуск конвеера (BAT->SCR->LSP) вообще говорить нет смысла.
Вовочка вне форума  
 
Непрочитано 04.05.2011, 12:51
#16
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Здравствуйте, уважаемые форумчане. Крутил, вертел я на праздниках эту проблемму и кажется мне, что вектор ее решения я нашел. Имя блока было Auslauf gekьrzt. Я поменял на имя блока Auslauf gekurzt и как бы проблема решилась. Думаю, прекрасно. Я добавлю немецкий язык в компьютер и все решиться. Но нет. Воз и ныне там. Есть у кого-нибудь какие-то соображения еще?
Нашел друга по несчастью
http://forum.dwg.ru/showthread.php?t=49870

Последний раз редактировалось Вовочка, 05.05.2011 в 11:26.
Вовочка вне форума  
 
Автор темы   Непрочитано 05.05.2011, 11:34
1 | #17
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Пробуй. Оставлю сообщение автору
Изменения
2011-05-05 Unicod символы в блоках
2011-10-12 Функция ModBlockScale отредактирована точность округления с 1e-2 на 1e-12
Вложения
Тип файла: rar SuperFlatten 2.0b beta VVA.rar (28.1 Кб, 2197 просмотров)
__________________
Как использовать код на Лиспе читаем здесь

Последний раз редактировалось VVA, 12.10.2011 в 17:56. Причина: Масштабный коэффициент
VVA вне форума  
 
Непрочитано 05.05.2011, 12:46
#18
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Спасибо Вам большое!!! Заработало. Скажете, что, скажет автор. Интересно же.
Вовочка вне форума  
 
Автор темы   Непрочитано 05.05.2011, 13:54
#19
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Я написал ему. Подождем официального релиза
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 11.10.2011, 13:06
#20
asii


 
Регистрация: 20.03.2011
Сообщений: 75


Есть чертеж, в котором линии и блоки(объемные) разнесены в пространстве Нажмите на изображение для увеличения
Название: 3D ppc.jpg
Просмотров: 756
Размер:	69.5 Кб
ID:	67600 . Хотел применить этот лисп. Ввожу команду SF и в выпадающем меню появляются функции Rename blocks, Explodable blocks, Proxies, но Overkill не появилась. Если я правильно понял, то эта функция не запустится без Express Tools. Но как обнулить координату Z и сплющить блоки без Express Tools?
asii вне форума  
 
Автор темы   Непрочитано 11.10.2011, 13:36
#21
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


asii, еще варианты есть в #2
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 12.10.2011, 11:51
#22
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


При очередном использовании данной программы командная строка мне выдала:
Flattening selection... |
Выберите открепляемые размеры ...
Откреплено: 0.
Error: AutoCAD.Application: Значение должно быть ненулевым
Что нужно делать?
Вовочка вне форума  
 
Автор темы   Непрочитано 12.10.2011, 14:16
#23
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Вовочка,
1. Выложить чертеж сюда
2. Пока пробовать другие варианты (см #2 и ниже)
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 12.10.2011, 17:02
#24
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Ну как бы вот. Хоть блок и плоский, но я выбираю ВСЕ, а он мне мешает
Вложения
Тип файла: dwg
DWG 2007
11.dwg (120.1 Кб, 7520 просмотров)
Вовочка вне форума  
 
Автор темы   Непрочитано 12.10.2011, 17:53
#25
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


По ссылке SuperFlatten 2.0b beta VVA.rar из #1 скачай обновленный SF
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 12.10.2011, 18:32
#26
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


спасибо. Только наверное программу нужно вытягивать из поста №17 ?
Вовочка вне форума  
 
Непрочитано 22.11.2011, 14:53
#27
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Здравствуйте. Можно ли еще чуток отшлифовать программу?
Вопрос в следующем. Есть файл с разработанным фундаментом. Соответственно там присутствуют размеры и текст. После паруминутного редактирования этого файла. Я заметил, что текст везде стал как-бы жирным. Нашел вот-эту ветку: http://forum.dwg.ru/showthread.php?t=35216. О, думаю, вот сейчас меня SF выручит. Прогнал чертеж через него, а кукиш. Ушел в туман. Сделал вид спереди, смотрю, все ок - весь чертеж как бы в одну линию. Знакомые посоветовали попробовать утилитку от VetalBy, которая идет в комплекте VetCAD - FLATTEN_VC. И вы знаете помогло. Не понравилось следующее:
1. Утилитка не просит меня указать примитивы, а шерстит весь чертеж.
2. Из-за одной подпрограмки ставить весь комплекс VetCAD считаю не логично.
VetalBy, не пойми неправильно, а по поводу предварительного выбора, подумай. ВетКАД от этого только выиграет.
ЗЫ. Да, чуть не забыл. КАД 2008 текст на базе АРИАЛ
ЗЫЫ. И можно, что бы динамика динамических блоков оставалась. А то как бы ручки изменения блоков присутствуют, а геометрия статична.

Последний раз редактировалось Вовочка, 22.11.2011 в 16:30.
Вовочка вне форума  
 
Непрочитано 11.12.2011, 21:22 "Утюг" ZZ (ещё один, почти универсальный, flatten)
#28
Stolmachev


 
Регистрация: 11.12.2011
Сообщений: 3


Простите, если не совсем в тему.
Ваш супер-флат не смог заинтересовать меня, поскольку продукт, в котором работает наш институт - ZWCAD-2009i, а этот супермэн сразу же, без разговоров, заваливает Зюкад-2009ай.
Возможно, "супер" мог бы работать в ZWCAD-2012, но там он начинает в цикле спрашивать о том, чего я не понимаю.
---------------------------------
Поэтому - позвольте всем предложить мой скромный вклад в виде собственного разглаживателя ПЛОСКИХ чертежей. Конечно, ни о каких "телах" он не знает. Работает лисп довольно медленно, но настойчиво и почти дружественно.
Называется он ЗероЗет.
Обычно после его загрузки я нажимаю 3 раза Enter (так получается, увы).
Проверял его в лицензионном Автокаде-2007-рус, но у нас мало таких лицензий, поэтому меньше опыта,
а в Зюкаде он делает своё дело без проблем.
Вложения
Тип файла: zip ZZ.zip (5.8 Кб, 788 просмотров)
Stolmachev вне форума  
 
Автор темы   Непрочитано 12.12.2011, 11:04
#29
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Stolmachev, Спасибо. Добавил в перечень #2
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 04.04.2012, 09:24
#30
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Проблема, которую я описал в 27 посте уже неактуальна. Проверил работу програмы в 2011 линейке - нормально обрабатывает динамические блоки.
Вовочка вне форума  
 
Непрочитано 11.07.2012, 12:38
#31
pan

добрый человек
 
Регистрация: 23.02.2004
Глушь
Сообщений: 964


Чтобы SuperFlatten 2.0b beta заработала в AutoCAD 2009-2012 надо заменить в лиспе "2d wireframe" на "wireframe"
__________________
Правильно сформулированный вопрос содержит 90% ответа.
pan вне форума  
 
Непрочитано 11.07.2012, 13:34
#32
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Цитата:
Сообщение от pan Посмотреть сообщение
Чтобы SuperFlatten 2.0b beta заработала в AutoCAD 2009-2012 надо заменить в лиспе "2d wireframe" на "wireframe"
А без замены не работает?
Вовочка вне форума  
 
Непрочитано 24.08.2012, 13:25 координата
#33
Ninkin


 
Регистрация: 12.06.2011
Сообщений: 5
Отправить сообщение для Ninkin с помощью Skype™


а кто сможет внятно ответить почему такой глюк происходит, чтобы в дальнейшем себя от такого предостеречь?
Ninkin вне форума  
 
Непрочитано 24.12.2012, 10:25
#34
привычка

архитектор
 
Регистрация: 27.09.2012
Санкт-Петербург
Сообщений: 13


Координаты обнулила, но при подсчете площади AutoCAD все равно пишет, что точки имеют различные координаты Z. Хотя когда выделяю объекты, у всех выводится нулевая координата Z. Почему, что делать?
привычка вне форума  
 
Автор темы   Непрочитано 26.12.2012, 11:46
#35
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


привычка, Без файла трудно что-то посоветовать. Приложи файл или фрагмент файла
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 26.12.2012, 12:06
#36
привычка

архитектор
 
Регистрация: 27.09.2012
Санкт-Петербург
Сообщений: 13


хорошо)
Вложения
Тип файла: dwg
DWG 2007
файл.dwg (1.62 Мб, 6875 просмотров)
привычка вне форума  
 
Непрочитано 26.12.2012, 13:40
#37
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Это ваш файл. Вид спереди.
Миниатюры
Нажмите на изображение для увеличения
Название: 1.JPG
Просмотров: 409
Размер:	129.8 Кб
ID:	93398  
Вовочка вне форума  
 
Непрочитано 27.06.2013, 08:32
#38
Pamu6op


 
Регистрация: 30.11.2012
Сообщений: 3


Здравствуйте не подскажите данной утилитой убираю координату но она разбивает блоки СПДС все может кто сталкивался ?
Pamu6op вне форума  
 
Непрочитано 27.06.2013, 23:22
#39
Stolmachev


 
Регистрация: 11.12.2011
Сообщений: 3


Ратибору -
мне пришло сообщение о Вашем вопросе, но какая утилита имеется в виду - не пойму.

Если речь о суперфлаттене, то и бог с ним, а если о моей зе-зет, то она, по идее, ничего НЕ ДОЛЖНА РАСЧЛЕНЯТЬ, там я использую только (entmod..).
Но - на всякий случай - осмелюсь предложить новую версию - она переделана на более толковый диалог (использует "zz.dcl") и, в связи с этим, тщательнее почищена.
Вложения
Тип файла: zip zz.zip (7.6 Кб, 237 просмотров)
Stolmachev вне форума  
 
Непрочитано 28.06.2013, 04:29 ZZ
#40
Pamu6op


 
Регистрация: 30.11.2012
Сообщений: 3


Здравствуйте
Спасибо за програмку к сожалению не помогло ((
Pamu6op вне форума  
 
Автор темы   Непрочитано 28.06.2013, 11:27
#41
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Pamu6op, Если хочешь чтобы помогли, то ответы должны быть информативнее. Телепатов здесь нет.
1.
Цитата:
Сообщение от Pamu6op Посмотреть сообщение
данной утилитой убираю координату
Какой именно. Дам приаттачено 2 версии и на 2 еще есть ссылки?
Цитата:
Сообщение от Pamu6op Посмотреть сообщение
но она разбивает блоки СПДС
2. Какой СПДС имеешь ввиду? СПДС GraphiCS или Autodesk СПДС модуль?
3. Версия и разрядность операционной системы
4. Версия и разрядность Автокада, наличие установленных сервиспаков и сторонних приложений. И вообще, может у тебя BricsCad и т.п.?
5. Крайне желательно приаттачить dwg файл с образцами блоков.
Вот минимум, с которого стоит начинать разговор. Так же можно почитать в справке по форуму Как получить максимально быстрый и развернутый ответ на свой вопрос? и Как добавить вложение в сообщение?

PS >Stolmachev Спасибо. Добавил ссылку в 1-й пост
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 28.06.2013, 15:08
#42
Stolmachev


 
Регистрация: 11.12.2011
Сообщений: 3


Жаль. Пришлите, пожал., пример DWG с такими блоками (СПДС), может, я что-нибудь замечу? можно прямо на мой имэйл: stolmachev@ya.ru
Stolmachev вне форума  
 
Непрочитано 29.06.2013, 17:43
#43
Pamu6op


 
Регистрация: 30.11.2012
Сообщений: 3


.
1. Пробывал все три утилиты все разбивают блоки СПДС GraphiCS
2. СПДС GraphiCS
3. Windows 7 64 бита
4. Автокад 2012 64 без сп
5. Крайне желательно приаттачить dwg файл с образцами блоков.
Вложения
Тип файла: dwg
DWG 2010
Торговый центр 21.06.13.dwg (542.1 Кб, 4035 просмотров)

Последний раз редактировалось Pamu6op, 29.06.2013 в 17:49.
Pamu6op вне форума  
 
Непрочитано 21.08.2013, 14:25
#44
Колян

Самозанятый КМ+КМД
 
Регистрация: 09.09.2004
Раменское
Сообщений: 1,822


Не совсем понимаю.. Чертежи чужие, не мои. На листах (paper) не работает 3д орбита и нет возможности увидеть, есть ли разлет объектов по оси Z.
На части чертежей разлет есть, на других нет. Узнаю копированием объектов в модель (model), но это долго.
Есть ли возможность это увидеть другим способом?
Колян вне форума  
 
Непрочитано 21.08.2013, 18:31
#45
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Проверил. Действительно SF с этим не справляется. Но, тебе поможет одноименная утилиа из ВЕТКАДа. А вот увидеть не перетаскивая чертеж в модель помоему невозможно, разве что в значении "Z" свойств .
__________________
AutoCAD 2011.
Вовочка вне форума  
 
Непрочитано 05.12.2013, 11:39
#46
proteirei


 
Регистрация: 17.04.2008
Сообщений: 154


Не совсем понял, что приозошло. Настрил СФ так, чтобы все хорошо работало, в том числе и с динамическими блоками.
Прошло некоторое время, опять команда СФ гробит динамическим блокам их ручки, не могу понять в чем дело
Виндоус 7 х64
Автокад 2013 рус сп1
Сохранение выставлено в 2010-ю версию
Файл прилагаю.
Вложения
Тип файла: dwg
DWG 2010
Чертеж1.dwg (56.9 Кб, 3356 просмотров)
proteirei вне форума  
 
Автор темы   Непрочитано 05.12.2013, 14:07
#47
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


proteirei, При обнулении Z периодически так же сталкивались с некоторыми проблемами. Поэтому в свое время сделал команду обнуления Z путем замены на Z=0 во всех примитивах по dxf кодам 10 11 12 13 14 38, исключая 3DSOLID и дополнительно обрабатывая размеры (10 11 12 13 14). Объекты "плющатся" только в текущем пространстве. Содержимое блоков не обрабатывается (не стояло такой задачи). Ссылку добавил в 1-й пост. В твоем чертеже боки не испортило.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 05.12.2013, 17:58
#48
proteirei


 
Регистрация: 17.04.2008
Сообщений: 154


Да, попробовал применить. Вещь действительно хорошая, но переносит почему-то не все блоки. Так, например, 1 из где-то 15-ти блоков линии обрыва не перенес, причина непонятна О_о. Но, все равно, спасибо ))
proteirei вне форума  
 
Автор темы   Непрочитано 06.12.2013, 16:15
#49
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


proteirei,Выложи пример "непереносимого" блока, посмотрю в чем дело
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 09.04.2014, 14:00
#50
crosandr

Инженер-строитель
 
Регистрация: 09.07.2010
Санкт-Петербург
Сообщений: 1,774


"SuperFlatten 2.0b beta" ругается на переопределение зарегистрированного символа. Речь про acad. Это так специально задумывалось?
Autocad 2014, win7 x64
Код:
[Выделить все]
 (setq 
     acad (vlax-get-acad-object)
     doc (vla-get-ActiveDocument acad)
     views (vla-get-Views doc)
  )
crosandr вне форума  
 
Автор темы   Непрочитано 09.04.2014, 15:14
#51
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Я думаю, что нет. Вполне могло что-то добавиться в 14 автокаде (например недокументированная переменная)
__________________
Как использовать код на Лиспе читаем здесь

Последний раз редактировалось VVA, 13.04.2014 в 12:50.
VVA вне форума  
 
Непрочитано 09.04.2014, 16:57
#52
crosandr

Инженер-строитель
 
Регистрация: 09.07.2010
Санкт-Петербург
Сообщений: 1,774


заменил acad на acad_ в 2x местах и все заработало. Странно, почему у других все норм. Из-за акада 2014?
crosandr вне форума  
 
Непрочитано 20.11.2014, 09:19
#53
Peskov


 
Регистрация: 19.11.2014
Сообщений: 3


Здравствуйте.

Та же самая проблема с Z-координатой. Перепробовал последовательно все средства, начиная от команды _flatten до лиспов Joe Burke, утюг и пр.
Список испробованных лиспов:

2D.lsp
flatten.lsp
Flatten2.lsp
FLATTEN_EM_ALL.lsp
SuperFlatten 1.2c.lsp
SuperFlatten 2.0b beta.lsp
SuperFlatten 2.0b beta VVA.lsp
Z0.LSP
Z0b.lsp
ZZ.lsp

Никакими средствами не удалось сплющить модель полностью, все равно остаются объекты с Z, отличной от нуля в ту и другую сторону.
Вложения:
1. Чертеж с "проклятой Z-координатой".
2. Архив с 10-ю применявшимися лиспами.
Вложения
Тип файла: dwg
DWG 2010
галереи.dwg (3.19 Мб, 2003 просмотров)
Тип файла: zip лиспы обнуление Z.zip (99.9 Кб, 87 просмотров)
Peskov вне форума  
 
Непрочитано 20.11.2014, 09:39
#54
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 36,589


Peskov, тебя наличие прокси-объектов не смущает?
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 20.11.2014, 09:51
#55
Peskov


 
Регистрация: 19.11.2014
Сообщений: 3


Файл очищался последовательно по инструкции отсюда: https://docs.google.com/document/d/1...it?usp=sharing
После очистки стал весить 3+ Мб вместо 9+ Мб.
Возможно, какие-то прокси остались? Но я их в таком случае не могу выловить.

Файл чистился от прокси по инструкции из темы "Как уменьшить объем файла dwg." и похудел на 6 Мб
Только после очистки взялся за ось Z...

Протокол:

Команда: EXPLODEALLPROXY
Удалено Proxy: 0 Новых объектов: 0
Команда: REMOVEALLPROXY
Первая метка объекта: <1>, последняя метка объекта: <1AE96B>
Всего найдено proxy-объектов: 0. Из них proxy-примитивов: 0.
Всего удалено proxy-объектов: 0. Из них proxy-примитивов: 0.
Для проверки ошибок выполните команду _AUDIT

Последний раз редактировалось Кулик Алексей aka kpblc, 20.11.2014 в 10:08.
Peskov вне форума  
 
Непрочитано 20.11.2014, 10:09
#56
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 36,589


ACAD2015 обнаружил в файле еще прокси. После очистки и flatten'a стал весить 1,8 Мб
Вложения
Тип файла: dwg
DWG 2010
галереи_clear.dwg (1.73 Мб, 1943 просмотров)
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 20.11.2014, 10:18
#57
Peskov


 
Регистрация: 19.11.2014
Сообщений: 3


Хм... Видимо, придется испробовать ACAD2015 (обрабатывал в ACAD2012). Спасибо за ответ
Peskov вне форума  
 
Непрочитано 16.12.2014, 06:39
#58
Rustamrav


 
Регистрация: 16.12.2014
Сообщений: 1


Народ, подскажите пожалуйста как пользоваться этими утилитами?
Rustamrav вне форума  
 
Непрочитано 16.12.2014, 09:17
#59
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 36,589


http://dwg.ru/pub/9
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 20.05.2015, 11:15
#60
ltnchik1405

проектировщик
 
Регистрация: 03.07.2009
Кострома
Сообщений: 423
Отправить сообщение для ltnchik1405 с помощью Skype™


А как обнулить координаты в Автокад 2010 лт?
__________________
Ненавижу проектирование :bad:
ltnchik1405 вне форума  
 
Непрочитано 20.05.2015, 11:18
#61
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 36,589


Руками (если это вообще возможно).
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 28.10.2015, 13:19
#62
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Если блок, который нужно расчленить, имеет умляуты, _SF не работает. Кто-то знает выход. Переименование не предлагайте. Что я должен сделать на локальном Русском, чтобы и сплющить, и умляуты оставить?
__________________
AutoCAD 2011.

Последний раз редактировалось Вовочка, 28.10.2015 в 13:26.
Вовочка вне форума  
 
Непрочитано 28.10.2015, 21:37
#63
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,550


Цитата:
Сообщение от Вовочка Посмотреть сообщение
умляуты
это что?
gomer вне форума  
 
Непрочитано 28.10.2015, 21:48
#64
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 36,589


Символы из немецкого алфавита. Грубо говоря, "А" с кружком наверху (кто знает немецкий, поправьте меня, пожалуйста).
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 28.10.2015, 21:50
#65
Do$

AutoCAD/Civil3D LISP/C#
 
Регистрация: 15.08.2008
Санкт-Петербург
Сообщений: 1,682
Отправить сообщение для Do$ с помощью Skype™


Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
поправьте меня, пожалуйста
https://ru.wikipedia.org/wiki/%D0%A3...BD%D0%B0%D0%BA)
__________________
Толковый выбор приходит с опытом, а к нему приводит выбор бестолковый. (The Mechanic)
Do$ вне форума  
 
Непрочитано 29.10.2015, 13:26
#66
crosandr

Инженер-строитель
 
Регистрация: 09.07.2010
Санкт-Петербург
Сообщений: 1,774


Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
Грубо говоря, "А" с кружком наверху
так и есть
Ää, Öö и Üü
crosandr вне форума  
 
Непрочитано 29.10.2015, 17:46
#67
Вовочка

пищевая технология
 
Регистрация: 02.06.2009
Киев
Сообщений: 281
<phrase 1=


Решил пойти другой дорогой. Помог старый-добрый _flatten из Экспресса.
Кстатти, _SF не смог справится ни с умлаутами, ни без.

Кому интересно, во вложении фрагмент чертежа.
Вложения
Тип файла: dwg
DWG 2007
S.dwg (73.3 Кб, 372 просмотров)
__________________
AutoCAD 2011.
Вовочка вне форума  
 
Непрочитано 17.01.2017, 10:14
#68
zenon

Остекляем!!! Алюминим!!!
 
Регистрация: 21.02.2005
Москва
Сообщений: 3,335
<phrase 1=


Еще ошибка от супера
Команда: SUPERFLATTEN

Выберите объекты: Противоположный угол: найдено: 185

Выберите объекты:
Analyzing selection... -
Error: Ошибка Automation. Ключ не найден
__________________
Мы можем делать быстро, качественно и недорого, выбирайте любые 2 условия.:search:
zenon вне форума  
 
Непрочитано 07.09.2017, 00:39
#69
kacugu

начинающий инженер-гидротехник
 
Регистрация: 18.04.2010
Санкт-Петербург
Сообщений: 689


После использования superflatten 2.0b и от Burke и от VVA мультивыноски разбиваются на отрезки и текст

Последний раз редактировалось kacugu, 09.09.2017 в 14:46. Причина: Опять
kacugu вне форума  
 
Непрочитано 26.10.2018, 11:03
#70
MorganSpb


 
Регистрация: 10.07.2008
Сообщений: 84


так решения и нет чтоб Z координата не появлялась сама по себе?
MorganSpb вне форума  
 
Непрочитано 26.10.2018, 11:27
#71
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 36,589


osnapz поменяй. Правда, срабатывает не всегда.
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 05.02.2019, 17:24 У каждой линии свое собственное начало координат.
#72
Archidar


 
Регистрация: 27.10.2010
Сообщений: 14


Добрый день! Вроде не первый день замужем, но столкнулся с казебоброй которую не могу решить: 1)выбираю полилинии с отметкой уровня "не равно 0"-выбираются; в свойствах назначаю НОЛЬ- и линии разлетаются кому куда понравилось. Из параллельно-перпендикулярной графики получается радиально-концентрическая херня! Прошу прощения за мой французский!
Вложения
Тип файла: dwg
DWG 2013
ACAD-Блок 4_05_02_19.dwg (1.30 Мб, 10 просмотров)

Последний раз редактировалось Archidar, 05.02.2019 в 17:31.
Archidar вне форума  
 
Непрочитано 06.02.2019, 09:23
#73
doctorraz

электрик
 
Регистрация: 19.02.2010
Волгоград
Сообщений: 1,512
Отправить сообщение для doctorraz с помощью Skype™


Цитата:
Сообщение от Archidar Посмотреть сообщение
Вроде не первый день замужем,
сбоку и спереди на свой блок посмотри
взорви свой блок выбери все и SF
полилинии не просто в ноль, они под углом...
__________________
Мастерская СПДС
doctorraz вне форума  
 
Непрочитано 06.02.2019, 10:05
#74
Archidar


 
Регистрация: 27.10.2010
Сообщений: 14


Цитата:
Сообщение от doctorraz Посмотреть сообщение
они под углом...
Дык я по этому сюда и обратился. Как!? Как это могло наЧЁРТиться!? Специально захочешь сделать- так не получится. Я когда этот файл взял в работу, попал в ступор.
Пришлось взорвать полилинии- тогда , превратившись в отрезки они потеряли свои собственные точки отсчета и вписались в МирСистКоорд. Только тогда и обнулились.
Но КАК так нарисовалось?
Archidar вне форума  
 
Непрочитано 06.02.2019, 10:18
#75
zenon

Остекляем!!! Алюминим!!!
 
Регистрация: 21.02.2005
Москва
Сообщений: 3,335
<phrase 1=


СПДС GraphiCS
как много в этих звуках
__________________
Мы можем делать быстро, качественно и недорого, выбирайте любые 2 условия.:search:
zenon вне форума  
 
Непрочитано 06.02.2019, 10:19
#76
doctorraz

электрик
 
Регистрация: 19.02.2010
Волгоград
Сообщений: 1,512
Отправить сообщение для doctorraz с помощью Skype™


Цитата:
Сообщение от Archidar Посмотреть сообщение
Но КАК так нарисовалось?
рандомно крутили ПСК рисовали, потом опять крутили ПСК и опять рисовали.
Вот мне, что на дружественном форуме подогнали
рисунок выглядит как чертеж, только с одного ракурса...
Offtop: кто занимается Street Painting или Madonnari рвут волосенки и рыдают от зависти
Вложения
Тип файла: dwg
DWG 2007
problem_file(1).dwg (90.9 Кб, 16 просмотров)
__________________
Мастерская СПДС
doctorraz вне форума  
 
Непрочитано 06.02.2019, 10:29
#77
Archidar


 
Регистрация: 27.10.2010
Сообщений: 14


Цитата:
Сообщение от doctorraz Посмотреть сообщение
рисунок выглядит как чертеж, только с одного ракурса...
В криминальных случаях разные уровни обычно ещё соединяются "диагональными" линиями.
Archidar вне форума  
 
Непрочитано 06.02.2019, 10:35
#78
doctorraz

электрик
 
Регистрация: 19.02.2010
Волгоград
Сообщений: 1,512
Отправить сообщение для doctorraz с помощью Skype™


Offtop:
Цитата:
Сообщение от Archidar Посмотреть сообщение
В криминальных случаях разные уровни обычно ещё соединяются "диагональными" линиями.
у нас все генпланы такие (5де)
дист и глазам не веришь (((
обрезать удлинить не рабтает... (отрезки не коллинеарны))
плющим
__________________
Мастерская СПДС
doctorraz вне форума  
 
Непрочитано 14.02.2019, 10:32
#79
pentaone


 
Регистрация: 10.05.2013
Сообщений: 40


Почему при работе что с данной программой, что со стандартным flatten из ET перестают работать динамические блоки (слетают все операции)?
pentaone вне форума  
 
Непрочитано 14.02.2019, 11:59
#80
doctorraz

электрик
 
Регистрация: 19.02.2010
Волгоград
Сообщений: 1,512
Отправить сообщение для doctorraz с помощью Skype™


Цитата:
Сообщение от pentaone Посмотреть сообщение
Почему при работе что с данной программой, что со стандартным flatten из ET перестают работать динамические блоки (слетают все операции)?
файлы чертежа до SF и после в студию.
у меня ничего не слетает
__________________
Мастерская СПДС
doctorraz вне форума  
 
Непрочитано 13.06.2019, 11:33
#81
kacugu

начинающий инженер-гидротехник
 
Регистрация: 18.04.2010
Санкт-Петербург
Сообщений: 689


Цитата:
Сообщение от pentaone Посмотреть сообщение
Почему при работе что с данной программой
Вот такая же проблема.
Цитата:
Сообщение от doctorraz Посмотреть сообщение
файлы чертежа до SF
В приложении.
Autocad 2015, использую SF от VVA
Вложения
Тип файла: dwg
DWG 2013
Дин.блок для форума_Рабочий.dwg (96.2 Кб, 4 просмотров)
Тип файла: dwg
DWG 2013
Дин.блок для форума_Сломанный.dwg (96.2 Кб, 0 просмотров)
kacugu вне форума  
 
Автор темы   Непрочитано 15.06.2019, 16:12
1 | #82
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


kacugu, На странице автора , была выложена версия SuperFlatten 1.2g. Проверил на твоем файле, вроде динблоки не ломает
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 15.06.2019, 22:50
#83
kacugu

начинающий инженер-гидротехник
 
Регистрация: 18.04.2010
Санкт-Петербург
Сообщений: 689


Цитата:
Сообщение от VVA Посмотреть сообщение
вроде динблоки не ломает
Попробовал ещё версию 2.0с отсюда. Вроде тоже работает нормально и не ломает динамические блоки
kacugu вне форума  
 
Автор темы   Непрочитано 15.06.2019, 23:20
#84
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,788
<phrase 1= Отправить сообщение для VVA с помощью Skype™


А слона то я и не заметил. Добавил в #1
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Обнуление координаты Z (аналог FLATTEN )

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Аналог функции EVAL (LISP) в Exele kp+ LISP 11 01.04.2010 16:52
Сменить быстро координату Z у нескольких сплайнов. andrey25 AutoCAD 11 18.09.2008 16:28
Координаты точки пересечения line и pline (LISP) paradoxvaha LISP 3 10.07.2007 13:04
загрузка DOS прог через LISP Gaa LISP 15 12.08.2005 19:19