Программа для построения графиков отстрела

Навеяно невозможностью хрона S04 выгружать данные на компьютер, а также невозможностью программы для ИБХ-716 принимать данные кроме как от хрона. Вообщем в архиве программка написанная в екселе: строит график, считает энергетику (макс, мин, ср.), считает расход. Информация вводится в ячейки помеченные желтым цветом. Под графиком есть кнопочки, одна обновляет график после ввода данных (ось Х делает соответствующей количеству выстрелов), две других включаю и выключают подписи на графике. Если запретить запуск макросов то кнопки работать не будут. Писал за 1,5 вечера, так что не ругайтесь 😊

качать тут

UPD: Если не работают кнопки под графиком нужно сделать следующее: в екселе зайти "Сервис > Макрос > Безопасность" и там поставить уровень "Средний". При открытии калькулятора ексель спросит про макросы, ответить нужно "Не отключать макросы".
Без макросов график не будет перестраиваться в зависимости от вашей скорости и от количества выстрелов, все остальное будет считаться как обычно.

UPD: Добавлены еще две кнопки, первая выводит на принтер график отстрела (ну, должна его выводить - проверить не на чем), вторая кнопка копирует изображение графика в буфер обмена, запускает паинт и вам остается щелкнуть "правка > вставить" в самом паинте, а затем сохранить рисунок в любом формате.

UPD: Добавлена кнопка позволяющая скопировать в буфер обмена все рабочее поле калькулятора, что бы не делать скрин всего экрана.

UPD: Добавлен расчет среднего отклонения, благодарности Оливер Перри за математику, PGL за побуждение.

UPD: Добавлен вывод давлений на график, благодарности за идею WOLF [VT].

UPD: Добавил кнопку "Очистить" (идея DocSnip) - оказалось кнопка страшная пришлось добавить окошко с вопросом "Типа точно чистим?". Устранил "развал" осей в графике в случае нажатия кнопки "Перестроить" при не введенных данных.

UPD: Добавлено: при ручном вводе скоростей курсор сам будет становится в начале следующего столбца как только будет введено значение 39 и 78 выстрелов.
Еще одна кнопка "Вставить из буфера" (идея korova для выгрузки отстрела из хрона) соответственно берет из буфера цифирки и вставляет их в столбцы, при этом из массива берутся первые 39 шотов, после чего каретка переходит в следующий столбец и т.д. Единственное замечание, цифирки должны быть в таком формате:

245
246
246
...
246

т.е. каждое число с новой строки.

Полезная штука, только можно было скорость с 200 мысы начать...

Shepin
Полезная штука, только можно было скорость с 200 мысы начать...

Himoza,у мня не работает, потому как Vista у мня, другой иксэлэс.
как нить подругому мона?

в линуксе, в опен_офисе работает перестройка графика только если щёлкнуть по самому графику. щёлкая по кнопкам вылазит ошибка(чё-то там про бейсик)

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

Спасибо. Заработало. 😊

Himoza молодец. Большое спасибо, очень полезная штука получилась.

Himoza
Ну... вообще шкала считается по среднему значению скорости, т.е. если ваш средний буде 200 то макс. будет 250, а мин 150 мысов

kipish
Чет нифига... у меня 230-240 дк видно только макушки середины плато

Немного не правильно я выразился по поводу построения оси Y на диаграмме - она считает не из среднего, а следующим образом: минимальная скорость-50 это будет минимальная отметка, максимальная скорость+50 - максимальная отметка

Я так понял, что больше 40 выстрелов он не показывает?

Почему же, он показывает на графике столько выстрелов сколько занесено в программу, а максимум там 117 кажется. Самое сложное как раз и было научить диаграмму быть "гибкой"

А для меня вот так наглядней

Скорость Вероятность
270 1.9
271 3.8
272 3.8
273 9.6
274 21.2
275 23.1
276 17.3
277 17.3
278 1.9

Итого средняя 274,8 плюс минус 1.38

Спасибо, автор! Весьма удобная штука 😊

Не за что, пользуйтесь если нравится 😊

Ой, пардон. Спасибо! ))) Только чет у меня не выходит. Больше 40 на графике не показывает. Хотя у меня не ексель, а опенофис и там чет он о макросах говорит. Но в сервис > макросы > - нет раздела безопасность. Короче забил. 40 - достаточно.

Опенофис фтопку 😀 кстати 2007 офис тоже 😀 😀 😀

y6uBaTop
Хотя у меня не ексель, а опенофис

Himoza, спасибо!
Пробовал и в 2007 Офисе и в ОпенОфисе - всё нормально работает.
Только масштаб осей подправил и всё ОК!
Ну и макросы настроил, естесственно 😊

Мужчины чет туплю я, а какой расход правильней? Тот который помечен звездочкой "*Расчет расхода воздуха с учетом неидеальности для давлений до 500 атм при 22 гр. Цельсия" или верхний. Разница в 1 кубик почти все-таки.

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

Himoza, а как распечатать график. Чет у меня не получается.

Выделить нужный диапазон ячеек, нажать "файл -> печать" и там выбрать "выделенный диапазон"

Спасибо, Himoza! Очень полезная прога! Уважаемые, а какой объем резика на Хуле? Хуля большой, в смысле не коротыш. 😊

280 кубиков

masara
280 кубиков

Хорошая програмка, полезная. Хоть я програмки и не очень..., но за эту спасибо.

Мужчины чет туплю я, а какой расход правильней? Тот который помечен звездочкой "*Расчет расхода воздуха с учетом неидеальности для давлений до 500 атм при 22 гр. Цельсия" или верхний. Разница в 1 кубик почти все-таки.

Правильней мерить КПД по изотермической работе сжатого газа, поправку (2%) на нелинейность воздуха до 250 атм можно в гробу видать.

КПД = 100% * А1 / А2,

А1 = суммарная энергия пулек,

A2 = 0.1 * P1 * V * ln (P1) - 0.1 * P2 * V * ln (P2),

где P1 и Р2 - давления начальное и конечное, в атмосферах, V - объем резервуара в см3.

Политропное КПД рассчитать технически невозможно, не зная реальных параметров теплообмена.

см3/Дж придумали инвалиды на голову со средним штатовским образованием, не надо с них брать пример.

У кого нить есть возможность забить резик до 250 атм при одной температуре, потом немного нагреть его и посмотреть давление. Разница температур должна быть градусов 30. Вообщем нужно давление при одной температуре и каким оно станет при другой, вот и проверим какая формула даст более точные результаты. Там разница между расчетом по классической формуле и с учетом неидеальности большая получется

Открыть и читать, внимательно, а потом уже чесать йезыг: 😛

Термодинамические свойства воздуха. (издатель - госслужба стандартных справочных данных)

Если об этом "Термодинамические свойства воздуха" / Сычев В.В., Вассерман А.А., Козлов А.Д., Спиридонов Г.А., Цымарный В.А.
ГСССД. Серия монографии. М.: Издательство стандартов, 1978"
Так это примерно оттуда, хотя и не мной взято.

Ну дык возьми собой 😊 Там просто реальные эмпирические характеристики, а не узко-применимые модели (а-ля Ван дер Ваальса), практически без лишней воды, лучше интерперетировать самостоятельно, а не через испорченный телефон. Действительная нелинейность воздуха в рабочем интервале давлений и температур, свойственных ПЦП, зело невелика.

Добавил пару кнопок, первый топик обновил

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

Himoza
У кого нить есть возможность забить резик до 250 атм при одной температуре, потом немного нагреть его и посмотреть давление. ...

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

Программку скачал. Спасибо, Himoza!

Himoza, спасибо, удобно хранить архив. Тетрадь общая уже исписана и затерта 😊
Только у меня получился касяк: использую для стенда литровый балон, чтобы вручную, на месте, было удобно считать расход. Ввел объем резервуара 1000
показывает в среднем расходе ошибку. Поставил 250, то же. Начальное было 53атм, конечное 39,5атм. Просто хотел остаток воздуха выдуть с интересом.

Странно, сейчас только что ставил все указанные величины - все нормально, может не указана масса пульки или еще что? Если не сложно скрин программки бы сюда.

вот, скрин, игрался с ударником.

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

Нет, по формулам нелазил т.к привык доверять людям, разберусь позже.
Вообще есть пожелание: можно сделать еще примочку, чтобы показывать расход в литрах на выстрел. Лично мне так удобнее, может и другим. Например, знаю резик 220см.куб, начальное 200, рабочее 120, 17.6 литра запас на выстрелы в итоге смотрим расход на выстрел в литрах.

т.е. на расход воздуха приведенного к атмосферному давлению что ли? Просто немного не понял.

Пригодится

т.е. на расход воздуха приведенного к атмосферному давлению что ли?>>>>

Да именно так. Извини сразу ответить несмог, в разъездах.

Что нового?

Пока ничего, но если сделаю сразу напишу

С вашего позволения, добавил расчет стандартного отклонения

Тоже самое, но с использованием пользовательской функции (VBA), без сохранения промежуточных результатов в отдельных ячейках. Расту как програмист 😊

Himoza, спасибо.

Яндекс кошелёк есть?
Готов отсыпать немного монет.

Большое спасибо конечно, but this software is free 😊 т.е. свободно для распространения и модификации

Моё дело предложить 😛

Всех благ!

Добавлена еще одна кнопка позволяющая скопировать в буфер обмена изображение всего рабочего поля калькулятора - больше не нужно делать скрины вместе с ненужными панелями и заголовками. Выглядит так:

Спасибочко большое, Himoza!!!

Пользуйтесь на здоровье 😊

Перезаписал архив в шапке?

Он у меня на сервере, да обновил.

Спасибо большое, классная прога.

Добавил в калькулятор "Среднее отклонение". Спасибо Оливер Перри - это целиком его "фенька" и сделано модулем, я бы вкарячил бы расчет в ячейках. Так же спасибо PGL за побуждение и разъяснение чего это есть.

Теска, выслал тебе на электронку еще один твой вариант но с добавлением ДАВЛЕНИЯ. Оно очень нужно. Сможешь заново все отладить и сделать так, что бы на графике сверху скорость прописывалась, а под ним давление?
У меня пару лет тому назад было именно так сделано в PowerPoint. Высылаю тебе и свой вариант. Делал так, между делом, для себя.

Могу сделать версию для тебя, но не обещаю что быстро

Огромное спасибо. Дело в том, что при настройке плато важны 2 вещи, скорость и давление, для того, что бы, к примеру, хотя бы правильно разметить манометр. Было бы здорово, чтоб график содержал инфу по скорости и давлению где нибудь рядышком друг с другом. К примеру, сверху (над точкой) и снизу ( под точкой) графика. Мне кажется, в этом случае программа была бы полностью законченной! По простому эту задачу в Экселе не решить, иначе бы я и сам сделал. Я знаю, что время на такие вещи выбрать тяжело, но ничего подождем... ! Удачи.

Было бы здорово, чтоб график хотя бы таким образом отображал давление, правда цвет цифр давления надо бы сменить. ( Циферки давления сделаны в пэйнте 😊 )

Еще, сразу наглядно видно, как изменяется расход на выстрел в разных диапазонах давлений, а это сверх важно!!!
Обрати внимание 220 - 200 всего 5 выстрелов 4 Атм. на выстрел, а 200 - 175 уже 8 !!!!!! т.е. 3.125 Атм. Затем снова уменьшается ( но не значительно) 175 - 150 = 7 выстрелов ( 3.57 Атм. на выстрел)!

Давление на графике обязательно должно быть, без него ни какого анализа!

Забираем обновленную версию с выводом давления на графике, так же в верхней шапке теперь не нужно вводить начальное и конечно давление - оно будет браться из полей напротив скорости выстрела. Разместить давление под графиком скорости не получилось, может быть кто то менее криворукий сможет 😊

Все. Классная прога, даже добавить не чего!!!!!! Огромное тебе спасибо.
Хороший труд. Здорово, что появился еще один человек, кто не пи... и критикует (поучает и т.д.), а хоть что-то реально делает для нашего общего блага.
Еще раз, СПАСИБО!

to Himoza.
Спасибо за полезную програмку. Я себе на ней сделал еще одну кнопочку "СТЕРЕТЬ". Очень удобно для ввода новых данных (ИМХО).

WOLF [VT] - вот, прям в краску вогнал, не за что - пользуйтесь.
DocSnip, кстати да, вечером сделаю.
У кого 2007 офис, среднее отклонение считается?

Да причем тут «краска». Людей, кто что либо делает на форуме для других безвозмездно можно по пальцам одной руки пересчитать. А мне, к стати пора галерею обновлять, сегодня еще фоток 5 добавлю, если успею их в порядк привести. В Миссури сезон на оленей открылся, вот мне фоток и накидали 😊 .

Добавил кнопку "Очистить" (идея DocSnip) - оказалось кнопка страшная пришлось добавить окошко с вопросом "Типа точно чистим?". Устранил "развал" осей в графике в случае нажатия кнопки "Перестроить" при не введенных данных.

Ща оценим. 😊

Класно, кнопка нужная. Оценил.

ап,супер.. понравилась,опять ижика стал мучить..

ПММ
ап,супер.. понравилась, опять ижика стал мучить..

Спасибо, отличная прога!

Спасибо за прогу!!!

Всегда пожалуйста, пользуйтесь 😊

в опен оффис 3.1.1 вот такая картина..

а так в любом оффисе пашет... что самое прикольное, на кпк идёт ) тока данные вводить замумукаешься стилусом.
спасибо Химоза !!! респект как грицо и уважуха.

Спасибо за работу.
Очень понравилось.

Ещё одно спасибо Владимир-Himoza. Программка оччень понравилась, хорошая. Буду пользоваться.

У меня не работает 😞 Пишет "калькулятор xls не является приложением win 32".

Всё, опен офис открыл 😊
Автору спасибо!!!

А можно увеличить количество вводимых значений? мне нехватает 😞

kipish
А можно увеличить количество вводимых значений? мне нехватает

А что означает средний расход с учетом неидеальности и как он считается?

Himoza
Если не работают кнопки под графиком нужно сделать следующее: в екселе зайти "Сервис > Макрос > Безопасность" и там поставить уровень "Средний".

Himoza, отличный калькулятор. Пользуюсь им при настройке всех своих новых винтовок. Огромное спасибо.
Есть один вопрос. Когда я подключаю хрон S07 и скачиваю с него скорости отстрела, то в таблицу попадают только 39 выстрелов, остальные идут вниз, мимо таблицы. Приходится хрон сливать в ворд, и потом частями копировать в калькулятор. Что я неправильно делаю?
Спасибо.

2 korova, а я и не знал что туда еще что то выгружается 😊 у меня то S04 хрон и я все ручками-ручками. Посмотрю что можно сделать.
2 Orlon есть она там, но запрятана среди дурацких панелек, спроси у пользователей оного, у меня его сейчас нет.
2 Gefest 007 это как бы сказать, вообщем при определенном давлении делается заметным не только как молекулы воздуха начинают отскакивать от стенок резика создавая тем самым давление, но еще и сами от себя. В формулу расчета добавляются данные полученные в лаборатории, по идее показания должны быть точнее.

Gefest 007
А что означает средний расход с учетом неидеальности и как он считается?

было здесь http://www.airgunlib.ru/f5/read.php?3,7916
но 😞 к сожелению Володя перед уходом всё потер нахрен.
Формула и пр. есть в файле, при желании можно легко понять алгоритм расчета.

Himoza
2 Orlon есть она там, но запрятана среди дурацких панелек, спроси у пользователей оного, у меня его сейчас нет.

Уважаемый Orlon, может тебе эти ссылки помогут:
http://office.microsoft.com/ru-ru/excel-help/HA010031071.aspx
http://www.nirmaltv.com/2008/05/13/how-to-access-macros-settings-in-office-2007/ru
http://www.nestor.minsk.by/kg/2008/12/kg81222.html

p.s. сам пользуюсь 2003-им офисом 😊

Кнопка" Office"-снизу"Параметры Excel"-"центр упр. безопасностью"-"параметры центра упр. безоп."-"параметры макросов"-.
Оно ?

Himoza
2 Gefest 007 это как бы сказать, вообщем при определенном давлении делается заметным не только как молекулы воздуха начинают отскакивать от стенок резика создавая тем самым давление, но еще и сами от себя. В формулу расчета добавляются данные полученные в лаборатории, по идее показания должны быть точнее.

Если я правильно разобрался, то средний расход получается при умножении разницы давлений на объем резервуара и делении полученного на количество выстрелов и среднюю энергию. А средний с учетом неидеальности считается как-то по другому( как именно не важно).
Так или я ошибаюсь?

Точнее начальное и конечное давление считаются по хитровыпендрежным формулам + общий результат умножается на 0.834.

Тагир, PIA, спасибо за ссылки и подсказки!
Что я сделал, я точно не понял, но оно заработало!!!

mironov
Так и считается, только потом умножается на число полученное из примерно 14 других чисел посчитанных по опреленным формулам (полученным эмпирически).
Точнее начальное и конечное давление считаются по хитровыпендрежным формулам + общий результат умножается на 0.834.

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

Хотелось бы увидеть. И попытаться оценить достоверность вычисления расхода воздуха.

mironov
Формулу показать?

а у меня больше 39 выстрелов график не строится, вроде выставляю по оси Х значения 50, нажимаю ОК, все, появляется на графике 50 выстрелов, а как только нажимаю перестроить, то автоматом все возвращается на значение 39, то есть как в скаченном калькуляторе есть 39 цветных столбцов, так и просчитывает

Хотелось бы увидеть. И попытаться оценить достоверность вычисления расхода воздуха.

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

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

mironov
содраны из файла air_spent.xls

KAZ
а у меня больше 39 выстрелов график не строится, вроде выставляю по оси Х значения 50, нажимаю ОК, все, появляется на графике 50 выстрелов, а как только нажимаю перестроить, то автоматом все возвращается на значение 39, то есть как в скаченном калькуляторе есть 39 цветных столбцов, так и просчитывает

Забираем обновленную версию, из пофиксенного/добавленного:
при ручном вводе скоростей курсор сам будет становится в начале следующего столбца как только будет введено значение 39 и 78 выстрелов.
Добавилась еще одна кнопка "Вставить из буфера" соответственно берет из буфера цифирки и вставляет их в столбцы, при этом из массива берутся первые 39 шотов, после чего каретка переходит в следующий столбец и т.д. 2 korova ты вроде это просил? Единственное замечание, цифирки должны быть в таком формате:

245
246
246
...
246

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

P.S. До этого калькулятора VB запускал лет 7 назад, но тогда писал с использованием API и немного другие вещи, щас все забыл 😊

«<Важно смотреть за изменением расхода при настройке и считать всегда по одной формуле. »>

Ясно. Спасибо!

Himoza
Это в каком офисе?

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

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

Пожалуйста!

Grafinya2000
Пожалуйста!

Grafinya2000
Я вполне реальный человек!

Himoza
я как бы в шоке о_О

Ато 😊

Himoza, спасибо, все отлично работает. Теперь просто открываю калькулятор, нажимаю "Очистить данные", подключаю через USB хрон S07, выбираю на хроне функцию "USB", и все 80 выстрелов (память хрона S07) влетают в калькулятор за 50 секунд! Номера выстрелов и энергия выставляются автоматом. Супер! Калькулятор сам округляет скорость 280,7 до 281, или 280,2 до 280. Хрон эти скорости показывал как: 280, 280, т.е. просто не показывал десятые доли. СУПЕР! Отличный калькулятор!

Himoza
Опачки, спасибо.

Grafinya2000
Хочу попросить вас, дать подробную инструкцию- (как для блондинки).Как скачать, как распаковать, как работать и тд. Всё ПОДРОБНО! Хочу похвастать красивыми картинками с вашей проги, да запустить не получается-)))

Grafinya2000
А пароли взламывать не хорошо. Да и чё там интересного. Болтовня женская-))

Спасибо за прогу,немного переделал чтобы диаграмма была пошире на 80 выстрелов,а то в этом окне цифры сливаются.