Цитата:
Сообщение от skkkk
Offtop: Мне вот интересно: кого не устроил такой цвет знаков? Руководство или ГОСТ?
|
почти по всей дороге (линейному объекту), обустройство выполнено в программе "Титул" и гибкой функции настройки цвета знаков в ней нет, а вывод чертежей возможно произвести только на прямую с "Титула". Обустройство всех транспортных развязок и других узлов выполнено в автокаде, где более менее подходящий цвет для вывода на струйном плоттере является 174, а в идеале сходится на лазерном (формат А3) цвет 186 (если не ошибаюсь). Ну вот примерно где то так))
PS: Проверяющий гаишник, да и заказчик выявили "пожелание" наблюдать все знаки в томах обустройства одним цветом, конечно это дурость, ведь главное знаки изготовляются по ГОСТу и по сути не важно в какой цветовой гамме они отображены в чертежах, хоть буро-серо-малинывым, но тем не менее....))
Ура! Спасибо
skkkk, загрузил лисп, работает должным образом, то что надо. У меня возник вопрос по лиспу, а именно: за что отвечают строки:
"((= (vla-get-objectname x) "AcDbBlockReference")
(mapcar (function (lambda (y) (if (= (vla-get-color y) 5)(vla-put-color y 174)))) (get-block-entity-list x))".
Как я понял именно параметры заданные в двух вышепрописанных строках (по лиспу):
"((= (vla-get-color x) 5)
(vla-put-color x 174)" отвечают за замену цветов в блоках от "5" к "174". Прописывал именно в этих строках различные значения, в нижних строках ничего не менял, все работало отлично. В связи с чем и возник вопрос)). Еще раз выражаю благодарнось, очень выручили.