hola Omar.
Ha sido mejorado en parte tu programa, no puedo seguir mejorando, porque tengo muy poco informaicon de parte de ti.
bueno te pego aqui en el foro.
%===============================
function varargout = resistenciacaballero(varargin)
gui_Singleton = 1;clc
gui_State = struct('gui_Name', mfilename, ...
'gui_Singleton', gui_Singleton, ...
'gui_OpeningFcn', @resistenciacaballero_OpeningFcn, ...
'gui_OutputFcn', @resistenciacaballero_OutputFcn, ...
'gui_LayoutFcn', [] , ...
'gui_Callback', []);
if nargin && ischar(varargin{1})
gui_State.gui_Callback = str2func(varargin{1});
end
if nargout
[varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});
else
gui_mainfcn(gui_State, varargin{:});
end
function resistenciacaballero_OpeningFcn(hObject, eventdata, handles, varargin)
handles.output = hObject;
guidata(hObject, handles);
function varargout = resistenciacaballero_OutputFcn(hObject, eventdata, handles)
varargout{1} = handles.output;
function calcular_Callback(hObject, eventdata, handles)
l1=str2double(get(handles.long1,'string'));
l2=str2double(get(handles.long2,'string'));
a1=str2double(get(handles.area1,'string'));
a2=str2double(get(handles.area2,'string'));
h=str2double(get(handles.a,'string'));
i=str2double(get(handles.b,'string'));
j=str2double(get(handles.c,'string'));
k=str2double(get(handles.d,'string'));
l=str2double(get(handles.e,'string'));
m=str2double(get(handles.f,'string'));
n=str2double(get(handles.g,'string'));
if l1>0 && a1>0 && h>0 && i==0 && j==0 && k==0 && l==0 && m==0 && n==0
Area=(((a1/2.54)*1000)^2)*.0005067;
res=0.0172;
long=l1;
f=(long/Area)*res;
val=num2str(f)
set(handles.resultado,'string',val);
end
if l1>0 && a1>0 && i>0 && h==0 && j==0 && k==0 && l==0 && m==0 && n==0
Area=((((a1/2.54)*1000)^2)*.0005067);
res=0.0177;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if l1>0 && a1>0 && j>0 && i==0 && h==0 && k==0 && l==0 && m==0 && n==0
Area=((((a1/2.54)*1000)^2)*.0005067);
res=0.0283;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if (l1>0 && a1>0 && k>0 && i==0 && j==0 && h==0 && l==0 && m==0 && n==0)
Area=((((a1/2.54)*1000)^2)*.0005067);
res=0.10;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a1>0) && (l>0) && (i==0) && (j==0) && (k==0) && (h==0) && (m==0) && (n==0))
Area=((((a1/2.54)*1000)^2)*.0005067);
res=0.0159;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a1>0) && (m>0) && (i==0) && (j==0) && (k==0) && (l==0) && (h==0) && (n==0))
Area=((((a1/2.54)*1000)^2)*.0005067);
res=0.043;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a1>0) && (n>0)&& (i==0) && (j==0) && (k==0) && (l==0) && (m==0) && (h==0))
Area=((((a1/2.54)*1000)^2)*.0005067);
res=0.15;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a2>0) && (h>0) && (i==0) && (j==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2)*.0005067);
res=0.0172;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a2>0) && (i>0) && (h==0) && (j==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2)*.0005067);
res=0.0177;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a2>0) && (j>0) && (i==0) && (h==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2)*.0005067);
res=0.0283;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a2>0) && (k>0) && (i==0) && (j==0) && (h==0) && (l==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2)*.0005067);
res=0.10;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a2>0) && (l>0) && (i==0) && (j==0) && (k==0) && (h==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2)*.0005067);
res=0.0159;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a2>0) && (m>0) && (i==0) && (j==0) && (k==0) && (l==0) && (h==0) && (n==0))
Area=((((a2)*1000)^2)*.0005067);
res=0.043;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l1>0) && (a2>0) && (n>0) && (i==0) && (j==0) && (k==0) && (l==0) && (m==0) && (h==0))
Area=((((a2)*1000)^2)*.0005067);
res=0.15;
long=l1;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a1>0) && (h>0) && (i==0) && (j==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a1/2.54)*1000)^2));
res=10.37;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a1>0) && (i>0)&& (h==0) && (j==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a1/2.54)*1000)^2));
res=10.66;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a1>0) && (j>0) && (i==0) && (h==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a1/2.54)*1000)^2));
res=17;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a1>0) && (k>0) && (i==0) && (h==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a1/2.54)*1000)^2));
res=60;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a1>0) && (l>0)&& (i==0) && (j==0) && (k==0) && (h==0) && (m==0) && (n==0))
Area=((((a1/2.54)*1000)^2));
res=9.6;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a1>0) && (m>0) && (i==0) && (j==0) && (k==0) && (l==0) && (h==0) && (n==0))
Area=((((a1/2.54)*1000)^2));
res=26;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a1>0) && (n>0) && (i==0) && (j==0) && (k==0) && (l==0) && (m==0) && (h==0))
Area=((((a1/2.54)*1000)^2));
res=90.43;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a2>0) && (h>0) && (i==0) && (j==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2));
res=10.37;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a2>0) && (i>0) && (h==0) && (j==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2));
res=10.66;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a2>0) && (j>0) && (i==0) && (h==0) && (k==0) && (l==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2));
res=17;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a2>0) && (k>0) && (i==0) && (j==0) && (h==0) && (l==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2));
res=60;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a2>0) && (l>0) && (i==0) && (j==0) && (k==0) && (h==0) && (m==0) && (n==0))
Area=((((a2)*1000)^2));
res=9.6;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a2>0) && (m>0) && (i==0) && (j==0) && (k==0) && (l==0) && (h==0) && (n==0))
Area=((((a2)*1000)^2));
res=26;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
if ((l2>0) && (a2>0) && (n>0) && (i==0) && (j==0) && (k==0) && (l==0) && (m==0) && (h==0))
Area=((((a2)*1000)^2));
res=90.43;
long=l2;
f=((long/Area)*res);
val=num2str(f);
set(handles.resultado,'string',val);
end
function Longitud_Callback(hObject, eventdata, handles)
function Longitud_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function pushbutton2_Callback(hObject, eventdata, handles)
function long1_Callback(hObject, eventdata, handles)
function long1_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'),...
get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function long2_Callback(hObject, eventdata, handles)
function long2_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'),...
get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function area1_Callback(hObject, eventdata, handles)
function area1_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'),...
get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function area2_Callback(hObject, eventdata, handles)
function area2_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'),...
get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function resultado_Callback(hObject, eventdata, handles)
function resultado_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function a_Callback(hObject, eventdata, handles)
function a_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function b_Callback(hObject, eventdata, handles)
function b_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function c_Callback(hObject, eventdata, handles)
function c_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function d_Callback(hObject, eventdata, handles)
function d_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function e_Callback(hObject, eventdata, handles)
function e_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function f_Callback(hObject, eventdata, handles)
function f_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function g_Callback(hObject, eventdata, handles)
function g_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
%====================================================
POSTADA: EL PROGRAMA NO SE EJECUTANDO BIEN, PORUQE NO ME HAZ DADO LOS DATOS NUMERICOS.
saludos
JOSE JEREMIAS CABALLERO
ASESOR DE PROYECTOS CON MATLAB
PROFESOR DE METODOS NUMERICOS CON MATLAB
PROGRAMADOR MATLAB
[email protected]