Реферат: Разработка тиристорного преобразователя

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 "------------------------------------------------------------------------"