function varargout = wodejisuanqi(varargin)
gui_Singleton = 1;
gui_State = struct('gui_Name', mfilename, ...
'gui_Singleton', gui_Singleton, ...
'gui_OpeningFcn', @wodejisuanqi_OpeningFcn, ...
'gui_OutputFcn', @wodejisuanqi_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 wodejisuanqi is made visible.
function wodejisuanqi_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 = wodejisuanqi_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 beijingse_Callback(hObject, eventdata, handles)
set(handles.pane,'backgroundcolor',[0.00, 0.00 0.0]);
set(handles.biaoti,'backgroundcolor',[0.00, 0.00 0.0]);
% --------------------------------------------------------------------
function chengse_Callback(hObject, eventdata, handles)
set(handles.pane,'backgroundcolor',[1.00, 0.502 0.251]);
set(handles.biaoti,'backgroundcolor',[1.00, 0.502 0.251]);
% --------------------------------------------------------------------
function molvse_Callback(hObject, eventdata, handles)
set(handles.pane,'backgroundcolor',[0.00 0.502 0.502]);
set(handles.biaoti,'backgroundcolor',[0.00 0.502 0.502]);
% --------------------------------------------------------------------
function lanse_Callback(hObject, eventdata, handles)
set(handles.pane,'backgroundcolor',[0.00, 0.00 1.0]);
set(handles.biaoti,'backgroundcolor',[0.00, 0.00 1.0]);
% --------------------------------------------------------------------
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='/';
g