Дабы не плодить тем пишу тут: никто случаем на сталкивался с лиспом который бы делил точки по высотным отметкам (на примере как в екселе - которые больше и меньше средней) и пихал в разные слои. Для сортировки точек верх\низ конструкций. Ну или может такая штука в стандартных функциях акада или цивила есть?
В моей программе COM2ACAD можно при чтении координат из COM порта или из файла вызвать таблицу выбора, отсортировать по высоте и поместить точки на соответствующие слои. Если подразумеваются вертикальные конструкции для которых потом делать исполнительную, то тогда разделять по слоям вообще не надо. Программа AxeAndPointZ сама определяет где верх, а где низ по отметкам точек съёмки. PS Только это всё не на LISP, а на VBA под автокад написано. Для пользователя что LISP, что VBA выглядит одинаково. Разница только в способе запуска программ. Для запуска VBA есть отдельная команда автокад vbarun.
К сожалению для COM2ACAD я подсел на цивил 2014, в котором оно не работает, опять же к сожалению =( До этого с огромным удовольствием пользовался вашим набором программ, сейчас осваиваю цивил и вот возникают некоторые вопросы оптимизации рабочих процессов. С АхеАндПоинтЗ я немного не подружился и не понял как сделать всю поляну разом, приходилось по точечкам тыкать (допустим полилиния колонн выделил колонну - выделил точки - все бахнулось) выводить отклонения вручную, но даже это здорово оптимизировало время на исполнительные. Теперь разбираюсь в цивил гео тулз и там нашел сценарий который делает все разом, но нужно таки разделять на слои, разбираюсь дальше :)
Оффтоп (Move your mouse to the spoiler area to reveal the content) Сколько часов потом сидеть и растаскивать эти автоматические отклонения? ;)
Так, вопрос снят, там оказалось все гораздо проще и работает >256.542 и <256.542 для сортировки в цивиле :) А по поводу сколько буду править... я был крайне удивлен что осталось только дописать пару мест из 300 колонн, их отклонения там где во время съемки не снял :D в общем хорошая штуковина, жаль выглядит криво)))
АлексейМанс, вообще-то в автокаде тоже можно делать такие выборки стандартными средствами быстрого выбора
Гм...к последнему посту.В 2007 и ниже при поиске текста,можно было нажать кнопку зуммировать,и прицел перемещался туда,где этот текст.В 2009 что то у меня не получается это.
А там кнопки зуммировать нету. При поиске текстового значения, и его нахождении, курсор сразу перемещается к найденному тексту. Потом вступает в работу кнопка "Найти далее" , при условии, что у вас не стоит галочка в окне "Результаты", иначе зуммировать не будет, а найдет по всему чертежу и листам искомый текст, и выведет количество результатов.
АлексейМанс, Оффтоп (Move your mouse to the spoiler area to reveal the content) Может быть мы говорим о разных программах. Я имею ввиду вот это безобразие под Сивил: Ну и по какому ГОСТ это всё чертится? Или мои знания устарели и уже есть новый ГОСТ, под который это всё делается? Вдруг черчу по старому ГОСТ, а надо теперь чертить как на показанных скринах. Есть отдельная версия программы, которая чертит СРАЗУ при приёме точек из файла или USB/COM порта. Но она не выложена в интернет в связи с тем, что инструкция пользователя будет занимать страниц 400 мелкого текста и никто её не будет читать (писать тоже :) ), но обратятся потом ко мне с вопросами как это делается (даже если напишу инструкцию, то вопросы всё равно будут). И такого безобразия как на скрине она не делает. Во всяком случае не отходит от требований ГОСТ "Исполнительная документация". На одном объекте "прокатит" такой автомат. А на следующем, может оказаться, что требования к исполнительной документации достаточно жёсткие и придётся переделывать вручную всё это чтобы приблизиться к:
Согласен с вами, та штука под цивил совсем не решение данной задачи даже в 75% соотношении)) Где то прокатит, а в большинстве случаев нет. Просто когда на одном моем объекте здание 23*26 метров - я с большим удовольствием пользуюсь вашим лиспом, а вот на объекте где +\- 400 колонн... тут остается надеяться что в конце месяца мне их не вернут и не заставят переделывать :D з.ы. а эт вы зря..зря... 400-х страничный мануал не рискуете писать :) яб пожалуй даже заставил начальство прикупить с удовольствием такой лисп да и мануал можно "всем миром" писать чисто теоретически
СПАСИБО! --- Сообщения объединены, 4 янв 2014, Оригинальное время сообщения: 4 янв 2014 --- Настройте в Автокаде вкладку: "Вид", нажмите вид сбоку и ваш точки будут на экране каждая на своей высоте (даже если скажем если все примитивы текста обозначающего номера, кода и отметки будут на отметке 0.000 (все зависит от программы перекачки данных) то точки всегда на своих отметках) Выбирите верхние точки (выше условного горизонта, скажем посередине колонны) и задайте им слой "ВЕРХ", и аналогично с нижними. После задайте опцию "Вид сверху" и работайте в обычном режиме...
Здравствуйте! я начинающий геодезист. мне дали задание начертить "липовую" исполниловку на монолит (7 этажей) один этаж(подвал) я сделал, но это заняло очень много времени и процесс очень нудный. Нет ли способа ускорить этот процесс? Поясню: съемка не велась вообще. Необходимо менять направления отклонений верха и низа и их значений. Пробовал это делать через axeandpoint, но с помощью него можно только скорректировать, а не сляпать полностью левую исполниловку.
Вот пакет программ Полезные программы от Philin (строительство). VBA... Программа AxeAndPointZ позволит создать вручную липовую исполнительную (придётся долго тыкать мышкой), а на основе одной готовой исполнительной уже можно запустить программу IspoRand и одним кликом поменять все значения... таким образом кликая один раз мы получаем каждый раз разные значения по всей исполнительной (в указанных нами допусках). И с помощью программы Razvorot можно произвольно перенаправить стрелки-отклонения (только стрелки выполненные AxeAndPointZ). Но для подгона всё равно придётся создать первую исполнительную-заготовку. Без заготовки ничего не выйдет. Теоретически программа IspoRand сможет изменить и числовые значения программы axeandpoint, но гарантии не даю, т.к. писалось всё под другую программу. Стрелки axeandpoint точно не получится развернуть в автомате. PS При готовом шаблоне исполнительной на всё про всё уходит 5-8 секунд + замена шапки штампа. Т.е. в день их можно делать сотни две, абсолютно разных :) PPS Для некоторых программ из указанной мной выше ссылки, существуют более новые версии в разделе "Ресурсы" форума. PPPS Это не LISP, это VBA под автокад. Для пользователя отличие только в способе запуска программы из под автокад, во всём остальном не отличается от LISP.
Пробовал рисовать с помощью этой программы. Если рисовать с высотой 0, то у стрелки будет значение "Ц20", если ввести условную высоту, то показывает только отклонение низа.
Если нет высоты, то будет Ц. Если указать положительную высоту, то будет Н. Если указать отрицательную высоту, то будет В. Хоть иногда стоит почитать инструкцию пользователя к автокад. Он чертит по умолчанию на высоте 0, а ноль для программы это Ц.
Видел где то лисп по "выдергиванию" фрагмента чертежа по рамке.На кадюзере кажется.А есть ли какой нибудь лисп для той же операции,но только по заданной полилинии,замкнутой разумеется?
