Preparatorio 7

Preparatorio N°7: Filtro capacitivo
Escuela Politécnica Nacional

Facultad de Ingeniería Eléctrica y Electrónica
Laboratorio de Dispositivos Electrónicos
Quito, Ecuador
Código de la simulación implementada en Works pace t=0:1/(100*f):4/f;

Matlab. Y = VPE*sin(2*pi*f*t); %Voltaje de Entrada
% Laboratorio de Dispositivos electronicos %% Rectificación

% Nombre: Alexis Pulupa Vr1 = abs(Y); %Señal rectificada onda
% Grupo: GR2-3 completa
% Fecha: 30/07/2022 Vr2 = Y.*((sign(Y)+1)/2); %Señal
%% rectificada media onda
clc Vr1 = Vr1-VD
close all Vr2 = Vr2-VD
clear all
%% %% Curva descarga capacitor
%DATOS tao=R*C;
VPE=input('DATOS\nIngrese el voltaje pico t2=0:1/(1000*f):10/f;
de salida en [V]: '); Vc1=(VPE-VD)*(exp(-t2/tao)); % Voltaje en
f=input('Ingrese el valor de la frecuancia la carga
en [Hz]: ');
C=input('Ingrese el valor del capacitor en %% Filtrado
[F]: '); Vc=(VPE-VD)*(exp(-t2/tao)); % Voltaje en la
R=input('Ingrese el valor de la resistencia carga
[ohm]: ');
%% [~,indice]=max(Vr2); %Busqueda de máximo
VD=input('\nTIPO DE DIODO\nPara un diodo (punto de carga capacitor)
ideal ingrese "0"\nPara un diodo de silicio Vf=Vr2; % Voltaje a la salida del filtro
ingrese "1"\nPara un diodo de Germanio for j=0:1:3
ingrese "2"\nValor a ingresar: '); for
if VD == 0 i=indice+j*100:1:length((j+1)*Vr2/4)
VD=0; if Vr2(i)>=Vc(i-indice-
elseif VD == 1 (j*100)+1) % comprobar en que punto el
VD=0.7; voltaje de descarga es mayor a la caide de
else la función senoidal
VD=0.3; Vf(i)=Vr2(i);% Si la
end función senoidal es mayor no se modifica
%% angulo=i; %Para conocer el
Rectificador=input('\nTIPO DE angulo en que empieza a descargarse el
RECTIFICADOR\nPara un rectificador de media capacitor
onda ingrese "0"\nPara un rectificador de else
onda completa implementado con Vf(i)=Vc(i-indice-
transformador con toma central ingrese (j*100)+1);
"1"\nPara un rectificador de onda completa end
implementado con puente de diodos ingrese end
"2"\nValor a ingresar: '); end
angulo=(2*pi*angulo)/length(Vf);
%% RECTIFICADOR DE MEDIA ONDA %Angulo de descarga
if Rectificador == 0 Angulo_Inicio_Descarga = 180 +
FR=1/(2*sqrt(3)*R*C*f); atand(-2*pi*f*R*C);
VPI=VPE
fi1=asind((2*R*C*f-1)/(2*R*C*f+1)); FR
fi2=180+atand(-2*pi*f*R*C); VPI
fi1
%% Generación seniodal fi2
plot(t,Y,t,Vr2,t,Vf) FR
legend('Voltaje de entrada','Voltaje VPI
rectificado','Filtrado') fi1
ylabel='Voltaje [V]'; fi2
xlabel='Tiempo [s]'; plot(t,Y,t,Vr1,t,Vf)
title('Filtro con Rectificador de Media legend('Voltaje de entrada','Voltaje
Onda'); rectificado','Filtrado')
ylabel='Voltaje [V]';
%% RECTIFICADOR CON TAP CENTRAL xlabel='Tiempo [s]';
elseif Rectificador == 1 title('Filtro con Rectificador de onda
FR=1/(4*sqrt(3)*R*C*f); completa con transformador con toma
VPI=2*VPE-VD; central');
fi1=asind((4*R*C*f-1)/(4*R*C*f+1));
fi2=180+atand(-2*pi*f*R*C); %% RECTIFICADOR CON PUENTE DE DIODOS
else
%% Generación seniodal FR=1/(4*sqrt(3)*R*C*f);
t=0:1/(100*f):4/f; VPI=VPE-VD;
Y = VPE*sin(2*pi*f*t); %Voltaje de Entrada fi1=asind((4*R*C*f-1)/(4*R*C*f+1));
%% Rectificación fi2=180+atand(-2*pi*f*R*C);
Vr1 = abs(Y); %Señal rectificada onda %% Generación seniodal
completa t=0:1/(100*f):4/f;
Vr2 = Y.*((sign(Y)+1)/2); %Señal Y = VPE*sin(2*pi*f*t); %Voltaje de Entrada
rectificada media onda
Vr1 = Vr1-VD %% Rectificación
Vr2 = Vr2-VD Vr1 = abs(Y); %Señal rectificada onda
%% Curva descarga capacitor completa
tao=R*C; Vr2 = Y.*((sign(Y)+1)/2); %Señal
t2=0:1/(1000*f):10/f; rectificada media onda
Vc1=(VPE-VD)*(exp(-t2/tao)); % Voltaje en Vr1 = Vr1-VD
la carga Vr2 = Vr2-VD
%% Filtrado %% Curva descarga capacitor

Vc=(VPE-VD)*(exp(-t/tao)); % Voltaje en la tao=R*C;
carga t2=0:1/(1000*f):10/f;
Vc1=(VPE-VD)*(exp(-t2/tao)); % Voltaje en
[~,indice]=max(Vr1); %Busqueda de máximo la carga
(punto de carga capacitor)
Vf=Vr1; % Voltaje a la salida del filtro %% Filtrado
for j=0:1:7 Vc=(VPE-VD)*(exp(-t/tao)); % Voltaje en la
for carga
i=indice+j*50:1:length((j+1)*Vr1/8)
if Vr1(i)>=Vc(i-indice- [~,indice]=max(Vr1); %Busqueda de máximo
(j*50)+1) % comprobar en que punto el (punto de carga capacitor)
voltaje de descarga es mayor a la caide de Vf=Vr1; % Voltaje a la salida del filtro
la función senoidal for j=0:1:7
Vf(i)=Vr1(i);% Si la for
función senoidal es mayor no se modifica i=indice+j*50:1:length((j+1)*Vr1/8)
angulo=i; %Para conocer el if Vr1(i)>=Vc(i-indice-
angulo en que empieza a descargarse el (j*50)+1) % comprobar en que punto el
capacitor voltaje de descarga es mayor a la caide de
else la función senoidal
Vf(i)=Vc(i-indice- Vf(i)=Vr1(i);% Si la
(j*50)+1); función senoidal es mayor no se modifica
end angulo=i; %Para conocer el
end angulo en que empieza a descargarse el
end capacitor
Angulo_Inicio_Descarga = 180 + atand(- else
2*pi*f*R*C); Vf(i)=Vc(i-indice-
(j*50)+1);
end
end
end
Angulo_Inicio_Descarga = 180 + atand(-
2*pi*f*R*C);
FR
VPI
fi1
fi2
plot(t,Y,t,Vr1,t,Vf)
legend('Voltaje de entrada','Voltaje
rectificado','Filtrado')
ylabel='Voltaje [V]';
xlabel='Tiempo [s]';
title('Filtro con Rectificador de onda
completa con Puente de diodos');
end

Preparatorio 7

Cargado por

Copyright:

Formatos disponibles

Preparatorio 7

Cargado por

Información del documento

Título original

Derechos de autor

Formatos disponibles

Compartir este documento

Compartir o incrustar documentos

Opciones para compartir

¿Le pareció útil este documento?

¿Este contenido es inapropiado?

Copyright:

Formatos disponibles

Preparatorio 7

Cargado por

Copyright:

Formatos disponibles

Preparatorio N°7: Filtro capacitivo

Escuela Politécnica Nacional

Código de la simulación implementada en Works pace t=0:1/(100*f):4/f;

% Laboratorio de Dispositivos electronicos %% Rectificación

%% Filtrado %% Curva descarga capacitor

También podría gustarte