Matlab - Creación de interfaz

function varargout = capacitancia_cab(varargin)

gui_Singleton = 1;

gui_State = struct('gui_Name',       mfilename, ...

                   'gui_Singleton',  gui_Singleton, ...

                   'gui_OpeningFcn', @capacitancia_cab_OpeningFcn, ...

                   'gui_OutputFcn',  @capacitancia_cab_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 capacitancia_cab_OpeningFcn(hObject, eventdata, handles, varargin)

handles.output = hObject;

guidata(hObject, handles);

function varargout = capacitancia_cab_OutputFcn(hObject, eventdata, handles)

varargout{1} = handles.output;

function edit1_Callback(hObject, eventdata, handles)

frecuencia=str2double(get(hObject,'String'));

handles.frecuencia=frecuencia;

guidata(hObject, handles);

function pushbutton1_Callback(hObject, eventdata, handles)

frecuencia=handles.frecuencia;

set(handles.text3,'string',frecuencia);

function opcion1(tabla, nombres)

%Esta funcion toma como input 3 variables y no regresa nada

%tabla es el array de los valores de la tabla de los conductores, contiene

%el numero de hilos, el diametro y la resistencia a 75°C

%nombres el un array de los nombres de los conductores de la tabla

%sistema es un string que especifica el sistema de medicion metrico/ingles

clc;

%Esto es para elegir el sistema que se utilizara

%Se usan los corchetes para poder escribir en mas de una linea

sistemaStr = sprintf(['Si el calculo sera en el sistema ingles escriba "ingles", '...

    'cualquier otra palabra y se hara el calculo \nen sistema metrico: ']);

sistema = input(sistemaStr, 's');

opciontierra = input(['Para tomar en cuenta el efecto de tierra escriba "si",'...

    ' cualquier otra palabra y no se tomara: '], 's');

disp(' ');

Pcarga = input('La potencia activa entregada a la carga por fase [kW]: ');

VRL = input('El voltaje de linea en el receptor [kV]: ');

fpR = input('El factor de potencia en atraso en el receptor: ');

f = input('Frecuencia del sistema [Hz]: ');

function varargout = IntOpcion1Limpia(varargin)

% INTOPCION1LIMPIA MATLAB code for IntOpcion1Limpia.fig

%      INTOPCION1LIMPIA, by itself, creates a new INTOPCION1LIMPIA or raises the existing

%      singleton*.