RFO : remove from orbit

Bhashkar Fulara
/
RFO : remove from orbit
about 6 hours ago
0
6
3
0
8445
game.m
function g = game()
% AFTERGLOW - two orbits, one instinct.
g.init   = @initState;
g.update = @updateState;
g.render = @renderFrame;
end

function state = initState(ax)
% A small hand-built arcade world: quiet colors, clear hazards, warm rewards.
ax.XLim = [0 800];
ax.YLim = [0 600];
ax.YDir = 'reverse';
ax.Color = [0.035 0.050 0.080];
ax.DataAspectRatio = [1 1 1];

state.cx = 400;
state.cy = 300;
state.radii = [150 205];
state.flash = 0;

% Fine points of light in the distance.
plot(ax,[42 96 174 238 310 368 455 522 594 661 744 780 124 286 496 708], ...
        [92 188 54 438 132 526 78 468 176 64 386 520 344 270 334 248],'.', ...
        'Color',[0.32 0.43 0.53],'MarkerSize',7, ...
        'HitTest','off','PickableParts','none');
plot(ax,[73 207 337 571 630 735],[292 80 570 92 548 150],'.', ...
        'Color',[0.58 0.65 0.68],'MarkerSize',3, ...
        'HitTest','off','PickableParts','none');

% The two safe paths.
rectangle(ax,'Position',[state.cx-150 state.cy-150 300 300], ...
    'Curvature',[1 1],'FaceColor','none','EdgeColor',[0.16 0.27 0.34], ...
    'LineWidth',1.5,'HitTest','off','PickableParts','none');
rectangle(ax,'Position',[state.cx-205 state.cy-205 410 410], ...
    'Curvature',[1 1],'FaceColor','none','EdgeColor',[0.12 0.21 0.29], ...
    'LineWidth',1.5,'HitTest','off','PickableParts','none');
rectangle(ax,'Position',[state.cx-224 state.cy-224 448 448], ...
    'Curvature',[1 1],'FaceColor','none','EdgeColor',[0.09 0.16 0.23], ...
    'LineStyle',':','LineWidth',1,'HitTest','off','PickableParts','none');

% The quiet little sun at the center.
rectangle(ax,'Position',[state.cx-31 state.cy-31 62 62], ...
    'Curvature',[1 1],'FaceColor',[0.15 0.22 0.27], ...
    'EdgeColor',[0.40 0.57 0.59],'LineWidth',1.2, ...
    'HitTest','off','PickableParts','none');
rectangle(ax,'Position',[state.cx-12 state.cy-12 24 24], ...
    'Curvature',[1 1],'FaceColor',[1.00 0.72 0.36], ...
    'EdgeColor',[1.00 0.86 0.58],'LineWidth',1, ...
    'HitTest','off','PickableParts','none');

% One line object per class; renderFrame only changes its data.
n = 9;
state.hazards = plot(ax,nan(1,n),nan(1,n),'d','LineStyle','none', ...
    'MarkerSize',10,'MarkerFaceColor',[0.98 0.37 0.29], ...
    'MarkerEdgeColor',[1.00 0.73 0.56], ...
    'HitTest','off','PickableParts','none');
state.glints = plot(ax,nan(1,n),nan(1,n),'o','LineStyle','none', ...
    'MarkerSize',8,'MarkerFaceColor',[1.00 0.78 0.38], ...
    'MarkerEdgeColor',[1.00 0.93 0.68], ...
    'HitTest','off','PickableParts','none');
state.playerAura = plot(ax,nan,nan,'o','LineStyle','none', ...
    'MarkerSize',25,'MarkerFaceColor',[0.15 0.49 0.49], ...
    'MarkerEdgeColor','none','HitTest','off','PickableParts','none');
state.player = plot(ax,nan,nan,'o','LineStyle','none', ...
    'MarkerSize',11,'MarkerFaceColor',[0.91 0.96 0.88], ...
    'MarkerEdgeColor',[1 1 1],'LineWidth',1.4, ...
    'HitTest','off','PickableParts','none');

% The lettering is deliberately spare: the playfield stays the hero.
state.heading = text(ax,400,34,'AFTERGLOW','Color',[0.91 0.94 0.88], ...
    'FontName','Arial','FontSize',19,'FontWeight','bold', ...
    'HorizontalAlignment','center','HitTest','off','PickableParts','none');
state.scoreText = text(ax,34,42,'SCORE  0','Color',[0.62 0.75 0.76], ...
    'FontName','Arial','FontSize',11,'FontWeight','bold', ...
    'HitTest','off','PickableParts','none');
state.comboText = text(ax,766,42,'RHYTHM  x1','Color',[0.98 0.76 0.43], ...
    'FontName','Arial','FontSize',11,'FontWeight','bold', ...
    'HorizontalAlignment','right','HitTest','off','PickableParts','none');
state.message = text(ax,400,76,'TWO ORBITS. ONE INSTINCT.', ...
    'Color',[0.48 0.63 0.67],'FontName','Arial','FontSize',10, ...
    'HorizontalAlignment','center','HitTest','off','PickableParts','none');
state.footer = text(ax,400,565,'TAP / SPACE TO BEGIN', ...
    'Color',[0.78 0.86 0.81],'FontName','Arial','FontSize',12, ...
    'FontWeight','bold','HorizontalAlignment','center', ...
    'HitTest','off','PickableParts','none');
state.centerNote = text(ax,400,337,'STAY IN THE LIGHT', ...
    'Color',[0.43 0.58 0.61],'FontName','Arial','FontSize',8, ...
    'HorizontalAlignment','center','HitTest','off','PickableParts','none');

state = resetRun(state,false);
end

function state = resetRun(state,active)
state.started = active;
state.dead = false;
state.t = 0;
state.speed = 1.20;
state.playerLane = 1;
state.angle = [0.70 1.31 1.92 2.53 3.14 3.75 4.36 4.97 5.58];
state.objLane = [1 2 1 2 1 2 1 1 2];
state.objKind = [1 1 2 1 1 2 1 2 1]; % 1 = hot fragment, 2 = glint
state.lanePattern = [1 2 1 2 2 1 1 2 1 2 1 2 2 1 2 1];
state.kindPattern = [1 1 2 1 2 1 1 2 1 1 2 1 1 2 1 2];
state.patternIndex = 1;
state.combo = 0;
state.fragments = 0;
state.nearMisses = 0;
state.bonus = 0;
state.score = 0;
state.flash = 0;
end

function state = updateState(state,dt,pressed)
if state.dead
    if pressed
        state = resetRun(state,true);
    end
    return
end
if ~state.started
    if pressed
        state.started = true;
        state.flash = 0.18;
    end
    return
end

if pressed
    state.playerLane = 3-state.playerLane;
    state.flash = 0.18;
end
state.flash = max(0,state.flash-dt);
state.t = state.t+dt;
state.speed = min(2.10,1.20+0.012*state.t);
state.score = floor(state.t*8)+state.bonus;

for k = 1:numel(state.angle)
    state.angle(k) = state.angle(k)+state.speed*dt;
    if state.angle(k) >= 2*pi
        state.angle(k) = state.angle(k)-2*pi+0.15;
        if state.objKind(k) == 1
            if state.objLane(k) == state.playerLane
                state.dead = true;
                break
            else
                state.combo = min(9,state.combo+1);
                state.bonus = state.bonus+8*state.combo;
                state.nearMisses = state.nearMisses+1;
            end
        else
            if state.objLane(k) == state.playerLane
                state.fragments = state.fragments+1;
                state.combo = min(9,state.combo+1);
                state.bonus = state.bonus+25*state.combo;
            else
                state.combo = 0;
            end
        end
        state.objLane(k) = state.lanePattern(state.patternIndex);
        state.objKind(k) = state.kindPattern(state.patternIndex);
        state.patternIndex = state.patternIndex+1;
        if state.patternIndex > numel(state.lanePattern)
            state.patternIndex = 1;
        end
    end
end
state.score = floor(state.t*8)+state.bonus;
end

function renderFrame(~,state)
n = numel(state.angle);
hx = nan(1,n); hy = nan(1,n);
gx = nan(1,n); gy = nan(1,n);
for k = 1:n
    r = state.radii(state.objLane(k));
    x = state.cx+r*cos(state.angle(k));
    y = state.cy+r*sin(state.angle(k));
    if state.objKind(k) == 1
        hx(k) = x; hy(k) = y;
    else
        gx(k) = x; gy(k) = y;
    end
end
state.hazards.XData = hx;
state.hazards.YData = hy;
state.glints.XData = gx;
state.glints.YData = gy;

r = state.radii(state.playerLane);
px = state.cx+r;
py = state.cy;
state.playerAura.XData = px;
state.playerAura.YData = py;
state.playerAura.MarkerSize = 22+18*state.flash;
state.player.XData = px;
state.player.YData = py;

state.scoreText.String = ['SCORE  ' num2str(state.score)];
state.comboText.String = ['RHYTHM  x' num2str(state.combo+1)];
if ~state.started
    state.message.String = 'TWO ORBITS. ONE INSTINCT.';
    state.footer.String = 'TAP / SPACE TO BEGIN';
    state.centerNote.String = 'STAY IN THE LIGHT';
elseif state.dead
    state.message.String = 'YOU KEPT THE SIGNAL ALIVE';
    state.footer.String = ['TAP TO TRY AGAIN   |   GLINTS  ' num2str(state.fragments)];
    state.centerNote.String = ['FINAL SCORE  ' num2str(state.score)];
else
    state.message.String = 'TAP TO CHANGE ORBIT';
    state.footer.String = 'DODGE THE HOT FRAGMENTS  -  CATCH THE GOLD GLINTS';
    state.centerNote.String = ['GLINTS  ' num2str(state.fragments)];
end
end
Play Game
Preview

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