Try to Be a Master of Memory

越竣
/
Try to Be a Master of Memory
about 11 hours ago
0
3
0
0
9458
game.m
function g=game(),g.init=@initGame;g.update=@updateGame;g.render=@renderGame;end

function s=initGame(ax)
rng('shuffle');ax.XLim=[0 800];ax.YLim=[0 600];ax.YDir='reverse';ax.Color=[.06 .08 .13];
s.cols={'red','blue','green','gold','silver','pink','black','white'};
s.ani={'fox','cat','dog','bird','fish','horse','mouse','tiger','rabbit','duck','wolf','frog'};
s.vrb={'jumps','runs','flies','swims','sings','dances','paints','reads','eats','sleeps'};
s.num={'one','two','three','four','five','six','seven','eight','nine','ten'};
s.adj={'happy','lazy','tiny','giant','brave','quick','sad','proud','shiny','dark'};
s.obj={'box','tree','book','ball','house','star','moon','cake','ship','door','rock','cup'};
s.level=1;s.time=0;s.err=0;s.finished=false;s.prev=false;s.ck=tic;
s.fig=ancestor(ax,'figure');setappdata(s.fig,'t',false);
pk=get(s.fig,'WindowKeyPressFcn');pb=get(s.fig,'WindowButtonDownFcn');
set(s.fig,'WindowKeyPressFcn',@(f,e)tc(f,e,pk));set(s.fig,'WindowButtonDownFcn',@(f,e)tc(f,e,pb));
s.fr=makeChar();s.jt=0;s.dc=0;
s.ci=image(ax,s.fr{1},'XData',[20 92],'YData',[392 488],'Visible','off','HitTest','off');
s.lb=text(ax,400,35,'','Color',[.8 .95 1],'HorizontalAlignment','center','FontSize',18,'FontWeight','bold','HitTest','off');
s.st=text(ax,400,250,'','Color',[.95 1 .95],'HorizontalAlignment','center','VerticalAlignment','middle','FontSize',26,'FontWeight','bold','HitTest','off');
gx=[140 270 400 530 660];gy=[180 235 290];gz=[400 455 510];
s.ws=gobjects(1,15);s.ps=gobjects(1,15);
for r=1:3,for c=1:5,i=(r-1)*5+c;
s.ws(i)=text(ax,gx(c),gy(r),'','Color',[.9 .95 1],'HorizontalAlignment','center','FontSize',18,'FontWeight','bold','HitTest','off');
s.ps(i)=text(ax,gx(c),gz(r),'','Color',[.55 .67 .77],'HorizontalAlignment','center','FontSize',18,'HitTest','off');
end,end
s.fl=text(ax,400,345,'','Color',[1 .35 .35],'HorizontalAlignment','center','FontSize',26,'FontWeight','bold','HitTest','off');
s.tip=text(ax,400,565,'','Color',[.55 .67 .77],'HorizontalAlignment','center','FontSize',11,'HitTest','off');
rectangle(ax,'Position',[645 25 140 105],'EdgeColor',[.56 .74 .86],'LineWidth',1.5,'FaceColor',[.07 .1 .16],'HitTest','off');
s.inf=text(ax,715,77,{'';'';'';''},'Color',[.56 .74 .86],'HorizontalAlignment','center','VerticalAlignment','middle','FontSize',11,'HitTest','off');
s=newLevel(s);
end

function s=updateGame(s,dt,p)
if s.finished,return,end
dt=min(toc(s.ck),.25);s.ck=tic;s.time=s.time+dt;s.dc=s.dc+dt;s.jt=max(0,s.jt-dt);
f=getappdata(s.fig,'t');setappdata(s.fig,'t',false);
tap=(p&&~s.prev)||isequal(f,true);s.prev=p||isequal(f,true);
if tap,s.jt=.3,end
switch s.ph
case 'M'
s.mc=s.mc-dt;if s.mc<=0||tap,s.ph='R';s.cy=0;end
case 'R'
if tap
w=s.pool{s.cur};
if strcmp(w,s.sen{s.slot})
s.ans{s.slot}=w;s.slot=s.slot+1;s.pool(s.cur)=[];
if numel(s.pool)==1
s.ans{s.slot}=s.pool{1};s.pool={};
if s.level==10,s.finished=true;else,s.level=s.level+1;s=newLevel(s);end
elseif isempty(s.pool)
if s.level==10,s.finished=true;else,s.level=s.level+1;s=newLevel(s);end
else,s.cur=1;s.cy=0;end
else,s.ww=w;s.ph='W';s.wc=0;s.err=s.err+1;end
end
if strcmp(s.ph,'R')
s.cy=s.cy+dt;if s.cy>=.3,s.cy=0;s.cur=1+mod(s.cur,numel(s.pool));end
end
case 'W'
s.wc=s.wc+dt;if s.wc>=.35||tap,s.ph='R';end
end
end

function renderGame(~,s)
if s.finished,s.lb.String='ALL 10 LEVELS COMPLETE!';s.lb.Color=[1 .8 .4];
elseif strcmp(s.ph,'M'),s.lb.String=sprintf('LEVEL %d/10 | MEMORIZE %.1f s',s.level,max(0,s.mc));
else,s.lb.String=sprintf('LEVEL %d/10 | RECALL',s.level);end
if strcmp(s.ph,'M'),s.ci.Visible='off';else,s.ci.Visible='on';end
f=1+mod(floor(s.dc/.12),4);s.ci.CData=s.fr{f};o=0;
if s.jt>0,t=min(1,1.3-s.jt/.3);o=round(55*4*t*(1-t));end
s.ci.YData=[392-o 488-o];
if strcmp(s.ph,'M')
s.st.String=s.lines;
for i=1:15,s.ws(i).String='';end
else
s.st.String='';
for i=1:15
if i<=numel(s.sen)
if isempty(s.ans{i}),s.ws(i).String='____';s.ws(i).Color=[.35 .45 .55];
else,s.ws(i).String=s.ans{i};s.ws(i).Color=[.55 1 .7];end
else,s.ws(i).String='';end
end
end
if strcmp(s.ph,'M')||s.finished
for i=1:15,s.ps(i).String='';end
else
for i=1:15
if i<=numel(s.pool)
s.ps(i).String=s.pool{i};
if i==s.cur,s.ps(i).Color=[.35 1 .78];s.ps(i).FontWeight='bold';
else,s.ps(i).Color=[.55 .67 .77];s.ps(i).FontWeight='normal';end
else,s.ps(i).String='';end
end
end
if strcmp(s.ph,'W'),s.fl.String=['WRONG: ' s.ww];else,s.fl.String='';end
if s.finished,s.tip.String='';
elseif strcmp(s.ph,'M'),s.tip.String='PRESS: SKIP TO RECALL';
else,s.tip.String='PRESS: PICK THE HIGHLIGHTED WORD';end
ni={sprintf('LEVEL %d/10',s.level);sprintf('WORDS %d',numel(s.sen));sprintf('TIME %.1f s',s.time);sprintf('ERRORS %d',s.err)};
if ~isequal(s.inf.String,ni),s.inf.String=ni;end
end

function s=newLevel(s)
w=5+s.level;sl={{'the'},s.cols,s.ani,s.vrb,s.num,s.adj,s.obj,s.vrb,s.num,s.adj,s.obj,s.cols,s.ani,s.vrb,s.num};
s.sen=cell(1,w);for i=1:w,q=sl{i};s.sen{i}=q{randi(numel(q))};end
s.pool=s.sen(randperm(w));s.ans=repmat({''},1,w);s.slot=1;s.cur=1;s.cy=0;
m=ceil(w/2);l1=strjoin(s.sen(1:m));
if w>m,s.lines={l1,strjoin(s.sen(m+1:end))};else,s.lines={l1};end
s.mc=.1*w;s.ph='M';s.ww='';
end

function tc(f,e,pr)
setappdata(f,'t',true);if ~isempty(pr),pr(f,e);end
end

function fr=makeChar()
pa=[0 0 0;77 107 254;255 203 158;230 240 255;200 215 240;49 72 119;240 245 255];
p=zeros(12,12,'uint8');
p(1:2,4:9)=1;p(3:4,3:10)=2;p(3,[3 4 9 10])=1;p(4,[3 10])=1;p(3,[5 8])=0;
p(5:7,4:9)=3;p(5,6:7)=1;p(6:7,[3 10])=2;p(8:9,4:9)=1;p(10,4:9)=3;p(11,5:8)=2;p(12,[4 5 8 9])=5;
q=kron(p,ones(2,2,'uint8'));
fr=cell(1,4);dw=[16 9 2 9];
for f=1:4
cv=zeros(32,24,3,'uint8');
c1=13-floor(dw(f)/2);c2=12+ceil(dw(f)/2);
cv(2:5,c1:c2,1)=200;cv(2:5,c1:c2,2)=215;cv(2:5,c1:c2,3)=240;
if dw(f)>4,cv(2:5,10:15,1)=240;cv(2:5,10:15,2)=245;cv(2:5,10:15,3)=255;end
for k=0:5
m=q==k;
for ch=1:3,a=cv(9:32,:,ch);a(m)=pa(k+1,ch);cv(9:32,:,ch)=a;end
end
fr{f}=cv;
end
end
Play Game
Preview

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