一个猜数字的游戏,先随机生成一个1到100之间的整数,由游戏者来猜此数,当输入的数过大,会提示数字大了,当输入的数过小,会提示数字小了,当猜中此数,游戏结束。
好玩而已,呵呵,欢迎共同学习,email:slqinyi@http://www.doczj.com/doc/1adaf9ceda38376baf1faeb9.html
function caishuzi(arg)
if nargin < 1
arg = 'newgame';
end
if strcmp(arg,'newgame')
clf
% set(gcf,'resize','off'); % 禁止调整窗口的大小
set(gcf,'name','猜数字 Version 1.0') % 修改标题栏
set(gcf,'numbertitle','off') % 去掉标题栏中的 figure 1
num = randint(1,1,100); % 随机产生个一小于100的正整数
h_casu = uicontrol(gcf,'style','edit',...
'unit','normalized','position',[0.8,0.75,0.08,0.1],...
'BackgroundColor',[1,1,1],'ForegroundColor',[0 0 1],...
'fontsize',12,'visible','off','string',num2str(num),'tag','t_casu');
h_suru = uicontrol(gcf,'style','edit',...
'unit','normalized','position',[0.8,0.75,0.08,0.1],...
'BackgroundColor',[1,1,1],'ForegroundColor',[0 0 1],...
'fontsize',12,'tag','t_suru');
h_jisu = uicontrol(gcf,'style','edit',...
'unit','normalized','position',[0.75,0.75,0.08,0.1],...
'BackgroundColor',[1,1,1],'ForegroundColor',[0 0 1],...
'fontsize',12,'visible','off','string',num2str(0),'tag','t_jisu');
wz_string = '请输入一个整数(1~100):';
h_wenz = uicontrol(gcf,'style','text',...
'unit','normalized','position',[0.12,0.75,0.65,0.1],...
'BackgroundColor',[1,1,1],'ForegroundColor',[0 0 1],...
'fontsize',24,'string',wz_string,'tag','t_wenz');
cs_string = '您已输入的次数为 0 次';
h_cisu = uicontrol(gcf,'style','text',...
'unit','normalized','position',[0.12,0.6,0.65,0.1],...
'BackgroundColor',[1,1,1],'ForegroundColor',[0 0 1],...
'fontsize',24,'string',cs_string,'tag','t_cisu');
h_newg = uicontrol(gcf,'style','pushbutton',...
'unit','normalized','position',[0.34,0.15,0.17,0.1],...
'BackgroundColor',[1,1,1],'ForegroundColor',[0 0 1],...
'fontsize',24,'string','新 局','callback','caishuzi(''newgame'')','tag','t_newg');
h_tiji = uicontrol(gcf,'style','pushbutton',...
'unit','normalized','position',[0.54,0.15,0.17,0.1],...
'BackgroundColor',[1,1,1],'ForegroundColor',[0 0 1],...
'fontsize',24,'string','提 交','callback','caishuzi(''submit'')','tag','t_tiji');
h_tuci = uicontrol(gcf,'style','pushbutton',...
'unit','normalized','position',[0.74,0.15,0.17,0.1],...
'BackgroundColor',[1,1,1],'ForegroundColor',[0 0 1],...
'fontsize',24,'string','退 出','callback','close','tag','t_tucu');
elseif strcmp(arg,'sub