Formula MathWorks

Ethan
/
Formula MathWorks
about 5 hours ago
1
14
5
1
9974
game.m
function g = game()
% LIGHTS OUT: a one-button, top-down drag-racing reaction game.
g.init = @initState; g.update = @updateState; g.render = @renderFrame;
end

function s = initState(ax)
ax.YDir = 'reverse'; ax.Color = [.045 .07 .10];
o = {'HitTest','off','PickableParts','none'};
s.phase = 0; s.t = 0; s.goT = 0; s.carX = 55*ones(1,6);
s.go = false(1,6); s.startT = [0 .25 .3 .4 .5 0]; s.result = ''; s.react = 0;
s.rival = true; s.endT = 0; s.order = 1:6;
s.names = {'MATLAB Racing : You','Rarri Racing','Grassy Racing','Ham Racing','Blue Bull Racing','I''m faster than you'};
% A compact top-down strip with two drag lanes.
s.g.grass = rectangle(ax,'Position',[0 0 800 600],'FaceColor',[.08 .28 .16],'EdgeColor','none',o{:});
s.g.track = rectangle(ax,'Position',[5 140 790 340],'FaceColor',[.18 .19 .21],'EdgeColor',[.75 .75 .68],'LineWidth',5,o{:});
for k = 1:5, s.g.lane(k) = rectangle(ax,'Position',[0 195+52*(k-1) 800 4],'FaceColor',[.92 .92 .82],'EdgeColor','none',o{:}); end
s.g.start = rectangle(ax,'Position',[145 140 11 340],'FaceColor','w','EdgeColor','none',o{:});
s.g.finish = rectangle(ax,'Position',[735 140 16 340],'FaceColor',[.95 .95 .9],'EdgeColor','none',o{:});
for k = 1:8
    s.g.grid(k) = rectangle(ax,'Position',[735+mod(k,2)*8 140+42*(k-1) 8 42], ...
        'FaceColor',[.05 .05 .05],'EdgeColor','none',o{:});
end
% Grandstands frame the straight; every spectator is pre-created pixel art.
s.g.standTop = rectangle(ax,'Position',[170 118 520 20],'FaceColor',[.44 .46 .48],'EdgeColor',[.85 .85 .8],'LineWidth',2,o{:});
s.g.standBot = rectangle(ax,'Position',[170 482 520 20],'FaceColor',[.44 .46 .48],'EdgeColor',[.85 .85 .8],'LineWidth',2,o{:});
fan = {[1 .25 .18],[1 .82 .15],[.15 .8 .95],[.94 .94 .9],[.25 .9 .35]};
for k = 1:26
    x = 180+19*(k-1); c = fan{mod(k-1,5)+1};
    s.g.fanTop(k) = rectangle(ax,'Position',[x 105+mod(k,2)*5 11 13],'FaceColor',c,'EdgeColor','none',o{:});
    s.g.fanBot(k) = rectangle(ax,'Position',[x 502+mod(k,2)*5 11 13],'FaceColor',c,'EdgeColor','none',o{:});
end
% Formula-style overhead cars: wings, exposed tyres, cockpit, and long nose.
c = {[1 .34 .04],[.9 .08 .06],[.08 .68 .22],[.72 .74 .76],[.06 .35 .95],[1 .78 .05]};
for k = 1:6
    y = 155+52*(k-1);
    s.g.body(k) = rectangle(ax,'Position',[55 y+10 48 22],'Curvature',[.2 .2],'FaceColor',c{k},'EdgeColor','w','LineWidth',1,o{:});
    s.g.nose(k) = rectangle(ax,'Position',[100 y+16 38 10],'FaceColor',c{k},'EdgeColor','none',o{:});
    s.g.rear(k) = rectangle(ax,'Position',[48 y+4 9 34],'FaceColor',c{k},'EdgeColor','none',o{:});
    s.g.front(k) = rectangle(ax,'Position',[137 y+5 8 32],'FaceColor',c{k},'EdgeColor','none',o{:});
    s.g.c(k) = rectangle(ax,'Position',[71 y+14 18 14],'Curvature',[.5 .5],'FaceColor',[.04 .06 .08],'EdgeColor','none',o{:});
    s.g.w1(k) = rectangle(ax,'Position',[63 y 13 8],'FaceColor',[.01 .01 .01],'EdgeColor','none',o{:});
    s.g.w2(k) = rectangle(ax,'Position',[63 y+34 13 8],'FaceColor',[.01 .01 .01],'EdgeColor','none',o{:});
    s.g.w3(k) = rectangle(ax,'Position',[108 y 13 8],'FaceColor',[.01 .01 .01],'EdgeColor','none',o{:});
    s.g.w4(k) = rectangle(ax,'Position',[108 y+34 13 8],'FaceColor',[.01 .01 .01],'EdgeColor','none',o{:});
end
for k = 1:6
    s.g.team(k) = text(ax,440,181+52*(k-1),s.names{k},'Color','w', ...
        'FontName','Courier New','FontWeight','bold','FontSize',18, ...
        'HorizontalAlignment','center',o{:});
end
for k = 1:5
    s.g.light(k) = rectangle(ax,'Position',[270+55*(k-1) 73 38 38], ...
        'Curvature',[1 1],'FaceColor',[.13 .035 .035],'EdgeColor',[.45 .45 .4], ...
        'LineWidth',3,o{:});
end
s.g.bar = rectangle(ax,'Position',[245 52 290 80],'FaceColor',[.08 .09 .1], ...
    'EdgeColor',[.7 .7 .64],'LineWidth',4,o{:});
for k = 1:5, uistack(s.g.light(k),'top'); end
s.g.title = text(ax,400,30,'LIGHTS OUT','Color',[1 .82 .22],'FontName','Courier New', ...
    'FontWeight','bold','FontSize',25,'HorizontalAlignment','center',o{:});
s.g.hud = text(ax,25,525,'','Color','w','FontName','Courier New','FontWeight','bold','FontSize',18,o{:});
s.g.msg = text(ax,400,545,'','Color',[1 .9 .35],'FontName','Courier New', ...
    'FontWeight','bold','FontSize',23,'HorizontalAlignment','center',o{:});
s.g.sub = text(ax,400,578,'','Color',[.82 .94 1],'FontName','Courier New', ...
    'FontSize',16,'HorizontalAlignment','center',o{:});
s.g.board = rectangle(ax,'Position',[220 150 360 310],'FaceColor',[.025 .04 .07], ...
    'EdgeColor',[1 .78 .2],'LineWidth',4,'Visible','off',o{:});
s.g.bt = text(ax,400,185,'LEADERBOARD','Color',[1 .82 .2], ...
    'FontName','Courier New','FontWeight','bold','FontSize',22, ...
    'HorizontalAlignment','center','Visible','off',o{:});
for k = 1:6
    s.g.rank(k) = text(ax,265,215+37*(k-1),'','Color','w','FontName','Courier New', ...
        'FontWeight','bold','FontSize',16,'Visible','off',o{:});
end
end

function s = updateState(s,dt,pressed)
if s.phase == 0
    if pressed, s.phase = 1; s.t = 0; end
    return
end
if s.phase == 1
    s.t = s.t + dt;
    if s.t >= 3, s.phase = 2; s.goT = 0; end
    if pressed, s.phase = 4; s.result = 'FALSE START!'; end
    return
end
if s.phase == 2
    s.goT = s.goT + dt;
    if pressed
        s.go(1) = true; s.react = s.goT;
    end
    for k = 2:6
        if s.goT >= s.startT(k), s.go(k) = true; end
    end
    for k = 1:6
        if s.go(k)
            v = 370; if k == 6 && s.rival, v = 460; end
            s.carX(k) = s.carX(k) + v*dt;
        end
    end
    if max(s.carX) >= 720
        s.phase = 4;
        if s.carX(1) >= max(s.carX(2:6)), s.result = 'YOU WIN!'; else, s.result = 'NPC WINS!'; end
        [~,s.order] = sort(s.carX,'descend'); s.endT = 0;
    end
    return
end
if s.phase == 4
    s.endT = s.endT + dt;
    if pressed, s = resetRace(s); end
end
end

function renderFrame(~,s)
for k = 1:6
    x = s.carX(k); y = 155+52*(k-1);
    s.g.body(k).Position = [x y+10 48 22]; s.g.nose(k).Position = [x+45 y+16 38 10];
    s.g.rear(k).Position = [x-7 y+4 9 34]; s.g.front(k).Position = [x+82 y+5 8 32];
    s.g.c(k).Position = [x+16 y+14 18 14];
    s.g.w1(k).Position = [x+8 y 13 8]; s.g.w2(k).Position = [x+8 y+34 13 8];
    s.g.w3(k).Position = [x+53 y 13 8]; s.g.w4(k).Position = [x+53 y+34 13 8];
end
for k = 1:6, s.g.team(k).Visible = offon(s.phase == 0); end
lit = 0; if s.phase == 1, lit = min(5,floor(s.t/.6)+1); end
for k = 1:5
    if k <= lit, s.g.light(k).FaceColor = [1 .04 .03]; else, s.g.light(k).FaceColor = [.13 .035 .035]; end
    s.g.light(k).Visible = offon(s.phase < 2);
end
s.g.bar.Visible = offon(s.phase < 2);
if s.phase == 0
    s.g.hud.String = '';
    s.g.msg.String = 'TAP TO STAGE';
    s.g.sub.String = 'Wait for lights-out.';
elseif s.phase == 1
    s.g.hud.String = 'HOLD YOUR NERVE...';
    s.g.msg.String = ''; s.g.sub.String = '';
elseif s.phase == 2
    if s.go(1), t = s.react; else, t = s.goT; end
    s.g.hud.String = sprintf('REACTION TIMER: %.3f s',t);
    if s.go(1), s.g.msg.String = 'FULL THROTTLE!'; else, s.g.msg.String = 'LIGHTS OUT — TAP NOW!'; end
    if s.rival, s.g.sub.String = 'YELLOW RIVAL!'; else, s.g.sub.String = ''; end
else
    s.g.hud.String = 'FINISH LINE';
    s.g.msg.String = s.result;
    if strcmp(s.result,'YOU WIN!')
        s.g.sub.String = sprintf('Reaction: %.3f s     Tap to race again',s.react);
    elseif strcmp(s.result,'FALSE START!')
        s.g.sub.String = 'You moved before lights-out. Tap to retry.';
    else
        if s.rival, s.g.sub.String = 'Yellow rival wins. Tap to retry.'; else, s.g.sub.String = 'NPC wins. Tap to retry.'; end
    end
end
b = s.phase == 4 && ~strcmp(s.result,'FALSE START!');
s.g.board.Visible = offon(b); s.g.bt.Visible = offon(b);
for k = 1:6
    r = b && s.endT >= .18*(k-1);
    s.g.rank(k).Visible = offon(r);
    s.g.rank(k).String = sprintf('%d.  %s',k,s.names{s.order(k)});
end
end

function s = resetRace(s)
s.phase = 0; s.t = 0; s.goT = 0; s.carX = 55*ones(1,6);
s.go = false(1,6); s.result = ''; s.react = 0;
s.endT = 0; s.order = 1:6;
s.rival = rand < .25; s.startT = [0 .25 .3 .4 .5 .2];
if s.rival, s.startT(6) = 0; end
end

function v = offon(tf)
if tf, v = 'on'; else, v = 'off'; end
end
Play Game
Preview

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