function varargout = Snake(varargin)
% SNAKE M-file for Snake.fig
% SNAKE, by itself, creates a new SNAKE or raises the existing
% singleton*.
%
% H = SNAKE returns the handle to a new SNAKE or the handle to
% the existing singleton*.
%
% SNAKE('CALLBACK',hObject,eventData,handles,...) calls the local
% function named CALLBACK in SNAKE.M with the given input arguments.
%
% SNAKE('Property','Value',...) creates a new SNAKE or raises the
% existing singleton*. Starting from the left, property value pairs are
% applied to the GUI before Snake_OpeningFunction gets called. An
% unrecognized property name or invalid value makes property application
% stop. All inputs are passed to Snake_OpeningFcn via varargin.
%
% *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 Snake
% Begin initialization code - DO NOT EDIT
gui_Singleton = 1;
gui_State = struct('gui_Name', mfilename, ...
'gui_Singleton', gui_Singleton, ...
'gui_OpeningFcn', @Snake_OpeningFcn, ...
'gui_OutputFcn', @Snake_OutputFcn, ...
'gui_LayoutFcn', [] , ...
'gui_Callback', []);
if nargin && ischar(varargin{1})
gui_State.gui_Callback = str2func(varargin{1});
end
mainfc;
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 Snake is made visible.
function Snake_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 command line arguments to Snake (see VARARGIN)
% Choose default command line output for Snake
%%
ha=axes('units','normalized','position',[0 0 1 1]);
uistack(ha,'down')
II=imread('background.jpg');
image(II)
colormap gray
set(ha,'handlevisibility','off','visible','off');
%%
mainfc;
line( 'Visible', 'on','Tag', 'MoveBlock', 'Markersize', 18, 'HitTest', 'off','Parent',handles.axes1,...
'Marker', 's', 'MarkerEdgeColor', 'k', 'XData',nan, 'YData',nan , 'LineStyle', 'none','MarkerFaceColor',[0 0 1] ) ;
line( 'Visible', 'on','Tag', 'HeadBlock', 'Markersize', 18, 'HitTest', 'off','Parent',handles.axes1,...
'Marker', 's', 'MarkerEdgeColor', 'k', 'XData',nan, 'YData',nan , 'LineStyle', 'none','MarkerFaceColor',[0 0 1] ) ;
% Update handles structure
handles = guihandles(hObject);
handles.output = hObject;
setappdata(handles.figure1,'gamelevel',1);
setappdata(handles.figure1,'direction','rightarrow');
setappdata(handles.figure1,'flag',1);
setappdata(handles.figure1,'headreq',1);
guidata(hObject, handles);
pos = get(handles.axes1,'position');
pos = [0 0 pos(3) pos(4)];
rectangle('Position',pos,'EdgeColor','r', 'LineWidth',2 )
% UIWAIT makes Snake wait for user response (see UIRESUME)
% uiwait(handles.figure1);
% --- Outputs from this function are returned to the command line.
function varargout = Snake_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 Start_Callback(hObject, eventdata, handles)
% hObject handle to Start (see GCBO)
% eventdata reserved - to be defined in a future version of MATLAB
% handles structure with handles and user data (see GUIDATA)
TextHandle = findobj( 'Parent', handles.axes1, 'Type', 'text' ) ;
delete( TextHandle ) ;
setappdata(handles.figure1,'flag',0);
setappdata(handles.figure1,'direction','rightarrow');
setappdata(handles.figure1,'gamelevel',1);
set(handles.MoveBlock,'XData',[170 190 210],'YData',[210 210 210]);
set(handles.score,'string','0');
while ishandle(hObject)
if getappdata(handles.figure1,'flag');
text( 100, 240, 'GameOver', 'Parent', handles.axes1,...
'FontSize', 30, 'Color', 'r', 'FontAngle', 'italic' ) ;
text( 100, 200, strcat('得分:',get(handles.score,'string')), 'Parent', handles.axes1,...
'FontSize', 30, 'Color', 'r', 'FontAngle', 'italic' ) ;
break;
end
if getappdata(handles.figure1,'headreq');
[Xpos,Ypos] = randblock(handles);
set(handles.HeadBlock,'XData',Xpos,'YData',Ypos);
setappdata(handles.figure1,'headreq',0);
end
while ( ishandle(hObject) & ~getappdata(handles.figure1,'flag') & ~getappdata(handles.figure1,'headreq') )
snake_move(handles);
level = getappdata(handles.figure1,'gamelevel');
pausetime = 1 - 0.099 * level;
pause(pausetime);
end
end
% --------------------------------------------------------------------
function File_Callback(hObject, eventdata, handles)
% hObject handle to File (see GCBO)
% eventdata reserved - to be defined in a future version of MATLAB
% handles structure with handles and user data (see GUIDATA)
% --- Executes on key press over figure1 with no controls selected.
function figure1_KeyPressFcn(hObject, eventdata, handles)
% hObject handle to figure1 (see GCBO)
% eventdata reserved - to be defined in a future version of MATLAB
% handles structure with handles and user data (see GUIDATA)
CurrentKey = get( handles.figure1, 'CurrentKey' ) ;
olddire = getappdata(handles.figure1,'direction');
switch olddire
case 'leftarrow'
if( strcmp(CurrentKey,'rightarrow'))
return;
end
case 'rightarrow'
if( strcmp(CurrentKey,'leftarrow'))
return;
end
case 'uparrow'
if( strcmp(CurrentKey,'downarrow'))
return;
end
case 'downarrow'
if( strcmp(CurrentKey,'uparrow'))
return;
end
otherwise
return;
end
switch CurrentKey
case {'leftarrow','rightarrow','uparrow','downarrow'}
if ~getappdata(handles.figure1,'flag')
setappdata(handles.figure1,'direction',CurrentKey);
end
otherwise
return;
end;
% pause(0.4);
% --------------------------------------------------------------------
function Exit_Callback(hObject, eventdata, handles)
% hObject handle to Exit (see GCBO)
% eventdata reserved - to be defined in a future version of MATLAB
% handles structure with handles and user data (see GUIDATA)
close;
% --------------------------------------------------------------------
function About_Callback(hObject, eventdata, handles)
% hObject handle to About (see GCBO)
% eventdata reserved - to be defined in a future version of MATLAB
% handles structure with handles and user data (see GUIDATA)
msgbox('matlab snake version 1.0 by palsword');
% --------------------------------------------------------------------
function Help_Callback(hObject, eventdata, handles)
% hObject handle to Help (see GCBO)
% eventdata reserved - to be defined in a future version of MATLAB
% handles structure with handles and user data (see GUIDATA)
msgbox('上下左右键控制贪吃蛇的移动方向!');
% --- Executes on button press in pushbutton1.
function pushbutton1_Callback(hObject, eventdata, handles)
% hObject handle to pushbutton1 (see GCBO)
% eventdata reserved - to be defined in a future version of MATLAB
% handles structure with handles and user data (see GUIDATA)
Start_Callback(hObject, eventdata, handles);
清风明月来几时
- 粉丝: 1812
- 资源: 254
最新资源
- 毕设-c语言做的一个任务管理器17.zip
- foo-uie-eslyric
- 基于Matlab实现BPSK,QPSK,QAM,GMSK数字调制方式仿真(源码).rar
- 基于正负序分离控制的三相离网逆变器,带不平衡阻性负载 图片为基于正序控制的和基于正负序分离控制的离网逆变器分别带载的波形
- 机械设计圆形垫片自动化点胶流水线sw18全套设计资料100%好用.zip
- 机械设计圆柱电池分选机sw21全套设计资料100%好用.zip
- 基于Springboot+Vue的剧本杀管理系统论文
- C语言实现DSP库函数,内含基本的RMS函数、mean函数、FFT函数和FIR函数
- 面向细粒度复杂度控制的HEVC帧内预测算法研究与实现
- C#与三菱FX5U以态网通讯程序,可读X Y M S D,可写Y M S D,带源码,有部分备注,PLC通讯参数直接设置
- 仿《至诚财经网》源码 股票证券门户网站系统模版+帝国cms7.5核心+火车头采集
- can_bus.zip
- Java+Servlet+JSP+Mysql学生成绩管理系统源码+报告
- 基于Springboot+vue的博物馆游客预约系统论文
- 机械设计原木剥皮机sw21全套设计资料100%好用.zip
- C#与Sql server 2008 R2图书信息管理系统,源码带注释,VS2015版本,.net4.5框架
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈