NOTA:para que el programa funcione debes de tener las dos funciones en la misma carpeta de lo contrario no correrá el programa, te sugiero crees una carpeta y ahí guardes las 2 funciones, de esa manera el programa trabajara de manera adecuada
El código a continuación es en donde llamo a mi función de conversión, así que solo copien y peguen el código tal cual y lo guardan
%Programador:
% MoyDeath186.
%14 de febero de 2008.
%Version 1.0.0.
function decimalbinario
clc;
band=1;
while(band==1);
clc;
opc=menu('Conversion de Decimal a Binario','Ejecutar el programa.','Salir.');
switch(opc);
case 1;
num=input('Dame el numero: ');
if num>512
disp('Lo siento solo calculo numeros binarios del 1 a 512');
pause;
else
decbin(num);%Aqui llamo a mi funcion externa para calcular el numero binario.
end
pause;
case 2;
clc;
disp('HAS DECIDIDO SALIR DE LA APLICACION, NOS VEMOS º_º');
pause;
band=0;
clc;
end %Finaliza el switch
end %Finaliza el while
Ahora en un nuevo archivo m-file copien esta otra parte de código:
%Programador:
% MoyDeath186.
%14 de febero de 2008.
%Version 1.0.0.
function salida=decbin(a)
for i=10:-1:1
b(1,i)=fix(rem(a,2));
a=a/2;
end
salida=b;
fprintf('\nTu numero binario es:');disp(salida);
Espero les sea de utilidad :|]