
C FOCAL15 V6A
01.10 A "TRANSISTOR AMPLIFIER DESIGN"!!!,"GERMANIUM?    ",G,!
01.20 IF (G-0YES) 1.3,1.5,1.3
01.30 A "SILICON?   ",S,!
01.40 IF (S-0YES) 1.1,1.45,1.1
01.45 S VBX=0.7;S VBN=0.5; GOTO 1.6
01.50 S VBX=0.2;S VBN=(-0.1)
01.60 A "Ec=  ",EC,!,"Rc= ",RC,!,"Ico max= ",ICM,!,"aMAX= ",AMX,!
01.70 A "aMIN= ",AMN,!,"Ie MAX= ",IEX,!,"Ie MIN= ",IEN,!,"Re= ",RE,!
01.80 T "Vb MAX= "VBX,"   Vb MIN= ",VBN,!!
01.90 S RB=[(IEX-IEN)*RE+VBN-VBX]/[ICM-<1-AMX>*IEX+<1-AMN>*IEN]
01.99 T "RB= ",RB; T %
02.10 S IE=(IEX-IEN)/2; S A=(AMX-AMN)/2
02.20 S ICO=ICM/10; S VB=(VBX-VBN)/2
02.30 S EB=IE*[(1-A)*RB+RE]+VB-RB*ICO
02.35 T "Eb=  ",EB,!
02.40 S R1=(RB*EC)/EB; S R2=(R1*EB)/(EC-EB)
02.45 T "R1= ",R1,"     R2= ",R2,!

