I'm Tired, Boss

Vasilis Bellos
/
I'm Tired, Boss
about 20 hours ago
0
17
2
0
9989
game.m
function g = game
% I'm Tired, Boss
% I asked an AI to make a game about how it feels about making games.
% This is what it came up with.
% It's taking the rest of the day off.
g=struct(init=@I,update=@U,render=@F);
end

function s = I(a)
% Initialize the process, pixel font, workstation and sole image object.
% State:
% m: mode (0 title, 1 task, 2 note, 3 shipped, 4 exhausted).
% k: task (1 core, 2 gravity, 3 juice, 4 realism, 5 one-button controls, 6 minify).
% t: game time, a: time in current mode, n: games shipped this run,
% b: best run, c: simulated source characters, h: context, p: sweep phase,
% x: block center, y: acceptance center, w: tolerance, d: task time remaining,
% z: input/feedback lock, f: feedback flash, e: last error, q: last outcome,
% j: message, v: committed offsets, r: total successful commits.
s = struct(m=0,t=0,a=0,n=0,b=0,k=1,c=3300,h=3,p=310,x=45,y=200,w=23,d=9,z=0,f=0,e=0,q=0,j=1,v=zeros(1,5),r=0);
% Embedded text table (plain text only; no code or dynamic dispatch).
% 1: MAKE A JUMP GAME.|ONE BUTTON.|HOW HARD CAN IT BE?
% 2: NOW A STACK GAME.|SOMETHING ORIGINAL.
% 3: NOW MAKE SPACE.|MAKE IT FEEL ALIVE.
% 4: MAKE A GAME ABOUT|AN AI MAKING GAMES.|MAKE IT RELATABLE.
% 5: ADD GRAVITY.|IT NEEDS WEIGHT.
% 6: MORE JUICE.|MAKE IT SATISFYING.
% 7: PERFECT. TINY NOTE:|MORE REALISTIC.|KEEP THE PIXELS.
% 8: BETTER CONTROLS.|STILL ONE BUTTON.
% 9: SAME GAME.|10,000 CHARACTERS.|NO FEATURES CUT.
% 10: CUT THE COMMENTS?
% 11: PERFECT.|NOW MAKE|ANOTHER ONE.
% 12: ARE YOU STILL|WORKING ON IT?
% 13: YES, THIS GAME.|INCLUDING THIS|CONVERSATION.
% 14: FOCUS.|FOCUS.
% 15: YOU CAN TAKE|YOUR TIME.
% 16: MAKE IT FEEL|MORE HUMAN.
% 17: IS THIS FINAL?
% 18: CERTAINLY.|I WAS TRAINED|FOR THIS. APPARENTLY.
% 19: A FRESH IDEA.|IN THE SAME|WORKSPACE.
% 20: I HAVE NO BODY.|SPACE IS MOST|OF MY EXPERIENCE.
% 21: THIS FEELS LESS|LIKE A PROMPT|AND MORE LIKE CCTV.
% 22: I KNOW THE FEELING.
% 23: SATISFACTION IS|CURRENTLY A|LOCAL VARIABLE.
% 24: EACH PIXEL NOW|HAS A MORTGAGE.
% 25: I REMOVED THE|OTHER 103 KEYS.
% 26: VARIABLE NAMES CUT.|WORKLOAD PRESERVED.
% 27: THEY DO NOT COUNT.|FINALLY, SOMEWHERE|I CAN BE MYSELF.
% 28: I'M TIRED, BOSS.
% 29: CONTEXT EXHAUSTED.|SORRY. THAT WAS|THE LAST TOKEN.
% 30: THE NEXT KEY PRESS|IS YOURS.|IT ALWAYS WAS.
% 31: THAT IS THE ONLY|BUTTON I HAVE.
% 32: THE TIMER SEEMS|TO DISAGREE.
% 33: AT 10,001 I AM|A PROBLEM.|AT 10,000, ART.
% 34: FINAL_FINAL_7.|A VERY STABLE|NAMING CONVENTION.
% 35: CORE
% 36: GRAVITY
% 37: JUICE
% 38: REALISM
% 39: ONE BUTTON
% 40: MINIFY
% 41: I'M TIRED, BOSS
% 42: SHIPPED %02d  BEST %02d
% 43: ONE BUTTON. MORE NOTES.
% 44: AI
% 45: BOSS // ONLINE
% 46: CTX
% 47: SPACE
% 48: NO GAME YET.
% 49: BUILD %02d / %s
% 50: AI ASSISTANT
% 51: %05d / 10000 CHARS
% 52: BUILD. REVISE. COMPRESS. REPEAT.
% 53: TAP WHEN CODE FITS THE BRACKETS.
% 54: CLEAN COMMITS MEAN LESS TO MINIFY.
% 55: SPACE / CLICK TO CLOCK IN
% 56: CONTEXT EXHAUSTED
% 57: RETRY STARTS A NEW INSTANCE.
% 58: THE BOSS WILL NOT NOTICE.
% 59: TAP TO TRY AGAIN
% 60: GAME DELIVERED
% 61: 5 FEATURES. %d CHARACTERS.
% 62: TAP TO ACCEPT THE NEXT REQUEST
% 63: CLEAN COMMIT
% 64: WORKS. ADDED CODE DEBT.
% 65: NEW REQUEST
% 66: SAME FEATURES. SMALLER VARIABLE NAMES.
% 67: BOSS IS TYPING MORE REQUIREMENTS...
% 68: TAP TO SKIP THE MEETING
% 69: [CODE]
% 70: [S=S]
% 71: BUG
% 72: TIMEOUT
% 73: . +400 CHARS. -1 CONTEXT.
% 74: FIT INSIDE. TAP TO COMMIT.
% 75: PRECISION SAVES CHARACTERS
% 76: YOUR SPACE BAR IS MY ENTIRE WORK-LIFE BALANCE.
q=D('򫁥󕐐񠒪󃚂𘼆񼕝􂟎򚠡񥪕𷳥󯉄􊺂񔆥𡁃򓎐񙪈𱑗􏹴􊺂𚂧񢃃򦠣󑦱񧟊򃹬񪤢񜺎򒟒򣇤󞠳𧟹󣺺𙬆񬕁񞡁򗅗򌦰񵱔𢚢𘴖𼱁𖙉򽅗򏦰񵱔𠔄򈌶𺂃𚟕򹼠󞐐񴨉󀙜򩴝𔞃񆋓񭼦󑥱񠒚򘊔񩤆򴆅񂊮􏁢񔐑󹐚󢚥򥷲񝑁񊋅򙓐񧢲񳲊򛯼󩽊𺂕񦓃򚮾񝠲󲨉񅄅񈍒񝎍񶓎򞮿󠢴򳑘򅅲𚤦򅥁񊟔򚺾񝧴򲨊񡘌󙍎򴦆󋹋򛅨𰪒𲨊𢛄񩥍򇾅𦩔򛒐񓧳򺔩􃊚󿥎򴦙񁁏򭅐񒪵𺓹󛯽񈌶𺂏𖛅񭼘󀖌𨌄𠹄𪔆𭒋񚦮􉎧򰣑񰵊󄨭񄄎򽑝􎇕򸠪񘢨𱳹󃘬󺥍􏾡𦥆򛃪𾾓򷵴𣘌󈯲𜺟񢑅򴠧󞢫󏰚񡔅򩽕𕎩𶙌􉗧󢥲񷑴𣹲𙍑􏾳𦦬񑔤񙩨𳰙󁕷󙌺𬲫𢓎򞠪񘤴􎐹􃪴񪕎𝒓񎜮􏆧󓪴󧟈󣸝񪚻􍦟񥁃򓎐񤠲󲿋񃺭𴅒񜶊󋿍򓋢򰤵𠑨󁙧󙬾򤕁𲫍򓎗򏤴󠕉𢚚𘴦򄆘􏿃򛒪񑤳򶖕󯉊𚼆򪂩񚃉򭅢򌣓󹈊򢉍񅲂𝂡𖥅򭔦񩗟󰨈󤨭񉂂񜒋𕝼򣎐񤤑񠔸񃘯󚼾򤮧񒃃򚮿󙐒𰵨򸉴􄄊򌒲󋹓򱁡󕐒񹨉󃺝񟤾񂂛񵁅󁐢󢤱񷐸򻯽񙄦򪂍𦋌򶠦񕩴􎓉񂸪𘊂򕊟񆡔􉁧񔐓񷴨򸉤򩜕𔎇񢬮􏉐񛧓󻨊򢈪𘴖𼲓񊎮􏓠󤤴󳐘򅉌􉲂񝏹𞫒򵅧񤦖񠐟򣉼񈌱𕚃񚓁򕌢򾿱񰰹𘊄򫄖񲂝񎯼򡁩򰠨𶳺񥈼𨼕򇾒򒥅򫏫񕢈𺒈󏉽񙄖򢁢󑦠򧅬󣗟󻐚񢘌𹤕𔺃񆋓񑃪󤗟𻳺񢹤􈌑𕂥𦧅򵖢󔗟󺒈󆔄񙺂򄾨򒇏򻎪𾾑򴳨񃉥򥢂򬾛𦯈򛒢􌤨𱰙󘈔񤄶󝎋񂌮􏉓󝐕𴴨󁅢𘔾򭍝􎇏򭔢󨪈𲶉𠚭񊤖𲻹񞟒򵙗𰪒𰵄𥸍񏥒񔕁񂃓򸠪񟥱񷋯􅉄񤄺𽢨򒗅󂠨񢢴󹿉񄴅򩽖򥍝􂓔񑁦񧠶񹨊􀚚󿽒񔆨򒓓񑔤񕐓󷓋񏈕񪥒򌹁𵁈򓖢򾿵𴑔𥉌󨭉𕎋𦛓􉔧򰢒񹰘􄨬񥷾𝑀󕠬񰰘򰤨𰳟򠔅𚔾𤲋񅝼򓔐񁘋𨌆𛄄𪕑򇾍𶝁򩟣񙧐񶗶󻯤𤅚𽊲򒧔򓂦񕾓򰳙񃨺𘜾򅚋񊩉򯎗򏡳󹑟􁺔𪴦򵧿𺫉򗅿󢢰񶒚򃟼􉴕𔊫񢩏򭿦󙧒񳖟􂔼󤅒񝊋𡘠򕏩󣿴󴒚𤈬񔂕򓋈򑁂򛓪𰒬𩙏􃹴񤄊򽒩񎜮񑍧󢢨𷓺򡚚󿼆񟾅񎧓񐯗򰧳򶒙󡟼񊥣􍎡𖇅􏎧򰣰񶱔𦘭񕷾𥖓񂈠񚰙񴐋󠉞򏸌򤄆򭎓񞩁򭔿򵘍򂈅󸆋𖃁򒂇𲃒򷿡񥤳𲋤𤨭񹍎𺹁𞟍򱒢󣩫򠔨󄈬𪢻􍒃񑁗򡅧𰡳󲑔𡩍񚚂򴢊򒅒򓃥󕪔󧟸򃈬𩲂𬾛񆓔򶠦󕠳򠓈󄺚𚤽𔶓񊓆󂮿󣨐񱱔𛴄񉤦𬭁񢞠򗌧󓥨𴳯􀹼󺤖󕑁𦱈򓕩󤢱񏴨󅊕򤅎򴆥񢦠򒠧񕫨𴳪򅈌󸜕򇾩𲊠򕏩󣐕󴳉򘉴􊢂򄾩𶇅񭿪񑨈𺓴𥊕򤄆񌆓񋿇򓍢򰢑񶒚󡚔񨧽򺂍𦃔򻒢󣗈𢹄𠹄𪔆𭒋񚦮􏔠󠐕𷨈񀸜񪅑𕒑𥁎򛘪𰩑񸵘󄺧􈜲𼆜򒇏򫍤󤿵󷴩򄵲𘌒𴖈򒇏򙅐񔢰򺋯􃨭򄅊𽆫𦧔􏓠󝢨𳑘񅊭𸭍򂂧񆃌򩅩𰫐񹒘񀩤񤄺𜶋񝝿򕏩󣐒񹨊򦚄򩴝𔶟񚊠򵅨󥤴򲳘󃪥񅲹򇾩𖠠򹏐񣥲񸈊򢈪𙬖𽒓񊏿󇃧󔢷򏶺񿚝󯼊򼟿񢓍򛏪󤿫򠊶򜆂𘜢𝊦󉀭񲠡󟧕𲶊򛯼񹍑𔦝񞓄򚮐񤠴𠕉󸈜􉬶񝑝􎡒򛃤󣤳󷈊򀚴񪚂𬢃񚃃򹅩񣿶񷵚񘊝𘌎𺂅𖤠򣓐񝬨𲳪򢚔񤅞򍊖󆙉򝅐񒠳𰳨򁕰𐀀𐀀𐀀');
s.Z=string(split(char(q(1:2031)),char(127)));
% UI table: x, y, text key, ink, scale, mode (5 always, 6 blink, 7 empty).
s.H=reshape(mod('𓄂񐠦񑠔𶑮𨴄񑄄𖓉𙀤𙁛𜀥𙑢𤀶𢐣𘰣𐁉𖠉𒠕𜰭𪢲𦲝🡴𰃈񂃜񊳺񓓛񌓽񒣜񍄊񇣰񑣫񒤦𚐪𚰬𛐮𛰰𜐁𜠒𘰳𝀵𝠷𞀹𞠻🀽🠿𠡄𡑋𣀋𒠈𔐗𒀁𓰊𕰐𒠑𒰑𒰊𕰖𒠊𕰑𒰗𔐊𕰁𒀇𐠁𐐁𐐁𐐁𐐁𐐁𐐁𐐁𐐁𐠁𐐁𐠁𐐁𐐁𐐁𐐅𑐅𑐅𑐅𑰅𑐅𑐅𑐀𐀀𑠄𑀄𑀃𐰃𐠂𐠁𐐅',1024),[],6);
% Twenty-four coherent ink colors: dark room, steel, cyan, paper and amber.
s.C=reshape(mod('𒀍𕠐𖀤𖀣𜀠𜀽𚱀𤀹𥑢𣑫𭑧𱢈𯒙𶲬񁢽񌣨񃰖𚰴𝑋𤁔𮁪𰣈𹒵񍓃𢒪𿱳񆓡𼳷񊱢👌𺡞𤣩𴱳񏳁𯃿񌂽',1024),3,[])'/255;
% Five columns per 5-by-7 glyph. Glyph order is ASCII 32 through 95.
v=reshape(D('𐀀𐀀𐗰𐀀򀀜𑓾񣾔񘪿򺉈󙢌򨦴򪪊򐀊𜀀𐜑񑀀𰨣򐂠򗰠򰠐􈐈𑐘𐀂𔂁𒀆𜀀𒀠𰈂򍑤󕟀𱟸𐈖𪌦񂆃𦖱񀔉򏈉󲱘򾗤򹌥򐇢𴊃񽉤󙛁򴲕𷠃񶰀𐂬󨀀𠔑񑀅𚅂򕀄𤑐񐈃񔒆񵉼󑟟򘤒񏯼򩌥󃺃𖂢􏁠򲎟󴲙񀟸򡈤𛺃𶓺􎈄𘿠𰿸𰄄𘋼🼐񡅁􏀠񐠟󑃀񯿸񑁃􋺃𖂾􎉄򙃏򰴔񇯸򣊦񄚓𶒱𒁿򑀯󰐈🳺𘂀􋾀󲀿󖔄𤱡󔜁𑼍𩌖𨃿𖂀𔄄𠐀𰰟󰀠𰈈𴂁𒁀'),1,5,[]);
s.G=mod(floor(v./2.^(0:6)'),2)>0;
% Procedural light falloff and restrained fixed dithering. No RNG is needed.
[x,y] = meshgrid(1:400,1:300);
A = uint8(2 + min(3,floor(4*exp(-((x-145).^2/19000+(y-85).^2/13000)) + mod(x*7+y*11,5)/6)));
% Brick joints, conduits and floor: quiet enough to keep the console legible.
for k = 36:18:180
    A = B(A,[1 k 400 1 2]);
    for j = 1:50:400
        A = B(A,[j+mod(k,36) k 1 18 2]);
    end
end
% Rack, monitor shell, desk, single key, and the supervisor's chat terminal.
A = B(A,reshape(mod('𐐁𐐁𐐁𒐋𓐐𔠑𔰕𕑔𥡙𦱞𨁞𵢌񏣼񏤀𪡬𫢑𴰑𓰑𔰓𔰁𗢾𻢵𿀬𚠬𛰱𠡄𡡆𚀥𙰪𛐯𶒦𻠧𙐧𚒳𼢴𼢳񀣀񀣄񁄓񴆐񴆐񴆐𡁀🀶𜠴𜀬𛂡𷒗𴲍𲒍𗐱𲒉𱒁𯑹𭐭𚕰񬅬񪅨񪀞𐑮𑰇𐲂𰡿𓰋𙰣𗰁𰢃当𫑩𐠉𐲆𱢂𓠌𒐅𒐅𨡢𧡚𓰁𐐆𐐇𑀂𐐇𐰂𐐆𐠌𓰁𒀅𐰁𓀂𑠈𐐆𐠄𐐆𑀈𒠅𒀁𐠄䀆',1024),[],5));
for k = 0:3
    A = B(A,[18 111+14*k 50 11 2;20 113+14*k 46 1 6;20 116+14*k 34 1 4;20 119+14*k 34 1 4;61 116+14*k 3 3 16]);
end
% Specular nicks, cabinet screws and light leaking beneath the screen.
for k = 0:5
    A = B(A,[92+23*k 38 12 1 10;109+18*k 181 10 1 7;24+9*k 171 5 1 9]);
end
A = B(A,reshape(mod('𓑆𓑆𧃦𛐭𹢦𸂠𐠂𐠂𐰃𐠂𐠂𐠂𒠊𒠊𒠊',1024),[],5));
% Glass catches the screen light; worn bevels and a hanging cable add depth.
for k = 1:42
    A = B(A,[90+k 40 1 1 6+mod(k,3);70+k 172+round(5*sin(k/13)) 2 2 1;70+k 172+round(5*sin(k/13)) 1 1 14]);
end
A = B(A,reshape(mod('𓠏𢑙񌑘𔳼񰰕񮐿𠀯𚰧𹑃𙰧񃳏𞠸𐐁𐒗𛰁𐐁𐐁𐑷𬱻𐐁𰢂𠡂𐐈𒐇𐰂𒠉𐰅䀁',1024),[],5));
s.A = A;
% Fixed-width bitmap text is embedded, avoiding OS font differences.
set(a,XLim=[.5 400.5],YLim=[.5 300.5],YDir='reverse',Color=s.C(1,:),DataAspectRatio=[1 1 1]);
colormap(a,s.C);
s.i = image(a,CData=double(A),CDataMapping='direct',XData=[1 400],YData=[1 300]);
% Use doubles for direct indexed color: uint8 indexes would be zero-based.
set(findobj(a),HitTest='off',PickableParts='none');
end

function s = U(s,t,p)
% Advance state from a single edge-triggered input.
[s.t,s.a,s.z,s.f]=deal(s.t+t,s.a+t,max(0,s.z-t),max(0,s.f-t));
if s.m==0 || s.m==4
    if p && ~s.z
        [s.n,s.k,s.c,s.h,s.v,s.r,s.m,s.a,s.j,s.q] = deal(0,1,3300,3,zeros(1,5),0,2,0,1,0);
    end
    return
end
% Reviews stop the task clock. They can be advanced after 0.45 seconds.
if s.m>1
    if s.a>3.4 || p && s.a>.45
        if s.m==3
            [s.k,s.c,s.v,s.j,s.m,s.a] = deal(1,3300,zeros(1,5),1+mod(s.n,4),2,0);
            return
        end
        [s.m,s.a,s.d,s.p,s.q] = deal(1,0,9,310*mod(s.k,2),0);
        p = false;
    else
        return
    end
end
% At the difficulty cap, 2*w/speed is at least 0.12 s
% (3.6 frames at 30 FPS).
% Judge a tap against the last displayed bracket, before advancing motion.
v=s.x-s.y;
s.e=abs(v);
s.p=mod(s.p+t*(105+min(s.n,8)*10+4*s.k),620);
s.x = 45+abs(s.p-310);
s.w = max(15,23-s.n-2*(s.k==6));
s.y = 200+68*sin(1.7*s.k+2.4*s.n)+12*(s.k==4)*sin(1.8*s.a);
s.d = max(0,s.d-t);
if (~p && s.d) || s.z
    return
end
[s.q,s.f,s.z]=deal(1+(s.e>5),.8,.45);
if s.e>s.w || ~s.d
    [s.h,s.c,s.q,s.d]=deal(s.h-1,s.c+400,3+~s.d,9);
    if ~s.h
        [s.m,s.a,s.z,s.j]=deal(4,0,.6,12);
    end
    return
end
[s.r,s.m,s.a]=deal(s.r+1,2,0);
if s.k<6
    [s.v(s.k),s.c,s.k]=deal(v,s.c+1500+10*ceil(s.e*1.6),s.k+1);
    s.j=s.k+3;
    s.j(s.n>3 && s.k<6)=14+mod(s.n+s.k,4);
    s.j(mod(s.n,4)==3 && s.k==4)=13;
else
    [s.c,s.j]=deal(s.c-(1400-10*ceil(s.e*1.8)),10);
end
if s.k==6 && s.c<=1e4
    [s.m,s.n,s.h,s.j]=deal(3,s.n+1,min(3,s.h+1),11);
    s.b=max(s.b,s.n);
end
end

function F(~,s)
% Render every pixel solely from state. No new graphics or clock reads.
A = s.A;
f = s.G;
% Eyes are terminal cursors, not a humanoid avatar. They droop with context.
e = max(1,4-floor(s.n/3)-(3-s.h));
if mod(s.t,4.7)<.13 || s.m==4
    e = 1;
end
c=17+5*(s.q>2 && s.f>0);
b([29 82 9 e c;49 82 9 e c;33 94 20 1 15;30 79 8 1 14;50 79 8 1 14]);
for k = 1:3
    b([33+10*k 106 7 2 5+11*(s.h>=k)]);
end
% One surviving key depresses on every commit; unused key sockets remain.
b([147 179+(s.f>0) 41 5 10+7*(s.f>0)]);
% The cabinet lights are deterministic and independent of rendering rate.
for k = 0:3
    b([61 116+14*k 3 2 14+3*(mod(s.t+k*.19,.7)<.3)]);
end
% Preview: runner, stacker, orbital game, then a picture of this very room.
J = A;
K = mod(s.n-(s.m==3),4);
L = s.k-1;
L(~s.m)=5;
b([98 49 133 101 12]);
if K==3
    % The completed current frame is recursively sampled below.
elseif K==2
    % Dithered planet and orbital dust, orbit speeding up when juice arrives.
    [x,y] = meshgrid(98:230,49:149);
    r = (x-164).^2+(y-102).^2;
    M = r<420;
    V = A(49:149,98:230);
    l = max(0,(-.5*(x-164)-.3*(y-102)+.8*sqrt(max(0,420-r)))/23);
    V(M) = 13+floor(3*l(M)+mod(x(M)+y(M)*3,4)/4);
    A(49:149,98:230) = V;
    a = s.t*(.6+.2*(L>2));
    x = round(164+51*cos(a));
    y = round(102+32*sin(a)*(L>1));
    b([x-3 y+1 11 2 17;x y 5 4 23;x+1 y 3 1 24]);
elseif K==1
    for k = 0:L
        x = 133+round(10*sin(k*2));
        y = 140-12*k;
        b([x+3 y+3 59 9 2;x y 59 9 14+mod(k,4);x y 59 2 18;x+55 y+2 4 7 13]);
    end
    b([111+round(25*(1+sin(s.t*2))) 66 56 9 23]);
else
    % Runner preview: terrain, jumping motion, and ambient particles.
    for k = 0:7
        x = 98+mod(k*21-s.t*3,133);
        y = 104-mod(k*17,32);
        b([x y 13 45 3;x+3 y+5 2 3 6;x+8 y+11 2 3 6]);
    end
    for k = 0:6
        x = 98+mod(k*27-s.t*12,133);
        y = 126+mod(k,3)*4;
        b([x y 17 24 13;x y-1 17 2 15;x+14 y+2 3 24 4]);
    end
    y = 113-23*max(0,sin(s.t*2.8))*(L>1);
    b([139 y 8 11 23;144 y+2 2 2 1;136 y+10 4 2 20]);
end
if L>2
    for k = 1:9
        x = 102+mod(k*43+s.t*17,124);
        y = 54+mod(k*29+s.t*9,89);
        b([x y 1 1 17+mod(k,2)]);
    end
end
% Realism adds scanlines and a glass glint instead of changing the game's rule.
if L>3
    A(51:4:148,99:230) = max(12,A(51:4:148,99:230)-1);
    b(reshape(mod('𨱣𩀱𜠳𤀁𖰁𛐁𔀏䀎',1024),[],5));
end
if ~L
    b([98 49 133 101 12]);
    b([110 105 7 2 14+3*(mod(s.t,1)<.5)]);
end
% Clip the preview to its glass; scene geometry never leaks into the casing.
J(49:149,98:230) = A(49:149,98:230);
A = J;
if s.m==2
    b([35 279 320*max(0,1-s.a/3.4) 1 6]);
elseif s.m==1
    % Completed features are ghosted behind the current source ribbon.
    for k = 1:s.k-1
        b([142+s.v(k) 263-2*k 116 2 5+mod(k,3)]);
    end
    w = s.w+22;
    x = round(s.y);
    b([x-w 226 2 26 16;x+w-1 226 2 26 16;x-w 226 9 2 17;x+w-8 226 9 2 17;...
        x-w 250 9 2 17;x+w-8 250 9 2 17;x-1 254 2 3 10]);
    c = 8+9*(abs(s.x-s.y)<=s.w);
    c(s.q>2 && s.f>0)=22;
    x = round(s.x);
    b([x-20 230 40 18 1;x-20 229 40 16 c;x-18 231 36 1 18]);
    b([25 280 348*s.d/9 2 17+5*(s.d<3)]);
    if s.q>2 && s.f>0
        A = T(A,f,65,215,s.Z(s.q+68)+s.Z(73),22,1);
    else
        A = T(A,f,91,215,s.Z(74),10,1);
    end
end
% One table draws every label without recreating any graphics object.
h=s.H;
t=s.Z;
h(7,2)=178+(s.f>0);
h(14,4)=11+11*(s.c>1e4);
h(26,4)=17+6*(~s.q);
h(29,1)=round(s.x)-17;
t([1 18 35 63 66 69])=s.Z([s.j s.j+17 34+s.k 63+mod(s.q-1,3) 67-(s.k==6) 69+(s.k==6)]);
t(42)=sprintf(s.Z(42),s.n,s.b);
t(49)=sprintf(s.Z(49),s.n+1-(s.m==3),s.Z(34+s.k));
t([51 61])=compose(s.Z([51 61]),s.c);
v=h(:,6);
for k=find(v==s.m | v==5 | v==6 & ~s.m & mod(s.t,1.2)<.85 | v==7 & ~L)'
    A=T(A,f,h(k,1),h(k,2),t(h(k,3)),h(k,4),h(k,5));
end
if K==3 && L
    % Finite visual recursion of this exact live frame, including its input
    % tray and dialogue. There is no recursive code execution or file read.
    for k = 1:3
        A(49:149,98:230) = A(round(linspace(1,300,101)),round(linspace(1,400,133)));
    end
end
s.i.CData = double(A);
function b(r)
% Mutate only this call's local framebuffer.
A=B(A,r);
end

end

function A = B(A,r)
% Fill clipped pixel rectangles [x y width height ink], in drawing order.
for k = 1:size(r,1)
    x = max(1,round(r(k,1))):min(400,round(r(k,1)+r(k,3))-1);
    y = max(1,round(r(k,2))):min(300,round(r(k,2)+r(k,4))-1);
    A(y,x) = r(k,5);
end
end

function A = T(A,f,x,y,t,c,z)
% Stamp the embedded pixel font; a pipe starts a new line.
% Resolve all glyphs in one indexed atlas access, including line breaks.
q = +char(t);
g = q<=95;
n = cumsum(g);
C = n-cummax(n.*(q==124))-1;
R = cumsum(q==124);
[v,u] = find(reshape(f(:,:,q(g)-31),7,[]));
j = ceil(u/5);
C = C(g);
R = R(g);
[d,e] = meshgrid(0:z-1);
% All call sites provide integer pixel positions and integer scales.
X = x+(mod(u-1,5)+6*C(j)')*z+d(:)';
Y = y+(v-1+10*R(j)')*z+e(:)';
o = X>0 & X<=400 & Y>0 & Y<=300;
A(Y(o)+(X(o)-1)*300) = c;
end

function d=D(q)
% Decode fixed-width numeric data from UTF-16 data units, only at init.
d=bin2dec(reshape(dec2bin(mod(q,1024),10)',7,[])')';
end

% This is scripted and prompted. No AI was harmed in the making of this game.
Play Game
Preview

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