Penalty Kick

Ben Pasquariello
/
Penalty Kick
about 6 hours ago
1
29
7
0
7955
game.m
function g=game()
g.init=@initState;g.update=@updateState;g.render=@renderFrame;
end

function s=initState(ax)
s.t=0;s.score=0;s.best=0;s.shots=0;s.phase=0;s.k=0;s.target=0;s.wait=0;s.result='';
ax.YDir='reverse';ax.Color=[.04 .06 .05];
s.g.sky=rectangle(ax,'Position',[0 0 800 180],'FaceColor',[.09 .11 .1],...
    'EdgeColor','none','HitTest','off','PickableParts','none');
s.g.crowd=line(ax,[0 800],[175 175],'Color',[.3 .32 .28],'LineWidth',26,...
    'HitTest','off','PickableParts','none');
s.g.grass=rectangle(ax,'Position',[0 180 800 420],'FaceColor',[.08 .42 .2],...
    'EdgeColor','none','HitTest','off','PickableParts','none');
s.g.stripes=line(ax,[0 800 NaN 0 800 NaN 0 800],[260 260 NaN 360 360 NaN 500 500],...
    'Color',[.12 .5 .25],'LineWidth',3,'HitTest','off','PickableParts','none');
s.g.spot=rectangle(ax,'Position',[395 475 10 10],'Curvature',[1 1],...
    'FaceColor','w','EdgeColor','none','HitTest','off','PickableParts','none');
s.g.posts=line(ax,[0 0 NaN 0 0 NaN 0 0],[0 0 NaN 0 0 NaN 0 0],...
    'Color','w','LineWidth',7,'HitTest','off','PickableParts','none');
s.g.netbg=rectangle(ax,'Position',[0 0 1 1],'FaceColor',[.72 .86 .95],...
    'FaceAlpha',.18,'EdgeColor','none','HitTest','off','PickableParts','none');
s.g.net=line(ax,[0 0 NaN 0 0 NaN 0 0 NaN 0 0],[0 0 NaN 0 0 NaN 0 0 NaN 0 0],...
    'Color',[.7 .85 .95],'LineWidth',1,'HitTest','off','PickableParts','none');
s.g.keeper=rectangle(ax,'Position',[0 0 70 105],'Curvature',[.3 .3],...
    'FaceColor',[.82 .12 .1],'EdgeColor',[.35 .03 .03],'LineWidth',2,'HitTest','off','PickableParts','none');
s.g.head=rectangle(ax,'Position',[0 0 36 34],'Curvature',[.2 .2],...
    'FaceColor',[.68 .08 .07],'EdgeColor',[1 .45 .35],'LineWidth',2,'HitTest','off','PickableParts','none');
s.g.visor=line(ax,[0 0],[0 0],'Color',[0 .95 1],'LineWidth',5,'HitTest','off','PickableParts','none');
s.g.antenna=line(ax,[0 0],[0 0],'Color',[.55 .9 1],'LineWidth',2,'Marker','o','MarkerFaceColor',[1 .7 .1],'HitTest','off','PickableParts','none');
s.g.arms=line(ax,[0 0 NaN 0 0],[0 0 NaN 0 0],'Color',[.82 .12 .1],...
    'LineWidth',9,'Marker','o','MarkerSize',7,'MarkerFaceColor','w','MarkerEdgeColor','none',...
    'HitTest','off','PickableParts','none');
s.g.legs=line(ax,[0 0 NaN 0 0],[0 0 NaN 0 0],'Color',[.08 .12 .18],...
    'LineWidth',7,'HitTest','off','PickableParts','none');
s.g.ball=rectangle(ax,'Position',[367 447 66 66],'Curvature',[1 1],...
    'FaceColor','w','EdgeColor',[.08 .08 .08],'LineWidth',2,'HitTest','off','PickableParts','none');
s.g.mark=patch(ax,[389 400 411 406 394],[474 466 474 489 489],[.05 .05 .05],...
    'EdgeColor','none','HitTest','off','PickableParts','none');
for k=1:5
    s.g.pan(k)=patch(ax,0,0,[.05 .05 .05],'EdgeColor','w','LineWidth',1,'HitTest','off','PickableParts','none');
end
s.g.aim=line(ax,[400 455],[480 430],'Color',[1 .8 .08],'LineWidth',5,...
    'HitTest','off','PickableParts','none');
s.g.dot=rectangle(ax,'Position',[0 0 14 14],'Curvature',[1 1],...
    'FaceColor',[1 .8 .08],'EdgeColor','none','HitTest','off','PickableParts','none');
s.g.title=text(ax,400,35,'MOVING PENALTY','Color','w','FontSize',28,...
    'FontWeight','bold','HorizontalAlignment','center','Visible','off','HitTest','off','PickableParts','none');
s.g.hud=text(ax,20,30,'','Color','w','FontSize',16,'FontWeight','bold',...
    'HitTest','off','PickableParts','none');
s.g.msg=text(ax,400,555,'TAP WHEN THE ARROW BEATS THE KEEPER','Color',[1 .84 .25],...
    'FontSize',16,'FontWeight','bold','HorizontalAlignment','center','HitTest','off','PickableParts','none');
end

function s=updateState(s,dt,p)
s.t=s.t+dt;
if s.phase==3
    if p,s.score=0;s.shots=0;s.phase=0;s.result='';end
    return
end
if s.phase==0 && p
    f=1+s.score*.15;gl=130;a=sin(s.t*f*2.4);
    s.target=gl+270+225*a;s.phase=1;s.k=0;s.shots=s.shots+1;
elseif s.phase==1
    s.k=s.k+dt*2.2;
    if s.k>=1
        s.k=1;f=1+s.score*.15;gl=130;
        gx=gl+270+185*sin(s.t*f*3.1+.8);
        if abs(s.target-gx)>48
            s.score=s.score+1;s.result='GOAL!';
            if s.score>s.best,s.best=s.score;end
        else
            s.result=sprintf('SAVED! STREAK: %d  •  TAP TO RESTART',s.score);
            s.phase=3;return
        end
        s.phase=2;s.wait=.9;
    end
elseif s.phase==2
    s.wait=s.wait-dt;
    if s.wait<=0,s.phase=0;s.result='';end
end
end

function renderFrame(~,s)
f=1+s.score*.15;gl=130;gr=gl+540;
gx=gl+270+185*sin(s.t*f*3.1+.8);
    s.g.posts.XData=[gl gl NaN gr gr NaN gl gr];
    s.g.posts.YData=[350 75 NaN 350 75 NaN 75 75];
    s.g.netbg.Position=[gl+8 82 gr-gl-16 263];
    s.g.net.XData=[gl+70 gl+70 NaN gl+150 gl+150 NaN gl+230 gl+230 NaN gl+310 gl+310 NaN gl+390 gl+390 NaN gl+470 gl+470 NaN gl+8 gr-8 NaN gl+8 gr-8 NaN gl+8 gr-8 NaN gl+8 gr-8];
    s.g.net.YData=[82 345 NaN 82 345 NaN 82 345 NaN 82 345 NaN 82 345 NaN 82 345 NaN 135 135 NaN 190 190 NaN 245 245 NaN 300 300];
    s.g.keeper.Position=[gx-25 255 50 70];
    s.g.head.Position=[gx-18 220 36 34];
    s.g.visor.XData=[gx-12 gx+12];s.g.visor.YData=[241 241];
    s.g.antenna.XData=[gx gx];s.g.antenna.YData=[220 211];
    s.g.arms.XData=[gx-23 gx-52 NaN gx+23 gx+52];
    s.g.arms.YData=[272 292 NaN 272 292];
    s.g.legs.XData=[gx-14 gx-26 NaN gx+14 gx+26];
    s.g.legs.YData=[325 345 NaN 325 345];
if s.phase==1 || s.phase==2
    bx=400+(s.target-400)*s.k;by=480-235*s.k;
    s.g.ball.Position=[bx-33 by-33 66 66];s.g.aim.Visible='off';s.g.dot.Visible='off';
else
    a=sin(s.t*f*2.4);tx=gl+270+225*a;
    bx=400;by=480;s.g.ball.Position=[367 447 66 66];s.g.aim.XData=[400 400+55*a];s.g.aim.YData=[480 420];
    s.g.aim.Visible='on';s.g.dot.Position=[tx-7 200 14 14];s.g.dot.Visible='on';
end
s.g.mark.XData=bx+[-6 0 6 4 -4];s.g.mark.YData=by+[-4 -8 -4 5 5];
px=[-18 18 -22 22 0];py=[-14 -14 7 7 23];
for k=1:5
    s.g.pan(k).XData=bx+px(k)+[-6 0 6 4 -4];
    s.g.pan(k).YData=by+py(k)+[-4 -8 -4 5 5];
end
s.g.hud.String=sprintf('BEST: %d     STREAK: %d     SHOTS: %d     SPEED x%.1f',s.best,s.score,s.shots,f);
if s.phase==2 || s.phase==3,s.g.msg.String=s.result;s.g.msg.Color=[1 .84 .25];
else,s.g.msg.String='TAP WHEN THE ARROW BEATS THE KEEPER';s.g.msg.Color=[1 .84 .25];end
end
Play Game
Preview

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