Помогу бесплатно разработать любую программу на autolisp.

Мне нужно выполнить разворот не всех, нескольких (в случайном порядке) выделенных объектов (стрелки отклонений) на 180 градусов, относительно их геометрического центра. Если брать за основу лисп из МенюГЕО, то там объект можно выбирать любой. Если с нуля, то подошёл бы выбор стрелки в виде замкнутой полилинии, либо блока.

 

А вы не могли бы загрузить сюда этот лисп (mrot.lsp)? А то имеющийся у меня лисп вызывает подозрения, а ставить новую версию MenuGeo не хочется.

 

Спасибо за помощь

 

Файл добавил. Можно к нему прикрутить возможность случайного автовыбора, чтобы не все объекты разворачивались,а 50 на 50 в произвольном порядке?

 

Произвольный порядок реализовать трудновато. Попробуйте вариант с разворотом объектов через один.

 

Хорошо, спасибо.

 

Пожалуйста!
Если бы вы предоставили чертеж с вашими стрелками-блоками, то можно было бы думать дальше.

 

Например, эти. Подойдут любые из трёх линий.

 

Для блока "1"

 

Работает, но разворачивает все чётные ряды полностью на 180, а нечётные полностью нетронутые. Прикладываю пример, как получилось

 

На 180 градусов разворачивается? Разворачивается 50%? Что надо ещё? Чтобы был произвольный порядок? Простите, но я не понимаю смысла всех ваших пожеланий. Подгонка - дело нехорошее.
Просмотрел ваш чертеж. Он нарисован так: 1) вставлен блок "1"; 2) блок размножен копированием по вертикали; 3) столбец блоков размножен по горизонтали.
Четко всё отрисовано, поэтому и разворот идёт четко.

 

Подгонка то, может, и плохо, однако 90% заказчиков просят подготавливать два комплекта исполнительных схем - фактические и "красивые". В последнее время, попадаются всё чаще объекты, где вообще факт никому не интересен, в виде исполнительных схем. Только на словах объяснить где серьёзные косяки, если они есть. А для отчётности нужны бумажки с красивыми цифрами. И штамповать их нужно по 100500 в день. Поэтому на таких объектах без подгонки никуда.
Спасибо Вам за помощь. Просто, это не совсем то, что я ищу. Если фактический результат разворота не устроит ожидаемый, то при повторном использовании лиспа, эффекта как от перетасовки колоды игральных карт не будет. Все стрелки развернутся чётко в исходное положение, т.е. результат становится предсказуемым и закономерность можно легко отследить. Либо положение исходное, либо строго через одну стрелку разворот. Когда делаешь много типовых схем, это сразу бросается в глаза.
Для примера сделал произвольный контур и проставил стрелки по вершинам.

 

Sergey B., Если Вам нужно разворачивать "красиво" в случайном порядке, то запускаете программу mrot.lsp, вручную по одной выбирайте разумное количество стрелок для разворота и разворачиваете. Далее нажав пробел или ентер перезапускаете программу и выбираете по одному следующую группу стрелок для разворота. Для облегчения понимания, что уже развернуто, можно в программу добавить изменение цвета уже повернутой стрелки.

--- Сообщения объединены, 16 дек 2018, Оригинальное время сообщения: 16 дек 2018 ---

Каким образом Вы первоначально вставляете стрелки? Если вручную, то Вам нужна программка, которая сразу вставит блок-стрелку в нужном Вам направлении.

 

Вручную. Создаю шаблон, по которому делается много типовых схем, с минимальными изменениями. В данный момент пользуюсь программой разворота стрелок отклонений созданных AxeAndPointZ, которая присутствует в сборнике МенюГЕО. Там всё есть. Стрелки разворачиваются как при перетасовке карточной колоды. Результат каждый раз разный, вне зависимости от того, как изначально были повёрнуты стрелки. Но сами стрелки нарисованы заливкой и плохо видны на печати, а пользовательские стрелки из трёх линий программа не поддерживает. Поэтому ищу альтернативные варианты.

 

Можно после использования AxeAndPointZ и получения нужного вам результата заменить "стрелки нарисованы заливкой" на "пользовательские стрелки из трёх линий". Дайте чертеж со стрелками-заливками. "Конвертацию", мне кажется, сделать будет не трудно.

 

Мысль неплохая. Только с разворотом стрелок нужно что то придумать. Я пробовал так заменять. Все развороты стрелок присваивались от заменяемой стрелки.Т.е. не важно как были развёрнуты стрелки до замены, после замены они все в одинаковом положении.

 

Н-да! Не хотел я сегодня пить, но пойду налью своего винца стакашку!

 

Проще показать. Вот что происходит, когда делаю замену одного объекта другим через МенюГЕО. Сверху то, что было. Снизу то, что стало.

 

Ну и где ваше требование о повороте на 180 градусов? На вашем чертеже и 90 и 180 градусов. Мозг плавится.