%programa de evaluación de datos del motor a ralentí
pme=10;
EGR=0;
Carga=0;
convergencia1=100;
if DD<10
IIE=-15;
if isempty(Edad)
dosado_min=0.05;
elseif Edad<3
dosado_min=0.055;
elseif Edad<6
dosado_min=0.06;
elseif Edad<=10
dosado_min=0.065;
end
elseif DD<15
IIE=-10;
if isempty(Edad)
dosado_min=0.04;
elseif Edad<3
dosado_min=0.045;
elseif Edad<6
dosado_min=0.05;
elseif Edad<=10
dosado_min=0.055;
end
elseif DD<40
IIE=-5;
if isempty(Edad)
dosado_min=0.035;
elseif Edad<3
dosado_min=0.04;
elseif Edad<6
dosado_min=0.045;
elseif Edad<=10
dosado_min=0.05;
end
end
pantalla0;
pause(2);
while abs(pme)>0.015
if pme<0
if convergencia1<70
dosado_min=dosado_min+0.003;
elseif convergencia1<80
dosado_min=dosado_min+0.002;
else
dosado_min=dosado_min+0.001;
end
programa;
pme=presion_efectiva;
else
if convergencia1<70
dosado_min=dosado_min-0.003;
elseif convergencia1<80
dosado_min=dosado_min-0.002;
else
dosado_min=dosado_min-0.001;
end
programa;
pme=presion_efectiva;
end
convergencia1=100*(0.2-abs(pme))/(0.2-0.002);
if convergencia1<0
convergencia1=0;
elseif convergencia1>100
convergencia1=100;
end
set(convergencia,'string',round(convergencia1));
set(dosado,'string',dosado_min);
end
if pme<0
dosado_min=dosado_min+0.001;
programa;
pme=presion_efectiva;
end
convergencia1=100;
set(convergencia,'string',round(convergencia1));
set(dosado,'string',dosado_min);
pause(3);
close;
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
