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 "Коефіцієнт трансформації трансформатора Кт ="; 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