STITCH: A Plum Blossom in Silk

博
/
STITCH: A Plum Blossom in Silk
about 3 hours ago
0
3
1
0
7501
game.m
function g = game()
%STITCH - a one-button silk embroidery game for the MATLAB One-Button Game Mini Hack.
%   Tap when the needle reaches a target stitch of the plum blossom pattern.
%   Accurate stitches build a combo; loose stitches break the thread.
g.init   = @initState;
g.update = @updateState;
g.render = @renderFrame;
end

function s = initState(ax)
ax.XLim = [0 800]; ax.YLim = [0 600]; ax.YDir = 'normal';
ax.Box = 'off'; ax.XTick = []; ax.YTick = [];
ax.Color = [0.965 0.941 0.910];
hold(ax, 'on');

k = 0;
for y = 12:22:600
    k = k + 1;
    line(ax, [0 800], [y y], 'Color', [0.935 0.905 0.868], 'LineWidth', 0.5);
end
for x = 12:22:800
    line(ax, [x x], [0 600], 'Color', [0.948 0.920 0.884], 'LineWidth', 0.5);
end

t = linspace(0, 2*pi, 721);
r = 208 * (0.60 + 0.40 * cos(5 * t));
Px = 400 + r .* cos(t);
Py = 300 + r .* sin(t);
dseg = sqrt(diff(Px).^2 + diff(Py).^2);
c = [0 cumsum(dseg)];
c = c / c(end);
N = 400;
si = linspace(0, 1, N);
px = interp1(c, Px(:), si(:), 'linear');
yy = interp1(c, Py(:), si(:), 'linear');
crv = [px(:), yy(:)];
patLen = c(end);

guide = line(ax, crv(:,1), crv(:,2), 'Color', [0.83 0.76 0.62], ...
             'LineStyle', ':', 'LineWidth', 1.6);

s.crv = crv; s.N = N; s.patLen = patLen; s.guide = guide;
s.targets = ((1:20)' - 0.5) / 20;
s.tgtH = gobjects(20,1);
for i = 1:20
    p = at(s, s.targets(i));
    s.tgtH(i) = line(ax, p(1), p(2), 'Marker', 'o', 'MarkerSize', 6, ...
                     'Color', [0.78 0.70 0.55], 'LineWidth', 1);
end
s.hit = false(20,1); s.stitchH = gobjects(20,1);
for i = 1:20
    s.stitchH(i) = line(ax, nan, nan, 'Color', [0.72 0.13 0.19], 'LineWidth', 4);
end
s.thread = line(ax, nan, nan, 'Color', [0.74 0.15 0.20], 'LineWidth', 2.2);
s.needle = line(ax, nan, nan, 'Color', [0.28 0.26 0.24], 'LineWidth', 3.5);
s.nTip = line(ax, nan, nan, 'Marker', '.', 'MarkerSize', 26, 'Color', [0.55 0.50 0.46]);
s.flash = line(ax, nan, nan, 'Marker', 'o', 'MarkerSize', 30, 'Color', [0.95 0.62 0.35], 'LineWidth', 2);
s.hudScore = text(ax, 24, 572, 'STITCHES 0', 'FontSize', 16, 'Color', [0.30 0.25 0.22]);
s.hudCombo = text(ax, 776, 572, '', 'FontSize', 16, 'Color', [0.72 0.13 0.19], 'HorizontalAlignment', 'right');
s.hudPetal = text(ax, 24, 30, 'PETAL 1/5', 'FontSize', 14, 'Color', [0.45 0.39 0.34]);
s.title = text(ax, 400, 372, 'STITCH', 'FontSize', 54, 'FontWeight', 'bold', ...
               'Color', [0.28 0.22 0.19], 'HorizontalAlignment', 'center');
s.sub = text(ax, 400, 316, 'one button  ·  sew a plum blossom', 'FontSize', 18, ...
             'Color', [0.45 0.39 0.34], 'HorizontalAlignment', 'center');
s.hint = text(ax, 400, 250, 'press to begin', 'FontSize', 20, 'Color', [0.72 0.13 0.19], ...
              'HorizontalAlignment', 'center');
s.endT = text(ax, 400, 330, '', 'FontSize', 22, 'Color', [0.28 0.22 0.19], ...
              'HorizontalAlignment', 'center');

s.mode = 0; s.t = 0; s.st = 0; s.sPos = 0; s.score = 0; s.combo = 0;
s.best = 0; s.perfect = 0; s.good = 0; s.loose = 0; s.lastS = 0;
s.cool = 0; s.flashT = 0; s.pressPrev = false; s.lastS = 0;
s.guide.Color = [0.80 0.72 0.58];
set(findall(ax), 'HitTest', 'off', 'PickableParts', 'none');   % 点击必须落到画布上
s.title.Visible = 'on'; s.sub.Visible = 'on'; s.hint.Visible = 'on';
s.endT.Visible = 'off';
renderFrame(ax, s);
s.ax = ax;
end

function p = at(s, u)
i = 1 + (s.N - 1) * min(max(u, 0), 1);
i0 = floor(i); i1 = min(i0 + 1, s.N);
w = i - i0;
p = (1 - w) * s.crv(i0,:) + w * s.crv(i1,:);
end

function s = updateState(s, dt, pressed)
s.t = s.t + dt;
s.cool = max(s.cool - dt, 0);
s.flashT = max(s.flashT - dt, 0);
tap = pressed && s.cool == 0;
if tap
    s.cool = 0.05;
end

if s.mode == 0
    if tap
        s.mode = 1; s.st = 0;
        s.title.Visible = 'off'; s.sub.Visible = 'off'; s.hint.Visible = 'off';
    end
    return
end
if s.mode == 2
    s.st = s.st + dt;
    if tap && s.st > 0.8
        s = resetRun(s);
    end
    return
end

s.st = s.st + dt;
sp = 0.050 * (1 + 0.35 * sin(6 * pi * s.sPos));
s.sPos = s.sPos + sp * dt;

if tap
    d = abs(s.targets - s.sPos);
    d(s.hit) = 9;
    [dmin, idx] = min(d);
    px = dmin * s.patLen;
    if dmin <= 0.045
        s.hit(idx) = true;
        p = at(s, s.targets(idx));
        if px <= 12
            s.perfect = s.perfect + 1; s.combo = s.combo + 1; add = 100 * min(s.combo, 5);
        else
            s.good = s.good + 1; s.combo = 0; add = 40;
        end
        s.score = s.score + add;
        ang = at(s, min(s.targets(idx) + 0.004, 1)) - at(s, max(s.targets(idx) - 0.004, 0));
        ang = atan2(ang(2), ang(1));
        dx = 9 * cos(ang); dy = 9 * sin(ang);
        set(s.stitchH(idx), 'XData', [p(1) - dx, p(1) + dx], 'YData', [p(2) - dy, p(2) + dy]);
        s.tgtH(idx).Visible = 'off';
        s.lastS = s.targets(idx);
        s.flash.XData = p(1); s.flash.YData = p(2); s.flashT = 0.22;
    else
        s.loose = s.loose + 1; s.combo = 0;
    end
end

if s.sPos >= 1
    s.mode = 2; s.st = 0;
    s.best = max(s.best, s.score);
    if s.score >= 6800
        rk = 'GRANDMASTER';
    elseif s.score >= 3800
        rk = 'MASTER';
    elseif s.score >= 1500
        rk = 'SEAMSTRESS';
    else
        rk = 'APPRENTICE';
    end
    s.endT.String = sprintf('%s\n%d stitches sewn   ·   best %d\n\npress to sew again', ...
                            rk, s.score, s.best);
    s.endT.Visible = 'on';
    s.hint.String = '';
end
end

function s = resetRun(s)
s.mode = 1; s.st = 0; s.sPos = 0; s.score = 0; s.combo = 0;
s.perfect = 0; s.good = 0; s.loose = 0; s.lastS = 0;
s.hit = false(20,1);
for i = 1:20
    set(s.stitchH(i), 'XData', nan, 'YData', nan);
    s.tgtH(i).Visible = 'on';
end
s.thread.XData = nan; s.thread.YData = nan;
s.endT.Visible = 'off';
end

function renderFrame(ax, s)
p = at(s, s.sPos);
q = at(s, min(s.sPos + 0.012, 1));
dirv = q - p;
dirv = dirv / max(norm(dirv), 1e-6);
nv = [-dirv(2), dirv(1)];
s.needle.XData = [p(1) + 26*nv(1), p(1) - 26*nv(1)];
s.needle.YData = [p(2) + 26*nv(2), p(2) - 26*nv(2)];
s.nTip.XData = p(1); s.nTip.YData = p(2);
s.flash.Visible = s.flashT > 0;

i1 = 1 + round((s.N - 1) * s.lastS);
s.thread.XData = s.crv(1:i1,1);
s.thread.YData = s.crv(1:i1,2);

s.hudScore.String = sprintf('STITCHES %d', s.score);
if s.combo >= 2
    s.hudCombo.String = sprintf('COMBO x%d', min(s.combo, 5));
else
    s.hudCombo.String = '';
end
th = atan2(p(2) - 300, p(1) - 400);
petal = 1 + floor(mod(th + 2*pi, 2*pi) / (2*pi/5));
s.hudPetal.String = sprintf('PETAL %d/5', petal);
s.hudScore.Visible = s.mode ~= 0;
s.hudCombo.Visible = s.mode == 1;
s.hudPetal.Visible = s.mode == 1;
s.needle.Visible = s.mode ~= 0;
s.nTip.Visible = s.mode ~= 0;
end
Play Game
Preview

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