SOFTWARE DE INGENIERIA

Diagrama de Flujo

Código Fuente

clc; % Clear Screen deja en blanco el Command Window

Vbe=0.7; %Constante de Voltaje de base emisor

Ib=0; % Variable de Corriente de Voltaje inicializada en 0

Vre=10; % Voltaje Resistencia de Emisor que debe ser menor o igual a la décima parte del voltaje de la fuente

while true

m=input ('\n\Elija la polarización deseada\n\1.Polarización Fija\n\2.Polarización Estabilizada en Emisor\n\3.Polarización Divisor de Voltaje \n\4.Salir\n')

switch m

case 1

disp('Polarización Fija') % opcion 1 polarizacion fija

disp('Ingrese el Voltaje de la fuente Dc en Voltios')

Vcc=input('') % Variable donde se almacena el valor del voltaje de la fuente DC

disp('Ingrese la corriente de Base en (µA)MicroAmperios')

Ib=input('') % variable donde se almacena la corriente de Base

disp('Ingrese el valor de la ganancia ß')

Hfe=input('') % variable donde se almacena la ganacia o Beta

Ic=Ib/Hfe %Corriente de Base

Vce=Vcc/2 % Voltaje colector emisor

Rc= (Vcc-Vce)/(Hfe*Ib) % Resistencia de colector

Icsat=Vcc/Rc%Corriente de Saturacion de colector

Rb=(Vcc-Vbe)/(Ib)% Resistencia de Base

Icsa=Icsat/1000

fprintf('\nEl valor de Resistencia de Base (Rb) en kiloOhmios es: %g,',Rb*10^3)

fprintf('\nEl valor de Resistencia de Colector (Rc) en KiloOhmios es: %g,',Rc*10^3)

fprintf('\nEl valor de la Corriente de Saturacion de Colector es: %g,',Icsat)

fprintf('\nEl valor de la Corriente de Colector es: %g,',Ic)

% PARA EFECTOS DE LA GRAFICA TUVE QUE TRABAJAR TODO EN DECIMALES VARIANDO LAS UNIDADES PARA QUE SE MOSTRARA EL CORTE DE ICQ FRENTE A LA RECTA DE CARGA ICSAT vs VCEMAX

x1=0;

y1=Icsat/100000;%se varia la unidad de medida para que en la grafica se vea el corte bien

x2=Vcc;

y2=0;

w=Ic/10;

m=(y2-y1)/(x2-x1);

n=m*1000;%vario la unidad de medida para que en la grafica se vea el corte bien

z=x2/1000;%vario la unidad de medida para que en la grafica se vea el corte bien

x=linspace(z,0,10000);

y=(n*(x-x1)+y1);% con esta ecuacion mostramos la linea recta de carga en diagonal

plot(x,y);

hold on

x=linspace(0,y1,10000);

y=(w)% con esta ecuación mostramos la linea recta de corriente Ic

plot(x,y);

title('Polarización Fija');

xlabel('Vce');

ylabel('Ic')

case 2

disp('Polarización Estabilizada en Emisor') % opcion 2 Polarización Estabilizada en Emisor

disp('Ingrese el Voltaje de la fuente Dc en Voltios')

Vcc=input('') % Variable donde se almacena el valor del voltaje de la fuente DC

disp('Ingrese la corriente de Colector en (mA) MiliAmperios')

Icq=input('') % variable donde se almacena la corriente de colector

disp('Ingrese el valor de la ganancia ß')

Hfe=input('') % variable donde se almacena la ganacia o Beta

Ic=Icq/Hfe %Corriente de Base

Vce=Vcc/2; % Voltaje colector emisor

Re=((Vcc-Vce)/(2))/((Vre+(Hfe+1)/Hfe));

Rc=Vre*Re;

Rb=(Hfe*(Vcc-Vbe))/Icq-(Hfe+1)*Re;

Icsat=Vcc/Rc%Corriente de Saturacion de colector

fprintf('\nEl valor de Resistencia de Emisor (Re) en kiloOhmios es: %g,',Re)

fprintf('\nEl valor de Resistencia de Colector (Rc) en KiloOhmios es: %g,',Rc)

fprintf('\nEl valor de Resistencia de Base(Rb) en KiloOhmios es: %g,',Rb)

x1=0;

y1=Icsat/100000;%vario la unidad de medida para que en la grafica se vea el corte bien

x2=Vcc;

y2=0;

w=Ic/10;

m=(y2-y1)/(x2-x1);

n=m*1000;%vario la unidad de medida para que en la grafica se vea el corte bien

z=x2/1000;%vario la unidad de medida para que en la grafica se vea el corte bien

x=linspace(Vce,0,10000);

y=(n*(x-x1)+y1);% con esta ecuacion mostramos la linea recta de carga en diagonal

plot(x,y);

hold on

x=linspace(0,y1,10000);

y=(Ic/100)% con esta ecuación mostramos

...