ElectronicSolver    www.pspicelib.narod.ru
Усилитель с комбинированной ООС (параллельно-последовательной)
Схемотехника 2007 №8, стр. 19.

>	restart: with(inttrans):Digits:=10:

>	read  (`D:/PSPICE105/Maple_LIB/ElectronicSolver.m`); with(SolveNet):

Рис. 1. Схема усилителя

>	ESolve(nEQ,`BJT Filter-2/BJT-PSpiceFiles/SCHEMATIC1/SCHEMATIC1.net`);

Название схемы: BJT

Задано: {VINP}

Решения: {V0, VOUT, V1, V2, V3}

>	H:=simplify(VOUT/Vin);

>	Спецификация(DC,AC,RLC):

"Спецификация проекта: BJT"

Rce := .26e5, "26K"

R2 := 510, "510"

R1 := .82e5, "82k"

C2 := .1e-5, "1u"

R3 := .22e4, "2.2k"

R4 := .82e4, "8.2k"

Cbc := .35e-11, "3.5p"

C1 := .1e-5, "1u"

Cbe := .127e-9, "127p"

Rbc := .1e7, "1MEG"

Rbe := 533, "533"

`  DC-AC источник  `

"DC", Vin := .1e-2

"AC", Vin := .1e-2

"B/Rbe*(V1-V3):=G1"

>	B:=55: H:=simplify(H); s:=I*2*Pi*f: print(`Резонанс`): Fo:=solve(diff(evalc(abs(H)),f)=0,f)[1]; F_3dB:=solve(evalc(abs(H))=limit(evalc(abs(H)),f=Fo)/sqrt(2),f): print(`Полоса 3 dB`): BW:=abs(evalc(simplify(F_3dB[1]-F_3dB[2]))); F_3dB_Low:=F_3dB[1]; F_3dB_Hig:=F_3dB[2];

>	АЧХ_Logf(H,1,1e9,"Рис. 2. АЧХ усилителя");