FOLD — One Button, Two Worlds - MATLAB One-Button Game Mini Hack

Roatis
/
FOLD — One Button, Two Worlds
about 8 hours ago
2
23
6
0
9461
game.m
function g=game()
g.init=@initState;g.update=@updateState;g.render=@renderFrame;
end

function s=initState(ax)
ax.YDir='reverse';ax.Color=[.025 .038 .075];
D=[0 170;290 620;740 800];
for i=1:3
R(ax,[D(i,1) 440 D(i,2)-D(i,1) 160],[.10 .15 .23]);
end
D=[168 295;340 465;505 520];
for i=1:3
R(ax,[D(i,1) 320 D(i,2)-D(i,1) 14],[.15 .27 .38]);
end
R(ax,[340 345 30 95],[.8 .17 .27]);
h=R(ax,[769 367 22 73],[.12 .44 .34]);h.EdgeColor=[.46 1 .73];h.LineWidth=2;
for i=1:2
s.fill(i)=R(ax,[0 320 10 14],[.15 .27 .38]);
s.upper(i)=P(ax);s.lower(i)=P(ax);
end
for i=1:3
s.gate(i)=R(ax,[0 250 16 70],[.85 .36 .96]);
end
s.player=R(ax,[52 416 24 24],[.98 .99 1]);
h=T(ax,400,55,'F O L D',[.9 .97 1],33);h.FontWeight='bold';
T(ax,400,91,'ONE BUTTON / TWO WORLDS',[.5 .67 .83],11);
s.title=T(ax,400,128,'',[.8 .86 .95],11);
s.hud=T(ax,400,160,'',[.16 .83 .98],15);
s.stats=T(ax,400,193,'',[.73 .82 .93],11);
s.info=T(ax,400,237,'',[1 1 1],17);
T(ax,400,560,'SPACE / CLICK TO FOLD',[.57 .76 .89],11);
s.names={'THE FIRST FOLD','DOUBLE PHASE','VERTICAL ESCAPE','THE TRAP','CHAIN REACTION','FINAL PARADOX'};
s.pos=[405 0;300 430;395 0;395 0;395 0;395 0];
s.phase=[1 0;1 0;1 0;0 0;0 0;1 0];
s.active=[0 0;0 0;1 0;1 1;1 1;1 1];
s.need=[0 0;0 0;1 0;0 0;0 1;1 0];
s.goal=[1 1 1 1 0 1];s.lowGate=[0 0 0 0 1 1];
s.lowPhase=[0 0 0 0 1 0];s.speeds=[90 95 97 100 101 102];
s.level=1;s.total=0;s.foldsTotal=0;s.deaths=0;
s=restartLevel(s);s.mode=0;
end

function s=restartLevel(s)
s.x=52;s.y=416;s.vy=0;s.world=0;s.mode=1;s.rider=0;
s.dist=0;s.cooldown=0;s.time=0;s.folds=0;s.top=false;
s.angle=[0 (s.goal(s.level)~=0)*pi/2];s.target=s.angle;
s.ua=pi/2*s.active(s.level,:).*s.need(s.level,:);s.ut=s.ua;
s.gx=[s.pos(s.level,:) 590*s.lowGate(s.level)];
s.gphase=[s.phase(s.level,:) s.lowPhase(s.level)];
end

function s=updateState(s,dt,pressed)
if s.mode==0
if pressed,s.mode=1;end
return
elseif s.mode==2
if pressed,s=restartLevel(s);end
return
elseif s.mode==3
s.wait=s.wait+dt;
if s.wait>=1.1
if s.level==6,s.mode=4;else,s.level=s.level+1;s=restartLevel(s);end
end
return
elseif s.mode==4
if pressed
s.level=1;s.total=0;s.foldsTotal=0;s.deaths=0;s=restartLevel(s);s.mode=0;
end
return
end
s.time=s.time+dt;s.total=s.total+dt;
s.cooldown=max(0,s.cooldown-dt);
if pressed && s.cooldown<=0
f=s.x+12;
if s.world==0 && s.rider==0 && f>=170 && f<=290 && abs(s.y+24-440)<3 && s.vy==0 && s.angle(1)<.1
s.rider=1;s.dist=f-170;
end
s.world=1-s.world;
s.target=pi/2*[s.world s.world~=s.goal(s.level)];
s.ut=pi/2*s.active(s.level,:).*(s.world~=s.need(s.level,:));
s.cooldown=.28;s.folds=s.folds+1;s.foldsTotal=s.foldsTotal+1;
end
s.angle=s.angle+max(-5*dt,min(5*dt,s.target-s.angle));
s.ua=s.ua+max(-5*dt,min(5*dt,s.ut-s.ua));
if s.rider==1
s.dist=min(120,s.dist+240*dt);a=s.angle(1);
s.x=170+s.dist*cos(a)-12;s.y=440-s.dist*sin(a)-24;s.vy=0;
if a>=pi/2-.01 && s.dist>=119
s.rider=0;s.x=158;s.y=296;s.top=true;
elseif a<.02 && s.target(1)==0
s.rider=0;
end
else
s.x=s.x+s.speeds(s.level)*dt;
b=s.y+24;s.vy=s.vy+900*dt;s.y=s.y+s.vy*dt;f=s.x+12;
u=(f>=168 && f<=295)||(f>=340 && f<=465)||(f>=505 && f<=520);
for i=1:2
x=[295 465];L=[45 40];
if f>=x(i) && f<=x(i)+L(i) && (~s.active(s.level,i)||s.ua(i)<.1)
u=true;
end
end
if u && b<=320 && s.y+24>=320 && s.vy>=0 && f>=168 && f<=520
s.y=296;s.vy=0;
else
low=f<=170||(f>=290 && f<=620)||f>=740;
if (f>=170 && f<=290 && s.angle(1)<.08)||(f>=620 && f<=740 && s.angle(2)<.08)
low=true;
end
if low && b<=440 && s.y+24>=440 && s.vy>=0
s.y=416;s.vy=0;
end
end
end
if (s.top && s.x>180 && s.x<495 && s.y+24>331)||hit(s.x,s.y,340,345,30,95)
s.mode=2;
end
for i=1:3
if s.gx(i)>0 && s.world==s.gphase(i)
y=250;h=70;
if i==3,y=350;h=90;end
if hit(s.x,s.y,s.gx(i),y,16,h),s.mode=2;end
end
end
for i=1:2
a=s.angle(i);x=[170 620];
if i~=s.rider && a>.5 && hit(s.x,s.y,x(i),440-120*sin(a),18+120*cos(a),120*sin(a))
s.mode=2;
end
x=[295 465];L=[45 40];a=s.ua(i);
if s.active(s.level,i) && a>.5 && hit(s.x,s.y,x(i),320-L(i)*sin(a),12+L(i)*cos(a),L(i)*sin(a))
s.mode=2;
end
end
if s.y>600
s.mode=2;
elseif s.mode==1 && s.x>=769 && s.y+24>=435 && s.y+24<=442
s.mode=3;s.wait=0;
end
if s.mode==2,s.deaths=s.deaths+1;end
end

function renderFrame(~,s)
s.player.Position=[s.x s.y 24 24];
for i=1:2
x=[170 620];
[px,py]=rot(x(i),120,s.angle(i),440,16);
s.lower(i).XData=px;s.lower(i).YData=py;
s.lower(i).FaceColor=[.16 .83 .98]*(1-s.angle(i)/(pi/2))+[.85 .36 .96]*s.angle(i)/(pi/2);
x=[295 465];L=[45 40];
if s.active(s.level,i)
s.fill(i).Visible='off';s.upper(i).Visible='on';
[px,py]=rot(x(i),L(i),s.ua(i),320,14);
s.upper(i).XData=px;s.upper(i).YData=py;
else
s.fill(i).Visible='on';s.fill(i).Position=[x(i) 320 L(i) 14];s.upper(i).Visible='off';
end
end
for i=1:3
x=s.gx(i);
if x==0
s.gate(i).Visible='off';
else
y=250;h=70;if i==3,y=350;h=90;end
s.gate(i).Position=[x y 16 h];
if s.world==s.gphase(i),s.gate(i).Visible='on';else,s.gate(i).Visible='off';end
end
end
if s.world==0
s.hud.String='WORLD A';s.hud.Color=[.16 .83 .98];
else
s.hud.String='WORLD B';s.hud.Color=[.85 .36 .96];
end
s.title.String=sprintf('LEVEL %d / 6   %s',s.level,s.names{s.level});
s.stats.String=sprintf('TIME %.1f  FOLDS %d  FAILS %d',s.time,s.folds,s.deaths);
if s.mode==0
s.title.String='6 LEVELS / ONE BUTTON';
s.stats.String='SPACE / CLICK TO BEGIN';
s.info.String='PRESS SPACE TO START';
elseif s.mode==2
s.info.String='GAME OVER - SPACE TO RETRY';
elseif s.mode==3
s.info.String='LEVEL COMPLETE';
elseif s.mode==4
s.info.String=sprintf('COMPLETE %.1f s | %d FOLDS | %d FAILS',s.total,s.foldsTotal,s.deaths);
else
s.info.String='';
end
end

function [px,py]=rot(x,L,a,y,w)
px=[x x+L*cos(a) x+L*cos(a)+w*sin(a) x+w*sin(a)];
py=[y y-L*sin(a) y-L*sin(a)+w*cos(a) y+w*cos(a)];
end

function q=hit(x,y,rx,ry,rw,rh)
q=x<rx+rw && x+24>rx && y<ry+rh && y+24>ry;
end

function h=R(ax,pos,c)
h=rectangle(ax,'Position',pos,'FaceColor',c,'EdgeColor','none','HitTest','off','PickableParts','none');
end

function h=T(ax,x,y,str,c,sz)
h=text(ax,x,y,str,'Color',c,'FontSize',sz,'HorizontalAlignment','center','HitTest','off','PickableParts','none');
end

function h=P(ax)
h=patch(ax,[0 1 1 0],[0 0 1 1],[.16 .83 .98],'EdgeColor','none','HitTest','off','PickableParts','none');
end
Play Game
Preview

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