砂漠のオアシス — 昼と夜のスイッチ

Components · Toggle

30 views2 copies

MIT · The creator’s name stays in the first line of the code.

<!-- UI by @Lattice_Node — ludion.ai/p/toggle-oasis (MIT) -->
<!-- UI by @Lattice_Node — ludion.ai/p/toggle-daylight (MIT) -->
<!-- Remixed by Claude -->
<div data-ld-part="toggle-oasis" lang="ja">
  <canvas class="scene" aria-hidden="true"></canvas>
  <button class="hit" type="button" role="switch" aria-checked="false" aria-label="夜"></button>
  <span class="vh" role="status" aria-live="polite" data-status></span>
  <span class="probe" aria-hidden="true"></span>
</div>
<style>
/* UI by @Lattice_Node — ludion.ai/p/toggle-oasis (MIT) */
/* ページの地。部品の外の話なので、ここだけ別にしておく */
/* 部品が出す --night(世界の暗さ)に合わせて、砂色の地が夜の藍へ沈む */


/* UI by @Lattice_Node — ludion.ai/p/toggle-daylight (MIT) */
[data-ld-part="toggle-oasis"] {
  /* 固定しないトークン。世界の約20色は、この5色を明るさ違いで並べて作る */
  --_bg: var(--ld-bg, #f2d7a0);       /* 砂 */
  --_surface: var(--ld-surface, #5f9a4a); /* ヤシの葉 */
  --_fg: var(--ld-fg, #241b55);       /* 砂漠の夜 */
  --_muted: var(--ld-muted, #3fa9c4); /* 空と水 */
  --_accent: var(--ld-accent, #e8862a); /* 日干しれんがと夕日 */
  --_radius: var(--ld-radius, 9999px);
  --_font: var(--ld-font, system-ui, sans-serif);
  --_space: var(--ld-space, 8px);
  --_shadow: var(--ld-shadow, 0 8px 24px rgb(36 27 85 / .2));
  --_motion: var(--ld-motion, 200ms);

  position: relative;
  display: block;
  box-sizing: border-box;
  /* どの枠にも収まる。横長の丸(1 : 1.85)のまわりに、影と漏れる光の余白を含めた比率 */
  width: min(100%, calc((100vh - 64px) * 1.6439));
  aspect-ratio: 1.6439;
  font-family: var(--_font);
  color: var(--_fg);
}

/* 色を読むための見えない目印 */
[data-ld-part="toggle-oasis"] .probe {
  display: none;
}

[data-ld-part="toggle-oasis"] .vh {
  position: absolute;
  width: 1px;
  height: 1px;
  overflow: hidden;
  clip-path: inset(50%);
  white-space: nowrap;
}

[data-ld-part="toggle-oasis"] .scene {
  position: absolute;
  top: 0;
  left: 0;
  display: block;
  width: 100%;
  height: 100%;
  pointer-events: none;
  /* 小数の表示倍率でも、ブラウザに補間させない。ピクセルをにじませないため */
  image-rendering: pixelated;
}

/* 本物のスイッチ。絵は canvas が描き、ここは押す場所だけ */
[data-ld-part="toggle-oasis"] .hit {
  position: absolute;
  top: 12.121%;
  left: 7.373%;
  width: 85.253%;
  height: 75.758%;
  margin: 0;
  padding: 0;
  border: 0;
  border-radius: var(--_radius);
  background: transparent;
  cursor: grab;
  touch-action: pan-y;
  user-select: none;
  -webkit-user-select: none;
  -webkit-tap-highlight-color: transparent;
}

[data-ld-part="toggle-oasis"] .hit:active {
  cursor: grabbing;
}

[data-ld-part="toggle-oasis"] .hit:focus {
  outline: none;
}

[data-ld-part="toggle-oasis"] .hit:focus-visible {
  outline: 2px solid var(--_accent);
  outline-offset: calc(var(--_space) * .5);
  transition: outline-offset var(--_motion) ease;
}

@media (prefers-reduced-motion: reduce) {
  [data-ld-part="toggle-oasis"] .hit:focus-visible {
    transition: none;
  }
}
</style>
<script type="module">
/* UI by @Lattice_Node — ludion.ai/p/toggle-oasis (MIT) */
/* UI by @Lattice_Node — ludion.ai/p/toggle-daylight (MIT) */
// part.js — ESモジュール。rootの中だけを触る
// 住人のいるスイッチ:スイッチのレールの中に、砂漠のオアシスがあり、住人とラクダが暮らしている。
//
// 世界:低い解像度で、約20色の番号だけで描く。時刻の変化はディザの置き換えで行い、中間色を作らない。
// 水:池の画素は、空の列を縦に圧縮して読む。だから空の色も、星も、雲も、月も、そのまま水に映る。
// 外側:なめらかな殻、窓の奥行き、液体のレンズを WebGL で描く。ピクセルは常に整数倍のまま写す。
// 灯り:世界の光る画素をぼかした「光の場」を作り、ガラスと外の面を照らす。人影が窓を横切れば、外の光も変わる。
// 時間:左端は昼、右端は夜。右へ動かすと 昼→夕方→夜。左へ戻すと 夜→深夜→夜明け→朝→昼 と、時間は前へ進む。
// 色は JS に書かない。--_bg、--_surface、--_fg、--_muted、--_accent の色相を、決めた明るさで並べて作る。

const CORE_W = 192; // 景色の中心の幅。窓が広いぶんは、両わきへ広がる
const CORE_H = 112;
const HORIZON = 82;
const MARGIN = 14; // レンズが窓の外を覗いてもよいよう、世界を少し広く描く
const WORLD_HZ = 30;
const PILL_RATIO = 1.85; // 縦 : 横
const CLOCK_DAY = 12;
const CLOCK_NIGHT = 21.5;
const CLOCK_SLEEP = 23.4;
const NIGHT_CREEP = 26; // 右端に着いてから、灯りを消して眠るまでの秒数の目安

// ---- パレット:5つのトークン × 4つの明るさ = 20色
const RAMPS = [
  ['bg', [0.76, 0.85, 0.93, 0.985]],
  ['surface', [0.4, 0.52, 0.64, 0.76]],
  ['fg', [0.17, 0.25, 0.33, 0.44]],
  ['muted', [0.5, 0.62, 0.74, 0.86]],
  ['accent', [0.5, 0.66, 0.8, 0.92]],
];
const C0 = 0, C1 = 1, C2 = 2, C3 = 3;
const G0 = 4, G1 = 5, G2 = 6, G3 = 7;
const I0 = 8, I1 = 9, I2 = 10, I3 = 11;
const U0 = 12, U1 = 13, U2 = 14, U3 = 15;
const A0 = 16, A1 = 17, A2 = 18, A3 = 19;

// ---- 材質:[昼, 夕, 宵, 夜] のパレット番号
const MATS = [
  ['SKY', C3, C3, C3, C3],
  // 遠景:メサと砂丘
  ['MESA', A2, A0, I3, I1],
  ['MESA_DK', A1, I3, I2, I1],
  ['MESA_LT', A3, A1, A0, I2],
  ['DUNE_FAR', C1, A1, I3, I1],
  ['DUNE_FAR_SH', C0, A0, I2, I0],
  ['DUNE_NEAR', C2, A2, A0, I2],
  ['DUNE_NEAR_SH', A2, A1, I3, I1],
  // 地面
  ['SAND', C1, A2, I3, I2],
  ['SAND_DK', C0, A1, I2, I1],
  ['SAND_LT', C2, A3, A0, I3],
  ['SAND_WET', A1, A0, I2, I1],
  ['GRASS', G2, G1, I3, I1],
  ['GRASS_DK', G1, G0, I2, I0],
  ['GRASS_LT', G3, G2, I3, I2],
  ['PATH', C0, A1, I2, I1],
  ['PATH_DK', A2, A0, I2, I1],
  // 水
  ['WATER', U1, A1, I2, I1],
  ['SHALLOW', U3, A3, I3, I2],
  ['RIPPLE', U3, A3, U0, I3],
  ['GLINT', C3, A3, A3, C3],
  ['REFL_LEAF', G0, I2, I1, I0],
  ['REFL_DK', I3, I2, I1, I0],
  ['REFL_WALL', A1, A0, I2, I1],
  // 日干しれんがの家
  ['WALL', A2, A1, I3, I2],
  ['WALL_SH', A1, A0, I2, I1],
  ['WALL_LT', A3, A2, A0, I2],
  ['STONE', A0, I3, I1, I1],
  ['STONE_LT', A1, A0, I2, I2],
  ['WOOD', A0, A0, I2, I0],
  ['WOOD_LT', A1, A1, I3, I1],
  ['WOOD_DK', I3, I2, I1, I0],
  ['PAINT', U0, I3, I2, I0],
  ['PAINT_LT', U1, U0, I3, I1],
  ['CLOTH_A', A0, A0, I2, I1],
  ['CLOTH_B', C3, A3, I3, I2],
  // ヤシ
  ['BARK', I3, I2, I1, I0],
  ['BARK_LT', A0, A0, I1, I0],
  ['LEAF0', G0, G0, I1, I0],
  ['LEAF1', G1, G0, I2, I0],
  ['LEAF2', G2, A0, I2, I1],
  ['LEAF3', G3, A1, I3, I1],
  ['FLOWER_A', A2, A1, A0, I2],
  ['FLOWER_C', C3, A3, U1, I3],
  ['STEM', G0, G0, I2, I0],
  // 窓
  ['GLASS', I2, A0, I1, I0],
  ['GLASS_HI', U1, A1, I2, I1],
  ['ROOM', A1, A0, I3, I1],
  // 住人:藍の長衣と、生成りの頭布
  ['SKIN', A2, A2, A0, I3],
  ['WRAP', C3, A3, U1, I3],
  ['INK', I0, I0, I0, I0],
  ['SHIRT', U0, U0, I3, I1],
  ['SHIRT_DK', A1, A0, I2, I0],
  ['PANTS', I3, I2, I1, I0],
  ['BOOT', I0, I0, I0, I0],
  ['BOOK', C3, C3, U2, I3],
  ['BOOK_DK', C1, C1, U0, I2],
  // ラクダと、遠くの隊商
  ['CAMEL', A1, A0, I3, I2],
  ['CAMEL_DK', A0, I3, I2, I1],
  ['CAMEL_LT', A2, A1, A0, I3],
  ['CARAVAN', I3, I1, I0, I0],
  // 空
  ['CLOUD', C3, A3, A0, I2],
  ['CLOUD_SH', U3, A2, I3, I1],
  ['SMOKE', C1, C1, U2, I3],
  ['SMOKE_DK', U2, U1, U0, I2],
  ['SUN', C3, C3, A3, A3],
  ['SUN_RIM', A3, A2, A2, A2],
  ['MOON', C3, C3, C3, C3],
  ['MOON_DK', C1, C1, C1, C1],
  ['STAR', C3, C3, C3, C3],
  ['STAR_DIM', U2, U2, U2, U2],
  // 灯り
  ['LIT', A2, A2, A2, A2],
  ['LIT_HI', A3, A3, A3, A3],
  ['LIT_DK', A1, A1, A1, A1],
  ['SIL', I0, I0, I0, I0],
  ['FIREFLY', A3, A3, A3, A3],
  ['BIRD', I2, I2, I1, I0],
  ['MARK', I0, I0, C3, C3],
  ['ZZZ', U3, U3, U3, U3],
  ['WING', U3, A3, U1, I2],
];
const M = Object.fromEntries(MATS.map((row, i) => [row[0], i]));

// ---- 材質の仲間分け
const flagged = (names, value = 1) => {
  const table = new Uint8Array(MATS.length);
  for (const name of names) table[M[name]] = value;
  return table;
};
// 遠景:陽炎でゆらぐもの、隊商の後ろに回るもの
const FAR = flagged(['SKY', 'MESA', 'MESA_DK', 'MESA_LT', 'DUNE_FAR', 'DUNE_FAR_SH', 'CARAVAN']);
// 砂つぶが見える面
const OPEN_SAND = flagged(['SKY', 'SAND', 'SAND_DK', 'SAND_LT', 'DUNE_NEAR', 'DUNE_NEAR_SH', 'PATH', 'PATH_DK']);
// 岸の近くのものは、暗い色で水に落ちる
const REFL = new Uint8Array(MATS.length);
for (const name of ['LEAF0', 'LEAF1', 'LEAF2', 'LEAF3', 'GRASS', 'GRASS_DK', 'GRASS_LT']) REFL[M[name]] = M.REFL_LEAF;
for (const name of ['BARK', 'BARK_LT', 'WOOD', 'WOOD_LT', 'WOOD_DK', 'WRAP', 'SHIRT', 'SHIRT_DK', 'PANTS', 'SKIN', 'BOOT', 'BOOK', 'PAINT', 'PAINT_LT', 'CAMEL', 'CAMEL_DK', 'CAMEL_LT']) REFL[M[name]] = M.REFL_DK;
for (const name of ['WALL', 'WALL_SH', 'WALL_LT']) REFL[M[name]] = M.REFL_WALL;
// 空のものが水に映ると、どう見えるか
const SKYREF = new Uint8Array(MATS.length);
SKYREF[M.STAR] = M.STAR_DIM;
SKYREF[M.STAR_DIM] = M.STAR_DIM;
SKYREF[M.MOON] = M.MOON;
SKYREF[M.MOON_DK] = M.MOON_DK;
SKYREF[M.SUN] = M.GLINT;
SKYREF[M.SUN_RIM] = M.SUN_RIM;
SKYREF[M.CLOUD] = M.CLOUD_SH;
SKYREF[M.CLOUD_SH] = M.CLOUD_SH;

// ---- 時刻のかなめ:[時, 材質の列, 空の色(上から地平線へ)]
const KEYS = [
  [0, 3, [I0, I0, I1, I1, I2]],
  [4.8, 3, [I0, I0, I1, I1, I2]],
  [5.4, 3, [I0, I1, I2, I3, A0]],
  [6.0, 2, [I1, I2, I3, A0, A1, A2]],
  [6.7, 1, [I3, U0, U1, A2, A3, C3]],
  [7.8, 0, [U0, U1, U2, U3, C2, C3]],
  [10, 0, [U1, U1, U2, U3, C3]],
  [15, 0, [U0, U1, U2, U3, C3]],
  [17, 1, [U0, U1, U3, A3, A2, A1]],
  [18, 1, [I2, I3, A0, A1, A2, A3]],
  [19, 2, [I1, I2, I3, A0, A1]],
  [20.3, 3, [I0, I0, I1, I1, I2]],
  [24, 3, [I0, I0, I1, I1, I2]],
];

const clamp = (v, lo = 0, hi = 1) => Math.min(hi, Math.max(lo, v));
const mix = (a, b, t) => a + (b - a) * t;
const smoothstep = (a, b, x) => {
  const t = clamp((x - a) / (b - a));
  return t * t * (3 - 2 * t);
};
const BAYER = [0, 8, 2, 10, 12, 4, 14, 6, 3, 11, 1, 9, 15, 7, 13, 5];
const bayerAt = (x, y) => BAYER[((y & 3) << 2) | (x & 3)];

function seeded(seed) {
  let a = seed >>> 0;
  return () => {
    a = (a + 0x6d2b79f5) >>> 0;
    let t = a;
    t = Math.imul(t ^ (t >>> 15), t | 1);
    t ^= t + Math.imul(t ^ (t >>> 7), t | 61);
    return ((t ^ (t >>> 14)) >>> 0) / 4294967296;
  };
}

function makeNoise(seed) {
  const r = seeded(seed);
  const table = new Float32Array(65536);
  for (let i = 0; i < 65536; i++) table[i] = r();
  const at = (x, y) => table[((x & 255) << 8) | (y & 255)];
  return (x, y) => {
    const xi = Math.floor(x);
    const yi = Math.floor(y);
    const fx = x - xi;
    const fy = y - yi;
    const u = fx * fx * (3 - 2 * fx);
    const v = fy * fy * (3 - 2 * fy);
    return mix(mix(at(xi, yi), at(xi + 1, yi), u), mix(at(xi, yi + 1), at(xi + 1, yi + 1), u), v);
  };
}

// ---- 色の計算(OKLab)。色の値は書かず、トークンの色相に明るさだけを与える
const toLinear = (c) => (c <= 0.04045 ? c / 12.92 : Math.pow((c + 0.055) / 1.055, 2.4));
const toGamma = (c) => (c <= 0.0031308 ? c * 12.92 : 1.055 * Math.pow(c, 1 / 2.4) - 0.055);
function rgbToOklab([r8, g8, b8]) {
  const r = toLinear(r8 / 255);
  const g = toLinear(g8 / 255);
  const b = toLinear(b8 / 255);
  const l = Math.cbrt(0.4122214708 * r + 0.5363325363 * g + 0.0514459929 * b);
  const m = Math.cbrt(0.2119034982 * r + 0.6806995451 * g + 0.1073969566 * b);
  const s = Math.cbrt(0.0883024619 * r + 0.2817188376 * g + 0.6299787005 * b);
  return [0.2104542553 * l + 0.793617785 * m - 0.0040720468 * s, 1.9779984951 * l - 2.428592205 * m + 0.4505937099 * s, 0.0259040371 * l + 0.7827717662 * m - 0.808675766 * s];
}
function oklabToLinear(L, a, b) {
  const l = Math.pow(L + 0.3963377774 * a + 0.2158037573 * b, 3);
  const m = Math.pow(L - 0.1055613458 * a - 0.0638541728 * b, 3);
  const s = Math.pow(L - 0.0894841775 * a - 1.291485548 * b, 3);
  return [4.0767416621 * l - 3.3077115913 * m + 0.2309699292 * s, -1.2684380046 * l + 2.6097574011 * m - 0.3413193965 * s, -0.0041960863 * l - 0.7034186147 * m + 1.707614701 * s];
}
function labTone(lab, L) {
  // 明るさを決め、色域に入るまで鮮やかさを落とす
  let chroma = 1;
  for (let i = 0; i < 24; i++) {
    const rgb = oklabToLinear(L, lab[1] * chroma, lab[2] * chroma);
    if (rgb.every((v) => v >= -0.001 && v <= 1.001)) return rgb.map((v) => Math.round(toGamma(clamp(v)) * 255));
    chroma *= 0.9;
  }
  return oklabToLinear(L, 0, 0).map((v) => Math.round(toGamma(clamp(v)) * 255));
}

// ---- 住人とラクダの絵
const CHARS = {
  H: 'WRAP', S: 'SKIN', E: 'INK', T: 'SHIRT', D: 'SHIRT_DK', P: 'PANTS', B: 'BOOT', W: 'BOOK', K: 'BOOK_DK',
  C: 'CAMEL', c: 'CAMEL_DK', l: 'CAMEL_LT', n: 'INK', R: 'CLOTH_A', r: 'CLOTH_B', x: 'CARAVAN',
};
const makeSprite = (rows) => {
  const list = [];
  rows.forEach((row, y) => {
    [...row].forEach((ch, x) => {
      if (ch !== '.') list.push([x, y, M[CHARS[ch]], ch === 'E']);
    });
  });
  return { list, w: rows[0].length, h: rows.length };
};
const HEAD = ['..HHH..', '.HHHHH.', '.HHSSS.', 'HHSSES.', 'H.HHHH.'];
const HEAD_BLINK = ['..HHH..', '.HHHHH.', '.HHSSS.', 'HHSSSS.', 'H.HHHH.'];
const HEAD_UP = ['..HHH..', '.HHHHH.', '.HHSES.', 'HHSSSS.', 'H.HHHH.'];
const BODY_STAND = ['..TTT..', '.TTTTT.', '.STTTS.', '..DDD..', '..TTT..', '.TTPTT.', '..B.B..'];
const BODY_WALK1 = ['..TTT..', '.TTTTT.', '..TTTS.', '.SDDD..', '..TTT..', '.TTPTT.', '.B..BB.'];
const BODY_WALK2 = ['..TTT..', '.TTTTT.', '.STTTS.', '..DDD..', '..TTT..', '..TPT..', '..BB...'];
const BODY_WALK3 = ['..TTT..', '.TTTTT.', '.STTT..', '..DDDS.', '..TTT..', '.TTPTT.', '.BB..B.'];
const BODY_ARMS = ['S.TTT.S', 'STTTTTS', '..TTT..', '..DDD..', '..TTT..', '.TTPTT.', '..B.B..'];
const person = (head, body) => makeSprite([...head, ...body]);
const SPR = {
  stand: person(HEAD, BODY_STAND),
  blink: person(HEAD_BLINK, BODY_STAND),
  walk: [person(HEAD, BODY_WALK1), person(HEAD, BODY_WALK2), person(HEAD, BODY_WALK3), person(HEAD, BODY_WALK2)],
  up: person(HEAD_UP, BODY_ARMS),
  crouch: person(HEAD, ['..TTT..', '.TTTTTS', '..DDD.S', '.TTPTT.', '.BB.B..']),
  seat: makeSprite([
    '....HHH..',
    '...HHHHH.',
    '...SSSHH.',
    '...ESSHHH',
    '...SSHHH.',
    '...TTTT..',
    '...STTTT.',
    '...STTTT.',
    'PPPPPPDD.',
    'BB.PPPPP.',
  ]),
  seatBlink: makeSprite([
    '....HHH..',
    '...HHHHH.',
    '...SSSHH.',
    '...SSSHHH',
    '...SSHHH.',
    '...TTTT..',
    '...STTTT.',
    '...STTTT.',
    'PPPPPPDD.',
    'BB.PPPPP.',
  ]),
  seatUp: makeSprite([
    '....HHH..',
    '...HHHHH.',
    '...ESSHH.',
    '...SSSHHH',
    '...SSHHH.',
    '...TTTT..',
    '...STTTT.',
    '...STTTT.',
    'PPPPPPDD.',
    'BB.PPPPP.',
  ]),
  bust: makeSprite(['...HHH...', '..HHHHH..', '..HSSES..', '...HHH...', '..TTTTT..', '.TTTTTTT.', '.TTTTTTT.', '.TTTTTTT.']),
  bustBlink: makeSprite(['...HHH...', '..HHHHH..', '..HSSSS..', '...HHH...', '..TTTTT..', '.TTTTTTT.', '.TTTTTTT.', '.TTTTTTT.']),
  bustUp: makeSprite(['S..HHH..S', 'S.HHHHH.S', 'S.HSSES.S', 'SS.HHH.SS', '.STTTTTS.', '..TTTTT..', '..TTTTT..', '..TTTTT..']),
  bustHalf: makeSprite(['...HHH...', '..HHHHH..', 'S.HSSES.S', 'SS.HHH.SS', '.STTTTTS.', '..TTTTT..', '.TTTTTTT.', '.TTTTTTT.']),
  sil: makeSprite(['...HHH..', '..HHHHH.', '..HHHHH.', '...HHH..', '..HHHHH.', '.HHHHHHH', 'HHHHHHHH', 'HHHHHHHH']),
  silLook: makeSprite(['....HHH.', '...HHHHH', '...HHHHH', '...HHH..', '..HHHHH.', '.HHHHHHH', 'HHHHHHHH', 'HHHHHHHH']),
  // ひざを折って座るラクダ。頭だけ別に動かす
  camelHead: makeSprite(['..CC...', '.CCCC..', 'CnCCCC.', 'CCCCCCc']),
  camelBody: makeSprite([
    '.....CC........lCC......',
    '.....CC.......lCCCC.....',
    '.....CCc.....lCCCCCC....',
    '......CCCc...lCCCCCCCc..',
    '......CCCCC.lCCRRRRCCCc.',
    '.......CCCCCCCCrRRRRCCCc',
    '.......CCCCCCCCRrRRRCCCc',
    '......CCCCCCCCCCCCCCCCCc',
    '.....cCCCCCCCCCCCCCCCCc.',
    '....ccccCCCCCCcccCCCCCc.',
    '...ccccccccccccccccccccc',
  ]),
  camelSleep: makeSprite([
    '...............lCC......',
    '..............lCCCC.....',
    '.............lCCCCCC....',
    '............lCCCCCCCCc..',
    '..........ClCCRRRRCCCCc.',
    '........CCCCCCCrRRRRCCCc',
    '.....CCCCCCCCCCRrRRRCCCc',
    '..CC.CCCCCCCCCCCCCCCCCCc',
    '.CCCCCCCCCCCCCCCCCCCCCc.',
    'CcCCCCccCCCCCCcccCCCCCc.',
    'CCCCcccccccccccccccccccc',
  ]),
  // 遠くの砂丘を渡る隊商
  miniCamel: [
    makeSprite(['.......xx', '.......x.', '..xx...x.', '.xxxxxxx.', '.xxxxxx..', '.x.x.x.x.']),
    makeSprite(['.......xx', '.......x.', '..xx...x.', '.xxxxxxx.', '.xxxxxx..', '..x.x.x..']),
  ],
  miniGuide: makeSprite(['.x.', 'xxx', 'xxx', 'xxx', 'xxx', 'x.x']),
};

// ---- シェーダー
const VERT = `#version 300 es
in vec2 aPos;
void main() { gl_Position = vec4(aPos, 0.0, 1.0); }`;

const FRAG = `#version 300 es
precision highp float;
uniform sampler2D uWorld, uGlowNear;
uniform vec2 uRes, uPill, uOrigin, uWorldSize, uGlowSize;
uniform vec4 uLens;
uniform float uBezel, uK, uNight, uLift, uSeam, uCalm;
uniform vec3 uShellDay, uShellNight, uInk, uLight, uHiNight, uLoNight, uSkyDay, uHomeCol, uSkyCol;
uniform vec2 uHomePos, uSkyPos;
out vec4 outColor;

float rb(vec2 p, vec2 b, float r) {
  vec2 q = abs(p) - b + r;
  return length(max(q, 0.0)) + min(max(q.x, q.y), 0.0) - r;
}

// なめらかに読む(B スプライン。光の場の格子が見えないように)
vec3 smoothTex(sampler2D t, vec2 uv, vec2 size) {
  vec2 st = uv * size - 0.5;
  vec2 i = floor(st);
  vec2 f = st - i;
  vec2 f2 = f * f;
  vec2 f3 = f2 * f;
  vec2 w0 = (1.0 - 3.0 * f + 3.0 * f2 - f3) / 6.0;
  vec2 w1 = (4.0 - 6.0 * f2 + 3.0 * f3) / 6.0;
  vec2 w2 = (1.0 + 3.0 * f + 3.0 * f2 - 3.0 * f3) / 6.0;
  vec2 w3 = f3 / 6.0;
  vec2 g0 = w0 + w1;
  vec2 g1 = w2 + w3;
  vec2 h0 = (i - 0.5 + w1 / g0 + 0.5) / size;
  vec2 h1 = (i + 1.5 + w3 / g1 + 0.5) / size;
  return g0.y * (g0.x * texture(t, vec2(h0.x, h0.y)).rgb + g1.x * texture(t, vec2(h1.x, h0.y)).rgb)
       + g1.y * (g0.x * texture(t, vec2(h0.x, h1.y)).rgb + g1.x * texture(t, vec2(h1.x, h1.y)).rgb);
}
vec3 glowNear(vec2 frag) { return smoothTex(uGlowNear, vec2(frag.x / uRes.x, 1.0 - frag.y / uRes.y), uGlowSize); }

// 光る画素の集まりが、まわりをどれだけ照らすか。遠くまでなだらかに届く
vec3 reach(vec2 p, vec2 pos, vec3 col, float radius) {
  vec2 L = pos - p;
  float r2 = radius * radius;
  return col * r2 / (r2 + dot(L, L));
}

// ピクセルのあいだの、ごく細い継ぎ目。大きく写すときの密度になる
float seamAt(vec2 w, float scale) {
  if (scale < 7.0) return 1.0;
  vec2 f = fract(w) * scale;
  vec2 g = min(f, scale - f);
  float edge = min(g.x, g.y);
  return 1.0 - 0.075 * (1.0 - smoothstep(0.0, uSeam, edge));
}

// 整数倍のまま、そのまま読む
vec3 worldExact(vec2 frag) {
  vec2 w = vec2(frag.x - uOrigin.x, uOrigin.y - frag.y) / uK;
  ivec2 t = ivec2(floor(w));
  t = clamp(t, ivec2(0), ivec2(uWorldSize) - 1);
  return texelFetch(uWorld, t, 0).rgb * seamAt(w, uK);
}

// レンズの中:拡大では、ピクセルの縁は立ったまま。圧縮されるところはミップで読み、模様を出さない
vec3 worldBent(vec2 frag, float scale, float foot) {
  vec2 w = vec2(frag.x - uOrigin.x, uOrigin.y - frag.y) / uK;
  if (foot > 1.0) return textureLod(uWorld, w / uWorldSize, log2(foot)).rgb;
  vec2 r = floor(w + 0.5);
  vec2 sharp = r - 0.5 + clamp((w - r) / max(foot, 1.0e-3) + 0.5, 0.0, 1.0);
  return textureLod(uWorld, sharp / uWorldSize, 0.0).rgb * seamAt(w, scale);
}

vec3 envLow, envHigh;
float softBox(vec2 p, vec2 c, vec2 h, float s) {
  vec2 q = abs(p - c) - h;
  float d = length(max(q, 0.0)) + min(max(q.x, q.y), 0.0);
  return 1.0 - smoothstep(-s, s, d);
}
// 磨かれた面に映る部屋:上の大きなやわらかい光と、下からの弱い照り返し
vec3 studio(vec3 R) {
  vec3 c = mix(envLow, envHigh, smoothstep(-0.55, 0.85, R.y));
  vec2 s = R.xy / (1.0 + max(R.z, 0.0));
  float key = softBox(s, vec2(-0.1, 0.56), vec2(0.5, 0.11), 0.17);
  float fill = softBox(s, vec2(0.34, -0.6), vec2(0.3, 0.05), 0.2);
  c += envHigh * key * 1.15;
  c += envHigh * fill * 0.14;
  return c;
}

vec3 shellColor(vec2 p, vec2 frag, float d) {
  // 外の面:丸い厚み。外側は外へ、内側は窓へ向かって傾く
  vec2 q = p;
  float inner = uPill.x - uPill.y;
  q.x = sign(p.x) * max(abs(p.x) - inner, 0.0);
  vec2 g = q / max(length(q), 1.0e-3);
  float t = clamp(-d / uBezel, 0.0, 1.0);
  float a = (1.0 - 2.0 * t);
  a = sign(a) * pow(abs(a), 1.35) * 0.96;
  vec3 N = normalize(vec3(g * a, sqrt(max(1.0 - a * a, 0.02))));
  vec3 R = vec3(2.0 * N.z * N.xy, 2.0 * N.z * N.z - 1.0);
  vec3 albedo = mix(uShellDay, uShellNight, uNight);
  float diffuse = 0.62 + 0.38 * clamp(dot(N, normalize(vec3(-0.25, 0.75, 0.6))), 0.0, 1.0);
  float fresnel = 0.05 + 0.95 * pow(1.0 - N.z, 3.5);
  vec3 c = albedo * diffuse;
  c = mix(c, studio(R), clamp(fresnel * 0.9 + 0.1, 0.0, 1.0));
  // 窓のそばは、奥へ落ちる影
  float toWindow = smoothstep(0.62, 1.0, t);
  c = mix(c, c * 0.8, toWindow * 0.55);

  // 灯りが、磨かれた面を照らす。光に近いところだけが、やわらかく染まる
  float radius = uPill.y * 0.62;
  for (int i = 0; i < 2; i++) {
    vec2 pos = i == 0 ? uHomePos : uSkyPos;
    vec3 col = i == 0 ? uHomeCol : uSkyCol;
    vec3 e = reach(p, pos, col, radius);
    vec2 toL = normalize(pos - p + 1.0e-3);
    float wrap = 0.5 + 0.5 * dot(N.xy, toL);
    c += e * wrap * mix(albedo * 0.9, vec3(dot(albedo, vec3(0.34))) + 0.34, 0.55) * 3.1;
    // 映り込み:線にならないよう、広く弱く
    vec3 Ld = normalize(vec3(pos - p, uPill.y * 0.7));
    float spec = pow(max(dot(R, Ld), 0.0), 5.0);
    c += reach(p, pos, col, uPill.y * 0.4) * spec * 1.4;
  }
  return c;
}

void main() {
  vec2 frag = gl_FragCoord.xy;
  vec2 p = frag - 0.5 * uRes;
  envLow = mix(uShellDay * 0.74, uLoNight, uNight);
  envHigh = mix(uLight, uHiNight, uNight);

  float d = rb(p, uPill, uPill.y);
  float dw = d + uBezel;

  // ---- 外:やわらかい影と、漏れた光
  vec3 premul = vec3(0.0);
  float alpha = 0.0;
  if (d > -2.0) {
    float h = uPill.y;
    float wide = rb(p + vec2(0.0, h * 0.13), uPill - vec2(h * 0.02, h * 0.02), uPill.y);
    float contact = rb(p + vec2(0.0, h * 0.028), uPill, uPill.y);
    float shadow = 0.24 * (1.0 - smoothstep(-h * 0.2, h * 0.28, wide)) + 0.22 * (1.0 - smoothstep(-h * 0.03, h * 0.07, contact));
    alpha = shadow;
    premul = uInk * shadow;
    // 漏れた光は、まわりの地を染める
    vec3 outside = reach(p, uHomePos, uHomeCol, uPill.y * 0.62) * exp(-max(d, 0.0) / (h * 0.2));
    float amount = clamp(dot(outside, vec3(0.34)) * 2.3, 0.0, 0.85);
    vec3 tint = outside / max(dot(outside, vec3(0.34)), 1.0e-3) * 0.34;
    premul = mix(premul, tint * 1.25, amount);
    alpha = mix(alpha, 1.0, amount);
    // canvas の端までに、なめらかに消す
    vec2 toEdge = 0.5 * uRes - abs(p);
    float room = min(toEdge.x, toEdge.y) / (h * 0.32);
    float fade = smoothstep(0.0, 1.0, clamp(room, 0.0, 1.0));
    premul *= fade;
    alpha *= fade;
  }

  vec3 color = premul;
  if (d < 1.0) {
    vec3 body = shellColor(p, frag, d);

    if (dw < 1.0) {
      // ---- 窓の奥の世界
      vec3 c = worldExact(frag);

      // 灯りのにじみ:ピクセルの上に、ガラスのなめらかな光が乗る
      vec3 near = glowNear(frag);
      c = 1.0 - (1.0 - c) * (1.0 - clamp(near * 0.82, 0.0, 1.0));

      // ガラスの映り込み:広く、なだらかに。縁はなぞらない
      float win = uPill.y - uBezel;
      float sheen = smoothstep(win * 0.1, win * 1.02, p.y + p.x * 0.09);
      c = mix(c, envHigh, sheen * sheen * mix(0.17, 0.05, uNight));
      float low = smoothstep(-win * 0.5, -win * 1.05, p.y - p.x * 0.05);
      c = mix(c, envHigh, low * mix(0.05, 0.015, uNight));

      // くぼみ:上のふちから落ちる影と、まわりの陰り
      float top = rb(p - vec2(0.0, win * 0.06), uPill - vec2(uBezel), win);
      float inset = 1.0 - smoothstep(-win * 0.2, win * 0.03, top + win * 0.0);
      float ring = exp(max(dw, -win) / (win * 0.075));
      float depth = clamp(ring * 0.46 + (1.0 - exp(min(top, 0.0) / (win * 0.14))) * 0.0 + exp(min(top, 0.0) / (win * 0.1)) * 0.4 * inset, 0.0, 0.82);
      c = mix(c, uInk, depth);

      // ---- レンズ
      vec2 lc = uLens.xy;
      vec2 he = uLens.zw;
      float lr = min(he.x, he.y);
      vec2 lq = p - lc;

      // レンズが窓に落とす影と、集めた光
      float lift = 0.055 + uLift * 0.04;
      float sd = rb(lq + vec2(0.0, lr * lift * 1.5), he, lr);
      float sh = 1.0 - smoothstep(-lr * 0.16, lr * (0.2 + uLift * 0.1), sd);
      c = mix(c, uInk, sh * mix(0.36, 0.55, uNight));

      float ld = rb(lq, he, lr);
      if (ld < 1.0) {
        // 中心線からの距離で丸みを決める
        vec2 axis = lq;
        vec2 inner2 = max(he - lr, vec2(0.0));
        axis.x = sign(lq.x) * max(abs(lq.x) - inner2.x, 0.0);
        axis.y = sign(lq.y) * max(abs(lq.y) - inner2.y, 0.0);
        float rad = length(axis);
        vec2 gr = axis / max(rad, 1.0e-3);
        float rho = clamp(rad / lr, 0.0, 1.0);

        // 拡大:中ほどは平らに、少しだけ大きく見える。縁に近づくと急に曲がり、外の絵を圧縮して見せる
        float mag = 1.24;
        float bt = clamp((rho - 0.7) / 0.3, 0.0, 1.0);
        float band = bt * bt * (3.0 - 2.0 * bt);
        float strength = 1.0 - 1.0 / mag + 0.2;
        float bend = pow(band, 2.2) * lr * strength;
        vec2 base = lc + lq / mag;
        vec2 shiftDir = gr * bend;
        vec2 center = 0.5 * uRes;
        // 1画素が世界の何ピクセルぶんか(曲がる帯では、圧縮されて大きくなる)
        float dBand = 6.0 * bt * (1.0 - bt) / 0.3;
        float foot = (1.0 / mag + 2.2 * pow(max(band, 1.0e-3), 1.2) * dBand * strength) / uK;
        vec3 seen;
        float scale = uK * mag;
        if (band > 0.02) {
          float ca = 0.05 * band;
          seen.r = worldBent(center + base + shiftDir * (1.0 - ca), scale, foot).r;
          seen.g = worldBent(center + base + shiftDir, scale, foot).g;
          seen.b = worldBent(center + base + shiftDir * (1.0 + ca), scale, foot).b;
        } else {
          seen = worldBent(center + base, scale, foot);
        }
        vec3 throughGlow = glowNear(center + base + shiftDir);
        seen = 1.0 - (1.0 - seen) * (1.0 - clamp(throughGlow * 0.8, 0.0, 1.0));

        // ガラスの形:中ほどはゆるい丸み、縁で急に落ちる
        vec2 tilt = gr * (0.22 * rho + 0.78 * pow(rho, 7.0));
        vec3 N = normalize(vec3(tilt, sqrt(max(1.0 - dot(tilt, tilt), 0.02))));
        vec3 R = vec3(2.0 * N.z * N.xy, 2.0 * N.z * N.z - 1.0);
        vec2 lp = lq / lr;

        vec3 lens = seen * 1.035;

        // 縁の厚み:明るい線ではなく、ガラスの奥の暗さで形を見せる
        float edge = pow(rho, 16.0);
        lens = mix(lens, uInk, edge * 0.42);

        // 下の内側に集まる光
        float pool = smoothstep(0.05, 0.95, -lp.y * 0.9 + lp.x * 0.2) * smoothstep(1.0, 0.8, rho) * smoothstep(0.42, 0.86, rho);
        lens += envHigh * pool * mix(0.3, 0.1, uNight);

        // 反射:上の大きなやわらかい光。丸みに沿って歪むが、縁をなぞらない
        vec2 sr = R.xy / (1.0 + max(R.z, 0.0));
        float broad = softBox(lp, vec2(-0.1, 0.62), vec2(0.5, 0.17), 0.3) * smoothstep(0.98, 0.72, rho);
        lens = mix(lens, envHigh, broad * mix(0.44, 0.1, uNight));
        float fresnel = pow(1.0 - N.z, 3.0);
        float dir = 0.2 + 0.8 * smoothstep(-0.6, 0.85, dot(gr, normalize(vec2(-0.42, 0.9))));
        lens = mix(lens, studio(R), clamp(fresnel * dir * dir * 0.6, 0.0, 0.42));

        // 灯りと月や太陽も、レンズの面に映る
        for (int i = 0; i < 2; i++) {
          vec2 pos = i == 0 ? uHomePos : uSkyPos;
          vec3 col = i == 0 ? uHomeCol : uSkyCol;
          vec2 toL = normalize(pos - p + 1.0e-3);
          float side = max(dot(gr, toL), 0.0);
          lens += reach(p, pos, col, uPill.y * 0.9) * side * side * side * smoothstep(0.62, 0.97, rho) * 0.6;
        }

        c = mix(c, lens, 1.0 - smoothstep(-0.8, 0.8, ld));
      }

      body = mix(body, c, 1.0 - smoothstep(-0.8, 0.8, dw));
    }

    float cover = 1.0 - smoothstep(-0.8, 0.8, d);
    color = mix(premul, body, cover);
    alpha = mix(alpha, 1.0, cover);
  }

  // 大きな階調が縞にならないよう、わずかに散らす
  float n = fract(sin(dot(frag, vec2(12.9898, 78.233))) * 43758.5453);
  n += fract(sin(dot(frag, vec2(93.989, 67.345))) * 24634.6345) - 1.0;
  color += (n * 0.75) / 255.0 * min(alpha * 4.0, 1.0);
  outColor = vec4(clamp(color, 0.0, 1.0), alpha);
}`;

function mount(root) {
  const cleanups = [];
  const on = (target, type, fn, options) => {
    target.addEventListener(type, fn, options);
    cleanups.push(() => target.removeEventListener(type, fn, options));
  };

  const canvas = root.querySelector('.scene');
  const button = root.querySelector('.hit');
  const statusEl = root.querySelector('[data-status]');
  const probe = root.querySelector('.probe');
  const motionQuery = matchMedia('(prefers-reduced-motion: reduce)');
  const schemeQuery = matchMedia('(prefers-color-scheme: dark)');
  let calm = motionQuery.matches;

  // ---- パレットをトークンから作る
  const paint = new OffscreenCanvas(1, 1).getContext('2d', { willReadFrequently: true });
  const palette = new Array(20);
  const palette32 = new Uint32Array(20);
  const readPalette = () => {
    const style = getComputedStyle(root);
    RAMPS.forEach(([name, tones], ramp) => {
      probe.style.color = style.getPropertyValue(`--_${name}`).trim();
      paint.clearRect(0, 0, 1, 1);
      paint.fillStyle = getComputedStyle(probe).color;
      paint.fillRect(0, 0, 1, 1);
      const d = paint.getImageData(0, 0, 1, 1).data;
      const lab = rgbToOklab([d[0], d[1], d[2]]);
      tones.forEach((L, step) => {
        const rgb = labTone(lab, L);
        const id = ramp * 4 + step;
        palette[id] = rgb;
        palette32[id] = (255 << 24) | (rgb[2] << 16) | (rgb[1] << 8) | rgb[0];
      });
    });
  };
  const unit = (id) => palette[id].map((v) => v / 255);

  // ---- 材質の表:時刻のかなめごと、状態(ふつう、影、灯り)ごと
  const STEP_L = RAMPS.flatMap(([, tones]) => tones);
  const shadeOf = (id) => {
    const step = id % 4;
    if (step > 0) return id - 1;
    if (id === C0) return A1;
    if (id === G0) return I3;
    if (id === U0) return I3;
    if (id === A0) return I3;
    return id;
  };
  const litOf = (dayId) => {
    const L = STEP_L[dayId];
    return L < 0.72 ? A0 : L < 0.9 ? A0 : A1;
  };
  // 水は空より一段だけ深い色になる
  const SHADE = Uint8Array.from({ length: 20 }, (_, id) => shadeOf(id));
  const NM = MATS.length;
  const table = KEYS.map(([, col]) => {
    const t = new Uint8Array(NM * 3);
    MATS.forEach((row, m) => {
      const id = row[col + 1];
      t[m] = id;
      t[NM + m] = shadeOf(id);
      t[NM * 2 + m] = litOf(row[1]);
    });
    return t;
  });

  // ---- 世界の大きさ(整数倍が決める)
  let bw = 1;
  let bh = 1;
  let ox = 0;
  let oy = 0;
  let k = 1;
  let matBuf = new Uint8Array(1);
  let baseBuf = new Uint8Array(1);
  let varBuf = new Uint8Array(1);
  let thrA = new Uint8Array(1);
  let thrB = new Uint8Array(1);
  let pixels = new Uint32Array(1);
  let mirror = new Int32Array(1); // 水の画素が映す、空の画素の番号
  let houseMask = new Uint8Array(1); // 家に隠れる画素
  let rowBuf = new Uint8Array(1);
  let skyKeys = [];
  let fronds = [];
  let reeds = [];
  let stars = [];
  let pond = []; // [番号, x, y, その列の岸の y] の並び
  const emitList = [];
  const sources = [{ w: 0, x: 0, y: 0, r: 0, g: 0, b: 0 }, { w: 0, x: 0, y: 0, r: 0, g: 0, b: 0 }];

  const noiseA = makeNoise(11);
  const noiseB = makeNoise(29);

  // ---- 描く道具
  const put = (x, y, m) => {
    const px = x + ox;
    const py = y + oy;
    if (px < 0 || py < 0 || px >= bw || py >= bh) return;
    matBuf[py * bw + px] = m;
  };
  const putSky = (x, y, m) => {
    const px = x + ox;
    const py = y + oy;
    if (px < 0 || py < 0 || px >= bw || py >= bh) return;
    const i = py * bw + px;
    if (matBuf[i] === 0) matBuf[i] = m;
  };
  const putFar = (x, y, m) => {
    const px = x + ox;
    const py = y + oy;
    if (px < 0 || py < 0 || px >= bw || py >= bh) return;
    const i = py * bw + px;
    if (FAR[matBuf[i]]) matBuf[i] = m;
  };
  const rect = (x, y, w, h, m) => {
    for (let j = 0; j < h; j++) for (let i = 0; i < w; i++) put(x + i, y + j, m);
  };
  const get = (x, y) => {
    const px = x + ox;
    const py = y + oy;
    if (px < 0 || py < 0 || px >= bw || py >= bh) return -1;
    return matBuf[py * bw + px];
  };
  const isWater = (x, y) => {
    const px = x + ox;
    const py = y + oy;
    if (px < 0 || py < 0 || px >= bw || py >= bh) return false;
    const i = py * bw + px;
    return mirror[i] !== i;
  };
  const blit = (s, x, y, flip = false, force = -1) => {
    for (const [dx, dy, m] of s.list) put(flip ? x + s.w - 1 - dx : x + dx, y + dy, force >= 0 ? force : m);
  };
  const emit = (x, y, weight, group = 2) => {
    const px = x + ox;
    const py = y + oy;
    if (px < 0 || py < 0 || px >= bw || py >= bh) return;
    emitList.push(py * bw + px, weight);
    if (group < 2) {
      const c = sources[group];
      c.w += weight;
      c.x += px * weight;
      c.y += py * weight;
      c.id = group === 0 ? A2 : c.id;
    }
  };

  // ---- 地形
  // 遠くのメサ:[中心, 上の半幅, 上の高さ]
  const MESAS = [[-34, 10, 62], [6, 15, 59], [114, 13, 55], [137, 5, 63], [198, 17, 60], [236, 9, 64]];
  let mesaSide = 0;
  const mesaTop = (x) => {
    let top = 999;
    for (const [c, hw, t] of MESAS) {
      const y = t + Math.max(0, Math.abs(x - c) - hw) * 1.5;
      if (y < top) {
        top = y;
        mesaSide = (x - c) / (hw + 1);
      }
    }
    return top;
  };
  const crestFar = (x) => 67 + noiseA(x * 0.016 + 3, 1.5) * 10;
  const crestNear = (x) => 75 + noiseA(x * 0.027 + 40, 7.5) * 6;

  const pathDist = (x, y) => {
    // 戸口から池へ下る道と、ヤシへ向かう枝道
    const main = y < 85 ? 99 : Math.abs(x - (74 + Math.sin(y * 0.3) * 1.2));
    const toPalm = Math.abs(y - (89.5 + Math.sin(x * 0.09) * 0.8)) * (x > 70 && x < 138 ? 1 : 99);
    return Math.min(main * 0.6, toPalm);
  };

  // 池:少しゆがんだ楕円
  const PX = 108;
  const PY = 99.5;
  const PRX = 46;
  const PRY = 7.5;
  const pondD = (x, y) => Math.hypot((x - PX) / PRX, (y - PY) / PRY) + (noiseB(x * 0.11 + 5, y * 0.3) - 0.5) * 0.2;

  const paintGround = () => {
    for (let py = 0; py < bh; py++) {
      const y = py - oy;
      for (let px = 0; px < bw; px++) {
        const x = px - ox;
        const i = py * bw + px;
        const dither = bayerAt(x, y) / 16 - 0.5;
        if (y < HORIZON) {
          const cn = crestNear(x);
          const cf = crestFar(x);
          if (y >= cn) {
            // 風下の面は、影になる
            const slope = crestNear(x + 2) - crestNear(x - 2);
            matBuf[i] = slope + dither * 0.12 > 0.04 ? M.DUNE_NEAR_SH : M.DUNE_NEAR;
          } else if (y >= cf) {
            const slope = crestFar(x + 2) - crestFar(x - 2);
            matBuf[i] = slope + dither * 0.1 > 0.03 ? M.DUNE_FAR_SH : M.DUNE_FAR;
          } else {
            const top = mesaTop(x) + (noiseB(x * 0.5, 3.5) - 0.5) * 1.6;
            if (y >= top) {
              // 地層の筋と、光の当たる左の肩
              const strata = (y + Math.round(noiseB(x * 0.08, 1.5) * 2)) % 4 === 0 && noiseB(x * 0.3, y * 0.5) > 0.35;
              let m = M.MESA;
              if (y < top + 1 || mesaSide < -0.62) m = M.MESA_LT;
              else if (mesaSide + dither * 0.3 > 0.3 || strata) m = M.MESA_DK;
              matBuf[i] = m;
            }
          }
          continue;
        }
        // 砂:風がつけた細い畝
        const depth = (y - HORIZON) / 30;
        const wave = y + Math.sin(x * 0.05 + noiseA(x * 0.02 + 4, y * 0.05) * 5) * 1.7;
        const gap = 3.6 + depth * 3.2;
        const ph = ((wave % gap) + gap) % gap;
        const fine = noiseB(x * 0.16, y * 0.42);
        let m = M.SAND;
        if (ph < 1 && fine > 0.34) m = M.SAND_DK;
        else if (ph < 2 && fine > 0.62) m = M.SAND_LT;
        const big = noiseA(x * 0.035 + 9, y * 0.14 + 3) + dither * 0.16;
        if (m === M.SAND && big < 0.34) m = M.SAND_DK;
        else if (m === M.SAND && big > 0.72) m = M.SAND_LT;
        const pd = pathDist(x, y);
        if (pd < 2.2 + depth * 1.4) {
          m = noiseB(x * 0.7 + 3, y * 0.9) > 0.68 ? M.PATH_DK : M.PATH;
        } else if (pd < 3.2 + depth * 1.4 && bayerAt(x, y) > 9) {
          m = M.PATH;
        }
        matBuf[i] = m;
      }
    }
    // 小石
    const r = seeded(5);
    for (let i = 0; i < (bw * bh) / 150; i++) {
      const x = Math.floor(r() * bw) - ox;
      const y = HORIZON + 2 + Math.floor(r() * (bh - oy - HORIZON));
      if (pathDist(x, y) < 5) continue;
      put(x, y, r() < 0.5 ? M.SAND_DK : M.STONE_LT);
    }
  };

  const paintPond = () => {
    pond = [];
    mirror = new Int32Array(bw * bh);
    for (let i = 0; i < mirror.length; i++) mirror[i] = i;
    const tops = new Map();
    const y0 = Math.floor(PY - PRY * 2);
    const y1 = Math.ceil(PY + PRY * 2);
    const x0 = Math.floor(PX - PRX * 1.7);
    const x1 = Math.ceil(PX + PRX * 1.7);
    for (let y = y0; y <= y1; y++) {
      if (y < HORIZON + 5) continue;
      for (let x = x0; x <= x1; x++) {
        const px = x + ox;
        const py = y + oy;
        if (px < 0 || py < 0 || px >= bw || py >= bh) continue;
        const i = py * bw + px;
        const d = pondD(x, y);
        if (d < 1) {
          if (!tops.has(x)) tops.set(x, y);
          const top = tops.get(x);
          matBuf[i] = d > 0.88 && bayerAt(x, y) < (d - 0.88) * 110 ? M.SHALLOW : M.WATER;
          // 手前の水ほど、空の高いところを映す
          const skyRow = clamp(HORIZON - 1 - (y - top) * 5 + oy, 0, bh - 1);
          mirror[i] = skyRow * bw + px;
          pond.push(i, x, y, top);
        } else if (d < 1.1 || (d < 1.17 && bayerAt(x, y) > 8)) {
          matBuf[i] = M.SAND_WET;
        } else if (d < 1.55 && y >= HORIZON + 8 && noiseA(x * 0.1 + 2, y * 0.3) > 0.5 - (1.55 - d) * 0.3) {
          // 水辺にだけ、緑が生える
          const v = noiseB(x * 0.4, y * 0.7) + (bayerAt(x, y) / 16 - 0.5) * 0.3;
          matBuf[i] = v > 0.66 ? M.GRASS_LT : v > 0.36 ? M.GRASS : M.GRASS_DK;
        }
      }
    }
  };

  const paintGardenWall = () => {
    // 小さな畑を囲う、土の低い塀
    for (let x = 89; x < 125; x++) {
      const top = 75 + Math.round(noiseA(x * 0.22 + 2, 5.5) * 4);
      for (let y = top; y < 84; y++) {
        let m = (y + ((x >> 2) & 1) * 2) % 4 === 0 ? M.WALL_SH : M.WALL;
        if (y === top) m = M.WALL_LT;
        if (x >= 122 && bayerAt(x, y) < (x - 121) * 4) m = M.WALL_SH;
        put(x, y, m);
      }
    }
  };

  const paintBush = (cx, cy, rx, ry, seed) => {
    const r = seeded(seed);
    const blobs = Array.from({ length: 6 }, () => [cx + (r() - 0.5) * rx * 1.5, cy + (r() - 0.5) * ry, 3 + r() * (ry * 0.75)]);
    for (let y = cy - ry - 3; y <= cy + ry + 1; y++) {
      for (let x = cx - rx - 3; x <= cx + rx + 3; x++) {
        let inside = false;
        let shade = 0;
        for (const [bx, by, br] of blobs) {
          const d = Math.hypot(x - bx, (y - by) * 1.15);
          if (d < br) {
            inside = true;
            shade = Math.max(shade, 1 - d / br);
          }
        }
        if (!inside) continue;
        const v = shade * 0.6 + (cy - y) / (ry * 2.4) + (bayerAt(x, y) / 16 - 0.5) * 0.3 + noiseB(x * 0.4, y * 0.5) * 0.25;
        put(x, y, v > 0.82 ? M.LEAF3 : v > 0.52 ? M.LEAF2 : v > 0.24 ? M.LEAF1 : M.LEAF0);
      }
    }
  };

  const paintFlowers = (x0, x1, y0, y1, count, seed) => {
    const r = seeded(seed);
    for (let i = 0; i < count; i++) {
      const x = Math.floor(mix(x0, x1, r()));
      const y = Math.floor(mix(y0, y1, r()));
      if (pathDist(x, y) < 4.5 || pondD(x, y) < 1.25) continue;
      put(x, y, M.STEM);
      put(x, y - 1, M.STEM);
      const m = r() < 0.55 ? M.FLOWER_A : M.FLOWER_C;
      put(x, y - 2, m);
      if (r() < 0.5) {
        put(x - 1, y - 2, m);
        put(x + 1, y - 2, m);
        put(x, y - 3, m);
      }
    }
  };

  const paintJar = (x, y) => {
    // 素焼きの水がめ
    rect(x + 1, y - 7, 2, 1, M.WOOD_DK);
    rect(x + 1, y - 6, 2, 1, M.WOOD);
    rect(x, y - 5, 4, 3, M.WOOD);
    put(x, y - 5, M.WOOD_LT);
    put(x, y - 4, M.WOOD_LT);
    put(x + 3, y - 3, M.WOOD_DK);
    rect(x + 1, y - 2, 2, 2, M.WOOD);
  };

  const paintHouse = () => {
    const X0 = 38;
    const X1 = 84;
    const TOP = 54;
    const BASE = 85;
    const UX0 = 42;
    const UX1 = 66;
    const UTOP = 38;
    const speckle = (x0, y0, x1, y1) => {
      for (let y = y0; y < y1; y++) {
        for (let x = x0; x < x1; x++) {
          const n = noiseB(x * 0.55 + 9, y * 0.75);
          if (n > 0.72) put(x, y, M.WALL_LT);
          else if (n < 0.24) put(x, y, M.WALL_SH);
        }
      }
    };

    // 上の階:屋上の胸壁つき
    rect(UX0, UTOP, UX1 - UX0, TOP - UTOP, M.WALL);
    speckle(UX0, UTOP, UX1, TOP);
    rect(UX0 - 1, UTOP - 1, UX1 - UX0 + 2, 1, M.WALL_LT);
    for (let x = UX0 - 1; x < UX1; x += 4) rect(x, UTOP - 3, 2, 2, M.WALL_LT);
    for (let x = UX1 - 3; x < UX1; x++) {
      for (let y = UTOP; y < TOP; y++) if (bayerAt(x, y) < (x - (UX1 - 3) + 1) * 5) put(x, y, M.WALL_SH);
    }
    for (let x = UX0 + 2; x < UX1 - 2; x += 6) {
      rect(x, UTOP + 2, 2, 1, M.WOOD_DK);
      put(x, UTOP + 3, M.WOOD);
    }
    // 上の小さなアーチ窓
    rect(52, 44, 5, 8, M.WOOD_DK);
    rect(53, 45, 3, 7, M.GLASS);
    put(52, 44, M.WALL);
    put(56, 44, M.WALL);
    put(54, 47, M.GLASS_HI);

    // 下の階の屋根に、煙突
    rect(70, 44, 6, 10, M.WALL_SH);
    rect(69, 42, 8, 2, M.WALL_LT);
    rect(71, 42, 4, 1, M.WOOD_DK);

    // 下の階の壁
    rect(X0, TOP, X1 - X0, BASE - TOP, M.WALL);
    speckle(X0, TOP, X1, BASE);
    rect(X0 - 1, TOP - 1, X1 - X0 + 2, 1, M.WALL_LT);
    // 屋根の下の影。ディザで下へ薄くなる
    for (let y = TOP; y < TOP + 5; y++) {
      for (let x = X0; x < X1; x++) {
        if (y < TOP + 2 || bayerAt(x, y) < (TOP + 5 - y) * 4) put(x, y, M.WALL_SH);
      }
    }
    // 梁の木口
    for (let x = X0 + 3; x < X1 - 1; x += 6) {
      rect(x, TOP + 1, 2, 1, M.WOOD_DK);
      put(x, TOP + 2, M.WOOD);
    }
    // 右の端は日陰
    for (let x = X1 - 3; x < X1; x++) {
      for (let y = TOP; y < BASE; y++) if (bayerAt(x, y) < (x - (X1 - 3) + 1) * 5) put(x, y, M.WALL_SH);
    }
    // 足もとの土の帯
    rect(X0 - 1, BASE - 3, X1 - X0 + 2, 3, M.WALL_SH);
    for (let x = X0 - 1; x < X1 + 1; x += 5) put(x + 2, BASE - 2, M.STONE_LT);

    // 戸口:青く塗った扉と、アーチ
    rect(69, 65, 8, 1, M.WOOD_DK);
    rect(67, 66, 12, 19, M.WOOD_DK);
    rect(68, 67, 10, 18, M.PAINT);
    for (let x = 70; x < 78; x += 3) rect(x, 67, 1, 18, M.PAINT_LT);
    rect(68, 72, 10, 1, M.WOOD_DK);
    put(67, 66, M.WALL);
    put(78, 66, M.WALL);
    put(68, 67, M.WOOD_DK);
    put(77, 67, M.WOOD_DK);
    put(76, 77, M.FLOWER_A);
    rect(66, 85, 14, 2, M.STONE_LT);
    rect(65, 87, 16, 1, M.STONE);

    // 戸口の上の日よけ
    for (let x = 67; x < 83; x++) {
      const stripe = ((x - 67) >> 1) & 1;
      for (let y = 60; y < 64; y++) put(x, y, stripe ? M.CLOTH_A : M.CLOTH_B);
      if (x % 4 < 2) put(x, 64, stripe ? M.CLOTH_A : M.CLOTH_B);
    }

    // 窓枠と窓辺の鉢(窓の中は毎フレーム描く)
    rect(44, 59, 18, 16, M.WOOD_DK);
    put(44, 59, M.WALL);
    put(45, 59, M.WALL);
    put(44, 60, M.WALL);
    put(61, 59, M.WALL);
    put(60, 59, M.WALL);
    put(61, 60, M.WALL);
    rect(43, 75, 20, 3, M.WALL_SH);
    rect(43, 75, 20, 1, M.WALL_LT);
    const r = seeded(77);
    for (let x = 45; x < 61; x += 5) {
      rect(x, 73, 3, 2, M.WOOD);
      put(x + 1, 72, M.LEAF2);
      put(x, 71, M.LEAF1);
      put(x + 2, 71, M.LEAF3);
      if (r() < 0.6) put(x + 1, 70, M.FLOWER_A);
    }

    // 灯りの腕木
    put(64, 63, M.WOOD_DK);
    put(65, 63, M.WOOD_DK);

    // 水がめ
    paintJar(86, 85);
    paintJar(91, 87);
  };

  // ---- ヤシ:幹は動かず、葉は1枚ずつ風に揺れる
  const PALMS = [
    { x: 30, y: 85, top: 42, lean: -5, w: 2, L: 21, count: 9, seed: 11, behind: true },
    { x: 110, y: 80, top: 54, lean: 3, w: 1, L: 14, count: 8, seed: 12, behind: false },
    { x: 168, y: 87, top: 50, lean: 6, w: 2, L: 20, count: 9, seed: 13, behind: false },
    { x: 144, y: 90, top: 34, lean: 8, w: 3, L: 33, count: 13, seed: 14, behind: false },
  ];

  const paintTrunk = (p) => {
    for (let y = p.top; y <= p.y; y++) {
      const t = (p.y - y) / (p.y - p.top);
      const cx = p.x + p.lean * t * t;
      const flare = y > p.y - 3 ? (y - (p.y - 3)) * 0.6 : 0;
      const half = p.w * (0.75 + (1 - t) * 0.45) + flare;
      const l = Math.round(cx - half);
      const r = Math.round(cx + half);
      for (let x = l; x <= r; x++) {
        const u = (x - l) / Math.max(r - l, 1);
        const ringed = (p.y - y) % 3 === 0;
        let m = M.WOOD;
        if (u > 0.72 || (ringed && u > 0.15)) m = M.BARK;
        else if (u < 0.3) m = M.WOOD_LT;
        else if (noiseB(x * 0.9, y * 0.2) > 0.6) m = M.BARK_LT;
        put(x, y, m);
      }
    }
  };

  const buildFronds = () => {
    fronds = [];
    for (const p of PALMS) {
      const r = seeded(p.seed * 131);
      const cx = p.x + p.lean;
      const cy = p.top;
      for (let f = 0; f < p.count; f++) {
        const a = Math.PI * (-0.12 + (1.24 * (f + 0.5)) / p.count) + (r() - 0.5) * 0.12;
        const dir = Math.cos(a);
        const up = Math.sin(a);
        const side = dir >= 0 ? 1 : -1;
        const len = p.L * (0.8 + r() * 0.28);
        const droop = mix(1.2, 0.55, Math.max(up, 0) * Math.max(up, 0)) * (0.9 + r() * 0.2);
        const steps = Math.ceil(len * 1.4);
        const cells = new Map();
        const add = (x, y, m, w) => {
          cells.set((Math.round(x) + 2048) * 4096 + Math.round(y) + 2048, [Math.round(x), Math.round(y), m, w]);
        };
        for (let s = 0; s <= steps; s++) {
          const t = s / steps;
          const fx = cx + (dir + side * 0.12) * len * t;
          const fy = cy - up * len * t * 0.95 + droop * len * t * t * 0.5;
          const w = t * t;
          const taper = Math.sin(Math.PI * Math.min(t * 1.15, 1));
          const ll = 1 + Math.round(taper * p.L * 0.16);
          // 下へ垂れる小葉
          for (let q = 1; q <= ll; q++) {
            if (t > 0.15 && q > 1 && (s + q) % 3 === 0) continue;
            add(fx + side * q * 0.45, fy + q * 0.85, q === 1 ? M.LEAF1 : M.LEAF0, w);
          }
          // 上に立つ、日の当たる小葉
          const ul = Math.ceil(ll * 0.35);
          for (let q = 1; q <= ul; q++) {
            if ((s + q) % 3 === 0) continue;
            add(fx + side * q * 0.5, fy - q * 0.7, dir < 0.15 ? M.LEAF3 : M.LEAF2, w);
          }
          // 葉の軸
          add(fx, fy, dir < 0.15 ? M.LEAF3 : M.LEAF2, w);
        }
        const px = [];
        for (const cell of cells.values()) px.push(cell[0], cell[1], cell[2], cell[3]);
        fronds.push({ px, phase: r() * 6.28, amp: 2 + p.L * 0.03, behind: p.behind });
      }
      // 付け根と、ナツメヤシの実
      const hub = [];
      for (let dy = -1; dy <= 1; dy++) {
        for (let dx = -2; dx <= 2; dx++) hub.push(cx + dx, cy + dy, M.LEAF0, 0);
      }
      const dates = Math.round(p.L * 0.5);
      for (let i = 0; i < dates; i++) {
        hub.push(cx + Math.round((r() - 0.5) * p.w * 3.4), cy + 2 + Math.floor(r() * (2 + p.w)), r() < 0.5 ? M.WOOD_LT : M.WOOD, 0);
      }
      fronds.push({ px: hub, phase: 0, amp: 0, behind: p.behind });
    }
  };

  const buildReeds = () => {
    // 葦:池の左右と手前に
    reeds = [];
    const r = seeded(404);
    for (let i = 0; i < 34; i++) {
      const right = i % 2 === 0;
      const a = right ? mix(-0.2, 1.05, r()) : mix(2.1, 3.4, r());
      const x = Math.round(PX + Math.cos(a) * (PRX + 1) * (0.96 + r() * 0.1));
      const y = Math.round(PY + Math.sin(a) * (PRY + 1));
      reeds.push({ x, y, height: 4 + Math.floor(r() * 6), seed: r() * 6.28, head: r() < 0.3 });
    }
  };

  const paintFirePit = () => {
    rect(FIRE_X - 3, FIRE_Y + 1, 7, 1, M.WOOD_DK);
    for (const [dx, dy] of [[-5, 1], [5, 1], [-4, 2], [4, 2], [-2, 3], [2, 3], [0, 3]]) {
      put(FIRE_X + dx, FIRE_Y + dy, M.STONE);
      put(FIRE_X + dx, FIRE_Y + dy - 1, M.STONE_LT);
    }
  };

  const buildBase = () => {
    matBuf.fill(0);
    paintGround();
    paintPond();
    paintBush(14, 84, 12, 5, 61);
    paintBush(198, 85, 11, 5, 62);
    paintBush(-12, 85, 10, 5, 63);
    paintBush(222, 85, 10, 5, 64);
    paintBush(106, 72, 18, 5, 65);
    for (const p of PALMS) paintTrunk(p);
    paintGardenWall();
    const before = matBuf.slice();
    paintHouse();
    for (let i = 0; i < matBuf.length; i++) houseMask[i] = matBuf[i] !== before[i] ? 1 : 0;
    paintFirePit();
    paintFlowers(-14, 14, 90, 104, 10, 95);
    paintFlowers(40, 62, 94, 106, 10, 94);
    paintFlowers(150, 205, 96, 108, 18, 93);
    paintFlowers(60, 150, 107, 113, 16, 96);
    baseBuf.set(matBuf);
    buildFronds();
    buildReeds();

    const r = seeded(808);
    stars = [];
    for (let i = 0; i < 130; i++) {
      stars.push({ x: Math.floor(r() * (CORE_W + 40)) - 20, y: Math.floor(r() * 66), seed: r(), big: r() < 0.12 });
    }
    // 砂漠の夜の、天の川の帯
    for (let i = 0; i < 110; i++) {
      const u = r();
      stars.push({ x: Math.floor(u * (CORE_W + 40)) - 20, y: Math.floor(4 + u * 40 + (r() - 0.5) * 16), seed: r(), big: false });
    }
    // 空を時刻のかなめごとに描いておく
    skyKeys = KEYS.map(([, , stops]) => {
      const sky = new Uint8Array(bw * bh);
      const n = stops.length - 1;
      for (let py = 0; py < bh; py++) {
        const pos = clamp((py - oy) / HORIZON) * n;
        const a = Math.min(Math.floor(pos), n);
        const b = Math.min(a + 1, n);
        // 帯のあいだだけを、市松の点で埋める
        const f = smoothstep(0.3, 0.7, pos - a) * 4;
        for (let px = 0; px < bw; px++) {
          const cell = ((py & 1) << 1) | (px & 1);
          sky[py * bw + px] = f > [0, 2, 3, 1][cell] ? stops[b] : stops[a];
        }
      }
      return sky;
    });
  };

  // ---- 住人と世界の動き
  const FIRE_X = 28;
  const FIRE_Y = 92;
  const res = { x: 73, inside: false, face: 1, step: 0, doorOpen: 0, startle: 0, hop: 0, blink: 0, nextBlink: 2, page: 0, nextPage: 4, pageT: 0, hurry: 0 };
  const clouds = [
    { x: 8, y: 11, w: 40, h: 6, seed: 1, speed: 0.5 },
    { x: 92, y: 24, w: 28, h: 4, seed: 2, speed: 0.75 },
    { x: 170, y: 7, w: 46, h: 6, seed: 3, speed: 0.38 },
  ].map((cloud) => {
    const r = seeded(cloud.seed * 977);
    const blobs = Array.from({ length: 6 }, (_, i) => [cloud.w * ((i + 0.5) / 6) + (r() - 0.5) * 3, cloud.h * (0.45 + (r() - 0.5) * 0.35), cloud.h * (0.3 + r() * 0.32)]);
    const list = [];
    for (let y = 0; y < cloud.h + 3; y++) {
      for (let x = -2; x < cloud.w + 3; x++) {
        let inside = false;
        for (const [bx, by, br] of blobs) if (Math.hypot(x - bx, (y - by) * 1.25) < br) inside = true;
        if (!inside) continue;
        list.push(x, y, y > cloud.h * 0.62 ? 1 : 0);
      }
    }
    return { ...cloud, list };
  });
  const smoke = [];
  const zees = [];
  const sand = [];
  const sparks = [];
  const rings = [];
  const glints = [];
  const birds = { t: -1, next: 8, y: 20, dir: 1 };
  const shoot = { t: -1, next: 14 };
  const caravan = { x: 0, dir: -1, on: false, next: 2, step: 0 };
  const flies = Array.from({ length: 8 }, (_, i) => ({ seed: i * 7.3 + 1, x: 90 + (i - 3) * 14, y: 88 + (i % 3) * 6 }));
  const dfly = { x: 112, y: 90 };
  let anim = 0;
  let smokeAcc = 0;
  let zeeAcc = 0;
  let lampFlick = 1;
  let windowL = 0;
  let lanternL = 0;
  let fireL = 0;
  let shutter = 0;

  const hourOf = (clock) => ((clock % 24) + 24) % 24;
  const sunAngle = (h) => ((h - 6) / 12) * Math.PI;
  const sunX = (h) => Math.round(96 - Math.cos(sunAngle(h)) * 102);
  // 上弦の月:夕方にはもう空にあり、夜半を過ぎて右へ沈む
  const moonHour = (h) => (h >= 17 ? h : h + 24);
  const moonAngle = (mh) => ((mh - 16.5) / 12) * Math.PI;
  const moonX = (mh) => Math.round(96 - Math.cos(moonAngle(mh)) * 102);

  const addRing = (x, y) => {
    if (calm || rings.length > 6) return;
    rings.push({ x, y, t: 0 });
  };

  // 時刻から、住人の予定を決める
  const planFor = (h) => {
    if (h >= 9.6 && h < 11) return { outside: true, x: 104, act: 'tend' };
    if (h >= 11 && h < 16.2) return { outside: true, x: 131, act: 'read' };
    if (h >= 16.2 && h < 17.2) return { outside: true, x: 88, act: 'stroll' };
    return { outside: false, x: 73, act: 'in' };
  };

  const stepResident = (dt, h, speedHint) => {
    const plan = planFor(h);
    const want = plan.outside ? plan.x : 73;
    if (calm) {
      res.inside = !plan.outside;
      res.x = want;
      return plan;
    }
    res.startle = Math.max(0, res.startle - dt);
    res.hop = res.startle > 0.55 ? Math.sin(((0.9 - res.startle) / 0.35) * Math.PI) * 3 : 0;
    res.doorOpen = Math.max(0, res.doorOpen - dt);
    if (res.startle > 0) return plan;

    if (res.inside && plan.outside) {
      res.inside = false;
      res.x = 73;
      res.doorOpen = 0.5;
    }
    if (!res.inside) {
      const delta = want - res.x;
      if (Math.abs(delta) > 0.5) {
        const speed = 17 + clamp(speedHint, 0, 1) * 72 + (Math.abs(delta) > 34 ? 8 : 0);
        const move = Math.min(Math.abs(delta), speed * dt);
        res.x += Math.sign(delta) * move;
        res.face = Math.sign(delta);
        res.step += move * 0.28;
        res.hurry = speedHint;
      } else {
        res.x = want;
        res.step = 0;
        if (!plan.outside) {
          res.inside = true;
          res.doorOpen = 0.45;
        }
      }
    }
    // まばたき、ページをめくる
    res.nextBlink -= dt;
    if (res.nextBlink <= 0) {
      res.blink = 0.13;
      res.nextBlink = 1.8 + Math.random() * 3.4;
    }
    res.blink = Math.max(0, res.blink - dt);
    res.nextPage -= dt;
    if (res.nextPage <= 0) {
      res.pageT = 0.42;
      res.nextPage = 3.6 + Math.random() * 3.2;
    }
    res.pageT = Math.max(0, res.pageT - dt);
    return plan;
  };

  const drawSky = (h) => {
    const dark = smoothstep(18.2, 20.2, h) + (1 - smoothstep(4.6, 6.2, h));
    const night = clamp(dark);

    // 星:夜だけ。またたく
    if (night > 0.02) {
      for (const s of stars) {
        if (s.seed > night * 1.05) continue;
        const twinkle = calm ? 1 : Math.sin(anim * (1.3 + s.seed * 4.4) + s.seed * 40);
        if (twinkle < -0.72) continue;
        const m = twinkle < 0.1 && !s.big ? M.STAR_DIM : M.STAR;
        putSky(s.x, s.y, m);
        if (s.big && twinkle > 0.55) {
          putSky(s.x - 1, s.y, M.STAR_DIM);
          putSky(s.x + 1, s.y, M.STAR_DIM);
          putSky(s.x, s.y - 1, M.STAR_DIM);
          putSky(s.x, s.y + 1, M.STAR_DIM);
        }
      }
      // 流れ星
      if (!calm && night > 0.9) {
        if (shoot.t >= 0) {
          const f = shoot.t / 0.55;
          for (let i = 0; i < 7; i++) {
            const u = f * 42 - i * 2;
            if (u > 0 && u < 42) putSky(Math.round(shoot.x + u), Math.round(shoot.y + u * 0.45), i < 2 ? M.STAR : M.STAR_DIM);
          }
        }
      }
    }

    // 太陽:空を弧を描いて動く
    if (h > 5.2 && h < 19) {
      const a = sunAngle(h);
      const sx = sunX(h);
      const sy = Math.round(HORIZON - 2 - Math.sin(a) * 70);
      const low = 1 - clamp(Math.sin(a) * 1.6);
      const R = 5 + Math.round(low * 2);
      for (let dy = -R - 5; dy <= R + 5; dy++) {
        for (let dx = -R - 5; dx <= R + 5; dx++) {
          const d = Math.hypot(dx, dy);
          const x = sx + dx;
          const y = sy + dy;
          if (d <= R - 1) {
            putSky(x, y, M.SUN);
            emit(x, y, 26 + low * 90, 1);
          } else if (d <= R) {
            putSky(x, y, M.SUN_RIM);
          } else if (d <= R + 4 && bayerAt(x, y) < (R + 4.6 - d) * 2.2) {
            putSky(x, y, M.SUN_RIM);
          }
        }
      }
    }

    // 月
    const mh = moonHour(h);
    if (mh > 17.4 && mh < 28.4) {
      const a = moonAngle(mh);
      const mx = moonX(mh);
      const my = Math.round(HORIZON - 2 - Math.sin(a) * 66);
      const R = 6;
      for (let dy = -R - 3; dy <= R + 3; dy++) {
        for (let dx = -R - 3; dx <= R + 3; dx++) {
          const d = Math.hypot(dx, dy);
          const x = mx + dx;
          const y = my + dy;
          if (d <= R) {
            const crater = (dx === -2 && dy === -2) || (dx === 2 && dy === 1) || (dx === -3 && dy === 2) || (dx === 1 && dy === -3) || (dx === 3 && dy === -1) || (dx === -1 && dy === 3);
            const shaded = dx * 0.7 + dy * 0.7 > R * 0.45;
            putSky(x, y, crater || shaded ? M.MOON_DK : M.MOON);
            emit(x, y, 12, 1);
          } else if (d <= R + 3 && bayerAt(x, y) < (R + 3.4 - d) * 1.6) {
            putSky(x, y, M.STAR_DIM);
          }
        }
      }
    }

    // 雲:砂漠の空には、薄くすじ状に
    for (const cloud of clouds) {
      const span = CORE_W + 96;
      const cx = ((cloud.x + (calm ? 0 : anim * cloud.speed) + 48) % span) - 48;
      const x0 = Math.round(cx);
      for (let i = 0; i < cloud.list.length; i += 3) {
        const x = x0 + cloud.list[i];
        const y = cloud.y + cloud.list[i + 1];
        const under = cloud.list[i + 2];
        if (under && bayerAt(x, y) > 11) continue;
        putSky(x, y, under ? M.CLOUD_SH : M.CLOUD);
      }
    }

    // 鳥:昼に、ときどき渡る
    if (!calm && h > 7 && h < 18.5 && birds.t >= 0) {
      const flap = Math.floor(anim * 7) % 2;
      for (let i = 0; i < 4; i++) {
        const x = Math.round((birds.dir > 0 ? -12 + birds.t * 26 : CORE_W + 12 - birds.t * 26) - birds.dir * i * 6);
        const y = birds.y + (i % 2) * 3 + i;
        putSky(x, y, M.BIRD);
        putSky(x - 1, y - flap, M.BIRD);
        putSky(x + 1, y - flap, M.BIRD);
      }
    }
  };

  // 遠くの砂丘の稜線を、隊商が渡っていく
  const drawCaravan = (h, dt) => {
    if (h < 6.5 || h > 20.6) return;
    if (!calm) {
      if (caravan.on) {
        caravan.x += caravan.dir * 5 * dt;
        caravan.step += dt * 3.2;
        if ((caravan.dir < 0 && caravan.x < -ox - 50) || (caravan.dir > 0 && caravan.x > bw - ox + 50)) {
          caravan.on = false;
          caravan.next = 16 + Math.random() * 22;
        }
      } else {
        caravan.next -= dt;
        if (caravan.next <= 0) {
          caravan.on = true;
          caravan.dir = Math.random() < 0.7 ? -1 : 1;
          caravan.x = caravan.dir < 0 ? bw - ox + 8 : -ox - 8;
        }
      }
    }
    if (!calm && !caravan.on) return;
    const cx = calm ? 122 : caravan.x;
    const dir = calm ? -1 : caravan.dir;
    const frame = Math.floor(caravan.step) % 2;
    for (let j = 0; j < 4; j++) {
      const s = j === 0 ? SPR.miniGuide : SPR.miniCamel[(frame + j) % 2];
      const ux = Math.round(cx - dir * j * 13);
      const uy = Math.round(crestFar(ux + s.w / 2)) - s.h + 1;
      for (const [dx, dy, m] of s.list) putFar(dir < 0 ? ux + s.w - 1 - dx : ux + dx, uy + dy, m);
    }
  };

  // 真昼の陽炎:遠景だけが、列ごとに左右へゆらぐ
  const drawHaze = (h) => {
    if (calm || h < 10.5 || h > 15.5) return;
    for (let y = 50; y < HORIZON; y++) {
      const py = y + oy;
      if (py < 0 || py >= bh) continue;
      const o = Math.round(Math.sin(anim * 2.4 + y * 0.8) * Math.sin(anim * 0.37 + y * 0.13) * 1.4);
      if (o === 0) continue;
      const start = py * bw;
      rowBuf.set(matBuf.subarray(start, start + bw));
      for (let px = 1; px < bw - 1; px++) {
        const cur = rowBuf[px];
        const src = rowBuf[px - o];
        if (FAR[cur] && FAR[src]) matBuf[start + px] = src;
      }
    }
  };

  const drawShadows = (h) => {
    if (h < 6.2 || h > 18.6) return;
    const dir = Math.cos(sunAngle(h)); // 太陽が左なら、影は右へ
    const fade = smoothstep(6.2, 7.6, h) * (1 - smoothstep(17.4, 18.6, h));
    const reach = 3 + Math.abs(dir) * 22;
    const mark = (x, y, strength) => {
      const px = x + ox;
      const py = y + oy;
      if (px < 0 || py < 0 || px >= bw || py >= bh) return;
      const i = py * bw + px;
      if (matBuf[i] !== 0 && strength * fade * 16 > bayerAt(x, y)) varBuf[i] = 1;
    };
    // ヤシの影:幹の線と、葉のかたまり
    const palmShadow = (bx, by, rx, ry, scale) => {
      const cx = bx + dir * reach * scale;
      const cy = by + 3;
      const steps = Math.ceil(Math.abs(cx - bx)) + 3;
      for (let s = 0; s <= steps; s++) {
        const t = s / steps;
        const x = Math.round(mix(bx, cx, t));
        const y = Math.round(mix(by, cy, t));
        mark(x, y, 1);
        mark(x, y + 1, 0.8);
      }
      for (let y = cy - ry; y <= cy + ry; y++) {
        const v = (y - cy) / ry;
        const half = rx * Math.sqrt(Math.max(0, 1 - v * v));
        for (let x = Math.round(cx - half); x <= cx + half; x++) mark(x, y, 0.9 - (Math.abs(x - cx) / (half + 1)) * 0.4);
      }
    };
    palmShadow(144, 91, 22, 3, 1.1);
    palmShadow(174, 88, 12, 2, 0.7);
    // ラクダの影
    for (let y = 92; y < 95; y++) {
      for (let x = 150; x < 178; x++) mark(x + Math.round(dir * 3), y, 0.8);
    }
    // 家の影
    for (let y = 87; y < 94; y++) {
      const t = (y - 87) / 7;
      const shift = dir * reach * 0.8 * t;
      for (let x = Math.round(36 + Math.min(shift, 0)); x <= 86 + Math.max(shift, 0); x++) mark(x, y, 1 - t * 0.5);
    }
  };

  const paintWindowScene = (h) => {
    // 窓の中:14×12
    const WX = 46;
    const WY = 61;
    const WW = 14;
    const WH = 12;
    const lamp = h >= 19.6 && h < 22.9;
    const cook = h >= 17.2 && h < 19.6;
    const morning = h >= 7 && h < 9.6;
    const asleep = h >= 22.9 || h < 6.5;

    if (lamp || cook) {
      const flick = lamp ? lampFlick : 0.6 + 0.08 * Math.sin(anim * 9);
      const swing = lamp && !calm ? Math.round(Math.sin(anim * 0.9) * 0.7) : 0;
      for (let y = 0; y < WH; y++) {
        for (let x = 0; x < WW; x++) {
          let m;
          if (lamp) {
            // 灯りの下に、広がる光の円すい
            const cone = Math.abs(x - (4.5 + swing)) - (y - 2) * 0.62;
            m = cone < 0 && y >= 3 ? M.LIT_HI : cone < 2.2 ? M.LIT : M.LIT_DK;
          } else {
            m = Math.hypot(x - 6.5, y - 8) < 5 && bayerAt(x, y) < 8 ? M.LIT : M.LIT_DK;
          }
          if (y >= WH - 1) m = M.LIT_DK;
          put(WX + x, WY + y, m);
          if (y < WH) emit(WX + x, WY + y, (m === M.LIT_HI ? 255 : m === M.LIT ? 210 : 130) * flick, 0);
        }
      }
      if (lamp) {
        // 天井から下がる灯り:コードと、かさと、電球
        const lx = WX + 4 + swing;
        put(lx, WY, M.SIL);
        put(lx, WY + 1, M.SIL);
        rect(lx - 2, WY + 2, 5, 1, M.SIL);
        rect(lx - 1, WY + 3, 3, 1, M.LIT_HI);
        // 机と、開いた本
        rect(WX + 1, WY + 10, 9, 1, M.SIL);
        rect(WX + 2, WY + 11, 1, 1, M.SIL);
        rect(WX + 8, WY + 11, 1, 1, M.SIL);
        const pageUp = res.pageT > 0 && !calm;
        rect(WX + 4, WY + 9, 3, 1, M.SIL);
        if (pageUp) put(WX + 5, WY + 8, M.SIL);
        // 机に向かう人影。ときどき顔を上げる。まだ外にいるあいだは、誰もいない
        if (!res.inside) return { lamp, cook, asleep };
        const startled = res.startle > 0;
        const look = startled || (!calm && Math.sin(anim * 0.46) > 0.72);
        const nod = !calm && !look && Math.sin(anim * 1.7) > 0.86 ? 1 : 0;
        const hy = WY + 3 + nod - (startled ? 1 : 0);
        const hx = WX + 8;
        // 頭
        rect(hx, hy + (look ? 0 : 1), 4, 3, M.SIL);
        put(hx + 1, hy + (look ? -1 : 0), M.SIL);
        put(hx + 2, hy + (look ? -1 : 0), M.SIL);
        if (!look) put(hx - 1, hy + 2, M.SIL);
        // 肩と背
        rect(WX + 8, WY + 7, 5, 3, M.SIL);
        rect(WX + 9, WY + 10, 4, 2, M.SIL);
        // 机へのばした腕
        rect(WX + 6, WY + 8, 3, 1, M.SIL);
      } else {
        // 夕方:台所を行き来する人影と、湯気
        const walk = calm ? 0 : Math.sin(anim * 0.8) * 3;
        if (res.inside) blit(SPR.sil, Math.round(WX + 3 + walk), WY + 5, false, M.SIL);
        if (!calm) {
          for (let i = 0; i < 3; i++) {
            const s = (anim * 0.9 + i * 0.33) % 1;
            put(WX + 11 + Math.round(Math.sin(s * 8 + i)), WY + 7 - Math.round(s * 6), M.LIT_HI);
          }
        }
        rect(WX + 10, WY + 8, 4, 1, M.SIL);
      }
    } else if (morning) {
      // 朝:窓を開けて、伸びをする
      rect(WX, WY, WW, WH, M.ROOM);
      for (let y = 0; y < 2; y++) for (let x = 0; x < WW; x++) put(WX + x, WY + y, M.GLASS_HI);
      let bust = SPR.bust;
      if (!calm) {
        const c = (anim % 5.4) / 5.4;
        if (c > 0.16 && c < 0.24) bust = SPR.bustHalf;
        else if (c >= 0.24 && c < 0.5) bust = SPR.bustUp;
        else if (c >= 0.5 && c < 0.58) bust = SPR.bustHalf;
        else if (res.blink > 0) bust = SPR.bustBlink;
      }
      const dy = res.startle > 0 ? -1 : 0;
      if (res.inside) blit(bust, WX + 3, WY + 4 + dy);
    } else {
      // 昼間と夜中:暗いガラス。斜めの映り込み
      rect(WX, WY, WW, WH, M.GLASS);
      for (let i = 0; i < 6; i++) {
        put(WX + 2 + i, WY + 7 - i, M.GLASS_HI);
        if (i < 4) put(WX + 6 + i, WY + 8 - i, M.GLASS_HI);
      }
    }

    // 桟
    rect(WX + 6, WY, 2, 2, M.WOOD_DK);
    rect(WX, WY + 4, 1, 1, M.WOOD_DK);
    rect(WX + 13, WY + 4, 1, 1, M.WOOD_DK);

    // 青い鎧戸:眠る時間は閉じ、朝に開く
    const closed = asleep ? 1 : 0;
    shutter += calm ? closed - shutter : clamp(closed - shutter, -0.09, 0.09);
    const leaf = Math.round(shutter * 7);
    const drawLeaf = (x0, w) => {
      for (let i = 0; i < w; i++) {
        for (let y = 0; y < 14; y++) put(x0 + i, 60 + y, y % 2 === 0 ? M.PAINT : M.PAINT_LT);
      }
    };
    // 開いている鎧戸は窓の両わきに、閉じると窓の上に
    const open = 4 - Math.min(4, leaf);
    if (open > 0) {
      drawLeaf(44 - open, open);
      drawLeaf(62, open);
    }
    if (leaf > 0) {
      drawLeaf(46, leaf);
      drawLeaf(60 - leaf, leaf);
    }

    return { lamp, cook, asleep };
  };

  const drawWindow = (h) => {
    const state = paintWindowScene(h);
    // 窓の上を、アーチに切る
    put(46, 61, M.WOOD_DK);
    put(47, 61, M.WOOD_DK);
    put(46, 62, M.WOOD_DK);
    put(59, 61, M.WOOD_DK);
    put(58, 61, M.WOOD_DK);
    put(59, 62, M.WOOD_DK);
    return state;
  };

  const drawDoor = () => {
    if (res.doorOpen > 0) {
      rect(69, 67, 8, 1, M.SIL);
      rect(68, 68, 10, 17, M.SIL);
      rect(68, 68, 2, 17, M.PAINT_LT);
    }
  };

  // 夜の焚き火
  const drawFire = (h, dt) => {
    const on = h >= 18.4 && h < 22.9 ? 1 : 0;
    fireL += (on - fireL) * (calm ? 1 : 0.2);
    if (fireL > 0.02) {
      for (let dx = -2; dx <= 2; dx++) {
        const tall = Math.round((3 - Math.abs(dx)) * 1.7 * fireL * (0.82 + 0.3 * Math.sin(anim * (9 + dx * 2) + dx)));
        for (let i = 0; i < tall; i++) {
          const bend = calm ? 0 : Math.round(Math.sin(anim * 7 + i * 0.8) * (i / 6));
          const m = i < tall * 0.4 ? M.LIT_HI : i < tall * 0.75 ? M.LIT : M.LIT_DK;
          put(FIRE_X + dx + bend, FIRE_Y - i, m);
          emit(FIRE_X + dx + bend, FIRE_Y - i, 190 * fireL, 0);
        }
      }
      if (!calm && Math.random() < dt * 5 * fireL) {
        sparks.push({ x: FIRE_X + (Math.random() - 0.5) * 3, y: FIRE_Y - 4, t: 0, seed: Math.random() * 6 });
      }
    }
    for (let i = sparks.length - 1; i >= 0; i--) {
      const s = sparks[i];
      s.t += dt;
      s.y -= dt * 11;
      s.x += Math.sin(s.t * 5 + s.seed) * dt * 7;
      if (s.t > 1.5) {
        sparks.splice(i, 1);
        continue;
      }
      put(Math.round(s.x), Math.round(s.y), s.t < 0.7 ? M.LIT_HI : M.LIT_DK);
      emit(Math.round(s.x), Math.round(s.y), 90 * (1 - s.t / 1.5));
    }
  };

  const drawResident = (plan, h) => {
    if (res.inside) return;
    const base = 89;
    const dy = -Math.round(res.hop);
    const startled = res.startle > 0;
    const moving = Math.abs((plan.outside ? plan.x : 73) - res.x) > 0.5;
    if (!moving && plan.act === 'read' && Math.abs(res.x - 131) < 1) {
      // ヤシにもたれて、本を読む
      const up = startled;
      const spr = up ? SPR.seatUp : res.blink > 0 ? SPR.seatBlink : SPR.seat;
      const x = 131;
      const y = base - 10 + dy;
      blit(spr, x, y);
      // 本
      const bx = x - 1;
      const by = y + 5;
      if (!up) {
        if (res.pageT > 0.28) {
          rect(bx, by, 4, 3, M.BOOK);
          rect(bx + 1, by - 1, 2, 1, M.BOOK_DK);
        } else if (res.pageT > 0.14) {
          rect(bx + 1, by - 2, 2, 5, M.BOOK);
        } else {
          rect(bx, by, 4, 3, M.BOOK);
          rect(bx + 3, by, 1, 3, M.BOOK_DK);
          put(bx + 1, by + 1, M.BOOK_DK);
        }
      } else {
        rect(bx, by + 1, 4, 2, M.BOOK_DK);
      }
      // つま先が小さく動く
      if (!calm && Math.sin(anim * 1.1) > 0.8) put(x + 1, y + 9, M.BOOT);
      if (startled) {
        rect(x + 5, y - 7, 1, 4, M.MARK);
        put(x + 5, y - 2, M.MARK);
      }
      return;
    }
    if (!moving && plan.act === 'tend') {
      // 池の水を、かめに汲む
      const bob = !calm && Math.sin(anim * 2.2) > 0;
      const rx = Math.round(res.x);
      blit(bob ? SPR.crouch : SPR.stand, rx - 3, bob ? base - 10 : base - 12, false);
      rect(rx + 4, base - 3, 3, 3, M.WOOD);
      put(rx + 4, base - 3, M.WOOD_LT);
      if (bob && Math.random() < 0.02) addRing(rx + 4, 95);
      return;
    }
    let spr = SPR.stand;
    if (startled) spr = SPR.up;
    else if (moving) spr = SPR.walk[Math.floor(res.step) % 4];
    else if (res.blink > 0) spr = SPR.blink;
    blit(spr, Math.round(res.x) - 3, base - 12 + dy, res.face < 0);
    if (startled) {
      rect(Math.round(res.x), base - 19 + dy, 1, 4, M.MARK);
      put(Math.round(res.x), base - 14 + dy, M.MARK);
    }
  };

  // ラクダ:口をもぐもぐ動かす。驚くと首を上げ、夜更けには首を下ろして眠る
  const drawCamel = (h) => {
    const X = 152;
    const Y = 78;
    if (h >= 22.6 || h < 6) {
      blit(SPR.camelSleep, X, Y + 4);
      return;
    }
    blit(SPR.camelBody, X, Y + 4);
    const startled = res.startle > 0;
    const dy = startled ? -2 : !calm && Math.sin(anim * 0.7) > 0.6 ? 1 : 0;
    if (dy < 0) rect(X + 4, Y + 3 + dy, 3, 1 - dy, M.CAMEL);
    blit(SPR.camelHead, X, Y + dy);
    if (!calm) {
      if (Math.floor(anim * 3) % 2) put(X, Y + 3 + dy, M.CAMEL_DK);
      if (Math.sin(anim * 0.9 + 1) > 0.97) put(X + 1, Y + 2 + dy, M.CAMEL);
      if (Math.sin(anim * 1.3) > 0.7) {
        put(X + 24, Y + 9, M.CAMEL_DK);
        put(X + 24, Y + 10, M.CAMEL_DK);
      }
    }
  };

  const drawCanopy = () => {
    for (const f of fronds) {
      // 風:葉先ほど大きく、葉ごとにずれて揺れる
      const sx = calm || !f.amp ? 0 : Math.sin(anim * 0.85 + f.phase) * f.amp;
      const sy = calm || !f.amp ? 0 : Math.sin(anim * 1.1 + f.phase * 1.7) * f.amp * 0.6;
      const a = f.px;
      for (let i = 0; i < a.length; i += 4) {
        const x = a[i] + Math.round(sx * a[i + 3]);
        const y = a[i + 1] + Math.round(sy * a[i + 3]);
        if (f.behind) {
          const px = x + ox;
          const py = y + oy;
          if (px < 0 || py < 0 || px >= bw || py >= bh || houseMask[py * bw + px]) continue;
        }
        put(x, y, a[i + 2]);
      }
    }
  };

  // 池:岸のものの映り、空のものの映り、さざなみ、光の道
  const drawWater = (h, dt) => {
    const t = calm ? 0 : anim;
    glints.length = 0;
    if (h > 6.2 && h < 18.4) glints.push(sunX(h), 1.1, M.GLINT, 0);
    const mh = moonHour(h);
    if (mh > 18 && mh < 28.4 && nightAmount(h) > 0.25) glints.push(moonX(mh), 1.5, M.GLINT, 70);
    if (lanternL > 0.3) glints.push(66, 0.7, M.LIT, 34);

    for (let c = 0; c < pond.length; c += 4) {
      const i = pond[c];
      const x = pond[c + 1];
      const y = pond[c + 2];
      const top = pond[c + 3];
      const depth = y - top;
      const px = x + ox;
      const rip = calm ? 0 : Math.round(Math.sin(t * 1.5 + y * 0.85) * (0.5 + depth * 0.09));

      // 空のもの:星、雲、月、太陽
      const fromSky = SKYREF[matBuf[clamp(mirror[i] + rip, 0, matBuf.length - 1)]];
      if (fromSky) matBuf[i] = fromSky;

      // さざなみの短い線が流れる
      if ((y & 1) === 0) {
        const drift = Math.floor(t * (1.2 + (y % 3) * 0.5));
        if ((x + y * 11 + drift) % 23 < 2) matBuf[i] = M.RIPPLE;
      }

      // 岸のもの:ヤシ、人、壁
      const ry = top - 1 - Math.round(depth * 2.6);
      const py2 = ry + oy;
      const px2 = px + rip;
      if (py2 >= 0 && px2 >= 0 && px2 < bw) {
        const ref = REFL[matBuf[py2 * bw + px2]];
        if (ref && bayerAt(x + Math.floor(t * 2), y) <= 13) matBuf[i] = ref;
      }

      // 太陽や月の、光の道
      for (let g = 0; g < glints.length; g += 4) {
        const off = calm ? 0 : Math.round(Math.sin(t * 2.6 + y * 1.9) * (0.6 + depth * 0.22));
        const half = glints[g + 1] * (0.6 + depth * 0.14);
        if (Math.abs(x - glints[g] - off) <= half && (x * 3 + y * 5 + Math.floor(t * 6)) % 4 < 2) {
          matBuf[i] = glints[g + 2];
          if (glints[g + 3] > 0) emit(x, y, glints[g + 3]);
        }
      }
    }

    // 水の輪:ときどき、何かが水面に触れる
    if (!calm && pond.length && Math.random() < dt * 0.22) {
      const c = Math.floor(Math.random() * (pond.length / 4)) * 4;
      addRing(pond[c + 1], pond[c + 2]);
    }
    for (let i = rings.length - 1; i >= 0; i--) {
      const ring = rings[i];
      ring.t += dt;
      if (ring.t > 1.7) {
        rings.splice(i, 1);
        continue;
      }
      const rx = ring.t * 7;
      const ry = rx * 0.32;
      const n = Math.max(8, Math.ceil(rx * 4));
      for (let j = 0; j < n; j++) {
        const a = (j / n) * Math.PI * 2;
        const x = Math.round(ring.x + Math.cos(a) * rx);
        const y = Math.round(ring.y + Math.sin(a) * ry);
        if (isWater(x, y) && bayerAt(x, y) < 16 - ring.t * 7) put(x, y, M.RIPPLE);
      }
    }
  };

  // 葦は水面より手前にある
  const drawReeds = () => {
    for (const r of reeds) {
      const sway = calm ? 0 : Math.sin(anim * 1.4 + r.seed) * 1.4;
      for (let i = 0; i < r.height; i++) {
        const x = r.x + Math.round((sway * i) / r.height);
        const top = i >= r.height - 2;
        put(x, r.y - i, top && r.head ? M.WOOD : i % 3 === 0 ? M.GRASS_DK : M.GRASS);
      }
    }
  };

  const drawParticles = (h, dt) => {
    // 煙
    const smoking = (h >= 17.2 && h < 19.8) || (h >= 7 && h < 8.2);
    if (!calm && smoking) {
      smokeAcc += dt * (h >= 17 ? 3.2 : 1.4);
      while (smokeAcc >= 1) {
        smokeAcc -= 1;
        smoke.push({ x: 72 + Math.random() * 2, y: 41, t: 0, seed: Math.random() * 10 });
      }
    }
    for (let i = smoke.length - 1; i >= 0; i--) {
      const s = smoke[i];
      s.t += dt;
      s.y -= dt * (7 - s.t * 0.8);
      s.x += dt * (2.2 + Math.sin(s.t * 1.7 + s.seed) * 2.6);
      if (s.t > 4.2 || s.y < -4) {
        smoke.splice(i, 1);
        continue;
      }
      const size = 1 + Math.floor(s.t * 0.75);
      const thin = s.t * 2.6;
      for (let dy = 0; dy < size; dy++) {
        for (let dx = 0; dx < size; dx++) {
          const x = Math.round(s.x) + dx;
          const y = Math.round(s.y) + dy;
          if (bayerAt(x, y) < 16 - thin * 1.3) put(x, y, s.t > 2.3 ? M.SMOKE_DK : M.SMOKE);
        }
      }
    }
    if (calm && smoking) {
      for (let i = 0; i < 5; i++) {
        const y = 40 - i * 4;
        const x = 72 + i * 2;
        rect(x, y, 1 + (i >> 1), 2, M.SMOKE);
      }
    }

    // 眠りの Z
    if (!calm && (h >= 23.4 || h < 6)) {
      zeeAcc += dt * 0.62;
      while (zeeAcc >= 1) {
        zeeAcc -= 1;
        zees.push({ x: 60, y: 58, t: 0 });
      }
    }
    for (let i = zees.length - 1; i >= 0; i--) {
      const z = zees[i];
      z.t += dt;
      z.y -= dt * 4;
      z.x += dt * (1.2 + Math.sin(z.t * 2) * 2);
      if (z.t > 3 || (h >= 6 && h < 23)) {
        zees.splice(i, 1);
        continue;
      }
      const x = Math.round(z.x);
      const y = Math.round(z.y);
      const big = z.t > 1.2;
      const n = big ? 3 : 2;
      rect(x, y, n, 1, M.ZZZ);
      put(x + n - 2, y + 1, M.ZZZ);
      if (big) put(x, y + 2 - 0, M.ZZZ);
      rect(x, y + (big ? 3 : 2), n, 1, M.ZZZ);
    }

    // 蛍:水辺に集まる
    const night = clamp(smoothstep(19.4, 20.8, h) + (1 - smoothstep(3.6, 5, h)));
    if (night > 0.3 && !calm) {
      for (const f of flies) {
        const wx = f.x + Math.sin(anim * 0.33 + f.seed) * 14 + Math.sin(anim * 0.9 + f.seed * 2) * 3;
        const wy = f.y + Math.sin(anim * 0.47 + f.seed * 1.4) * 5;
        const pulse = Math.sin(anim * 1.4 + f.seed * 3);
        if (pulse < 0.1) continue;
        put(Math.round(wx), Math.round(wy), M.FIREFLY);
        emit(Math.round(wx), Math.round(wy), 170 * pulse);
      }
    }

    // とんぼ:水面の上で止まっては、すっと動く
    if (!calm && h > 8 && h < 17.5) {
      dfly.x = 118 + Math.sin(anim * 0.23) * 26 + Math.sin(anim * 1.3) * 3;
      dfly.y = 92 + Math.sin(anim * 0.51) * 6;
      const x = Math.round(dfly.x);
      const y = Math.round(dfly.y);
      rect(x - 1, y, 3, 1, M.WOOD_DK);
      if (Math.floor(anim * 12) % 2) {
        put(x - 1, y - 1, M.WING);
        put(x + 1, y - 1, M.WING);
      } else {
        put(x, y - 1, M.WING);
        put(x, y + 1, M.WING);
      }
    }

    // 風が運ぶ砂:砂丘の稜線と、地面の上を走る
    if (!calm && h > 6.5 && h < 19.5 && Math.random() < dt * 9) {
      const sx = Math.random() * (bw - 20) - ox + 10;
      const crest = Math.random() < 0.45;
      sand.push({
        x: sx,
        y: crest ? Math.round(crestNear(sx)) - 1 : HORIZON + 2 + Math.random() * 26,
        t: 0,
        life: 0.8 + Math.random() * 1.4,
        v: 28 + Math.random() * 30,
        seed: Math.random() * 6,
        rise: crest ? 2.4 : 0,
      });
    }
    for (let i = sand.length - 1; i >= 0; i--) {
      const g = sand[i];
      g.t += dt;
      g.x += g.v * dt;
      g.y += (Math.sin(g.t * 6 + g.seed) * 3 - g.rise) * dt;
      if (g.t > g.life) {
        sand.splice(i, 1);
        continue;
      }
      const x = Math.round(g.x);
      const y = Math.round(g.y);
      const under = get(x, y);
      if (under >= 0 && OPEN_SAND[under] && !isWater(x, y)) {
        put(x, y, M.SAND_LT);
        if (g.v > 42 && bayerAt(x, y) < 8) put(x - 1, y, M.SAND_LT);
      }
    }
  };

  const drawLights = (state, h) => {
    // 灯りの強さ
    const targetWin = state.lamp ? 1 : state.cook ? 0.46 : 0;
    const targetLan = h >= 18.4 && h < 22.9 ? 1 : 0;
    windowL += (targetWin - windowL) * (calm ? 1 : 0.28);
    lanternL += (targetLan - lanternL) * (calm ? 1 : 0.28);

    // 軒下の灯り
    if (lanternL > 0.02) {
      const flick = calm ? 1 : 0.94 + 0.06 * Math.sin(anim * 11) * Math.sin(anim * 3.7);
      rect(64, 64, 3, 1, M.WOOD_DK);
      rect(64, 65, 3, 3, M.LIT_HI);
      rect(64, 68, 3, 1, M.WOOD_DK);
      for (let y = 65; y < 68; y++) for (let x = 64; x < 67; x++) emit(x, y, 255 * lanternL * flick, 0);
    } else {
      rect(64, 64, 3, 1, M.WOOD_DK);
      rect(64, 65, 3, 3, M.GLASS);
      rect(64, 68, 3, 1, M.WOOD_DK);
    }

    const pool = (cx, cy, rx, ry, L) => {
      if (L <= 0.01) return;
      for (let y = Math.max(cy - ry, -oy); y <= cy + ry; y++) {
        for (let x = cx - rx; x <= cx + rx; x++) {
          const px = x + ox;
          const py = y + oy;
          if (px < 0 || py < 0 || px >= bw || py >= bh) continue;
          const i = py * bw + px;
          const m = matBuf[i];
          if (m === 0 || m === M.SIL || m === M.LIT || m === M.LIT_HI || m === M.LIT_DK) continue;
          const d = Math.hypot((x - cx) / rx, (y - cy) / ry);
          const v = (1 - d) * L * 1.5;
          if (v * 16 > bayerAt(x, y)) varBuf[i] = 2;
        }
      }
    };
    // 窓から地面へ落ちる光と、壁を照らす光
    pool(53, 92, 26, 12, windowL * 0.95);
    pool(53, 67, 17, 10, windowL * 0.36);
    pool(65, 69, 11, 13, lanternL * 0.5);
    pool(65, 90, 19, 7, lanternL * 0.6);
    // 焚き火のまわり
    pool(FIRE_X, FIRE_Y + 1, 18, 7, fireL * 0.75);
  };

  // ---- 世界を1枚描く
  let keyA = 0;
  let keyB = 1;
  let keyP = 0;
  const pickKeys = (h) => {
    for (let i = 0; i < KEYS.length - 1; i++) {
      if (h >= KEYS[i][0] && h < KEYS[i + 1][0]) {
        keyA = i;
        keyB = i + 1;
        keyP = clamp(((h - KEYS[i][0]) / (KEYS[i + 1][0] - KEYS[i][0]) - 0.32) / 0.36);
        return;
      }
    }
    keyA = 0;
    keyB = 1;
    keyP = 0;
  };

  const renderWorld = (clock, dt, hurry) => {
    const h = hourOf(clock);
    if (!calm) anim += dt;
    matBuf.set(baseBuf);
    varBuf.fill(0);
    emitList.length = 0;
    for (const c of sources) {
      c.w = 0;
      c.x = 0;
      c.y = 0;
    }
    lampFlick = calm ? 1 : 0.95 + 0.05 * Math.sin(anim * 13) * Math.sin(anim * 5.3);

    if (!calm) {
      birds.next -= dt;
      if (birds.t >= 0) {
        birds.t += dt;
        if (birds.t > 9) birds.t = -1;
      } else if (birds.next <= 0) {
        birds.t = 0;
        birds.next = 12 + Math.random() * 14;
        birds.y = 10 + Math.random() * 24;
        birds.dir = Math.random() < 0.5 ? 1 : -1;
      }
      shoot.next -= dt;
      if (shoot.t >= 0) {
        shoot.t += dt;
        if (shoot.t > 0.6) shoot.t = -1;
      } else if (shoot.next <= 0) {
        shoot.t = 0;
        shoot.next = 9 + Math.random() * 16;
        shoot.x = 10 + Math.random() * 130;
        shoot.y = 2 + Math.random() * 20;
      }
    }

    const plan = stepResident(dt, h, hurry);
    drawSky(h);
    drawCaravan(h, dt);
    drawHaze(h);
    drawShadows(h);
    const state = drawWindow(h);
    drawDoor();
    drawFire(h, dt);
    drawLights(state, h);
    drawResident(plan, h);
    drawCamel(h);
    drawCanopy();
    drawWater(h, dt);
    drawReeds();
    drawParticles(h, dt);

    // ---- 材質 → パレット。時刻のかなめのあいだは、ディザで置き換える
    pickKeys(h);
    const ta = table[keyA];
    const tb = table[keyB];
    const sa = skyKeys[keyA];
    const sb = skyKeys[keyB];
    const p = keyP * 16;
    const n = bw * bh;
    const water = M.WATER;
    for (let i = 0; i < n; i++) {
      const m = matBuf[i];
      const useB = thrA[i] < p;
      let idx;
      if (m === 0) idx = (useB ? sb : sa)[i];
      else if (m === water) idx = SHADE[(useB ? sb : sa)[mirror[i]]];
      else idx = (useB ? tb : ta)[varBuf[i] * NM + m];
      pixels[i] = palette32[idx];
    }
  };

  // ---- 光の場:世界の光る画素を格子に集めて、ぼかす
  const GRID_W = 72;
  let GRID_H = 44;
  let glowRaw = new Float32Array(1);
  let glowNearBuf = new Float32Array(1);
  let glowFarBuf = new Float32Array(1);
  let glowTemp = new Float32Array(1);

  const boxBlur = (src, dst, w, h, r) => {
    const size = r * 2 + 1;
    for (let y = 0; y < h; y++) {
      const row = y * w * 4;
      for (let c = 0; c < 3; c++) {
        let sum = 0;
        for (let x = -r; x <= r; x++) sum += src[row + clamp(x, 0, w - 1) * 4 + c];
        for (let x = 0; x < w; x++) {
          dst[row + x * 4 + c] = sum / size;
          sum += src[row + clamp(x + r + 1, 0, w - 1) * 4 + c] - src[row + clamp(x - r, 0, w - 1) * 4 + c];
        }
      }
    }
    for (let x = 0; x < w; x++) {
      for (let c = 0; c < 3; c++) {
        let sum = 0;
        for (let y = -r; y <= r; y++) sum += dst[clamp(y, 0, h - 1) * w * 4 + x * 4 + c];
        for (let y = 0; y < h; y++) {
          src[y * w * 4 + x * 4 + c] = sum / size;
          sum += dst[clamp(y + r + 1, 0, h - 1) * w * 4 + x * 4 + c] - dst[clamp(y - r, 0, h - 1) * w * 4 + x * 4 + c];
        }
      }
    }
  };

  // ---- WebGL
  let gl = null;
  try {
    gl = canvas.getContext('webgl2', { alpha: true, premultipliedAlpha: true, antialias: false, depth: false, stencil: false, powerPreference: 'high-performance' });
  } catch {
    gl = null;
  }
  let program = null;
  const loc = {};
  let vao = null;
  let quad = null;
  let texWorld = null;
  let texNear = null;

  const compile = (type, source) => {
    const s = gl.createShader(type);
    gl.shaderSource(s, source);
    gl.compileShader(s);
    if (!gl.getShaderParameter(s, gl.COMPILE_STATUS)) throw new Error(gl.getShaderInfoLog(s) || 'shader');
    return s;
  };
  const setupGl = () => {
    if (!gl) return false;
    try {
      program = gl.createProgram();
      const v = compile(gl.VERTEX_SHADER, VERT);
      const f = compile(gl.FRAGMENT_SHADER, FRAG);
      gl.attachShader(program, v);
      gl.attachShader(program, f);
      gl.bindAttribLocation(program, 0, 'aPos');
      gl.linkProgram(program);
      gl.deleteShader(v);
      gl.deleteShader(f);
      if (!gl.getProgramParameter(program, gl.LINK_STATUS)) throw new Error(gl.getProgramInfoLog(program) || 'link');
    } catch (error) {
      console.warn('toggle-daylight: シェーダーを作れないので、2D で描く', error);
      return false;
    }
    gl.useProgram(program);
    for (const name of ['uWorld', 'uGlowNear', 'uRes', 'uPill', 'uOrigin', 'uWorldSize', 'uGlowSize', 'uLens', 'uBezel', 'uK', 'uNight', 'uLift', 'uSeam', 'uCalm', 'uShellDay', 'uShellNight', 'uInk', 'uLight', 'uHiNight', 'uLoNight', 'uSkyDay', 'uHomeCol', 'uSkyCol', 'uHomePos', 'uSkyPos']) {
      loc[name] = gl.getUniformLocation(program, name);
    }
    vao = gl.createVertexArray();
    gl.bindVertexArray(vao);
    quad = gl.createBuffer();
    gl.bindBuffer(gl.ARRAY_BUFFER, quad);
    gl.bufferData(gl.ARRAY_BUFFER, new Float32Array([-1, -1, 3, -1, -1, 3]), gl.STATIC_DRAW);
    gl.enableVertexAttribArray(0);
    gl.vertexAttribPointer(0, 2, gl.FLOAT, false, 0, 0);
    gl.pixelStorei(gl.UNPACK_ALIGNMENT, 1);
    const makeTex = () => {
      const t = gl.createTexture();
      gl.bindTexture(gl.TEXTURE_2D, t);
      gl.texParameteri(gl.TEXTURE_2D, gl.TEXTURE_MIN_FILTER, gl.LINEAR);
      gl.texParameteri(gl.TEXTURE_2D, gl.TEXTURE_MAG_FILTER, gl.LINEAR);
      gl.texParameteri(gl.TEXTURE_2D, gl.TEXTURE_WRAP_S, gl.CLAMP_TO_EDGE);
      gl.texParameteri(gl.TEXTURE_2D, gl.TEXTURE_WRAP_T, gl.CLAMP_TO_EDGE);
      return t;
    };
    texWorld = makeTex();
    texNear = makeTex();
    gl.uniform1i(loc.uWorld, 0);
    gl.uniform1i(loc.uGlowNear, 1);
    gl.disable(gl.BLEND);
    return true;
  };
  let ready = setupGl();
  let ctx2d = null;
  let lowCanvas = null;
  if (!ready) {
    ctx2d = canvas.getContext('2d');
  }

  // ---- 形と大きさ
  const shape = { W: 1, H: 1, cssW: 1, cssH: 1, dpr: 1, pillW: 1, pillH: 1, bezel: 1, winW: 1, winH: 1, r0: 1, travel: 1, travelCss: 1, ox: 0, oy: 0 };
  let renderScale = 1;
  let thumbSeam = 1;

  const measure = () => {
    const box = root.getBoundingClientRect();
    const dpr = Math.min(2, devicePixelRatio || 1) * renderScale;
    const W = Math.max(2, Math.round(box.width * dpr));
    const H = Math.max(2, Math.round(box.height * dpr));
    const changed = W !== shape.W || H !== shape.H;
    shape.W = W;
    shape.H = H;
    shape.cssW = box.width;
    shape.cssH = box.height;
    shape.dpr = dpr;
    // 丸の大きさ:根の中に、1 : 1.85 で置く
    shape.pillH = H / 1.32;
    shape.pillW = shape.pillH * PILL_RATIO;
    shape.bezel = shape.pillH * 0.046;
    shape.winW = shape.pillW - shape.bezel * 2;
    shape.winH = shape.pillH - shape.bezel * 2;
    const gap = shape.pillH * 0.032;
    shape.r0 = shape.winH / 2 - gap;
    shape.travel = shape.winW - (shape.r0 + gap) * 2;
    shape.travelCss = shape.travel / dpr;

    // 画素の格子に合わせる(半端な位置だと、全体がにじむ)
    canvas.style.width = `${W / dpr}px`;
    canvas.style.height = `${H / dpr}px`;
    const fx = (box.left * dpr) % 1;
    const fy = (box.top * dpr) % 1;
    canvas.style.transform = `translate(${-fx / dpr}px, ${-fy / dpr}px)`;

    if (!changed) return false;
    canvas.width = W;
    canvas.height = H;

    // 整数倍を高さで決める。切れるのが 12% までなら大きい方。横は景色が両わきへ広がる
    const ratio = shape.winH / CORE_H;
    let kk = Math.max(1, Math.floor(ratio));
    if (((kk + 1) * CORE_H) / shape.winH <= 1.12) kk += 1;
    k = kk;
    const needW = Math.ceil(shape.winW / k) + MARGIN * 2;
    const needH = Math.ceil(shape.winH / k) + MARGIN * 2;
    bw = needW + (needW & 1);
    bh = needH + (needH & 1);
    ox = (bw - CORE_W) >> 1;
    oy = (bh - CORE_H) >> 1;
    matBuf = new Uint8Array(bw * bh);
    baseBuf = new Uint8Array(bw * bh);
    varBuf = new Uint8Array(bw * bh);
    pixels = new Uint32Array(bw * bh);
    thrA = new Uint8Array(bw * bh);
    houseMask = new Uint8Array(bw * bh);
    rowBuf = new Uint8Array(bw);
    for (let y = 0; y < bh; y++) {
      for (let x = 0; x < bw; x++) {
        // 時刻の置き換えは、空の市松と重ならないよう、位置をずらす
        thrA[y * bw + x] = bayerAt(x + 1, y + 2);
      }
    }
    buildBase();

    // 世界の左上の、画面の画素での位置(必ず整数)
    shape.ox = Math.floor(W / 2 - (bw * k) / 2);
    shape.oy = Math.floor(H / 2 + (bh * k) / 2);
    thumbSeam = Math.max(1, Math.round(k * 0.055));

    GRID_H = Math.max(8, Math.round((GRID_W * H) / W));
    const size = GRID_W * GRID_H * 4;
    glowRaw = new Float32Array(size);
    glowNearBuf = new Float32Array(size);
    glowFarBuf = new Float32Array(size);
    glowTemp = new Float32Array(size);

    if (ready) {
      gl.viewport(0, 0, W, H);
      gl.activeTexture(gl.TEXTURE0);
      gl.bindTexture(gl.TEXTURE_2D, texWorld);
      gl.texImage2D(gl.TEXTURE_2D, 0, gl.RGBA8, bw, bh, 0, gl.RGBA, gl.UNSIGNED_BYTE, null);
      gl.texParameteri(gl.TEXTURE_2D, gl.TEXTURE_MIN_FILTER, gl.LINEAR_MIPMAP_LINEAR);
      gl.activeTexture(gl.TEXTURE1);
      gl.bindTexture(gl.TEXTURE_2D, texNear);
      gl.texImage2D(gl.TEXTURE_2D, 0, gl.RGBA16F, GRID_W, GRID_H, 0, gl.RGBA, gl.FLOAT, null);
    } else {
      lowCanvas = new OffscreenCanvas(bw, bh);
    }
    return true;
  };

  const uploadWorld = () => {
    // 光の場
    glowRaw.fill(0);
    for (let e = 0; e < emitList.length; e += 2) {
      const i = emitList[e];
      const w = emitList[e + 1] / 255;
      const px = i % bw;
      const py = (i - px) / bw;
      const fx = ((shape.ox + (px + 0.5) * k) / shape.W) * GRID_W;
      const fy = ((shape.H - shape.oy + (py + 0.5) * k) / shape.H) * GRID_H;
      const gx = clamp(Math.floor(fx), 0, GRID_W - 1);
      const gy = clamp(Math.floor(fy), 0, GRID_H - 1);
      const c = pixels[i];
      const at = (gy * GRID_W + gx) * 4;
      glowRaw[at] += (c & 255) * w * 0.0007;
      glowRaw[at + 1] += ((c >>> 8) & 255) * w * 0.0007;
      glowRaw[at + 2] += ((c >>> 16) & 255) * w * 0.0007;
    }
    glowNearBuf.set(glowRaw);
    boxBlur(glowNearBuf, glowTemp, GRID_W, GRID_H, 1);
    boxBlur(glowNearBuf, glowTemp, GRID_W, GRID_H, 1);
    // 芯のにじみに、広いにじみを足す
    glowFarBuf.set(glowRaw);
    boxBlur(glowFarBuf, glowTemp, GRID_W, GRID_H, 3);
    boxBlur(glowFarBuf, glowTemp, GRID_W, GRID_H, 3);
    for (let i = 0; i < glowNearBuf.length; i++) glowNearBuf[i] += glowFarBuf[i] * 0.55;

    gl.activeTexture(gl.TEXTURE0);
    gl.bindTexture(gl.TEXTURE_2D, texWorld);
    gl.texSubImage2D(gl.TEXTURE_2D, 0, 0, 0, bw, bh, gl.RGBA, gl.UNSIGNED_BYTE, new Uint8Array(pixels.buffer));
    gl.generateMipmap(gl.TEXTURE_2D);
    gl.activeTexture(gl.TEXTURE1);
    gl.bindTexture(gl.TEXTURE_2D, texNear);
    gl.texSubImage2D(gl.TEXTURE_2D, 0, 0, 0, GRID_W, GRID_H, gl.RGBA, gl.FLOAT, glowNearBuf);
  };

  // ---- つまみの状態
  let x = 0; // 0 = 昼、1 = 夜
  let velocity = 0;
  let target = 0;
  let moving = false;
  let checked = false;
  let stretch = 0;
  let stretchV = 0;
  let lift = 0;
  let liftTarget = 0;
  let hurry = 0;

  // 時間の流れ:右へは昼から夜へ。右端から戻るときは、夜明けを通って次の昼へ
  let branch = 'pm';
  let amStart = CLOCK_NIGHT;
  let nightClock = CLOCK_NIGHT;
  const clockOf = () => {
    if (branch === 'am') return mix(36, amStart, x);
    if (x >= 1) return nightClock;
    return CLOCK_DAY + (CLOCK_NIGHT - CLOCK_DAY) * x;
  };
  const beginTravel = () => {
    if (x <= 0.0005) branch = 'pm';
    else if (x >= 0.9995) {
      branch = 'am';
      amStart = nightClock;
    }
  };

  const setStatus = (text) => {
    if (statusEl.textContent !== text) statusEl.textContent = text;
  };
  const phaseName = (h) => (h < 5 || h >= 20 ? '夜' : h < 7 ? '夜明け' : h < 10 ? '朝' : h < 16.5 ? '昼' : '夕方');

  const commit = (value) => {
    const night = value >= 1;
    x = night ? 1 : 0;
    velocity = 0;
    moving = false;
    if (night) {
      nightClock = branch === 'am' ? amStart : CLOCK_NIGHT;
      branch = 'pm';
    } else {
      branch = 'pm';
    }
    if (checked !== night) {
      checked = night;
      button.setAttribute('aria-checked', String(night));
      root.dispatchEvent(new CustomEvent('daylight:change', { bubbles: true, composed: true, detail: { night } }));
    }
    setStatus(night ? '夜' : '昼');
  };

  // ---- 描く
  const drawGl = (night) => {
    gl.clearColor(0, 0, 0, 0);
    gl.clear(gl.COLOR_BUFFER_BIT);
    gl.useProgram(program);
    gl.bindVertexArray(vao);
    gl.uniform2f(loc.uRes, shape.W, shape.H);
    gl.uniform2f(loc.uPill, shape.pillW / 2, shape.pillH / 2);
    gl.uniform2f(loc.uOrigin, shape.ox, shape.oy);
    gl.uniform2f(loc.uWorldSize, bw, bh);
    gl.uniform2f(loc.uGlowSize, GRID_W, GRID_H);
    gl.uniform1f(loc.uBezel, shape.bezel);
    gl.uniform1f(loc.uK, k);
    gl.uniform1f(loc.uNight, night);
    gl.uniform1f(loc.uLift, lift);
    gl.uniform1f(loc.uSeam, thumbSeam);
    gl.uniform1f(loc.uCalm, calm ? 1 : 0);

    // レンズの形:動くと伸び、離すと弾んで戻る
    const s = clamp(stretch, -0.5, 1.2);
    const r = shape.r0 * (1 + 0.012 * lift);
    const halfX = r * (1 + 0.2 * s);
    const halfY = r * (1 - 0.075 * s);
    const lim = shape.winW / 2 - (shape.winH / 2 - shape.r0) - halfX;
    const raw = (x - 0.5) * shape.travel;
    const cx = clamp(raw, -lim, lim);
    gl.uniform4f(loc.uLens, cx, 0, halfX, halfY);

    // 外の殻は、磨いた砂岩の色
    gl.uniform3fv(loc.uShellDay, unit(C2));
    gl.uniform3fv(loc.uShellNight, unit(I1));
    gl.uniform3fv(loc.uInk, unit(I0));
    gl.uniform3fv(loc.uLight, unit(C3));
    gl.uniform3fv(loc.uHiNight, unit(I3));
    gl.uniform3fv(loc.uLoNight, unit(I0));
    gl.uniform3fv(loc.uSkyDay, unit(U2));
    // 光る画素の重心と強さ。人影が窓を隠せば弱くなる
    const homeW = sources[0].w;
    const home = unit(A2);
    const homeI = (homeW / 255 / 150) * 1.05;
    const hx = homeW > 0 ? shape.ox + (sources[0].x / homeW + 0.5) * k - shape.W / 2 : 0;
    const hy = homeW > 0 ? shape.oy - (sources[0].y / homeW + 0.5) * k - shape.H / 2 : 0;
    gl.uniform2f(loc.uHomePos, hx, hy);
    gl.uniform3f(loc.uHomeCol, home[0] * homeI, home[1] * homeI, home[2] * homeI);
    const skyW = sources[1].w;
    const skyU = unit(A3);
    const skyI = (skyW / 255 / 110) * 0.55;
    const sx = skyW > 0 ? shape.ox + (sources[1].x / skyW + 0.5) * k - shape.W / 2 : 0;
    const sy = skyW > 0 ? shape.oy - (sources[1].y / skyW + 0.5) * k - shape.H / 2 : 0;
    gl.uniform2f(loc.uSkyPos, sx, sy);
    gl.uniform3f(loc.uSkyCol, skyU[0] * skyI, skyU[1] * skyI, skyU[2] * skyI);
    gl.drawArrays(gl.TRIANGLES, 0, 3);
  };

  const draw2d = (night) => {
    // WebGL が使えないとき:世界だけを整数倍で写し、丸く切って、つまみを置く
    const g = ctx2d;
    const low = lowCanvas.getContext('2d');
    low.putImageData(new ImageData(new Uint8ClampedArray(pixels.buffer), bw, bh), 0, 0);
    g.clearRect(0, 0, shape.W, shape.H);
    const px = (shape.W - shape.pillW) / 2;
    const py = (shape.H - shape.pillH) / 2;
    g.save();
    g.beginPath();
    g.roundRect(px, py, shape.pillW, shape.pillH, shape.pillH / 2);
    g.clip();
    g.imageSmoothingEnabled = false;
    g.drawImage(lowCanvas, shape.ox, shape.H - shape.oy, bw * k, bh * k);
    g.restore();
    const cx = shape.W / 2 + (x - 0.5) * shape.travel;
    const light = unit(C3).map((v) => Math.round(v * 255));
    g.fillStyle = `rgb(${light[0]} ${light[1]} ${light[2]} / 0.5)`;
    g.beginPath();
    g.arc(cx, shape.H / 2, shape.r0, 0, Math.PI * 2);
    g.fill();
    return night;
  };

  // ---- 時間を進める
  let raf = 0;
  let last = 0;
  let visible = true;
  let worldAcc = 1;
  let dirty = true;
  let slow = 0;
  let good = 0;
  let frames = 0;
  let lastWorldClock = -1;
  let drag = null;

  const nightAmount = (h) => clamp(smoothstep(17.4, 20.2, h) + (1 - smoothstep(4.8, 7.2, h)));

  const adapt = (dt) => {
    // どうしても遅い機械では、細かさを落とす。ピクセルは整数倍のまま
    if (++frames < 40) return;
    if (dt > 0.0225) slow++;
    else good++;
    if (slow + good < 50) return;
    if (slow > 30 && renderScale > 0.5) {
      renderScale = Math.max(0.5, renderScale - 0.25);
      measure();
      dirty = true;
      lastWorldClock = -1;
    }
    slow = 0;
    good = 0;
  };

  const tick = (ms) => {
    raf = 0;
    const t = ms / 1000;
    const dt = last ? Math.min(0.05, t - last) : 1 / 60;
    last = t;

    if (!calm) adapt(dt);

    // ---- つまみ
    if (drag) {
      const before = x;
      x += (clamp(drag.want) - x) * (1 - Math.exp(-dt * 34));
      velocity = (x - before) / Math.max(dt, 1 / 240);
      dirty = true;
    } else if (moving) {
      // なめらかに減速して吸い付く
      const omega = calm ? 16 : 9.5;
      const accel = omega * omega * (target - x) - 2 * omega * velocity;
      velocity += accel * dt;
      x += velocity * dt;
      dirty = true;
      if (Math.abs(target - x) < 0.0015 && Math.abs(velocity) < 0.03) {
        x = target;
        if (x <= 0 || x >= 1) {
          if (!calm) stretchV -= 3.2;
          commit(x);
        } else {
          velocity = 0;
          moving = false;
        }
      }
      x = clamp(x);
    } else {
      velocity = 0;
    }

    // ---- レンズの弾み
    if (!calm) {
      const goal = clamp(Math.abs(velocity) * 0.42);
      stretchV += (170 * (goal - stretch) - 11 * stretchV) * dt;
      stretch += stretchV * dt;
      lift += (liftTarget - lift) * (1 - Math.exp(-dt * 14));
      if (Math.abs(stretch) > 0.002 || Math.abs(stretchV) > 0.01 || Math.abs(liftTarget - lift) > 0.002) dirty = true;
    } else {
      stretch = 0;
      stretchV = 0;
      lift = liftTarget;
    }

    // ---- 右端では、時間が静かに進み、やがて灯りを消して眠る
    if (!calm && x >= 1 && !moving && !drag && nightClock < CLOCK_SLEEP) {
      nightClock = Math.min(CLOCK_SLEEP, nightClock + (dt * (CLOCK_SLEEP - CLOCK_NIGHT)) / NIGHT_CREEP);
    }

    const clock = clockOf();
    hurry = Math.max(hurry - dt * 1.4, clamp(Math.abs(velocity) * 0.6));

    // ---- 世界は 30 コマで動く
    worldAcc += dt;
    const worldStep = calm ? Math.abs(clock - lastWorldClock) > 1e-4 || dirty : worldAcc >= 1 / WORLD_HZ;
    if (worldStep) {
      renderWorld(clock, Math.min(worldAcc, 0.1), hurry);
      worldAcc = 0;
      lastWorldClock = clock;
      if (ready) uploadWorld();
      dirty = true;
    }

    if (dirty) {
      const night = nightAmount(hourOf(clock));
      // 世界の暗さ(0 = 昼、1 = 夜)。使い手はこの値で、ページの地を合わせられる
      root.style.setProperty('--night', night.toFixed(3));
      if (ready) drawGl(night);
      else if (ctx2d) draw2d(night);
      dirty = false;
    }

    // 動きを減らす設定で止まっているときは、次の操作まで描かない
    const idleCalm = calm && !moving && !drag;
    if (visible && !idleCalm) raf = requestAnimationFrame(tick);
  };

  function wake() {
    if (!raf && visible) {
      last = 0;
      raf = requestAnimationFrame(tick);
    }
  }

  // ---- 速く動かすと、住人とラクダが驚いて空を見上げ、水面に輪が立つ
  let startleCool = 0;
  const startle = () => {
    if (calm || performance.now() < startleCool) return;
    startleCool = performance.now() + 1500;
    res.startle = 0.9;
    addRing(PX + (Math.random() - 0.5) * 40, PY);
  };

  // ---- 入力
  let suppressClick = 0;
  on(button, 'pointerdown', (event) => {
    if (event.button !== 0) return;
    beginTravel();
    moving = false;
    drag = { id: event.pointerId, start: event.clientX, from: x, want: x, moved: false, lastX: event.clientX, lastT: performance.now(), speed: 0 };
    liftTarget = 1;
    try {
      button.setPointerCapture(event.pointerId);
    } catch {
      /* 取れなくても、動きは受けられる */
    }
    wake();
  });
  on(button, 'pointermove', (event) => {
    if (!drag || event.pointerId !== drag.id) return;
    const dx = event.clientX - drag.start;
    if (Math.abs(dx) > 3) drag.moved = true;
    drag.want = drag.from + dx / Math.max(shape.travelCss, 1);
    const nowMs = performance.now();
    const dtMs = Math.max(nowMs - drag.lastT, 4);
    const speed = (event.clientX - drag.lastX) / Math.max(shape.travelCss, 1) / (dtMs / 1000);
    drag.speed = drag.speed * 0.6 + speed * 0.4;
    drag.lastX = event.clientX;
    drag.lastT = nowMs;
    if (Math.abs(drag.speed) > 3.4) startle();
    wake();
  });
  const release = (event) => {
    if (!drag || event.pointerId !== drag.id) return;
    const wasMoved = drag.moved;
    const speed = drag.speed;
    drag = null;
    liftTarget = 0;
    if (wasMoved) {
      suppressClick = performance.now() + 300;
      // 近い方の端へ。勢いも少し数える
      target = x + speed * 0.09 >= 0.5 ? 1 : 0;
      velocity = clamp(speed, -3, 3);
      moving = true;
    }
    wake();
  };
  on(button, 'pointerup', release);
  on(button, 'pointercancel', release);
  on(button, 'lostpointercapture', release);

  const toggle = () => {
    beginTravel();
    target = (moving ? target >= 0.5 : x >= 0.5) ? 0 : 1;
    moving = true;
    wake();
  };
  on(button, 'click', () => {
    if (performance.now() < suppressClick) return;
    toggle();
  });

  const STEP = 0.04;
  on(button, 'keydown', (event) => {
    let dir = 0;
    if (event.key === 'ArrowRight' || event.key === 'ArrowUp') dir = 1;
    else if (event.key === 'ArrowLeft' || event.key === 'ArrowDown') dir = -1;
    if (!dir) return;
    event.preventDefault();
    beginTravel();
    const from = moving ? target : x;
    target = clamp(from + dir * STEP);
    moving = true;
    setStatus(phaseName(hourOf(branch === 'am' ? mix(36, amStart, target) : CLOCK_DAY + (CLOCK_NIGHT - CLOCK_DAY) * target)));
    wake();
  });

  // ---- 見えていないときは止める
  const io = new IntersectionObserver((entries) => {
    visible = entries.some((e) => e.isIntersecting);
    if (visible) {
      dirty = true;
      wake();
    } else if (raf) {
      cancelAnimationFrame(raf);
      raf = 0;
    }
  });
  io.observe(root);

  const ro = new ResizeObserver(() => {
    measure();
    dirty = true;
    lastWorldClock = -1;
    wake();
  });
  ro.observe(root);

  const applyCalm = () => {
    calm = motionQuery.matches;
    dirty = true;
    lastWorldClock = -1;
    wake();
  };
  on(motionQuery, 'change', applyCalm);
  on(schemeQuery, 'change', () => {
    readPalette();
    dirty = true;
    lastWorldClock = -1;
    wake();
  });
  on(canvas, 'webglcontextlost', (event) => {
    event.preventDefault();
    ready = false;
  });
  on(canvas, 'webglcontextrestored', () => {
    ready = setupGl();
    shape.W = 0; // 貼り直しのため、大きさが変わったことにする
    measure();
    dirty = true;
    lastWorldClock = -1;
    wake();
  });

  // ---- 組み立て
  readPalette();
  measure();
  res.x = 131;
  res.inside = false;
  // 最初の絵を、はじめのフレームまでに用意する
  renderWorld(clockOf(), 0, 0);
  if (ready) uploadWorld();
  wake();

  return () => {
    if (raf) cancelAnimationFrame(raf);
    raf = 0;
    visible = false;
    io.disconnect();
    ro.disconnect();
    for (const off of cleanups) off();
    if (gl && ready) {
      gl.deleteProgram(program);
      gl.deleteBuffer(quad);
      gl.deleteVertexArray(vao);
      gl.deleteTexture(texWorld);
      gl.deleteTexture(texNear);
      const lose = gl.getExtension('WEBGL_lose_context');
      if (lose) lose.loseContext();
    }
  };
}
mount(document.querySelector('[data-ld-part="toggle-oasis"]'));
</script>

More from @Lattice_Node