Beat the goal keeper

Jorge Paloschi
/
Beat the goal keeper
about 15 hours ago
0
8
3
0
5841
game.m
function g = game()
%game Your one-button game.
%
%   Build your game by filling in the three functions below:
%   initState, updateState, and renderFrame. See README.md for the
%   full contract, idioms, and a worked example.
%
%   Workflow:
%       >> minihackContest.validate   % check the contract and contest rules
%       >> minihackContest.play       % play locally at 30 fps
%       >> minihackContest.submit     % publish to the contest

g.init   = @initState;
g.update = @updateState;
g.render = @renderFrame;
end

function s = initState(a)
% Called once. Set up your world and build your initial s.
% Create every graphics object you'll need here -- renderFrame should
% only update their properties, never create new ones. The harness
% already configured `ax` with an 800x600 world; override XLim/YLim
% here if your game wants different world coordinates.
s = struct();
banner = sprintf(['HOW TO PLAY\n\nCLICK ANYWHERE TO START\n',...
    'See if you can beat the goalkeeper\n',...
    'CLICK to change ball X direction\n ',...
    'DOUBLE CLICK to change ball Y direction\n']);
s.banner = text(a,400,320,banner,'Color',[.85 .93 1], ...
    'FontSize',13,'FontWeight','bold','HorizontalAlignment','center');
a.HitTest = 'off';
a.PickableParts = 'none';
f = a.Parent;
s.sizex = f.Position(3);
s.sizey = f.Position(4);
s.f = f;
s.a = a;
a.Units = 'pixels';
a.Color = [17 90 17]/100; % green field
s.dx = 0;
s.dy = 0;
s.changeDir = false;
s.shot = false;

% Goal keeper;
%gkImg = getImage('goalKeeper');
s.gkPos = [s.sizex/2-3 s.sizey-80 10 25];
%[s.angle,s.angIndex,s.armTransform] = goalKeeper(a,s.gkPos(1),s.gkPos(2),10);
% s.gk = imagesc(s.a,[s.gkPos(1),s.gkPos(1)+15],...
%     [s.gkPos(2),s.gkPos(2)+30],flip(gkImg,1));
s.gk = uibutton(f,'Position',s.gkPos,'BackgroundColor','y');

% Player
s.psize = 25;
s.pdisplace = 10;
s.pPos = [400 1 10 s.psize];
s.p = uibutton(f,'Position',s.pPos,'BackgroundColor','r')

% Ball
s.ballPos = [s.sizex/2,1];
s.bsize = 10;
s.b = plot(a,s.ballPos(1),s.ballPos(2),'Marker','o',...
    'Color','w','MarkerFaceColor','w');

% Goal posts;
s.goalPosition = [s.sizex/2-70 s.sizey-30 140 30];
s.goalPosts = patch(a,[s.sizex/2-70 s.sizex/2+70 s.sizex/2+70 s.sizex/2-70],...
    [s.sizey-30 s.sizey-30 s.sizey s.sizey],'w');

% Notice boards
s.goals = 0;
s.t = uitextarea(f,'Position',[s.sizex/2-90,s.sizey-20,180,20]);
s.speed = 4;
s.speedText = uitextarea(f,'Position',[s.sizex/2+100,s.sizey-20,180,20], ...
    'Value',['Speed = ',num2str(s.speed)]);

s.startTime = datetime('now');
s.lastMessage = s.startTime;
s.lastTime = s.startTime;
s.LimitsX = [0,s.sizex];
s.LimitsY = [0,s.sizey];
% Central circle
R = 150;
theta = linspace(0, pi, 100);
x = R * cos(theta)+400;
y = R * sin(theta);
plot(a,x, y,'w','LineWidth',3);
% Middle semi circle
R = 100; 
theta = linspace(0, -pi, 100);
x = R * cos(theta)+400;
y = R * sin(theta)+425;
plot(a,x, y','w','LineWidth',3);

% Areas and border
hold(a,'on')
x = [260 260 540 540];
y = [600 525 525 600];
plot(a,x,y,'w','LineWidth',3)
x = [160 160 640 640];
y = [600 425 425 600];
plot(a,x,y,'w','LineWidth',3)
x = [-9.9 9.9 9.9 -9.9 -9.9]/10;
y = [0.1 0.1 19.9 19.9 0.1]/10;
plot(a,x,y,'w','LineWidth',3)

end

function s = updateState(s, dt, pressed)
% Called every frame. Advance state by dt seconds. `pressed` is
% true on the frame SPACE or a click was fired since the last
% frame (edge-triggered -- one `true` per discrete press). Scale
% all motion by dt so the game plays the same on any machine.

% Button pressing
if pressed
    pushed()
end

if (datetime('now')-s.lastMessage) > duration(0,0,4)
    s.speedText.Value = '';
    s.lastMessage = datetime('now');
end

% Goal or ball catched
gkPos = s.gkPos;
if abs(s.ballPos(1)-gkPos(1))<10 && ...
        abs(s.ballPos(2)-gkPos(2)-gkPos(4))<10     
    if s.dy>0
        s.dy = -s.dy;
        s.speedText.Value = 'Ball CATCHED!';
        s.lastMessage = datetime('now');
        s.shot = false;
    end
elseif s.ballPos(1)>=s.goalPosition(1) && ...
        s.ballPos(1)<=s.goalPosition(1)+s.goalPosition(3) && ...
        s.ballPos(2)>=s.goalPosition(2)
    s.speedText.Value = 'GOOOOOAL!';
    s.lastMessage = datetime('now');
    s.goals = s.goals + 1;
    deltaT = datetime('now') - s.startTime;
    st = sprintf('%4.2g',s.goals/seconds(deltaT));
    s.t.Value = [num2str(s.goals),' goals,rate= ',st, ' goals/sec'];
    s.ballPos = [s.sizex/2,1];
    s.shot = false;
end

% Control ball within borders
newPos = s.ballPos + [s.dx*20*dt,s.dy/2*20*dt];
if newPos(1)<=s.LimitsX(1)
    s.dx = -s.dx;
    s.changeDir = true;
    newPos(1) = s.LimitsX(1);
    s.shot = false;
elseif newPos(1)>=s.LimitsX(2)
    s.dx = -s.dx;
    s.changeDir = true;
    newPos(1) = s.LimitsX(2);
    s.shot = false;
end
if newPos(2)<=s.LimitsY(1)
    s.dy = -s.dy;
    newPos(2) = s.LimitsY(1);
    s.shot = false;
elseif newPos(2)>=s.LimitsY(2)
    s.dy = -s.dy;
    newPos(2) = s.LimitsY(2);
    s.shot = false;
end

% Ball and player location
s.ballPos = newPos;
if s.changeDir
    s.pdisplace = -s.pdisplace;
    s.changeDir = false;
end
s.b.XData = s.ballPos(1);
s.b.YData = s.ballPos(2);
% s.b = plot(s.a,s.ballPos(1),s.ballPos(2),'Marker','o',...
%     'Color','w','MarkerFaceColor','w');
s.p.Position = [s.ballPos(1)-s.bsize-s.pdisplace,...
    s.ballPos(2)-10 s.p.Position(3) s.p.Position(4)];
if s.p.Position(2)>=s.gkPos(2)
    s.p.Visible = false;
elseif ~s.shot
    s.p.Visible = true;
end

% Update goal keeper location
gkPos = s.gkPos;
if s.dx
    s.ranDir = randi(4);
    if s.ballPos(1)>=gkPos(1)
        if gkPos(1)<s.goalPosition(1)+s.goalPosition(3)
            gkPos(1) = gkPos(1)+s.ranDir*20*dt;
        end
    else
        if gkPos(1)>s.goalPosition(1)-gkPos(3)
            gkPos(1) = gkPos(1)-s.ranDir*20*dt;
        end
    end
end
s.gkPos = gkPos;
s.gk.Position = gkPos;
    function pushed()
        % Handling button events
        if s.dx == 0
            s.dx = 5;
            s.dy = 5;
            s.banner.Visible = false;
            return
        end
        s.changeDir = false;
        selType = get(s.f,'selectiontype');
        if strcmpi(selType,'open') && ~s.shot
            s.dy = -s.dy;
        elseif strcmpi(selType,'normal') && ~s.shot
            s.dx = -s.dx;
            s.changeDir = true;
        elseif strcmpi(selType,'alt')
            if s.speed==4
                s.speed = 1;
            else
                s.speed = s.speed + 1;
            end
            s.speedText.Value = ['Speed = ',num2str(s.speed)];
        elseif strcmpi(selType,'extend')
            %fprintf('Extend y \n')
            %s.shot = true;
            %s.p.Visible = false;
        end
    end

end

function renderFrame(~, s)
% Called every frame after updates. Push your state onto the
% graphics objects you created in inits. Do NOT call drawnow.
%   s.player.Position = [s.x 300 30 30];

end
Play Game
Preview

Play Game opens this in MATLAB Drive. Click Run this app there to play.