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,!