Полезные программы от Philin (строительство). VBA

Добрый день, а не могли бы вы скинуть мануал команд для внешних контроллеров Sokkia мой адрес geoservice1@ukr.net За ранее благодарен

 

Новая версия программы IspoRand ver.0.2

Программа произвольно изменяет значения отклонений от проекта плановых и высотных исполнительных съёмок.

Изменения:
- добавлено окно ввода параметров
- возможность работы не только со значениями отклонений плановой исполнительной съёмки (выполненной с помощью AxeAndPointZ), но и со значениями отклонений высотной исполнительной съёмки (значений начинающихся со знаков "+" или "-", выполненных PloskH и PloskHi)
- по умолчанию для высотных исполнительных съёмок никогда не пишутся нулевые значения. Если нужны нулевые значения, то отключите галочку на пункте "не писать значения "+0""

Программе требуется указать допустимое значение отклонения от проекта, далее указать один из текстов со значением отклонения на чертеже. Программа находит ВСЕ ТЕКСТЫ НА СЛОЕ с указанным текстом и произвольно изменяет их (в пределах от 0 до допуск минус 1).
Программа автоматически определяет плановую или высотную исполнительную съёмку (только если съёмка чертилась программами AxeAndPointZ, PloskH, PloskHi).
Для высотных исполнительных съёмок можно указать отдельно пределы отклонения для положительных и отрицательных значений.

Если указанный программе текст находится на заблокированном слое, то программа завершает работу без изменений значений отклонений.

Окно программы выглядит так:


Новая версия программы AxeAndPointZ ver 4.1

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

PS Программы удалены в связи с выходом новой версии.

 

Новая версия программы IspoRand ver.0.3

Добавление:
- добавлен чекбокс "Изменять только значения вне допуска" (по умолчанию выключен). При его включении программа изменит на допустимые только те значения на указанном слое, которые больше допустимого.
- при включении функции учитываются все три введённых значения допуска. Значения отклонений в пределах допуска остаются неизменными.

Окно программы выглядит так:


PPS Программа удалена в связи с выходом новой версии.

 

Новая версия программы AxeAndPointZ ver.4.2

Программа для упрощения отрисовки плановых исполнительных съёмок в строительстве.

Изменения/добавления:
- программа создаёт при запуске текстовый стиль и все значения отклонений пишет в этом стиле. Данное изменение проведено для удобства пользования программой, теперь не надо в обязательном порядке чертить плановые исполнительные съёмки с "В" и "Н" (по ГОСТ в квадрате) стандартным шрифтом автокад txt.shx
- при выводе на печать значения отклонений теперь более чёткие

Значения отклонений теперь выглядят так (слева направо): отклонения с В и Н по ГОСТ в квадрате, отклонения с В и Н без квадрата, отклонения без В и Н.


В связи с тем, что тексты значений отклонений теперь отличаются от предыдущих версий... сделана новая версия программы IspoRand ver.0.5

Программа для автоматического ПРОИЗВОЛЬНОГО изменения значений отклонений плановых (выполненных AxeAndPointZ, содержащих или не содержащих В и Н) и высотных (выполненных PloskH или PloskHi, содержащих знаки + и -) исполнительных съёмок в пределах указанных допусков.

Изменения/добавления:
- совместимость с новой версией AxeAndPointZ
- осталась полная совместимость с предыдущими версиями AxeAndPointZ
- добавлена возможность указывать допуск как по верху, так и по низу для плановых исполнительных съёмок
- чекбокс "изменять только значения вне допуска" действует на все виды съёмок
- допустимое отклонение слева от чекбокса "изменять только значения вне допуска" влияет на все тексты или значения не содержащие "В", "Н", "+", "-". Изменение этого значения автоматически изменяет все остальные значения допусков

Окно программы выглядит так:


Новая версия программы COM2aCAD ver.2.5

Программа для загрузки точек съёмки из тахеометра в активный чертёж автокад... через кабель и COM или USB-COM порт, либо из файла координат SokkiaSDR или текстового файла с разделителями "запятая".

Добавление:
- при вызове таблицы выбора точек можно добавить свой текст в название слоя на который будут помещены точки съёмки.

Если не писать никакого текста, то съёмка будет рассортирована по слоям (сортировка по кодам точек) с названиями типа ДАТА_СЪЁМКА_КОД. Если указать свой текст, то слои будут иметь имена типа ДАТА_СЪЁМКА_ВАШ-ТЕКСТ_КОД.

Окно с новой таблицей выбора выглядит вот так:


PS Программы были удалены в связи с включением их в последний пакет программ. Сам пакет программ можно скачать в первом сообщении этой темы.

 

Уважаемый PHILIN начинаю пользоваться вашими программами и тахеометром. На windows 7 autocad 2009 все програмки работают нормально, а на windows 8 исполнительные плановые и высотные работают,
а COM2CAD 2.5 открывается но при поиске порта autocad выдает такую канитель." Ошибка компиляции в скрытом модуле: <module name>


Защищенным модулем не может быть отображено. Эта ошибка имеет следующие причины и способы устранения:

Существует ошибка компиляции в код указанного модуля, но это не может быть отображен, потому что проект защищен.
Снять защиту проекта, а затем запустить код еще раз для просмотра ошибки" это из справки AUTOCAD; Я ЗАВИС.
с уважением и благодарностью.

 

Операционная система 32 бит или 64 бит? Если 64 бит, то и не должно работать.
Автокад запускается от имени администратора? Если в Win7 и Win8 запускать автокад с правами пользователя, то COM2aCAD работать физически не может т.к. работает напрямую с ядром операционной системы, а Windows (7 или 8) разрешает такие действия только администратору.

 

win7 -32бит работает напрямую . win8-64бит запускал от имени администратора получается то что описал выше.

 

Мне недоступны операционные системы 64 бит, в связи с этим сложно сказать что им не нравится.
Некоторые мои программы не работают в 64 бит операционной системе у большинства людей (не у всех) .

Т.к. в течение ближайших 5 лет использование операционных систем 64 бит считаю не рациональным ( в течение этого срока 64 бит просто игрушка без нормального софта, жрущая в 2-3 раза больше оперативной памяти и работающая в 2-4 раза медленнее чем 32 бит), и решение проблемы будет неизвестно когда.

О гарантированно поддерживаемых операционных системах и версиях автокад написано в первом сообщении данной темы в спойлере... и работа в 64 бит не гарантируется:

 

Понял. Жаль,но все равно спасибо.

 

Вышел пакет программ №5.
В него вошли:
- последние версии программ
- иконки к программам для панели инструментов автокад
- инструкция для всех программ в формате PDF
- видеоинструкция по установке VBA программ в автокад.
Пакет программ можно скачать в первом сообщении этой темы.

PS Для обновления уже установленных программ достаточно закрыть автокад, заменить все файлы программ на новые.

 

Philin, в каком посте скачать можно №5

 

тут - Полезные программы от Philin (строительство). VBA

 

Нередко гедезистам на стройке приходится работать с чертежами "Проектировщика", выполненными в "миллиметровом" масштабе.
Это чаще всего архитектурные и конструктивные чертежи.
Их конечно можно перемасштабировать из мм в метры, но не всем это по силам.
Также после успешного масштабирования некоторые размерные стили требуют доработки.
А у геодезистов часто нет на это времени.

Когда-то я этим озадачился и добавил в свою программу "Стрелка" возможность образмеривать отклонения и на "миллиметровых" чертежах. Сама программа конечно устарела, но вполне успешно работала.

Возможно исходники этой программы (VBA AutoCAD) будут полезны для такой задачи.
Кода в программе немного и он подробно прокомментирован.

 

Есть идея написать новую программу упрощения жизни геодезиста в строительстве :)
Программа автоматического создания файла координат объекта строительства для выноса в натуру (по типу программ ploskH и PloskHi). В ближайшее время начну воплощать в жизнь эту программу. По мере написания жду ваших идей и комментариев.

На текущий момент начинаю писать по следующей заготовке (в процессе написания будут происходить изменения и дополнения):
- у нас есть вычерченный в ПОЛИЛИНИЯХ объект строительства на отдельном слое (работа с другими типами линий будет добавлена впоследствии, но возможности программы при работе с другими примитивами автокад будут значительно урезаны из-за недостаточности свойств этих примитивов)
- запускаем программу, указываем ей значение отступа наружу от стен/пилонов/колонн и пр. (либо без отступа)
- из выпадающего списка указываем слой с конструкцией (либо один из элементов конструкции на чертеже для определения слоя программой???)
- программа чертит на отдельном слое новые полилинии с указанным отступом от элементов конструкции
- чертит на отдельном слое точки в углах полилиний (полилиний с отступом)
- нумерует точки по порядку и пишет текстом эти номера возле точек на отдельном слое (индекс и префикс нумерации, а также высота текста... указываются пользователем при запуске программы)
- создаёт SDR и текстовый файл координат точек для закачки в прибор (надо разобраться какой вид текстового файла координат наиболее предпочтителен)

PS Как-то так :)

 

Программа автоматического создания файла координат объекта строительства для выноса в натуру (версия БЕТА). Название программы aCAD2TXT

Что-то вышло :)
Текущая версия работает только с полилиниями! Программа полностью игнорирует прочие примитивы автокад. После окончания теста будет добавлена возможность работы с другими примитивами автокад. На данный момент реализованы ВСЕ возможности, которые были перечислены в предыдущем сообщении. Файл координат создаётся ТЕКСТОВЫЙ (SDR будет позже).

Запуск программы и ввод параметров:


После нажатия кнопки "Поехали!" получаем на чертеже следующее:


Автоматически создаётся файл координат, файл имеет имя открытого чертежа + индекс с начальным номером, расширение txt. Файл создаётся в той папке из которой был открыт активный чертёж автокад:


Строка данных в файле типа: ИМЯ,СЕВЕР,ВОСТОК,Высота(0.000)
Внутри файл координат выглядит так:


Вся работа программы автоматически производится на соответствующих слоях чертежа (слои создаются программой, имеют имя того слоя с которым отработала программа + текстом тип данных создаваемых программой на слое):


В итоге получаем практически одним кликом мыши файл координат точек, вынесенных на определённый шаг от полилиний выбранного слоя. Полилинии, состоящие всего из двух точек, выносятся в обе стороны на указанный шаг т.к. у них нет ни внешней ни внутренней стороны! Все остальные полилинии выносятся с указанным шагом НАРУЖУ конструкции.

PS Программа удалена в связи с выходом новой версии. Установка программы аналогична другим программам (читаем инструкцию по установке, которую можно скачать вместе с пакетом других программ из первого сообщения этой темы форума), название программы aCAD2TXT
PPS Жду замечания, предложения, идеи по поводу дальнейшего усовершенствования программы. Здесь на форуме, либо по электронной почте (адрес почты показывается при запуске любой моей программы).

 

Предыдущая версия программы в некоторых случаях округляла не совсем правильно. Иногда при округлении выходила ошибка в пределах 1мм. Т.е. координату типа 37.8 программа в файле координат могла записать как 37.799 или 37.801.

Обратите внимание! После работы программы активным слоем автокад становится слой "0".

Ошибка исправлена, вот новый файл программы.

PS Файл удалён в связи с выходом новой версии.

 

Новая версия программы COM2ACAD ver 2.6

Добавлена поддержка x64 режима, что позволяет запускать эту версию также и в Windows 7/8 x64

Больше никаких отличий от версии 2.5. Качать стоит только тому, кто работает в Windows x64. Для пользователей Windows x86 заменять версию 2.5. на 2.6 не имеет смысла.

PS Программа удалена в связи с её включением в общий пакет программ. Пакет программ можно скачать в первом сообщении текущей темы.

 

идея- реализовать механизм повторного экспорта координат и нумерации из созданных слоёв

чтото подобное есть в civile, но не у всех он есть, тем более надо уметь пользоваться- а это СОВСЕМ другая тема

 

частенько, в запарке, хватали txt-исходный файлик коллеги,заливали в прибор, делали работу-убивали рабочие файлы. проходило время, возвращались к сделанному-а там только файлы када, txt-исходный файл пропал, и заново делать разбивочный.

 

... чуть позже реализую восстановление файла координат по слою с текстом номеров точек.