[DENBASS2004]

Добрый день. Нужна помощь. Есть модель планки на которой надо вырезать отверстия. Шаг между отверстиями 200 мм. Но длины планок разные. Программно прописываю этот цилиндр по центру балки. Далее нужен массив. Как сделать, если расстояние от края планки до крайнего цилиндра более 150 мм, он сдвигал цилиндры на 100 мм от центра?

[Кулик Алексей aka kpblc]

DENBASS2004, дубель сто шышнаццать: где свой код? Где возникла проблема?

[DENBASS2004]

Сообщение от Кулик Алексей aka kpblc Где возникла проблема?

(command "_.-view" "_swiso") ;переводим экран на вид аксонометрия
(command "_.box" "-600,0,-10" "_length" "63" "1000" "10") ;строим горизонтальную полку опорной балки
(setq 1polka (entlast)) ;даем первой полке имя
(command "_.box" "-600,0,-100" "_length" "10" "1000" "100") ;строим вертикальную полку опорной балки
(setq 2polka (entlast)) ;даем второй полке имя
(command "_.union" 1polka 2polka "") ;объединяем первую и вторую полки
(setq 1balka (entlast)) ;даем опорной балке имя
(command "_.-view" "_swiso") ;переводим экран на вид аксонометрия
(command "_.slice" 1balka "" "-600,800" "-537,843" "0,0") ;режим балку по диаметру
(command "_.mirror" 1balka "" "0,0" "1,0" "_n") ;зеркалируем полученную балку
(setq 2balka (entlast)) ;даем полученной зеркальной балке имя
(command "_.union" 1balka 2balka "") ;объединяем первую и вторую балки
(setq 3balka (entlast)) ;даем полученной балке имя
(command "_.-view" "_left") ;переводим экран на вид слева
(command "_.cylinder" "-100,-37,580" "6" "50") ;строим цилиндр под отверстие
(setq 3cyl (entlast)) ;даем цилиндру под отверстие имя
(command "_.-view" "_top") ;переводим экран на вид сверху
(command "_.-view" "_swiso") ;переводим экран на вид аксонометрия
(command "_.-array" 3cyl "" "_rectangular" "4" "1" "200") ;массив отверстий на балке
(command "_.-array" 3cyl "" "_rectangular" "5" "1" "-200") ;массив отверстий на балке

Здесь нет проблем. Просто я в принципе не понимаю как сделать так, что бы если расстояние от края балки до крайнего цилиндра более 150 мм, он сдвигал цилиндры на 100 мм от центра в одну сторону, а с другой добавлял еще одно отверстие с шагом 200 мм

[Кулик Алексей aka kpblc]

DENBASS2004, изучай if (и, возможно, cond).

[DENBASS2004]

Сообщение от Кулик Алексей aka kpblc изучай if (и, возможно, cond).

Спасибо изучу. думал набросаете что нибудь