caishuzi.asv

用MATLAB编写的一个猜数字游戏 就是随机生成4位数

function varargout = caishuzi(varargin)
%CAISHUZI M-file for caishuzi.fig
%      CAISHUZI, by itself, creates a new CAISHUZI or raises the existing
%      singleton*.
%
%      H = CAISHUZI returns the handle to a new CAISHUZI or the handle to
%      the existing singleton*.
%
%      CAISHUZI('Property','Value',...) creates a new CAISHUZI using the
%      given property value pairs. Unrecognized properties are passed via
%      varargin to caishuzi_OpeningFcn.  This calling syntax produces a
%      warning when there is an existing singleton*.
%
%      CAISHUZI('CALLBACK') and CAISHUZI('CALLBACK',hObject,...) call the
%      local function named CALLBACK in CAISHUZI.M with the given input
%      arguments.
%
%      *See GUI Options on GUIDE's Tools menu.  Choose "GUI allows only one
%      instance to run (singleton)".
%
% See also: GUIDE, GUIDATA, GUIHANDLES

% Edit the above text to modify the response to help caishuzi

% Last Modified by GUIDE v2.5 08-Mar-2008 22:02:40

% Begin initialization code - DO NOT EDIT
gui_Singleton = 1;
gui_State = struct('gui_Name',       mfilename, ...
                   'gui_Singleton',  gui_Singleton, ...
                   'gui_OpeningFcn', @caishuzi_OpeningFcn, ...
                   'gui_OutputFcn',  @caishuzi_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 caishuzi is made visible.
function caishuzi_OpeningFcn(hObject, eventdata, handles, varargin)
% This function has no output args, see OutputFcn.
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
% varargin   unrecognized PropertyName/PropertyValue pairs from the
%            command line (see VARARGIN)

% Choose default command line output for caishuzi
handles.output = hObject;
handles.source = rand4;   %生成一个随机的四位数
handles.pc = 0;           %用来保存按‘ok’键的次数，但不成功
% Update handles structure
guidata(hObject, handles);

% UIWAIT makes caishuzi wait for user response (see UIRESUME)
% uiwait(handles.figure1);


% --- Outputs from this function are returned to the command line.
function varargout = caishuzi_OutputFcn(hObject, eventdata, handles)
% varargout  cell array for returning output args (see VARARGOUT);
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Get default command line output from handles structure
varargout{1} = handles.output;



function edit_input_Callback(hObject, eventdata, handles)
% hObject    handle to edit_input (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of edit_input as text
%        str2double(get(hObject,'String')) returns contents of edit_input as a double

handles.instr = str2double(get(hObject,'String'));   %从编辑框取输入值
guidata(hObject, handles);

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

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end


% --- Executes on button press in pushbutton_clo.
function pushbutton_clo_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton_clo (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

delete(handles.figure1)    %关闭界面

% --- Executes on selection change in popupmenu.
function popupmenu_Callback(hObject, eventdata, handles)
% hObject    handle to popupmenu (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: contents = get(hObject,'String') returns popupmenu contents as cell array
%        contents{get(hObject,'Value')} returns selected item from popupmenu

handles.bushu = get(hObject,'value');   %获得指定步数限制，还未完成该功能

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

% Hint: popupmenu controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end


% --- Executes on button press in pushbutton_ok.
function pushbutton_ok_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton_ok (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

A = handles.source;                %A为生成的随机4位数
instr = handles.instr;             %输入的4位数

handles.pc = handles.pc + 1;       %按键次数
b = 0;  
%将输入的4位数拆开，组成矩阵B                           
for i=1:4                          
    B(5-i) = mod(instr,10);
    for j=1:4
        if isequal(B(5-i),A(j))    %判断B与A是否有相同元素，并将其个数存入b
            b=b+1;
        end
    end
    instr = fix(instr/10);
end
%判断输入是否合法
f=0;                               
for i=1:4
    C(1:4)=B(i);
    if sum(C==B)>=2
        set(handles.text_rez, 'string','请重新输入4位不重复数！');
        f=1;
        break
    end
end
if f==0        %输入合法
a=sum(A==B);   %A与B的元素及其位置均相同的元素个数
b = b - a;     %A与B的元素相同但位置不相同的元素个数
set(handles.text_rez, 'string',['第',num2str(handles.pc),'步: ',num2str(B),'     ',...
   num2str(a),'A',num2str(b),'B']);     %显示步骤及结果
end


    

% --- Executes on button press in pushbutton_reset.
function pushbutton_reset_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton_reset (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

handles.source = rand4;       %重新生成一个随机4位数
guidata(hObject, handles);




% --- Executes on button press in pushbutton_ans.
function pushbutton_ans_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton_ans (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

set(handles.text_rez, 'string',['正确答案： ',num2str(handles.source)]);    %显示正确答案


%定义生成随机4位数的函数
function Y=rand4()
M=randperm(10);
M(find(M==10))=0;
Y=M(1:4);