Главная Учебники - Разные Лекции (разные) - часть 55
|
INPUT "Введите число пульсаций выпрямленного
напряжения за период сети "; m INPUT "Введите номинальное выпрямленное напряжение
Udн, В"; Udn INPUT "Введите действующее значение напряжения сети
Uc, B"; Us INPUT "Введите номинальную мощность выпрямителя Pdн,
Вт"; Pdn INPUT "Введите индуктивность нагрузки Ld, Гн";
Ld INPUT "Введите число вентилей, имеющих общую точку в
выпрямителе"; m0 INPUT "Введите величину, обратную коэфф. мощности
трансформ. для данного выпрямителя"; Kp pi = 3.141592654# St = Kp * Pdn PRINT
"------------------------------------------------------------------------" PRINT "Габаритная мощнсть трансформатора Sт =
"; St; "ВA" U2min = Udn * pi / (m * SIN(pi / m)) PRINT "------------------------------------------------------------------------" PRINT "Минимальное амплитудное напряжение на " PRINT "вторичной обмотке трансформатора U2min =
"; U2min; "B" U2na = U2min / .8 U2nb = U2min / .85 PRINT "------------------------------------------------------------------------" PRINT "Номинальное амплитудное напряжение на" PRINT "вторичной обмотке трансформатора U2ном =
"; U2nb; "B -"; U2na; "B" PRINT
"------------------------------------------------------------------------" INPUT "Введите принятое U2ном, В"; U2n Kt = Us * SQR(2) / U2n Idn = Pdn / Udn PRINT
"------------------------------------------------------------------------" PRINT "Номинальный выпрямленный ток Idн = ";
Idn; "A" PRINT
"------------------------------------------------------------------------" PRINT "Коэффициент трансформации трансформатора Kт =
"; Kt Ivsr = Idn / m0 PRINT
"------------------------------------------------------------------------" PRINT "Средний ток через вентиль в схеме выпрямления
Iвср* = "; Ivsr; "A" PRINT
"------------------------------------------------------------------------" INPUT "Введите справочное значение порогового
напряжения вентиля U0, B"; U0 INPUT "Введите справочное значение среднего тока
через вентиль Iвср, A"; Ivsrs INPUT "Введите справочное знечение дифф.
сопротивления вентиля rd, Ом"; rdif IF rdif = 0 THEN rdif = (.35 * U0) / Ivsrs kf = pi / 2 Pkl = U0 * Ivsrs + (kf ^ 2) * (Ivsrs ^ 2) * rdif Pr = U0 * Ivsr + (kf ^ 2) * (Ivsr ^ 2) * rdif PRINT "------------------------------------------------------------------------" PRINT "Дифференциальное сопротивление вентиля rдиф
="; rdif; "Ом" PRINT
"------------------------------------------------------------------------" PRINT "Классификационная мощность вентиля Pкл
="; Pkl; "Вт" PRINT "------------------------------------------------------------------------" PRINT "Реальная мощность вентиля Pр="; Pr;
"Вт" PRINT IF Pr > Pkl THEN PRINT "ВЕНТИЛИ ВЫБРАНЫ
НЕВЕРНО!!!" ELSE PRINT "ВЕНТИЛИ ВЫБРАНЫ ВЕРНО!!!" Rd = Pdn / (Idn ^ 2) PRINT "------------------------------------------------------------------------" PRINT "Активное сопротивление цепи нагрузки Rd
="; Rd; "Ом" E0a = .3 * U2n E0b = .4 * U2n PRINT
"------------------------------------------------------------------------" PRINT "Напряжение источника в схеме замещения E0 =
"; E0a; "B - "; E0b; "B" PRINT
"------------------------------------------------------------------------" INPUT "Введите принятое E0, B"; E0 INPUT "Введите ток включения тиристора Iтир,
A"; Itir ti = (Ld / Rd) * LOG(1 / (1 - (Itir * Rd / E0))) PRINT
"------------------------------------------------------------------------" PRINT "Необходимая длительность импульса для
влючения тиристора tи = "; ti; "c" PRINT
"------------------------------------------------------------------------" INPUT "Введите принятое сопротивление для ФДИ R1,
Ом"; Rfdi1 Cfdi1 = 2 * ti / Rfdi1 PRINT
"------------------------------------------------------------------------" PRINT "Емкость для ФДИ C1 = "; Cfdi1;
"Ф" PRINT "------------------------------------------------------------------------" INPUT "Введите необходимую частоту для генератора ВЧ
заполнения fг, Гц"; fgr INPUT "Введите сопротивления R1 и R2 генератора ВЧ
заполнения, Ом"; Rg1, Rg2 Cg1 = 1.443 / ((2 * Rg2 + Rg1) * fgr) PRINT "------------------------------------------------------------------------" PRINT "Емкость для генератора ВЧ заполнения C1 =
"; Cg1; "Ф" PRINT
"------------------------------------------------------------------------" END | |||||