Under Siege

Hannah U
/
Under Siege
about 21 hours ago
3
9
2
0
7865
game.m
function g = game()
g.init = @initState;
g.update = @updateState;
g.render = @renderFrame;
end

function s = initState(ax)
s.w = 800; s.h = 600; s.t = 0; s.score = 0; s.level = 6;
s.build = 0; s.started = false; s.over = false; s.win = false;
s.active = false; s.rx = 145; s.ry = 475; s.rv = 0; s.rs = 0;
ax.YDir = 'reverse'; ax.Color = [.035 .045 .09];
s.g.sky = rectangle(ax,'Position',[0 0 800 600],'FaceColor',[.035 .045 .09],...
    'EdgeColor','none','HitTest','off','PickableParts','none');
s.g.stars = line(ax,[35 82 155 230 305 372 442 510 578 650 726 775],...
    [72 155 48 112 78 174 55 125 40 158 92 61],'LineStyle','none',...
    'Marker','.','MarkerSize',16,'Color',[.96 .91 .66],...
    'HitTest','off','PickableParts','none');
s.g.stars2 = line(ax,[55 122 197 270 342 410 478 545 612 687 748],...
    [235 205 190 245 225 270 198 245 218 260 195],'LineStyle','none',...
    'Marker','.','MarkerSize',10,'Color',[.56 .72 .92],...
    'HitTest','off','PickableParts','none');
for k=1:9
    cx = 120+mod(k-1,3)*260; cy = 145+floor((k-1)/3)*35;
    s.g.cloud(k) = rectangle(ax,'Position',[cx+mod(k,3)*18 cy 78 24],...
        'Curvature',[1 1],'FaceColor',[.12 .16 .27],'EdgeColor','none',...
        'HitTest','off','PickableParts','none');
end
s.g.moon = rectangle(ax,'Position',[100 65 70 70],'Curvature',[1 1],...
    'FaceColor',[.92 .88 .65],'EdgeColor','none','HitTest','off','PickableParts','none');
s.g.ground = rectangle(ax,'Position',[0 520 800 80],'FaceColor',[.10 .16 .12],...
    'EdgeColor','none','HitTest','off','PickableParts','none');
s.g.personHead = rectangle(ax,'Position',[73 432 18 18],'Curvature',[1 1],...
    'FaceColor',[.92 .67 .46],'EdgeColor','none','HitTest','off','PickableParts','none');
s.g.personBody = line(ax,[82 82],[450 488],'Color',[.24 .34 .52],'LineWidth',9,...
    'HitTest','off','PickableParts','none');
s.g.personArms = line(ax,[82 65 99],[460 472 468],'Color',[.92 .67 .46],...
    'LineWidth',4,'HitTest','off','PickableParts','none');
s.g.personLegs = line(ax,[82 70 94],[486 505 505],'Color',[.16 .20 .31],...
    'LineWidth',5,'HitTest','off','PickableParts','none');
s.g.cat = patch(ax,[55 115 145],[510 510 465],[.42 .22 .10],...
    'EdgeColor',[.75 .48 .22],'LineWidth',3,'HitTest','off','PickableParts','none');
s.g.arm = line(ax,[110 150],[492 455],'Color',[.78 .53 .25],'LineWidth',7,...
    'HitTest','off','PickableParts','none');
s.g.rock = rectangle(ax,'Position',[0 0 1 1],'Curvature',[1 1],...
    'FaceColor',[.55 .56 .60],'EdgeColor',[.8 .8 .85],'LineWidth',1,...
    'Visible','off','HitTest','off','PickableParts','none');
s.g.wall = rectangle(ax,'Position',[605 350 145 170],'FaceColor',[.34 .36 .42],...
    'EdgeColor',[.65 .66 .70],'LineWidth',2,'HitTest','off','PickableParts','none');
s.g.tower(1) = rectangle(ax,'Position',[590 300 55 220],'FaceColor',[.29 .31 .37],...
    'EdgeColor',[.65 .66 .70],'LineWidth',2,'HitTest','off','PickableParts','none');
s.g.tower(2) = rectangle(ax,'Position',[720 300 55 220],'FaceColor',[.29 .31 .37],...
    'EdgeColor',[.65 .66 .70],'LineWidth',2,'HitTest','off','PickableParts','none');
for k=1:10
    s.g.brick(k) = rectangle(ax,'Position',[0 0 1 1],'FaceColor',[.50 .51 .57],...
        'EdgeColor',[.22 .23 .28],'Visible','off','HitTest','off','PickableParts','none');
end
s.g.gate = rectangle(ax,'Position',[655 455 45 65],'Curvature',[.5 0],...
    'FaceColor',[.12 .08 .06],'EdgeColor','none','HitTest','off','PickableParts','none');
s.g.meter = line(ax,[35 35],[130 300],'Color',[.65 .65 .72],'LineWidth',5,...
    'HitTest','off','PickableParts','none');
s.g.target = line(ax,[18 52],[207 207],'Color',[1 .75 .16],'LineWidth',8,...
    'HitTest','off','PickableParts','none');
s.g.marker = line(ax,[20 50],[130 130],'Color',[.3 1 .65],'LineWidth',5,...
    'HitTest','off','PickableParts','none');
s.g.hud = text(ax,70,35,'','Color',[1 .86 .45],'FontSize',16,'FontWeight','bold',...
    'HitTest','off','PickableParts','none');
s.g.tip = text(ax,400,555,'','Color',[.82 .84 .92],'FontSize',14,...
    'HorizontalAlignment','center','HitTest','off','PickableParts','none');
s.g.msg = text(ax,400,250,'','Color','w','FontSize',25,'FontWeight','bold',...
    'HorizontalAlignment','center','HitTest','off','PickableParts','none');
end

function s = updateState(s,dt,pressed)
s.t = s.t+dt;
if s.over
    if pressed, s = resetRound(s); end
    return
end
if ~s.started
    if pressed, s.started = true; end
    return
end
s.build = s.build+dt;
if s.build>1.25
    s.build = 0; s.level = min(10,s.level+1);
end
if pressed && ~s.active
    speed = 5.5;
    y = 130+170*(.5+.5*sin(s.t*speed));
    yp = 130+170*(.5+.5*sin((s.t-dt)*speed));
    d = min(abs(y-207),abs(yp-207));
    if (y-207)*(yp-207)<0, d = 0; end
    a = max(0,1-d/24);
    s.rs = 10+30*a; s.rx = 145; s.ry = 475-s.rs/2;
    s.rv = -315-70*a; s.active = true;
end
if s.active
    s.rx = s.rx+(365+s.rs*2)*dt;
    s.ry = s.ry+s.rv*dt; s.rv = s.rv+430*dt;
    if s.rx+s.rs>605
        s.active = false; hit = max(1,round(s.rs/10));
        s.level = s.level-hit; s.score = s.score+hit*10;
        if s.level<=0, s.level = 0; s.over = true; s.win = true; end
    elseif s.ry>540 || s.rx>800
        s.active = false;
    end
end
end

function renderFrame(~,s)
for k=1:10
    if k<=s.level
        row = ceil(k/3); col = mod(k-1,3);
        s.g.brick(k).Position = [615+col*43 500-row*27 39 23];
        s.g.brick(k).Visible = 'on';
    else
        s.g.brick(k).Visible = 'off';
    end
end
h = 65+s.level*12;
s.g.wall.Position = [605 520-h 145 h];
s.g.tower(1).Position = [590 500-h 55 h+20];
s.g.tower(2).Position = [720 500-h 55 h+20];
if s.level>0, s.g.gate.Visible = 'on'; else, s.g.gate.Visible = 'off'; end
speed = 5.5;
y = 130+170*(.5+.5*sin(s.t*speed));
s.g.marker.YData = [y y];
s.g.hud.String = sprintf('SIEGE SCORE %d    FORTRESS %d / 10',s.score,s.level);
if s.active
    s.g.rock.Visible = 'on';
else
    s.g.rock.Visible = 'off';
end
s.g.rock.Position = [s.rx-s.rs/2 s.ry-s.rs/2 s.rs s.rs];
if ~s.started
    s.g.msg.String = 'THE FORTRESS AWAITS';
    s.g.tip.String = 'PRESS SPACE OR CLICK TO ARM THE CATAPULT';
elseif s.over
    s.g.msg.String = 'THE GATE HAS FALLEN!';
    s.g.tip.String = 'PRESS SPACE OR CLICK TO LAY SIEGE AGAIN';
else
    s.g.msg.String = '';
    s.g.tip.String = 'TIME THE BUTTON AS GREEN PASSES GOLD FOR LARGER ROCKS — ONE ROCK AT A TIME';
end
end

function s = resetRound(s)
s.t = 0; s.score = 0; s.level = 6; s.build = 0; s.started = false;
s.over = false; s.win = false; s.active = false; s.rs = 0;
end
Play Game
Preview

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