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

Вернуться   Форум DWG.RU > Программное обеспечение > AutoCAD > Несколько траекторий для команды Сдвиг.

Несколько траекторий для команды Сдвиг.

Ответ
Поиск в этой теме
Непрочитано 18.05.2016, 09:10 #1
Несколько траекторий для команды Сдвиг.
max4airkin
 
Екатеринбург
Регистрация: 26.03.2015
Сообщений: 382

Бывшая коллега пишет: "Нет, я находила настройки. И один раз выбрав окружность, щелкала подряд по нескольким траекториям". Это было в 2010 Автокаде, сейчас она настраивает 2012. Я ей сказал, что она что-то путает: не может Автокад один профиль сдвинуть по нескольким траекториям.
Я что-то упустил, или это действительно возможно?
Я знаю, что можно обозвать исходный профиль и потом на запрос вызывать его по этому имени, не указывая мышью ,но она явно так не умеет.
Просмотров: 3538
 
Непрочитано 18.05.2016, 09:54
#2
Хмурый


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


Возможно, если обнулить значение переменной DELOBJ
Хмурый вне форума  
 
Непрочитано 18.05.2016, 10:05
#3
Geor9e

инженер-обструктор
 
Регистрация: 20.04.2016
Сообщений: 162


А в чём сама проблема? В том, как выбрать несколько траекторий для сдвига или в том, что "нет, я сказала, так можно, ничо не знаю"? В первом случае можно их все _join в один большой сплайн (а если повезёт – даже полилинию) ну или вообще как-то объединить в один объект, это проще, чем обозвать исходный профиль. Или можно потом уже 3d тела объединить

Хмурый, мне обнуление DELOBJ ничего не дало, что логично. Если её установить в 0, она не будет удалять профили и траектории сдвига, но по нескольким траекториям сразу всё равно не сдвинуть, нет?
Geor9e вне форума  
 
Непрочитано 18.05.2016, 10:07
#4
Хмурый


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


Geor9e, по очереди выбирай. один сдвиг за раз, сдвигаемый объект не удаляется
Хмурый вне форума  
 
Непрочитано 18.05.2016, 10:10
#5
Geor9e

инженер-обструктор
 
Регистрация: 20.04.2016
Сообщений: 162


Хмурый, и я о том же, команду-то заново придётся вызывать, исходный вопрос, если я его правильно понял, состоит в том, как за один вызов команды сдвинуть профиль по нескольким траекториям
Geor9e вне форума  
 
Автор темы   Непрочитано 18.05.2016, 10:59
#6
max4airkin


 
Регистрация: 26.03.2015
Екатеринбург
Сообщений: 382


Цитата:
Сообщение от Geor9e Посмотреть сообщение
как за один вызов команды сдвинуть профиль по нескольким траекториям
Именно так
max4airkin вне форума  
 
Непрочитано 18.05.2016, 11:00
#7
Хмурый


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


max4airkin, какая-нибудь программа стояла.
Трубопроводы проектируете? может, ruCAD был установлен?

Последний раз редактировалось Хмурый, 18.05.2016 в 11:15.
Хмурый вне форума  
 
Непрочитано 18.05.2016, 11:04
#8
Кулик Алексей aka kpblc
Moderator

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


... Или человек на спинномозговом рефлексе жал "повторить последнюю команду" - хоть по правой кнопке мыши, например.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 18.05.2016, 11:18
#9
max4airkin


 
Регистрация: 26.03.2015
Екатеринбург
Сообщений: 382


Цитата:
Сообщение от Хмурый Посмотреть сообщение
max4airkin, какая-нибудь программа стояла.
100% нет
Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
... Или человек на спинномозговом рефлексе жал "повторить последнюю команду" - хоть по правой кнопке мыши, например.
Но профиль то все равно надо было выбрать

Я записал action macros, который строит в 0,0,0 окружность заданного диаметра и потом сдвигает ее по указанной траектории. Теперь вся активность сводится к нажатию Enter (т.е. повтору команды) и клику на участок траектории. Диаметр окружности меняется в самом макросе. Но это тоже "не то"
max4airkin вне форума  
 
Непрочитано 18.05.2016, 11:58
#10
RNB

Проектирование мостов
 
Регистрация: 29.01.2014
Новосибирск
Сообщений: 433


Цитата:
Сообщение от max4airkin Посмотреть сообщение
Но профиль то все равно надо было выбрать

Я записал action macros, который строит в 0,0,0 окружность заданного диаметра и потом сдвигает ее по указанной траектории. Теперь вся активность сводится к нажатию Enter (т.е. повтору команды) и клику на участок траектории. Диаметр окружности меняется в самом макросе. Но это тоже "не то"
А если запилить лисп с выбором сечения и назначением ему имени, а потом циклическим повторением команды для этого сечения?
RNB вне форума  
 
Автор темы   Непрочитано 18.05.2016, 12:05
#11
max4airkin


 
Регистрация: 26.03.2015
Екатеринбург
Сообщений: 382


Цитата:
Сообщение от RNB Посмотреть сообщение
А если запилить лисп
А штатными средствами все же никак?
max4airkin вне форума  
 
Непрочитано 18.05.2016, 12:56
#12
RNB

Проектирование мостов
 
Регистрация: 29.01.2014
Новосибирск
Сообщений: 433


Цитата:
Сообщение от max4airkin Посмотреть сообщение
А штатными средствами все же никак?
Только если с помощью наркомании типа
^C^C_-GROUP;_c;test111;_y;_y;\;^C^C_sweep;_g;test111;;;\^C^C_sweep;_g;test111;;;\^C^C_sweep;_g;test111;;;\
Здесь конструкцию \^C^C_sweep;_g;test111;;;\ нужно повторить n-ное кол-во раз, равное максимально возможному количеству траекторий за раз (или может в макрос как-то можно запилить повторение)
RNB вне форума  
 
Автор темы   Непрочитано 18.05.2016, 13:03
#13
max4airkin


 
Регистрация: 26.03.2015
Екатеринбург
Сообщений: 382


Цитата:
Сообщение от RNB Посмотреть сообщение
с помощью наркомании
тогда уж проще
Цитата:
Сообщение от max4airkin Посмотреть сообщение
Я записал action macros, который строит в 0,0,0 окружность заданного диаметра и потом сдвигает ее по указанной траектории. Теперь вся активность сводится к нажатию Enter (т.е. повтору команды) и клику на участок траектории. Диаметр окружности меняется в самом макросе.
а то группы потом вычищать надо для сдвига другого профиля

В общем, скорее всего нет такой возможности без особых перверсий делать сдвиг профиля в одной команде по нескольким траекториям. Вот несколько профилей по траектории - можно.
max4airkin вне форума  
 
Непрочитано 18.05.2016, 13:08
#14
RNB

Проектирование мостов
 
Регистрация: 29.01.2014
Новосибирск
Сообщений: 433


Цитата:
Сообщение от max4airkin Посмотреть сообщение
а то группы потом вычищать надо для сдвига другого профиля

В общем, скорее всего нет такой возможности без особых перверсий делать сдвиг профиля в одной команде по нескольким траекториям. Вот несколько профилей по траектории - можно.
Не проще, здесь при каждом запуске выбирается сечение, при этом группа переопределяется. Все неудобства - это один раз в конце работы удалить одну группу (test111), если, конечно, она мешает внутреннему перфекционизму.
RNB вне форума  
 
Непрочитано 25.07.2018, 07:56
#15
Бали

Инженер
 
Регистрация: 23.03.2007
Уфа
Сообщений: 197


Код:
[Выделить все]
 (defun c:shp-sweep-m ( / *adoc* shp ss i curve shpn )

  (vl-load-com)

  (vla-startundomark (setq *adoc* (vla-get-activedocument (vlax-get-acad-object))))
  (prompt "\nPick unit shape for sweep along curves : ")
  (while (not (ssget "_+.:E:S:L" (list '(-4 . "<or") '(-4 . "<and") '(0 . "*POLYLINE") '(-4 . "<or") '(70 . 1) '(70 . 3) '(70 . 5) '(70 . 9) '(70 . 13) '(70 . 129) '(70 . 131) '(70 . 133) '(-4 . "or>") '(-4 . "and>") '(-4 . "<and") '(0 . "SPLINE") '(-4 . "<or") '(70 . 3107) '(70 . 2051) '(70 . 1067) '(70 . 11) '(-4 . "or>") '(-4 . "and>") '(-4 . "<and") '(0 . "ELLIPSE") '(-4 . "<and") '(41 . 0.0) '(42 . 6.28319) '(-4 . "and>") '(-4 . "and>") '(0 . "CIRCLE,REGION") '(-4 . "or>"))))
    (prompt "\nEmpty sel.set... Please pick unit shape for sweep along curves again...")
  )
  (setq shp (ssname (ssget "_P") 0))
  (prompt "\nSelect curve entities to make sweeps with unit shape...")
  (if (setq ss (ssget '((0 . "*POLYLINE,LINE,SPLINE,ARC,CIRCLE,ELLIPSE,HELIX"))))
    (repeat (setq i (sslength ss))
      (setq curve (ssname ss (setq i (1- i))))
      (setq shpn (vlax-vla-object->ename (vla-copy (vlax-ename->vla-object shp))))
      (command "_.SWEEP" shpn "" curve)
      (while (< 0 (getvar 'cmdactive)) (command ""))
    )
    (prompt "\nEmpty sel.set... Please select curve entity(ies) next time when routine is started again...")
  )
  (vla-endundomark *adoc*)
  (princ)
)


lisp скачал отсюда
https://forums.autodesk.com/t5/visua...p/td-p/6357009

Последний раз редактировалось Кулик Алексей aka kpblc, 25.07.2018 в 08:24.
Бали вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > AutoCAD > Несколько траекторий для команды Сдвиг.

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Варианты контекстного меню, вызываемого в процессе работы команды hwd Программирование 14 24.12.2012 11:02
запуск программы из AutoCADа kminas Программирование 19 15.06.2012 13:42
Прозрачные команды Vova AutoCAD 17 21.06.2006 05:33