Программа является младшим братом HVAC Calculator (для Excel), её удобство в том что с ним можно работать непосредственно в AutoCAD и получать с чертежа некие значения (длины площади т.п.).
Сама программа написана на VBA, который не входит в стандартный пакет установки AutoCAD, по этому сам VBA необходимо самостоятельно скачать с официального сайта Autodesk и дополнительно установить, вот ссылка
В месте установки программы будет папка HVAC Calculator for AutoCAD, в ней два файла HVAC Calculator.dvb (это сама программа) и HVAC Calculator.cuix (файл с командами)

Файл HVAC Calculator.dvb необходимо добавить в автозагрузку, меню СЕРВИС->ПРИЛОЖЕНИЯ (или просто в командную строку введите _appload), и добавить (см. скрин 1)

Файл HVAC Calculator.cuix нужно загрузить как частичный, для этого открыть его в адаптации (см. скрин 2), на жать правую кнопку и загрузить как частичный (см. скрин 3). После этого появится новый пункт меню Project, с соответствующими командами. Команды каждый уже может настроить как угодно под себя, можно добавить их на ленту, на панель, я вот на контекстное меню. Всего четыре команды (см. скрин 4):
-HVAC Calculator Параметры
-HVAC Calculator О программе
-HVAC Calculator
-HVAC Calculator Математический

Команда HVAC Calculator для расчетов функций систем ТГВ.
Команда HVAC Calculator Математический для:
-арифметических вычислений
-измерение расстояние между точками на чертеже и внесение этих данных в калькулятор
-измерение площади прямоугольника на чертеже и внесение этих данных в калькулятор
-суммарная длина выделенных объектов (линии, полилинии, дуги) и внесение этих данных в калькулятор

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

Переход между ячейками в закладках "Вентиляция", "Гидравлика" можно осуществлять обычными кнопками стрелок на клавиатуре.
Как выяснилось у VBA для AutoCAD некоторые возможности не работают, а именно не модальные окна. Модальное окно это окно при работе с которым нельзя паралельно перейти на работу к другому окну, например в поле модели чертежа. Не модальное окно наоборот позволяет пользователю работать с разными окнами. В общем для перехода окна в не модальный ражим с модального, нужно просто правой кнопкой мыши клацнуть в любом месте окна калькулятора

Скачать HVAC Calculator

Спасибо

Будут идеи по дополнению или просто выявленные ошибки, пишите.

О! Андрюха, я прогу еще не скачал, но уже по скринам мне кажется что это будет нечто типа зачатков чудесной полезняшки NIK (Научный Инжерный Калькулятор) под автокад. Помнится в какой-то из тем я кому-то из форумчан, владеющему VBA под автокад, сейчас уже не помню кому именно, высказывал свои пожелания что было бы интересно иметь аналог NIK под автокад. Но тогда тот человек сказал что не видит в этом смысла, если ему нужен NIK он просто посчитает в другом окне. А у тебя похоже нечто в зародыше напоминающее моё тогдашнее давнишнее пожелание. На самом деле очень хочется порой иметь какую-нибудь родную приблуду именно в среде автокад по типу родного калькулятора, но только более продвинутую, чтобы не переключаясь никуда дополнительно, возможно какие-то значения с чертежа снимать.
Сейчас заценю что за полезняшка у тебя получилась, постараюсь протестировать и по результатам оставить более развернутый отзыв и высказать какие-то конкретные пожелания.

Ну просто читаешь мои мысли, четко из этих-же соображений и начинал делать калькулятор.

В общем загрузил. В 2009-м автокаде всё работает, но почему-то иногда при переключении разных расчетов пропадает возможность вбивать значения в ячейки - курсор мигает, а текст не вводится. Помогает перезапуск.
То что окна получаются модальные - это конечно не очень хорошо, т.к. как раз хочется именно калькулятор-помощник так чтобы быстро ткнул в него, посчитал, вернулся на чертеж, при этом чтобы калькулятор продолжал висеть в фоновом режиме и был доступен при наведении на него мышки. Похоже такая схема возможна для реализации только средствами ARX. Затупил. Прочитал ещё раз твоё описание и понял как переключаться в поле чертежа. Всё в порядке с этим. Хотя нифига не в порядке. Как раз при повторном переключении из окна модели в окно калькулятора перестают вводиться значения в полях и приходится заново перезапускать калькулятор. Возможно это глюки VBA под 2009-й автокад. Я так понимаю ты это дело под 2011-м или 2012-м пишешь. Дома попробую как оно работает на 2011-м акаде.
А так конечно идея очень хорошая. Будет здорово если ты разовьёшь её в более серьёзную штуку, чем черт не шутит глядишь лет через 5-10 увидим какой-нибудь ShprotCAD

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

А как ты вообще установил VBA для 2009 если его даже на сайте нет для AutoCAD 2009 (по крайней мере я его не вижу по моей ссылке)?

Тестировал на 2010 и 2011

Да как бы при установке выбрал Custom режим и указал там VBA, а может и вообще он в R17.2 версии по умолчанию устанавливается, сейчас не помню точно. Он если мне не изменяет память во всех версиях всегда был вшит в установщик в составе дополнительных компонентов типа дотнета и прочей лабуды.

В 2009, он идет по умолчанию это с 2010 они перестали запихивать его в дистриб.

СПАСИБО АНДРЮХА ЗА ТВОИ ТВОРЕНИЯ!!!

Андрей ты ГЕНИЙ! Скажу я без ложной скромности!!
Все встало с 1 раза, глюков не нашел, все работает!!

Спасибо, радует что тебе понравилось.
В принципе все что хотел я реализовал, вот только конечно эта модальность немного подвела... хотя она же в Excel работает полноценно, а сдесь работает на все кроме TextBox (это как раз ячейки в которые вносятся данные). В принципе потенциально кол-во функций можно и увеличить, но я этого не делал специально, так как выбрал только те которые будут востребован при работе с чертежом. А другие расчеты более гибко уже делать в Excel используя первый Quick calculation

Меня больше порадовала 3 вкладка, так как я все же прикидываю и считаю сети я все же больше в экселе, а вот с геометрией очень удобно. Вместо акадовких считалок и нескольких утилит все в одном флаконе.
А так кто знает иногда все ж приходиться проверять чужие творения и вот тут что бы не скакать по экселям удобно будет все а втокаде прикинуть!

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

Консерваторы мы с тобой Андрей! Микроскопом гвозди забиваем!!

Не без этого, но прежде всего это из-за того что объекты все геморные и нет у меня столько свободного и одноразмерного пространства используемого для прокладки воздуховодов, вот и приходится размахивать микроскопом

Здесь и далее не понял.
По-моему как раз сложные, многоуровневые системы считать в экселе это мазохизм.....

Речь идет о том что в одном помещении высота меж потолочного пространства (между основным и подвесным потолком) может быть 200мм, в другом 300 в третьем вообще может не быть подвесного потолка, по этому размеры воздуховодом часто приходится подсчитывать вручную для какой-то усредненной скорости. Ну а все остальное (потери, балансировка) конечно же делает MagiCAD.

Понял, наконец, о чём....
......это так и я делаю.

Андрюх, а автоматом значения снимать с вентсети нельзя? Вот я открыл уже вычерченную и просчитанную сеть, расходы в коробах магик указывает в л/с, как известно. Это отдельно надо пересчитывать. То есть я пока не въехал в чём калькуль в акаде удобнее отдельно открытого окна эксель.
Общие длины отрезков и площадей мне удобней творение Ривилиса.

Нет, Саня дело в том что у MagiCAD закрытый код, по этому с ним не чего сделать не могу.

Эти творения что представляют собой калькулятор? Я к тому что в моём случае эти значения сразу вносятся в калькулятор и затем можно с этими значения делать какие то арифметические вычисления.

1) Какая-то ошибка с запредельным стэком. Ввожу значения tнк сначала "20", потом удаляю "0", чтобы исправить значение, а он выдаёт ошибкуНажмите для просмотра прикрепленного файла;
2) При подборе размера прямоугольн. возд-да ввожу згначения: 20000 м3/ч, 200 мм, 7 м/с. А он ничего не считает (ну это понятно, что выходит за пределы), но хотя бы в текстовом поле программа писала бы "слишком большое значение" или что-нибудь, а то не понятно программа считает или зависла. Ну это так, 2-ой пункт мелочь, небольшая корректива ).

Спасибо. Классная вещь. Правда я строку меню не использую, но это вопрос решаемый.

Я тоже, в меню просто вынесена команда как базовое решение, пользователь уже на свое усмотрение обычными средствами AutoCAD добавити будет использовать эту команду там где ему удобно:
-меню
-панель
-лента
-контекстное меню (это мой вариант)
-сочетание клавиш

На первый взгляд немного экзотические размеры стороны прямоугольных воздуховодов 200х180 или 200х710. Понятно, что в сортаменте такие значения есть, но в своей практике в основном сталкивался с кратными 50 мм. Да и фирмы-изготовители предпочитают такие размеры.

Аналогично, монтажники оперируют с прямоугольными возд-дами кратными 50 мм.

2 shprot, можете сделать, чтобы в autoCAD 2008 работала программа? (cuix он не видит).

Не знаю как отредактировать предыдущее сообщение, поэтому написал здесь.
Смог таки запустить в 2008, сделал отдельную кнопочку ).

Есть такое, но она какая то странная ошибка, проявилась у меня один раз а потом все работает нормально, не могу пока её отловить, буду разбираться, спасибо.

Сделаем, при отсутствии корректных данных в итоговой ячейке будет текст "ошибка", так будет нормально?

Подумаю как реализовать оба варианта подбора.

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

Коллеги, есть один вопрос, как вы думаете если я разделю вызов арифметического калькулятора и калькулятора HVAK, на две отдельные команды (соответственно это будут два отдельных окна) это будет критично? Думаю нет, так как вот немного погонял калькулятор на практике и у меня не появилось необходимости использовать данные одного калькулятора для другого. Дело в том что в таком случае я возможно смогу сделать некоторые доработки, иначе не получится.

Трудно сказать на каком этапе подключились ид.... но в прилагаемом изображении страничка из справочника монтажника вентсистем где все воздуховоды кратны 50 мм. Я так думаю что табличка создавалась на основании каких-то нормалей. Видно создатели СНиП и те кто разарабатывал нормали не состыковались в свое время.
Так что если удастся реализовать два варианта подбора прямоугольных воздуховодов будет просто замечательно.

Конечно есть ещё и ВСН... но СНиП главнее, все эти данные имеют право на жизнь, просто возмущает когда люди упорно доказывают о том что нет такого сечения как 710 и т.п. а ведь СНиП все таки. А какой к стати выбирать типоряд не СНиП овский, что 315, 355 исключать из этого списка, ведь эти сечения и у зарубежных производителей оборудования используются, и и как тогда быть с 300, ведь явно что даже если сделать оба этих сечения в подборе практически всегда будет подбираться 300 а не 315.

Наверное в этом есть смысл. По первому использзованию мне показалось что у арифметического калькулятора маловато окошко. Не слишком удобно просматривать историю. Кроме того при суммировании длинной цепочки, к примеру длин, они не вмещаются в окно. в идеале было бы хорошо чтобы была возможность изменять размер окна результатов, не знаю правда возможно ли это реализовать. Но, как минимум, окно результатов при раздельных калькуляторах я думаю увеличить можно.
Еще одно предложение по эргономике . Неплохо было бы если бы в калькуляторе принажатии на кнопку dis само окно калькулятора на время. исчезало и появлялось по окнчании измерения.

Я согласен должен быть опорный документ и от него и необходимо отталкиваться. Но табличка которуя я выложил из справочника 1983 года. То есть понятно что все заготовительные предприятия и жестянщики работали и работают по подобным нормалям. И, опять же, речь идет только о прямоугольных воздуховодах. Диаметры типа 315, 280, 355 такими и должны быть. Фирмы, изготавливающие спиральные воздуховоды, работают именно по этим сортаментам. А если к примеру закажешь диаметр 300 то это будет уже прямошовный воздуховод который элементарно дороже спирального. Ну и потом даже и без изменений программа отличная. Ну будет небольшая погрешность по скорости для прямоугольных воздуховодов.
Идеальным вариантом была бы возожность формирования своего списка воздуховодов, если это реально реализовать силами VBA.

Строку ввода данных увеличить не получится. Увеличить окошко итога по высоте возможно, в принципе идея разумная возьму на заметку.

Предложение хорошее, мне нравится, буду смотреть возможно ли это реализовать, спасибо.

В общем скорее всего буду разделять калькуляторы, так что если есть принципиальные возражения пишите, пока я не прошел точку не возврата


Не знаю, нужны будут записи массивов в реестр, подумаю, сложно все это...

Арифметический калькулятор выдает результат по двойному нажатию ENTER. Лучше бы по одному. Окно жестко позиционируется по центру экрана. Нет ли возможности чтобы оно запоминало свое место на время сеанса? Просто когда берутся данные с экрана это не очень удобно. Неплохо было бы добавить подсчет длин мультилиний.

Да, конечно я о этом знаю, в программе было реализовано решение, с использованием события выхода из TextBox (это поле куда вводятся данные), по которому передавался фокус на кнопку "=". Сейчас поломал голову и получилось найти событие нажатия Enter без выхода из TextBox, в общем это сделал. Полезное изменение, спасибо.

О, это вообще мега проблема дня 4 на неё потратил, решения не нашел, проблема в том что при изменении модальности с не модального на модальное окну нельзя проводить какие либо операции (в моем случае присвоить окну положение предварительно записанных переменных с координатами), пока ещё буду ковырятся, хотя все идет к тому что все останется как есть по тому что и без того времени потрачено уму.
Посмотрю.
У меня ещё есть идея добавить две команды, аналоги AutoCAD переместить и копировать, с той лишь разницей что величина переноса или копирования будет братся из калькулятора, это пока только идея, посмотрим смогу ли это сделать.
Пока не доделаю изменения прогу не выкладываю.

Вот и первый глюк. При попытке редактирования диаметра в окне "Определение скорости по диаметру" при попытке редактирования диаметра с помощью кнопки Backspace Автокад закрылся без всяких предупреждений. Потом попробовал еще пару раз - выбивает ошибку выполнения макроса.

Доработана версия 2.1.1.1 (см. первый пост) в ней:
1. Окно калькулятора теперь всегда появляется в том положении, в котором было ранее закрыто или изменена модальность.
2. В арифметическом калькуляторе для получения итога достаточно один раз нажать Enter, а не два как раньше.
3. Переход в не модальный вид теперь делается нажатием правой кнопки мышки в любом месте окна (совсем в любом, по кнопкам по вкладкам и т.д., то есть куда то конкретно целится не надо).
5. При запуске команд Area, Len, Dis на момент выбора объектов в поле модели AutoCAD, окно калькулятора будет скрыто.
6. В арифметическом калькуляторе окно с списком проделанных операций увеличено на одну строку.
7. Теперь в программе два раздельных калькулятора, один арифметический, второй HVAC, т.е. это два отдельных окна.
8. Ошибки возникавшие при расчетах ТГВ, вроде исправил. В калькуляторе HVAC результат расчета будет появляться (обновляться) при переходе на другую ячейку, собственно так же это происходит и в Excel. (как раньше итог не будет мгновенно пересчитываться в момент ввода данных, из-за этого и были ошибки)

Толком погонять калькуляторы ещё не успел, так что если что обнаружите пишите.

Что-то в autoCAD 2012 плохо работает. становится активным это модальное окно quickCalculation, щелкал лкм по выделенному красным, а в рабочее пространство чертежа не пускает. Первая версия нормально работала, 2-ая версия вот такую штуку выдает.
Пожелания к программе, можно ли сделать, интерфейс как у _quickcalc? Чтобы он так же сворачивался в полоску как и _quickcalc, когда не активен.
Нажмите для просмотра прикрепленного файла

В предыдущем посте в пункте 3 я писал:

Считаю такое решение более удобное.

К сожалению VBA этого не позволяет.

Попробовал пкм в любом месте чертежа, не помогло. Окно quickCalculation по-прежнему активно.

А что по пкм в любом месте для того, чтобы сделать окно quickCalculation не активным, только у меня не срабатывает, у всех всё норм?

Получилось!
Я-то думал надо щелкнуть ПКМ в любом месте Автокадовского окна, оказывется окна программы quickCalculation.

Вот и гуд.

Можно добавить в обычный калькулятор _math еще один блок памяти, например, сейчас есть М+, а это будет М2+ ?

Ну это так, по мелочи. Арфаграфия.
Нажмите для просмотра прикрепленного файла

Хорошо бы если автоматом запоминались все значения при закрытии диалогового окна

Где Вы видите в этом применение?

Спасибо, подправил.

Речь о математическом калькуляторе или о HVAC?

О HVAC

Например, несколько раз в расчетах я могу использовать одно и тоже значение. Чтобы его не вспоминать, не искать в окне результатов, нажал кнопку и он уже в окне расчетов. Иногда работаю не с одним, а двумя цифрами, вот поэтому желательно 2-ой блок памяти, если можно).

1. При ошибке "400", программа вылетает, пусть игнорирует его, это случайно запустил второй экземпляр программы, как написано в ошибке;
2. Программу случайно можно вытащить вниз за панель задач при нажатой ЛКМ, но если отпустить, она там и останется и ничем программу не закроешь, на escape не реагирует. Получается при активной программе quickCalculation и если она внизу, то обратно в АвтоКад не вернешься, ПКМ жать негде);
3. Интересно по какой формуле происходит простая операция вычитания).
Не смог по другому картинки вставить.