Опыт применения пакета MathCad
|
Ident :=("Агрегат №12" "26.09.2006" "18:54") | идентификация замера | |
Ua :=READPRN("D:\ Ua.txt") V | Ia :=READPRN("D:\ Ia.txt") A | чтение тока [I]=A напряжения [U]=В |
Ub :=READPRN("D:\ Ub.txt") V | Ib :=READPRN("D:\ Ib.txt") A | |
Uc :=READPRN("D:\ Uc.txt") V | Ic :=READPRN("D:\ Ic.txt") A | |
SampleRate := 10000Hz | частота дискретизации АЦП | |
NumStr := length(Ia) | NumStr := 3.2 x 106 | число точек в записи сигнала тока Ia |
t_записи := NumStr / SampleRate | длительность записи, сек | |
t_записи := 322.932 s |
В начале попробуем прослушать записанные сигналы, для чего переведем Ua и Ia в звуковой формат.
Определим число уровней квантования, которое, в свою очередь, и определяет максимальное выходное напряжение цифроаналогового преобразователя звуковой карты.
Resolution :=16
Сформируем первый канал из напряжения Ua. Для исключения потери динамического диапазона разделим каждую точку сигнала на размах варьирования выборки, который определяется как разность максимального и минимального значений. Затем отнормированный таким образом сигнал умножаем на число уровней квантования.
Добавим второй канал Ia, также выполнив нормировку на размах варьирования.
Запишем полученный "стерео" сигнал. Для функкции записи частота дискретизации должна быть безразмерной величиной, поэтому SampleRate делим на Hz.
Полученный звуковой файл можно прослушать непосредственно из MathCad, вставив командами Insert/Object/"Звуковой файл". Появится иконка выбранной программы воспроизведения звука, нажав на который услышим звук включаемого вентилятора: в левом канале напряжение, в правом канале - ток.
Вообще-то ничего интересного, на первый взгляд, мы не услышим: обычный фон переменного тока 50 Гц, который через пять секунд становится едва слышимым в канале тока. Если внимательно вслушаться в первые пять секунд - можно заметить слабый, растущий вверх по частоте свист. Потом слышен обычный фон переменного тока 50 Гц, похожий на звук работающего вблизи мощного электродвигателя с какими-то мелкими призвуками и незначительными регулярными колебаниями уровня с периодом порядка 1 с. Если поднять уровень звука до возникновения легкого перегруза усилителя-колебания уровня становятся очень заметными. Это, вообще говоря, должно свидетельствовать о наличии биений между частотой 50 Гц и частотой вращения, и/или модуляции (скорее всего, амплитудной) тока 50 Гц. На спектрограмме с прямоугольным взвешивающим окном ничего этого не видно. С другими взвешивающими окнами (Hamming, Hanning, Blackman) хорошо видны две линии ниже сетевой частоты 50.049 Гц на 1.469 и 2.918 Гц, что позволяет использовать их в качестве диагностических параметров. Впрочем, это тема другого разговора.
Теперь перейдем к численному анализу. Определим мгновенную мощность двигателя как сумму мощностей в каждой фазе
и построим график мощности двигателя
Здесь по оси X указаны номера точек, что не очень удобно для оценки характерных интервалов времени процесса. Поэтому введем вспомогательную переменную T и перейдем к представлению графиков в реальном времени.
Примечание: опытным путем было установлено, что максимальное число точек графика параметрически задаваемых функций вида x=X(t), y=Y(t), должно быть меньше 500 000.
T0 :=0S | определим начало временного окна графика |
ΔT := 49.99 s | задаем ширину временного окна |
(T0+ ΔT) SampleRate = 4.999 x 105 | число точек, соответствующее выбранной ширине окна |
i := SampleRate T0.. SampleRate (T0 + ΔT) | определяем диапазон выводимых точек |
Ti := i / SampleRate | вспомогательная переменная для перехода к реальному времени по номеру точки сигнала В функции времени график мощности двигателя выглядит так: |
С помощью встроенной фукции "X-Y TRACE" и "мышки" определим по графику время выхода двигателя на рабочую мощность и величину пусковой мощности.
Примечание: черными пунктирными линиями выводятся маркеры "X-Y Trace", координаты которых командами Copy/Paste передаются переменным.
t_кон_пуск := 5.225 s | момент окончания процесса пуска |
Nгр_пуск = 1.929 х 10 Nгр_пуск = 19.3 kW4W | пусковая мощность по графику |
T_раб := 15 s | произвольно зададим по графику и запомним для дальнейшего использования время начала расчета рабочей мощности для установившегося режима |
Для более точного определения пусковых параметров построим график первой секунды пуска, выведем маркер средней пусковой мощности
На этом графике видно, что кривая мощности начинается на 9.6 mc от начала регистрации процесса. Для наглядности еще больше "растянем" график.
Введем обозначения и значения, полученные с помощью функции "X-Y TRACE":
t_нач_пуск := 0.0096 s | момент начала пуска |
t_пуск := t_кон_пуск - t_нач_пуск | длительность пуска |
Δt_пуск := 1 s | зададим произвольно интервал усреднения пусковых парметров |
Пусковая мощность определяется как среднее значение на заданном интервале пуска, а действующее значение тока и напряжения определяются как средние по фазам среднеквадратичные значения по следующим формулам:
j0 := t_нач_пуск SampleRate | начальная точка расчета пусковых параметров |
J :=( t_нач_пуск + Δt_пуск) SampleRate | конечная точка расчета пусковых параметров |
![]() | пусковая мощность |
![]() | среднее действующее значение пускового напряжения |
![]() | среднее действующее значение пускового тока |
Получаем следующие значения пусковых параметров
Nпуск = 19.2 kW Uпуск = 189.2 V Iпуск = 52.4 A t_пуск = 5.2 s
Погрешность графического определения пусковой мощности относительно расчетной составила
(Nпуск - Nгр_пуск)/ Nпуск = -0.38%
Проделаем аналогичные вычисления для рабочих параметров.
Построим график мощности на интервале Tраб, Траб+Δt_раб
Т_раб = 15 s | ранее заданный по графику мощности момент начала расчета рабочих параметров |
Δt_раб := 1s | задаем интервал усреднения рабочих параметров |
Определим по графику "мышкой" с помощью функций "X-Y TRACE" и "Zoom" рабочую мощность
Nгр_раб := 2.433 x 103W Nгр_раб = 2.4 kW | рабочая мощность по графику |
j0 := Т_раб·SampleRate | начальная точка расчета рабочих параметров |
J := (Т_раб + Δt_раб) ·SampleRate | конечная точка расчета рабочих параметров |
![]() | рабочая мощность (средняя) |
![]() | среднее действующее значение рабочего напряжения |
![]() | среднее действующее значение рабочего тока |
Nраб = 2.46 kW Iраб = 4.8 А Uраб = 212.5 V | |
Nполн := 3Uраб ·Iраб Nполн = 3.0 kW | полная мощность двигателя |
cos φ := Nраб / Nполн cos φ=0.81 | коэффициент мощности |
Погрешность графического определения рабочей мощности относительно расчетной составила
(Nраб - Nгр_раб) / Nраб = 1.23%
Для корректного проведения частотного анализа напряжения, тока и мощности необходимо получить передаточную амплитудно-частотную характеристику соответствующих датчиков, однако на момент проведения работ этого выполнено не было. Эту проблему еще предстоит решить, но просто беглое сравнение момента включения двигателя показывает, что сигнал тока практически не реагирует на скачок пускового напряжения, что и показано на следующих графиках.
i := 0...1000 | переопределим границы графика |
Теперь рассчитаем спектр сигнала напряжения Ua с использованием встроенной фукции быстрого преобразования Фурье.
NumFFT := 219 | задаем число точек, кратное целой степени числа 2 (максимально 219). |
NumFFT / SampleRate = 52.429s | оцениваем длительность выборки |
k := 0...NumFFT - 1 Signalk := Uak+length(Ua)-(NumFFT+100000) | Формируем для анализа напряжения Ua вектор Signal. Для исключения влияния переходных процессов выборку начинаем от точки, отстоящей на NumFFT плюс 10 сек*SampleRate точек от конца записи. |
Spectr := fft(Signal) | теперь выполняем преобразование Фурье |
MaxLine :=last(Spectr) MaxLine = 2.62144 x 105 | определяем число линий в спектре |
j := 0... MaxLine freqj := j·(SampleRate / NumFFT) | проводим пересчет номера линии в частоту [Гц] |
Полный спектр напряжения фазы "А"
Спектр напряжения фазы "А" в окрестности 50 Гц
fсети := 50.049 Hz | с помощью функции X-Y TRACE определяем частоту сети |
Осталось оформить итоговый протокол испытаний, отпечатать и передать Заказчику.
ОБЪЕКТ: АГРЕГАТ: ДАТА: ВРЕМЯ: Частота сети: fсети := 50.049 Hz Время запуска: t_пуск = 5.2 s Пусковая мощность: Nпуск = 19.2 kW Средний пусковой ток: Iпуск = 52.4A Среднее пусковое напряжение: Uпуск = 189.2 V Рабочая мощность: Nраб = 2.5 kW Средний рабочий ток: Iраб = 4.8A Среднее рабочее напряжение: Uраб = 212.5 V Полная рабочая мощность: Nполн = 3.0 kW Коэффициент мощности: cos φ=0.81
![]() |
Cайт поддерживается ООО «ИНКОТЕС» |