First commit
Howard T
commit
eb0507f6af
|
|
@ -0,0 +1,182 @@
|
||||||
|
function peng()
|
||||||
|
clc;close all;
|
||||||
|
scrsz = get(0,'ScreenSize');
|
||||||
|
keypress_t = timer('ExecutionMode','fixedSpacing','Period',0.02,'TimerFcn',@control_window);
|
||||||
|
pressed_button = {};
|
||||||
|
ball_velocity = [1 1];
|
||||||
|
console_size = min(scrsz(3:4))./[2,10];
|
||||||
|
master = figure('ToolBar','none',...
|
||||||
|
'Name','Pong Console','NumberTitle','off','MenuBar','none',...
|
||||||
|
'Resize','off','Visible','off','Color',[170 255 211]/255,...
|
||||||
|
'Position',[scrsz(3)/2-console_size(1)/2,15 console_size],...
|
||||||
|
'KeyPressFcn',@key_press_check,'KeyReleaseFcn',@key_release_check,...
|
||||||
|
'DeleteFcn',@exit_event);
|
||||||
|
%paddle_size = min(scrsz(3:4))./[10 4];
|
||||||
|
paddle_size = [50,200];
|
||||||
|
game_colour = [0 0 0]/255;
|
||||||
|
p2_fig = figure('ToolBar','none',...
|
||||||
|
'Name','pong','NumberTitle','off','MenuBar','none',...
|
||||||
|
'Resize','off','Visible','on','Color',game_colour,...
|
||||||
|
'Position',[-paddle_size(1)*1.5,scrsz(4)/2 paddle_size]);
|
||||||
|
p2 = undecorateFig(p2_fig);
|
||||||
|
p1_fig = figure('ToolBar','none',...
|
||||||
|
'Name','pong','NumberTitle','off','MenuBar','none',...
|
||||||
|
'Resize','off','Visible','on','Color',game_colour,...
|
||||||
|
'Position',[scrsz(3)-paddle_size(1),scrsz(4)/2 paddle_size]);
|
||||||
|
p1 = undecorateFig(p1_fig);
|
||||||
|
def_ball_pos = [scrsz(3)/2,scrsz(4)/2];
|
||||||
|
ball_fig = figure('ToolBar','none',...
|
||||||
|
'Name','pong','NumberTitle','off','MenuBar','none',...
|
||||||
|
'Resize','off','Visible','on','Color',game_colour,...
|
||||||
|
'Position',[def_ball_pos min(scrsz(3:4)/15),min(scrsz(3:4)/15)]);
|
||||||
|
ball = undecorateFig(ball_fig);
|
||||||
|
P1_score = 0;
|
||||||
|
P2_score = 0;
|
||||||
|
P1_score_text = uicontrol('Style','text','Units','normalized',...
|
||||||
|
'Position',[0.2 0.5,0.2,0.2],'Parent',master,'String',num2str(P1_score));
|
||||||
|
P2_score_text = uicontrol('Style','text','Units','normalized',...
|
||||||
|
'Position',[0.7 0.5,0.2,0.2],'Parent',master,'String',num2str(P2_score));
|
||||||
|
|
||||||
|
set(master,'Visible','on');
|
||||||
|
%set(p1,'Visible','on');
|
||||||
|
%set(p2,'Visible','on');
|
||||||
|
%set(ball,'Visible','on');
|
||||||
|
figure(master);
|
||||||
|
|
||||||
|
start(keypress_t);
|
||||||
|
|
||||||
|
function key_press_check(~,evtData)
|
||||||
|
pressed_button = [pressed_button evtData.Key];
|
||||||
|
pressed_button = unique(pressed_button);
|
||||||
|
end
|
||||||
|
function key_release_check(~,evtData)
|
||||||
|
b = find(strcmp(pressed_button,evtData.Key)==1);
|
||||||
|
%disp(b)
|
||||||
|
pressed_button = [pressed_button(1:b-1) pressed_button(b+1:end)];
|
||||||
|
end
|
||||||
|
function control_window(~,~)
|
||||||
|
if ~isempty(pressed_button)
|
||||||
|
P1_up = (any(strcmp(pressed_button , 'uparrow')));
|
||||||
|
P1_down = (any(strcmp(pressed_button , 'downarrow')));
|
||||||
|
P1_y_move = P1_down - P1_up;
|
||||||
|
win_move = bound_window(0,P1_y_move,p1);
|
||||||
|
if ~win_collide(win_move,ball)
|
||||||
|
%set(p1,'Position',win_move);
|
||||||
|
p1.setLocation(win_move(1), win_move(2));
|
||||||
|
end
|
||||||
|
|
||||||
|
P2_up = (any(strcmp(pressed_button , 'w')));
|
||||||
|
P2_down = (any(strcmp(pressed_button , 's')));
|
||||||
|
P2_y_move = P2_down - P2_up;
|
||||||
|
win_move = bound_window(0,P2_y_move,p2);
|
||||||
|
if ~win_collide(win_move,ball)
|
||||||
|
%set(p2,'Position',win_move);
|
||||||
|
p2.setLocation(win_move(1), win_move(2));
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
win_move = bound_window(ball_velocity(1),ball_velocity(2),ball);
|
||||||
|
if win_collide(win_move,p1)
|
||||||
|
approach_rebound(p1);
|
||||||
|
elseif win_collide(win_move,p2)
|
||||||
|
approach_rebound(p2);
|
||||||
|
else
|
||||||
|
%set(ball,'Position',win_move);
|
||||||
|
ball.setLocation(win_move(1), win_move(2));
|
||||||
|
end
|
||||||
|
bounce_on_border();
|
||||||
|
check_ball();
|
||||||
|
end
|
||||||
|
function approach_rebound(win)
|
||||||
|
unit_move = ball_velocity(1:2)./sqrt(sum(ball_velocity(1:2).^2));
|
||||||
|
%win_move = get(ball,'position');
|
||||||
|
win_move = get_win_dimensions(ball);
|
||||||
|
while ~win_collide(win_move + [unit_move 0 0],win)
|
||||||
|
win_move = win_move + [unit_move 0 0];
|
||||||
|
end
|
||||||
|
if win_collide(win_move+[1 0 0 0],win) || win_collide(win_move+[-1 0 0 0],win)
|
||||||
|
ball_velocity(1) = -ball_velocity(1);
|
||||||
|
elseif win_collide(win_move+[0 1 0 0],win) || win_collide(win_move+[0 -1 0 0],win)
|
||||||
|
ball_velocity(2) = -ball_velocity(2);
|
||||||
|
end
|
||||||
|
end
|
||||||
|
function [newwin_pos] = bound_window(x_move,y_move,win_handle)
|
||||||
|
%newwin_pos = get(win_handle,'Position');
|
||||||
|
newwin_pos = get_win_dimensions(win_handle);
|
||||||
|
if (any(abs([x_move y_move])))
|
||||||
|
speed = 15;
|
||||||
|
newwin_pos = newwin_pos + speed*[x_move y_move 0 0];
|
||||||
|
% newwin_pos(1) = max(newwin_pos(1),scrsz(1));
|
||||||
|
% newwin_pos(1) = min(newwin_pos(1),scrsz(3)-newwin_pos(3));
|
||||||
|
newwin_pos(2) = max(newwin_pos(2),scrsz(2));
|
||||||
|
newwin_pos(2) = min(newwin_pos(2),scrsz(4)-newwin_pos(4));
|
||||||
|
end
|
||||||
|
end
|
||||||
|
function [collision] = win_collide(newpos,win_col)
|
||||||
|
collision = 0;
|
||||||
|
%win_col_pos = get(win_col,'Position');
|
||||||
|
win_col_pos = get_win_dimensions(win_col);
|
||||||
|
if ((newpos(1)>win_col_pos(1) && newpos(1)<win_col_pos(1)+win_col_pos(3)) ||...
|
||||||
|
(newpos(1)+newpos(3)>win_col_pos(1) && newpos(1)+newpos(3)<win_col_pos(1)+win_col_pos(3)))...
|
||||||
|
&&((newpos(2)>win_col_pos(2) && newpos(2)<win_col_pos(2)+win_col_pos(4))||...
|
||||||
|
(newpos(2)+newpos(4)>win_col_pos(2) && newpos(2)+newpos(4)<win_col_pos(2)+win_col_pos(4)))
|
||||||
|
collision = 1;
|
||||||
|
end
|
||||||
|
end
|
||||||
|
function bounce_on_border()
|
||||||
|
%win_pos = get(ball,'Position');
|
||||||
|
win_pos = get_win_dimensions(ball);
|
||||||
|
if( any(win_pos(2) == [scrsz(2) scrsz(4)-win_pos(4)]))
|
||||||
|
ball_velocity(2) = -ball_velocity(2);
|
||||||
|
elseif ( any(win_pos(1) == [scrsz(1) scrsz(3)-win_pos(3)]))
|
||||||
|
ball_velocity(1) = -ball_velocity(1);
|
||||||
|
end
|
||||||
|
end
|
||||||
|
function check_ball()
|
||||||
|
goal = 0;
|
||||||
|
%ball_pos = get(ball,'Position');
|
||||||
|
ball_pos = get_win_dimensions(ball);
|
||||||
|
if ball_pos(1)+ball_pos(3)<scrsz(1)
|
||||||
|
P2_score = P2_score+1;
|
||||||
|
goal = 1;
|
||||||
|
%set(ball,'Position',[def_ball_pos.*[1.5 1] ball_pos(3:4)]);
|
||||||
|
ball.setLocation(def_ball_pos(1)*1.5,def_ball_pos(2));
|
||||||
|
elseif ball_pos(1)>scrsz(1)+scrsz(3)
|
||||||
|
P1_score = P1_score+1;
|
||||||
|
%set(ball,'Position',[def_ball_pos.*[0.5 1] ball_pos(3:4)]);
|
||||||
|
ball.setLocation(def_ball_pos(1)*0.5,def_ball_pos(2));
|
||||||
|
goal = 1;
|
||||||
|
end
|
||||||
|
if goal
|
||||||
|
update_score()
|
||||||
|
end
|
||||||
|
end
|
||||||
|
function update_score()
|
||||||
|
set(P1_score_text,'String',num2str(P1_score));
|
||||||
|
set(P2_score_text,'String',num2str(P2_score));
|
||||||
|
end
|
||||||
|
function exit_event(~,~)
|
||||||
|
delete_timers();
|
||||||
|
close_all_windows();
|
||||||
|
end
|
||||||
|
function delete_timers
|
||||||
|
alltimer = timerfindall();
|
||||||
|
stop(alltimer);
|
||||||
|
delete(alltimer);
|
||||||
|
end
|
||||||
|
function close_all_windows
|
||||||
|
%close(p1);
|
||||||
|
%close(p2);
|
||||||
|
%close(ball);
|
||||||
|
close(p1_fig);
|
||||||
|
close(p2_fig);
|
||||||
|
close(ball_fig);
|
||||||
|
dispose(p1);
|
||||||
|
dispose(p2);
|
||||||
|
dispose(ball);
|
||||||
|
end
|
||||||
|
function dims = get_win_dimensions(win)
|
||||||
|
r = win.getBounds();
|
||||||
|
dims = [win.getX(),win.getY(),r.width,r.height];
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
@ -0,0 +1,184 @@
|
||||||
|
function jFrame = undecorateFig(hFig)
|
||||||
|
% undecorateFig removes the border and title of a figure window
|
||||||
|
%
|
||||||
|
% Syntax:
|
||||||
|
% jFrame = undecorateFig(hFig)
|
||||||
|
%
|
||||||
|
% Description:
|
||||||
|
% undecorateFig creates a new undecorated (borderless and title-less)
|
||||||
|
% Java JFrame window at the position of the specified figure, at the
|
||||||
|
% same time hiding the original Matlab figure. This provides an optical
|
||||||
|
% illusion that the Matlab figure's border and title were removed.
|
||||||
|
% As a side effect, the figure's menubar and toolbar are removed.
|
||||||
|
%
|
||||||
|
% Input:
|
||||||
|
% hFig - (default=gcf) Handle of the modified figure. If a component
|
||||||
|
% handle is specified, the containing figure will be inferred.
|
||||||
|
%
|
||||||
|
% Output:
|
||||||
|
% jFrame - Java reference handle of the newly-created JFrame.
|
||||||
|
%
|
||||||
|
% Technical details:
|
||||||
|
% http://undocumentedmatlab.com/blog/frameless-undecorated-figure-windows
|
||||||
|
%
|
||||||
|
% Bugs and suggestions:
|
||||||
|
% Please send to Yair Altman (altmany at gmail dot com)
|
||||||
|
%
|
||||||
|
% Warning:
|
||||||
|
% This code heavily relies on undocumented and unsupported Matlab functionality.
|
||||||
|
% It works on Matlab 7 and higher, but use at your own risk!
|
||||||
|
%
|
||||||
|
% Change log:
|
||||||
|
% 2015-03-19: First version posted on Matlab's File Exchange: <a href="http://www.mathworks.com/matlabcentral/fileexchange/?term=authorid%3A27420">http://www.mathworks.com/matlabcentral/fileexchange/?term=authorid%3A27420</a>
|
||||||
|
%
|
||||||
|
% See also:
|
||||||
|
% redecorateFig, enableDisableFig, setFigDockGroup, getJFrame (all of them on the File Exchange)
|
||||||
|
|
||||||
|
% Require Java to run
|
||||||
|
if ~usejava('awt')
|
||||||
|
error([mfilename ' requires Java to run']);
|
||||||
|
end
|
||||||
|
|
||||||
|
% Set default input parameters values
|
||||||
|
if nargin < 1, hFig = gcf; end
|
||||||
|
|
||||||
|
% Get unique figure handles
|
||||||
|
if ~isscalar(hFig)
|
||||||
|
error('hFig must be a single valid GUI handle');
|
||||||
|
elseif ~ishghandle(hFig)
|
||||||
|
error('hFig must be a valid GUI handle');
|
||||||
|
end
|
||||||
|
|
||||||
|
% Ensure that we have a figure handle
|
||||||
|
hFig = ancestor(hFig, 'figure');
|
||||||
|
|
||||||
|
% Ensure that the figure is not undecorated already
|
||||||
|
jFrame_ = getappdata(hFig,'undecorate_jFrame');
|
||||||
|
if ~isempty(jFrame_)
|
||||||
|
%error('Figure is already undecorated');
|
||||||
|
else
|
||||||
|
% Store the previous state of the figure's toolbar/menubar
|
||||||
|
setappdata(hFig,'undecorate_toolbar',get(hFig,'Toolbar'));
|
||||||
|
setappdata(hFig,'undecorate_menubar',get(hFig,'Menubar'));
|
||||||
|
|
||||||
|
% Remove toolbar/menubar (don't work well in undecorated JFrame)
|
||||||
|
set(hFig, 'Toolbar','none', 'MenuBar','none');
|
||||||
|
drawnow;
|
||||||
|
|
||||||
|
% Get the root Java frame
|
||||||
|
jWindow = getJFrame(hFig);
|
||||||
|
setappdata(hFig,'undecorate_jWindow',jWindow);
|
||||||
|
|
||||||
|
% Get the content pane's handle
|
||||||
|
mjc = jWindow.getContentPane; %=getRootPane;
|
||||||
|
mjr = jWindow.getRootPane;
|
||||||
|
|
||||||
|
% Create a new pure-Java undecorated JFrame
|
||||||
|
figTitle = jWindow.getTitle;
|
||||||
|
jFrame_ = javaObjectEDT(javax.swing.JFrame(figTitle));
|
||||||
|
jFrame_.setUndecorated(true);
|
||||||
|
|
||||||
|
% Move the JFrame's on-screen location just on top of the original
|
||||||
|
jFrame_.setLocation(mjc.getLocationOnScreen);
|
||||||
|
|
||||||
|
% Set the JFrame's size to the Matlab figure's content size
|
||||||
|
%jFrame_.setSize(mjc.getSize); % slightly incorrect (content-pane's offset)
|
||||||
|
jFrame_.setSize(mjc.getWidth+mjr.getX, mjc.getHeight+mjr.getY);
|
||||||
|
setappdata(hFig,'undecorate_contentJPanel',mjc);
|
||||||
|
|
||||||
|
% Reparent (move) the contents from the Matlab JFrame to the new undecorated JFrame
|
||||||
|
jFrame_.setContentPane(mjc);
|
||||||
|
|
||||||
|
% Hide the taskbar component (Java 7 i.e. R2013b or newer only)
|
||||||
|
try jFrame_.setType(javaMethod('valueOf','java.awt.Window$Type','UTILITY')); catch, end
|
||||||
|
|
||||||
|
% Make the new JFrame visible
|
||||||
|
jFrame_.setVisible(true);
|
||||||
|
|
||||||
|
% Hide the Matlab figure by moving it off-screen
|
||||||
|
pos = get(hFig,'Position');
|
||||||
|
setappdata(hFig,'undecorate_originalPos',pos);
|
||||||
|
set(hFig,'Position',pos-[9000,9000,0,0]);
|
||||||
|
drawnow;
|
||||||
|
|
||||||
|
% Enlarge the content pane to fill the jFrame
|
||||||
|
mjc.setSize(jFrame_.getSize);
|
||||||
|
|
||||||
|
% Set the focus callback to enable focusing by clicking in the taskbar
|
||||||
|
hjWindow = handle(jWindow, 'CallbackProperties');
|
||||||
|
set(hjWindow, 'FocusGainedCallback', @(h,e)jFrame_.requestFocus);
|
||||||
|
|
||||||
|
% Dispose the JFrame when the Matlab figure closes
|
||||||
|
set(hjWindow, 'WindowClosedCallback', @(h,e)jFrame_.dispose);
|
||||||
|
|
||||||
|
% Store the JFrame reference for possible later use by redecorateFig
|
||||||
|
setappdata(hFig,'undecorate_jFrame',jFrame_);
|
||||||
|
end
|
||||||
|
|
||||||
|
% Return the jFrame reference handle, if requested
|
||||||
|
if nargout
|
||||||
|
jFrame = jFrame_;
|
||||||
|
end
|
||||||
|
|
||||||
|
end % undecorateFig
|
||||||
|
|
||||||
|
|
||||||
|
%% Get the root Java frame (up to 10 tries, to wait for figure to become responsive)
|
||||||
|
function jWindow = getJFrame(hFig)
|
||||||
|
% Ensure that hFig is a non-empty handle...
|
||||||
|
if isempty(hFig)
|
||||||
|
error('Cannot retrieve the figure handle');
|
||||||
|
end
|
||||||
|
|
||||||
|
% Check for the desktop handle
|
||||||
|
if isequal(hFig,0)
|
||||||
|
%jframe = com.mathworks.mde.desk.MLDesktop.getInstance.getMainFrame; return;
|
||||||
|
error('Only figure windows can be undecorated, not the Matlab desktop');
|
||||||
|
end
|
||||||
|
|
||||||
|
% Check whether the figure is invisible
|
||||||
|
if strcmpi(get(hFig,'Visible'),'off')
|
||||||
|
error('Cannot undecorate a non-visible figure');
|
||||||
|
end
|
||||||
|
|
||||||
|
% Check whether the figure is docked
|
||||||
|
if strcmpi(get(hFig,'WindowStyle'),'docked')
|
||||||
|
error('Cannot undecorate a docked figure');
|
||||||
|
end
|
||||||
|
|
||||||
|
% Retrieve the figure window (JFrame) handle
|
||||||
|
jWindow = [];
|
||||||
|
maxTries = 10;
|
||||||
|
oldWarn = warning('off','MATLAB:HandleGraphics:ObsoletedProperty:JavaFrame');
|
||||||
|
while maxTries > 0
|
||||||
|
try
|
||||||
|
% Get the figure's underlying Java frame
|
||||||
|
jf = get(handle(hFig),'JavaFrame');
|
||||||
|
|
||||||
|
% Get the Java frame's root frame handle
|
||||||
|
%jframe = jf.getFigurePanelContainer.getComponent(0).getRootPane.getParent;
|
||||||
|
try % Old releases
|
||||||
|
jWindow = jf.fFigureClient.getWindow; % equivalent to above...
|
||||||
|
catch
|
||||||
|
try % HG2
|
||||||
|
jWindow = jf.fHG2Client.getWindow; % equivalent to above...
|
||||||
|
catch % HG1
|
||||||
|
jWindow = jf.fHG1Client.getWindow; % equivalent to above...
|
||||||
|
end
|
||||||
|
end
|
||||||
|
if ~isempty(jWindow)
|
||||||
|
break;
|
||||||
|
else
|
||||||
|
maxTries = maxTries - 1;
|
||||||
|
drawnow; pause(0.1);
|
||||||
|
end
|
||||||
|
catch
|
||||||
|
maxTries = maxTries - 1;
|
||||||
|
drawnow; pause(0.1);
|
||||||
|
end
|
||||||
|
end
|
||||||
|
warning(oldWarn);
|
||||||
|
if isempty(jWindow)
|
||||||
|
error('Cannot retrieve the figure''s underlying Java Frame');
|
||||||
|
end
|
||||||
|
end % getJFrame
|
||||||
Loading…
Reference in New Issue