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

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

Распределить объекты с равными растояниями

Ответ
Поиск в этой теме
Непрочитано 16.05.2007, 10:56 #1
Распределить объекты с равными растояниями
Kotsar
 
Москва
Регистрация: 04.09.2006
Сообщений: 123

Коллеги, подскажите, как расположить объекты на одной прямой с равными растояниями между ними. Руками замучался, а в книге толстой чего-то не найду никак. Пример прилагаю.
[ATTACH]1179298503.gif[/ATTACH]
Просмотров: 6085
 
Непрочитано 16.05.2007, 11:02
#2
Кочетков Андрей

Java/Kotlin/Go
 
Регистрация: 03.02.2006
Сообщений: 5,786


MEASURE
Кочетков Андрей вне форума  
 
Непрочитано 16.05.2007, 11:06
#3
Дима_

Продуман
 
Регистрация: 22.02.2007
Питер
Сообщений: 2,839


Вариант 1: Сделать массив, а потом повернуть используя опорный угол.
Вариант 2: Выставить одну из осей ПСК по направлению прямой и, опять же массив.
__________________
Когда в руках молоток все вокруг кажется гвоздями.
Дима_ вне форума  
 
Автор темы   Непрочитано 16.05.2007, 11:10
#4
Kotsar


 
Регистрация: 04.09.2006
Москва
Сообщений: 123
<phrase 1= Отправить сообщение для Kotsar с помощью Skype™


Массивом не хотелось бы, чертеж-то уже есть... массивом хорошо с чистого листа...
Kotsar вне форума  
 
Непрочитано 16.05.2007, 11:10
#5
Krieger

инженер (КМ)
 
Регистрация: 30.10.2004
Красноярск
Сообщений: 3,837


Цитата:
Сообщение от Дима_
Вариант 1: Сделать массив, а потом повернуть используя опорный угол.
Вариант 2: Выставить одну из осей ПСК по направлению прямой и, опять же массив.
Угол можно в диалоге команды _array задать.
Kotsar
Это _array, а если _measure, то кружочек можно загнать в блок и использовать его при вставке вместо точек.
Krieger вне форума  
 
Непрочитано 16.05.2007, 11:11
#6
DEM

YngIngKllr
 
Регистрация: 29.03.2005
СПб
Сообщений: 12,968


Вот лиспик, на моих машинах работает.
Правда тут распеределение по шагу, можно поменять на кол-во.
Код:
[Выделить все]
(defun C:scopi (/ pt1 pt2 sh ss r1
	      )
  (setq pt1 (getpoint "\nНачальная точка: "))
  (setq pt2 (getpoint pt1 "\nКонечная точка: "))
  (setq sh (getdist "\nВведите шаг: "))
  (setq L1 (distance pt1 pt2))
  (setq ss (fix (+ 1 (/ L1 sh))))
  (setq r1 (/ (* 180 (angle pt1 pt2)) pi))
  (ssget )  
  (command "_ucs" "_z" r1)
  (command "_-array" "_P" "" "П" "1" ss sh)
  (command "_ucs" "_p") 
  (princ)
)
__________________
Работаю за еду.
Working for food.
Für Essen arbeiten.
العمل من أجل الغذاء
Працую за їжу.
DEM вне форума  
 
Непрочитано 16.05.2007, 11:12
#7
Krieger

инженер (КМ)
 
Регистрация: 30.10.2004
Красноярск
Сообщений: 3,837


Цитата:
Сообщение от Kotsar
Массивом не хотелось бы, чертеж-то уже есть... массивом хорошо с чистого листа...
Почему? Ты-ж выберешь нужные объекты, какие проблемы?
Krieger вне форума  
 
Автор темы   Непрочитано 16.05.2007, 11:24
#8
Kotsar


 
Регистрация: 04.09.2006
Москва
Сообщений: 123
<phrase 1= Отправить сообщение для Kotsar с помощью Skype™


С MEASURE и DIVIDE конечно легче, но как бы так бы еще и объекты расставить/выровнять не руками...
Kotsar вне форума  
 
Автор темы   Непрочитано 16.05.2007, 11:26
#9
Kotsar


 
Регистрация: 04.09.2006
Москва
Сообщений: 123
<phrase 1= Отправить сообщение для Kotsar с помощью Skype™


Эх, лиспик! Тока я не знаю как вставлять его и все такое.
На курсы! Срочно на курсы!
Kotsar вне форума  
 
Автор темы   Непрочитано 16.05.2007, 11:27
#10
Kotsar


 
Регистрация: 04.09.2006
Москва
Сообщений: 123
<phrase 1= Отправить сообщение для Kotsar с помощью Skype™


Коллеги, спасибо! Разберусь...
Kotsar вне форума  
 
Непрочитано 16.05.2007, 11:49
#11
Krieger

инженер (КМ)
 
Регистрация: 30.10.2004
Красноярск
Сообщений: 3,837


Цитата:
Сообщение от Kotsar
С MEASURE и DIVIDE конечно легче, но как бы так бы еще и объекты расставить/выровнять не руками...
Я ж тебе с казал - в блок крожок ентот запихать.
Цитата:
Эх, лиспик! Тока я не знаю как вставлять его и все такое.
http://dwg.ru/art/8
Krieger вне форума  
 
Непрочитано 16.05.2007, 14:11
#12
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


Или поделить точками твои объекты, а потом из заменить требуемыми примитивами с помощью LISP. Замена набора примитивов на выбранный примитив
По использование лиспа читать http://dwg.ru/art/8
VVA вне форума  
 
Непрочитано 17.05.2007, 15:06
#13
percilacus


 
Регистрация: 10.05.2007
Узбекистан
Сообщений: 15


Точка- поделить- число сегментов или блок. Если блок- поворачивать
или не поворачивать
percilacus вне форума  
 
Непрочитано 18.05.2007, 00:48 Re: Распределить объекты с равными растояниями
#14
GWA18

Механизатор широкого профиля (б/у)
 
Регистрация: 23.12.2006
Черновцы
Сообщений: 2,933


Цитата:
Сообщение от Kotsar
Коллеги, подскажите, как расположить объекты на одной прямой с равными растояниями между ними. ... Пример прилагаю....
Вручную точно и быстро это можно сделать как минимум тремя вариантами.

Предварительные (общие для всех трех вариантов) шаги:
а) Измерить длину прямой L и рассчитать шаг t объектов: t=L/(n-1), где n - количество объектов (ориентируюсь на приложенный пример)
б) Скопировать объект с будущей точкой привязки на прямой
Вариант 1
1) Вставить объект в начальную точку прямой
2) Используя функцию "Копия по кривой", размножить n объектов по заданной прямой с шагом t.
Вариант 2
1) Разбить прямую на (n-1) отрезков (в этом случае шаг можно не вычислять)
2) Вставить объект в точки пересения (стыка) этих отрезков, а также в начальную и конечную точки исходной прямой
Вариант 3 (совсем уж ручной)
1) Провести перпендикуляр к прямой в начальной точке этой прямой
2) Провести линию, параллельную этому перпендикуляру, на расстоянии t
4) Вставить объект в начальную точку прямой (точка 1), затем - в точку пересечения параллельной линии с прямой (точка 2).
5) Выделить объект, вставленный в точку 2, и скопировать его с точкой привязки в точке 1.
6) Вставить скопированное в точку 2 (объект окажется в точке 3).
7) Вставить скопированное в точку 3 (объект окажется в точке 4).
8 ) И т.д.
GWA18 вне форума  
 
Непрочитано 18.05.2007, 00:58
#15
Клетчатый


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


.... :?...... В экспресстулз команда COPYM
Клетчатый вне форума  
 
Непрочитано 18.05.2007, 01:09
#16
Dym


 
Регистрация: 27.09.2005
Двинскъ
Сообщений: 586
Отправить сообщение для Dym с помощью Skype™


на форуме был код ДЕЛИН , вроде от Smirnoff, очень приятная штучка.
Dym вне форума  
 
Непрочитано 18.05.2007, 08:16
#17
Alaspher


 
Регистрация: 11.10.2004
e•burg
Сообщений: 755


Делал несколько лет назад такую функцию, выложена тут

Название:
Функция создания одномерного массива между двумя точками

Описание:
Создаёт указанное количество копий выбранных примитивов равномерно распределяя копии между двумя указанными точками. Действие аналогично созданию одномерного массива с возможностью поворота.

После загрузки нужно ввести copytr в коммандной строке.
Alaspher вне форума  
 
Непрочитано 15.04.2013, 20:21 клетчатый
#18
perpetule


 
Регистрация: 23.09.2008
Волгоград
Сообщений: 805
<phrase 1= Отправить сообщение для perpetule с помощью Skype™


Спасибки клетчатый, вот готовый макрос на кнопку,
запрос блока,
запрос б.т.,
запрос направления,
запрос дистанции,
разбросал
^C^C_.COPYM;\;\m;\\

Спасибки
Alaspher
copytr
мегакрут.

Последний раз редактировалось perpetule, 16.04.2013 в 07:51.
perpetule вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > AutoCAD > Распределить объекты с равными растояниями