wangkui.m

资料很好压缩包解压时没有密码第二行程序括号当中是原图片存放路径

function varargout = wangkui(varargin)

gui_Singleton = 1;
gui_State = struct('gui_Name',       mfilename, ...
                   'gui_Singleton',  gui_Singleton, ...
                   'gui_OpeningFcn', @wangkui_OpeningFcn, ...
                   'gui_OutputFcn',  @wangkui_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
% End initialization code - DO NOT EDIT

% --- Executes just before wangkui is made visible.
function wangkui_OpeningFcn(hObject, eventdata, handles, varargin)
global s;
h=get(handles.wenben,'string');
switch(h)
    case{'+','-','*','\'}
        s=1;
    otherwise
        s=0;
end
global p;
p='\';

handles.output = hObject;
guidata(hObject, handles);

% 
function varargout = wangkui_OutputFcn(hObject, eventdata, handles) 
varargout{1} = handles.output;          

% --- Outputs from this function are returned to the command line.
function wenben_Callback(hObject, eventdata, handles)

% --- Executes during object creation, after setting all properties.
function wenben_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'),  get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end

% --- Executes on button press in point.
function point_Callback(hObject, eventdata, handles)
hh=handles.wenben;
a=get(hh,'string');
set(hh,'string','.');
b=get(hh,'string');
c=strcat(a,b);
m=strfind(a,'.');
[p,q]=size(m);
if q>=1
    set(hh,'string',a);
else
    set(hh,'string',c);
end
% --- Executes on button press in zero.
function zero_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','0');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','0');
        otherwise
            t=strcat(h,'0');
            set(hh,'string',t);
    end
end

% --- Executes on button press in one.
function one_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','1');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','1');
        otherwise
            t=strcat(h,'1');
            set(hh,'string',t);
    end
end


% --- Executes on button press in two.
function two_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','2');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','2');
        otherwise
            t=strcat(h,'2');
            set(hh,'string',t);
    end
end

% --- Executes on button press in three.
function three_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','3');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','3');
        otherwise
            t=strcat(h,'3');
            set(hh,'string',t);
    end
end

% --- Executes on button press in four.
function four_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','4');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','4');
        otherwise
            t=strcat(h,'4');
            set(hh,'string',t);
    end
end

% --- Executes on button press in five.
function five_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','5');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','5');
        otherwise
            t=strcat(h,'5');
            set(hh,'string',t);
    end
end

% --- Executes on button press in six.
function six_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','6');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','6');
        otherwise
            t=strcat(h,'6');
            set(hh,'string',t);
    end
end

% --- Executes on button press in seven.
function seven_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','7');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','7');
        otherwise
            t=strcat(h,'7');
            set(hh,'string',t);
    end
end

% --- Executes on button press in eight.
function eight_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','8');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','8');
        otherwise
            t=strcat(h,'8');
            set(hh,'string',t);
    end
end

% --- Executes on button press in nine.
function nine_Callback(hObject, eventdata, handles)
global s;
hh=handles.wenben;
if(s==1)
    set(hh,'string','9');
    s=0;
elseif(s==0)
    h=get(hh,'string');
    switch(h)
        case '0';
            set(hh,'string','9');
        otherwise
            t=strcat(h,'9');
            set(hh,'string',t);
    end
end

% --------------------------------------------------------------------
function wenjian_Callback(hObject, eventdata, handles)

% --------------------------------------------------------------------
function guanbi_Callback(hObject, eventdata, handles)
close;

% --------------------------------------------------------------------
function qianlvse_Callback(hObject, eventdata, handles)
set(handles.pane,'backgroundcolor',[0.6 0.902 0.608]);
set(handles.biaoti,'backgroundcolor',[0.6 0.902 0.608]);

% --------------------------------------------------------------------
function beijingse_Callback(hObject, eventdata, handles)

% --------------------------------------------------------------------
function moren_Callback(hObject, eventdata, handles)

set(handles.pane,'backgroundcolor',[0.502, 0.502 1.0]);
set(handles.biaoti,'backgroundcolor',[0.502, 0.502 1.0]);

% --------------------------------------------------------------------
function qianzise_Callback(hObject, eventdata, handles)

set(handles.pane,'backgroundcolor',[0.855 0.561 0.937]);
set(handles.biaoti,'backgroundcolor',[0.855 0.561 0.937]);

% --------------------------------------------------------------------
function fenhongse_Callback(hObject, eventdata, handles)
set(handles.pane,'backgroundcolor',[0.992 0.51 0.627]);
set(handles.biaoti,'backgroundcolor',[0.992 0.51 0.627]);

% --------------------------------------------------------------------
function bangzhu_Callback(hObject, eventdata, handles)

% --------------------------------------------------------------------
function guanyu_Callback(hObject, eventdata, handles)
msgbox('这是我做的计算器，有不到之处还望谅解！','简易计算器','warn');

% --- Executes on button press in jia.
function jia_Callback(hObject, eventdata, handles)
global p;
hh=handles.wenben;
p='+';
global s;
if(s==0)
    global v1;
    v1=str2num(get(hh,'string'));
    s=1;
end

% --- Executes on button press in jian.
function jian_Callback(hObject, eventdata, handles)
global p;
hh=handles.wenben;
p='-';
global s;
if(s==0)
    global v2;
    v2=str2num(get(hh,'string'));
    s=1;
end

% --- Executes on button press in cheng.
function cheng_Callback(hObject, eventdata, handles)
global p;
hh=handles.wenben;
p='*';
global s;
if(s==0)
    global v3;
    v3=str2num(get(hh,'string'));
    s=1;
end

% --- Executes on button press in chu.
function chu_Callback(hObject, eventdata, handles)
global p;
hh=handles.wenben;
p='/';
global s;
if(s==0)
    global v4;
    v4=str2num(get(hh,'string'));
    s=1;
end

% --- Executes on button press in gen.
function gen_Callback(hObject, eventdata, handles)

hh=handles.wenben;
global s;
if (s==0)
r=sqrt(str2num(get(hh,'String')));
set(hh,'String',num2str(r));
end

% --- Executes on button press in mi.
function mi_Callback(hObject, eventdata, handles)
global p;
hh=handles.wenben;
p='^';
global s;
if(s==0)
    global v6;
    v6=str2num(get(hh,'string'));
    s=1;
end

% --- Executes on button press in deng.
function deng_Callback(hObject, eventdata, handles)
hh=handles.wenben;
global v1;
global v2;
global v3;
global v4;
global v5;
global v6;
v5=str2num(get(hh,'string'));
global p;
switch(p)
    case'+';
        r=v1+v5
        set(hh,'string',num2str(r));
        v1=0;
        p=' ';
    case'-';
        r=v2-v5;
        set(hh,'string',num2str(r));
        v2=0;
        p=' ';
    case'*';
        r=v3*v5;
        set(hh,'string',num2str(r));
        v3=0;
        p=' ';
    case'/';
        r=v4/v5;
        set(hh,'string',num2str(r));
        v4=0;
        p=' ';
    case'^';
        r=v6^v5;
        set(hh,'string',num2str(r));
        v5=0;
        p=' ';
    otherwise
        b=(get(hh,'string'))
        set(hh,'string',b)
   
end

% --- Executes on button press in ce.
function ce_Callback(hObject, eventdata, handles)
hh=handles.wenben;
set(hh,'string','0');

% --- Executes on button press in backplace.
function backplace_Callback(hObject, eventdata, handles)
hh=get(handles.wenben,'String');
t=length(hh);
set(handles.wenben,'String',hh(1:t-1)); 

% --- Executes during object creation, after setting all properties.
function pane_CreateFcn(hObject, eventdata, handles)



% --- Executes during object creation, after setting all properties.
function biaoti_CreateFcn(hObject, eventdata, handles)
% hObject    handle to biaoti (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called