@origingame/create-game 0.0.0-stage → 0.1.1

package/archetypes/roguelike/src/systems.ts

@@ -0,0 +1,620 @@
+// Lamp Dive's systems, in tick order after the screens (src/ui.ts): Hero
+// (carving a floor, the lamp-bearer's turn: a step, a strike, a wait or a
+// draught), Foes (placing them, the strikes that land on them, their deaths
+// and whether the lamp shows them), Loot (placing finds, picking them up)
+// and Fog (what the lamp lights). The foes' own turn is data:
+// assets/ai/*.ogt run by og.ai, whose commands (src/foes.ts) move and strike.
+//
+// A turn: the lamp-bearer acts on the tick a key lands, Game.foesTurn goes
+// up; on the next tick og.ai thinks with it up, so every foe queues one
+// command, and the Foes system takes it down; the commands run before the
+// tick after. The lamp-bearer acts again once its step's tween is done.
+
+import { og, defineSystem } from "@origingame/engine";
+import type { Entity, RngStream, Value, View, World } from "@origingame/engine";
+import { clipOf, TILE } from "./art.ts";
+import { floorStream, H, planFloor, W } from "./dive.ts";
+import type { Plan } from "./dive.ts";
+import { Foe, FoeKind, FOE_SLOTS, FOES, Foes, Game, Hero, Loot, LOOT, LootKind, Phase, Prefs, Sfx, Sound, Tuning } from "./components.ts";
+import { say } from "./ui.ts";
+
+type GameV = Value<typeof Game>;
+type TuneV = Value<typeof Tuning>;
+
+const WHITE = { r: 1, g: 1, b: 1 };
+const GOLD = { r: 1, g: 0.82, b: 0.35 };
+const RED = { r: 1, g: 0.3, b: 0.28 };
+const GREEN = { r: 0.45, g: 1, b: 0.55 };
+const EMBER = { r: 1, g: 0.6, b: 0.3 };
+/** Where parked rows wait. */
+const PARK = { x: -60, y: -60, z: 0 } as const;
+/** Ticks a card waits after the lamp goes out or the relic is taken. */
+export const OVER_DELAY = 50;
+
+/** The camera feel's scale: 0.3 under reduced motion (og-feel), 1 otherwise. */
+export function feel(world: World): number {
+  const p = world.resource(Prefs);
+  return p.ok && p.value.reducedMotion ? 0.3 : 1;
+}
+
+export function must(r: { ok: true } | { ok: false; reason: string }): void {
+  if (!r.ok) throw new Error(r.reason);
+}
+
+export function must2<T>(r: { ok: true; value: T } | { ok: false; reason: string }): T {
+  if (!r.ok) throw new Error(r.reason);
+  return r.value;
+}
+
+/** Tuning, read on its first use in this call (a resource read encodes every field). */
+export function lazyTuning(world: World): TuneV {
+  let v: TuneV | null = null;
+  return new Proxy({} as TuneV, { get: (_, k) => ((v ??= must2(world.resource(Tuning))) as unknown as Record<string | symbol, unknown>)[k] });
+}
+
+/** A cell's centre in world units: the map's top-left corner is at (0, H). */
+export function cellCenter(x: number, y: number): { x: number; y: number } {
+  return { x: x + 0.5, y: H - y - 0.5 };
+}
+
+export function mapOf(g: GameV): Entity {
+  return g.map as unknown as Entity;
+}
+
+export function isWall(world: World, g: GameV, x: number, y: number): boolean {
+  if (x < 0 || y < 0 || x >= W || y >= H) return true;
+  return og.tilemap.getTile(world, mapOf(g), "walls", x, y) >= 0;
+}
+
+/** Whether the lamp lights a cell now (its fog is clear). */
+export function lit(world: World, g: GameV, x: number, y: number): boolean {
+  return og.tilemap.getTile(world, mapOf(g), "fog", x, y) < 0;
+}
+
+export function float(world: World, text: string, x: number, y: number, color: { r: number; g: number; b: number }, crit = false, size = 0.5): void {
+  must(og.render.floatingText(world, { text, position: { x, y, z: 0 }, size, color, crit, rise: 0.9, lifetime: 0.8 }));
+}
+
+/** The plan of the floor the dive is on. */
+export function planOf(rng: { fork(label: string): RngStream }, g: GameV): Plan {
+  return planFloor(floorStream(rng, g.seed, g.floor), g.floor);
+}
+
+/** Carves the floor: every cell of the walls, ground, decor and fog layers, and a fresh og.nav grid. */
+function carve(world: World, g: GameV, plan: Plan): void {
+  const map = mapOf(g);
+  const costs = new Array<number>(W * H).fill(0);
+  for (let y = 0; y < H; y++) {
+    for (let x = 0; x < W; x++) {
+      const wall = plan.walls[y * W + x] === 1;
+      must(og.tilemap.setTile(world, { entity: map, layer: "walls", x, y, tile: wall ? 1 : 0 }));
+      must(og.tilemap.setTile(world, { entity: map, layer: "ground", x, y, tile: wall ? -1 : TILE.floor + ((x * 7 + y * 3) % 5 === 0 ? 1 : (x + y * 5) % 11 === 0 ? 2 : 0) }));
+      must(og.tilemap.setTile(world, { entity: map, layer: "decor", x, y, tile: -1 }));
+      must(og.tilemap.setTile(world, { entity: map, layer: "fog", x, y, tile: TILE.unseen }));
+      costs[(H - 1 - y) * W + x] = wall ? 0 : 1;
+    }
+  }
+  if (plan.stairs) must(og.tilemap.setTile(world, { entity: map, layer: "decor", x: plan.stairs.x, y: plan.stairs.y, tile: TILE.stairs }));
+  if (plan.relic) must(og.tilemap.setTile(world, { entity: map, layer: "decor", x: plan.relic.x, y: plan.relic.y, tile: TILE.pedestal }));
+  g.grid = must2(og.nav.grid(world, { width: W, height: H, cellSize: 1, origin: { x: 0, y: 0 }, costs })) as unknown as number;
+  g.stairsX = plan.stairs ? plan.stairs.x : -1;
+  g.stairsY = plan.stairs ? plan.stairs.y : -1;
+}
+
+/** The direction keys, the pad's d-pad and the HUD's d-pad (Ui writes Game.padDir): 0 none, 1 up, 2 right, 3 down, 4 left. */
+function heldDirection(inp: Value<typeof og.Input>, gp: Value<typeof og.Gamepad>, pad: number): number {
+  if (inp.down("ArrowUp") || inp.down("KeyW") || gp.down("up") || pad === 1) return 1;
+  if (inp.down("ArrowRight") || inp.down("KeyD") || gp.down("right") || pad === 2) return 2;
+  if (inp.down("ArrowDown") || inp.down("KeyS") || gp.down("down") || pad === 3) return 3;
+  if (inp.down("ArrowLeft") || inp.down("KeyA") || gp.down("left") || pad === 4) return 4;
+  return 0;
+}
+
+function navPressed(inp: Value<typeof og.Input>, gp: Value<typeof og.Gamepad>): boolean {
+  return inp.pressed("ArrowUp") || inp.pressed("ArrowDown") || inp.pressed("ArrowLeft") || inp.pressed("ArrowRight") || gp.pressed("up") || gp.pressed("down") || gp.pressed("left") || gp.pressed("right");
+}
+
+const STEP = [null, { x: 0, y: -1 }, { x: 1, y: 0 }, { x: 0, y: 1 }, { x: -1, y: 0 }] as const;
+
+/**
+ * The lamp-bearer's turn. A direction (an arrow, WASD, the d-pad, a tap on
+ * the next cell) steps there, strikes the foe standing there, or bumps the
+ * stone; Space (the pad's A) waits; Q (1, the pad's X, Drink) drinks. A held
+ * direction repeats after 14 ticks, then every 7. Stepping on the stairs
+ * goes down. Every action but a bump or an empty flask ends the turn.
+ */
+export const HeroTurn = defineSystem(
+  "Hero",
+  { reads: [og.Input, og.Gamepad, og.Camera, Foes, Tuning, Prefs], writes: [Game, Hero, og.Transform, og.Sprite, og.Rng], after: ["Ui"] },
+  (q, time, world) => {
+    const game = world.resource(Game);
+    const input = world.resource(og.Input);
+    const gamepad = world.resource(og.Gamepad);
+    const rngR = world.resource(og.Rng);
+    if (!game.ok || !input.ok || !gamepad.ok || !rngR.ok) return;
+    const g = game.value;
+    const inp = input.value;
+    const gp = gamepad.value;
+    const rng = rngR.value;
+    const t = lazyTuning(world);
+    for (const a of q.archetypes()) {
+      const hero = a.column(Hero);
+      const p = a.column(og.Transform).position;
+      for (let i = 0; i < a.count; i++) {
+        const me = a.entity(i);
+        // The map is adopted on its first tick, so the first carve waits a tick.
+        if (g.build && world.tick > 0) {
+          const plan = planOf(rng, g);
+          carve(world, g, plan);
+          g.heroX = plan.start.x;
+          g.heroY = plan.start.y;
+          const c = cellCenter(plan.start.x, plan.start.y);
+          p[i * 3] = c.x;
+          p[i * 3 + 1] = c.y;
+          g.build = false;
+          g.place = true;
+          g.fogDirty = true;
+          g.deepest = Math.max(g.deepest, g.floor);
+        }
+        // The lamp's warm light around the lamp-bearer (under the fog), behind the title too.
+        must(og.render.sprite(world, { texture: g.glow as unknown as never, position: { x: p[i * 3]!, y: p[i * 3 + 1]!, z: 0 }, width: g.lamp * 2.4, height: g.lamp * 2.4, color: { r: 1, g: 0.72, b: 0.35 }, opacity: 0.28, blend: "additive", layer: 1 }));
+        // On a menu (the title, pause, settings, the summary) the arrows and the d-pad move the focus: a tick.
+        if (g.phase !== Phase.Play || g.paused || g.settingsOpen) {
+          if (navPressed(inp, gp)) g.sfx |= Sound.Move;
+          continue;
+        }
+        if (g.hp <= 0 || g.won) continue;
+        if (g.lock > 0 && time.hitStop === 0) g.lock -= 1;
+        if (inp.pressed("Escape") || inp.pressed("KeyP") || gp.pressed("start")) {
+          g.paused = true;
+          continue;
+        }
+        // Read the input every tick (so a press during the foes' turn is held, not lost), act when the turn is ours.
+        const dir = heldDirection(inp, gp, g.padDir);
+        if (dir !== 0 && dir === g.lastDir) g.repeat += 1;
+        else g.repeat = 0;
+        if (dir !== g.lastDir) g.lastDir = dir;
+        const fresh = dir !== 0 && g.repeat === 0;
+        const repeated = dir !== 0 && g.repeat >= 14 && (g.repeat - 14) % 7 === 0;
+        let want = fresh || repeated ? dir : 0;
+        let wait = inp.pressed("Space") || inp.pressed("Period") || gp.pressed("a") || g.padWait;
+        let drink = inp.pressed("KeyQ") || inp.pressed("Digit1") || gp.pressed("x") || g.padDrink;
+        if (g.padWait) g.padWait = false;
+        if (g.padDrink) g.padDrink = false;
+        if (inp.buttonPressed("left")) {
+          // A tap on the next cell (up, down, left or right) acts toward it.
+          const at = screenToWorld(world, inp.pointer.x, inp.pointer.y);
+          if (at !== null) {
+            const cx = Math.floor(at.x);
+            const cy = H - 1 - Math.floor(at.y);
+            const dx = cx - g.heroX;
+            const dy = cy - g.heroY;
+            if (Math.abs(dx) + Math.abs(dy) === 1) want = dx === 1 ? 2 : dx === -1 ? 4 : dy === 1 ? 3 : 1;
+          }
+        }
+        // An action asked for while the last one plays out waits for its turn (one, the latest).
+        if (want !== 0 || wait || drink) g.queued = drink ? 6 : wait ? 5 : want;
+        if (g.foesTurn || g.lock > 0 || g.queued === 0) continue;
+        want = g.queued <= 4 ? g.queued : 0;
+        wait = g.queued === 5;
+        drink = g.queued === 6;
+        g.queued = 0;
+        if (drink) {
+          if (g.potions === 0 || g.hp >= g.hpMax) {
+            g.refusedTick = world.tick;
+            const c = cellCenter(g.heroX, g.heroY);
+            float(world, say(world, g.potions === 0 ? "float.empty" : "float.whole"), c.x, c.y + 0.8, WHITE, false, 0.35);
+            continue;
+          }
+          const healed = Math.min(t.potionHeal, g.hpMax - g.hp);
+          g.potions -= 1;
+          g.hp += healed;
+          g.sfx |= Sound.Drink;
+          const c = cellCenter(g.heroX, g.heroY);
+          float(world, say(world, "float.heal", { n: healed }), c.x, c.y + 0.7, GREEN);
+          must(og.tween.flash(world, { entity: me, color: GREEN, duration: 0.2 }));
+          must(og.tween.squash(world, { entity: me, impact: { x: 0.85, y: 1.2 }, duration: 0.2 }));
+          endTurn(world, g, t);
+          continue;
+        }
+        if (wait) {
+          must(og.tween.squash(world, { entity: me, impact: { x: 1.08, y: 0.92 }, duration: 0.15 }));
+          g.sfx |= Sound.Move;
+          endTurn(world, g, t);
+          continue;
+        }
+        const step = STEP[want]!;
+        const tx = g.heroX + step.x;
+        const ty = g.heroY + step.y;
+        const foe = foeAt(world, tx, ty);
+        if (foe >= 0) {
+          // A strike: the lunge, the die's +0 or +1; the Foes system lands it this tick.
+          g.strikeSlot = foe;
+          g.strikeDamage = g.attack + (rng.chance(0.5) ? 1 : 0);
+          const from = cellCenter(g.heroX, g.heroY);
+          must(og.tween.sequence(world, [
+            { entity: me, field: "position", to: [from.x + step.x * 0.35, from.y - step.y * 0.35, 0], duration: 0.05, ease: "quadOut" },
+            { entity: me, field: "position", to: [from.x, from.y, 0], duration: 0.09, ease: "quadIn" },
+          ]));
+          endTurn(world, g, t);
+          continue;
+        }
+        if (isWall(world, g, tx, ty)) {
+          hero.bumps[i] = hero.bumps[i]! + 1;
+          g.sfx |= Sound.Bump;
+          must(og.tween.squash(world, { entity: me, impact: step.x !== 0 ? { x: 0.85, y: 1.1 } : { x: 1.1, y: 0.85 }, duration: 0.12 }));
+          continue;
+        }
+        g.heroX = tx;
+        g.heroY = ty;
+        hero.steps[i] = hero.steps[i]! + 1;
+        g.sfx |= Sound.Step;
+        g.fogDirty = true;
+        const to = cellCenter(tx, ty);
+        must(og.tween.to(world, { entity: me, field: "position", to: [to.x, to.y, 0], duration: t.stepTime, ease: "quadOut" }));
+        if (tx === g.stairsX && ty === g.stairsY) {
+          // Down the stairs: the next floor is carved on the next tick.
+          g.floor += 1;
+          g.build = true;
+          g.sfx |= Sound.Stairs;
+          float(world, say(world, "float.floor", { n: g.floor }), to.x, to.y + 0.8, GOLD, true);
+          must(og.camera.punch(world, 0.1 * feel(world)));
+          // The foes of the floor left behind take no turn.
+          endTurn(world, g, t);
+          g.foesTurn = false;
+          continue;
+        }
+        endTurn(world, g, t);
+      }
+    }
+  },
+);
+
+function endTurn(world: World, g: GameV, t: TuneV): void {
+  g.turns += 1;
+  g.foesTurn = true;
+  g.foesAt = world.tick;
+  g.lock = Math.max(1, Math.round(t.stepTime * 60));
+}
+
+/** The foe slot standing on a cell, from the Foes resource, or -1. */
+function foeAt(world: World, x: number, y: number): number {
+  const foes = world.resource(Foes);
+  if (!foes.ok) return -1;
+  const f = foes.value as unknown as Record<string, number>;
+  for (let i = 0; i < FOE_SLOTS; i++) if (f[`x${i}`] === x && f[`y${i}`] === y) return i;
+  return -1;
+}
+
+/** The world point under a CSS pixel, through the orthographic camera. */
+export function screenToWorld(world: World, px: number, py: number): { x: number; y: number } | null {
+  const cam = world.resource(og.Camera);
+  const vp = og.ui.viewport(world);
+  if (!cam.ok || vp.height <= 0) return null;
+  const scale = vp.height / cam.value.height;
+  const at = cam.value.position;
+  return { x: at.x + (px - vp.width / 2) / scale, y: at.y - (py - vp.height / 2) / scale };
+}
+
+/** A foe's numbers by FoeKind.*. */
+export function stats(t: TuneV, kind: number): { hp: number; attack: number } {
+  if (kind === FoeKind.Guardian) return { hp: t.guardianHp, attack: t.guardianAttack };
+  if (kind === FoeKind.Skeleton) return { hp: t.skeletonHp, attack: t.skeletonAttack };
+  return { hp: t.ratHp, attack: t.ratAttack };
+}
+
+/**
+ * The foes: placed when a floor is carved; the lamp-bearer's strike landing
+ * (a flash, a squash, the number, a hit stop and a little shake; the
+ * guardian's fall far heavier); their deaths; whether the lamp shows them;
+ * the telegraph of a charged strike; the foes' turn taken down once og.ai
+ * has thought with it up.
+ */
+export const FoeTurn = defineSystem(
+  "Foes",
+  { reads: [Tuning, Prefs, og.Rng], writes: [Game, Foes, Foe, og.Transform, og.Sprite, og.Flipbook, og.AiAgent, og.Perception], after: ["Hero"] },
+  (q, time, world) => {
+    const game = world.resource(Game);
+    const foes = world.resource(Foes);
+    const rngR = world.resource(og.Rng);
+    if (!game.ok || !foes.ok || !rngR.ok) return;
+    const g = game.value;
+    const board = foes.value as unknown as Record<string, number>;
+    const t = lazyTuning(world);
+    if (g.foesTurn && world.tick > g.foesAt) g.foesTurn = false;
+    const plan = g.place ? planOf(rngR.value, g) : null;
+    for (const a of q.archetypes()) {
+      const f = a.column(Foe);
+      const p = a.column(og.Transform).position;
+      const sprite = a.column(og.Sprite);
+      const fb = a.column(og.Flipbook);
+      const ai = a.column(og.AiAgent);
+      const eyes = a.column(og.Perception);
+      for (let i = 0; i < a.count; i++) {
+        const me = a.entity(i);
+        const slot = f.slot[i]!;
+        if (plan !== null) {
+          const spot = plan.foes[slot];
+          if (spot) {
+            const s = stats(t, spot.kind);
+            f.active[i] = 1;
+            f.kind[i] = spot.kind;
+            f.hp[i] = s.hp;
+            f.hpMax[i] = s.hp;
+            f.attack[i] = s.attack;
+            f.cx[i] = spot.x;
+            f.cy[i] = spot.y;
+            f.turns[i] = 0;
+            f.charging[i] = 0;
+            f.dying[i] = 0;
+            const c = cellCenter(spot.x, spot.y);
+            p[i * 3] = c.x;
+            p[i * 3 + 1] = c.y;
+            fb.clip[i] = clipOf(FOES[spot.kind]!);
+            // A handle column is two u32 per row: the handle's low and high halves.
+            const mind = spot.kind === FoeKind.Guardian ? g.guardianMind : g.foeMind;
+            ai.behaviour[i * 2] = mind % 0x1_0000_0000;
+            ai.behaviour[i * 2 + 1] = Math.floor(mind / 0x1_0000_0000);
+            ai.active[i] = 1;
+            eyes.sight[i] = t.sight;
+            sprite.opacity[i] = 1;
+          } else {
+            f.active[i] = 0;
+            f.dying[i] = 0;
+            ai.active[i] = 0;
+            p[i * 3] = PARK.x;
+            p[i * 3 + 1] = PARK.y;
+          }
+        }
+        if (g.strikeSlot === slot && f.active[i]) strike(world, g, f, i, me, p);
+        if (f.dying[i]! > 0) {
+          if (time.hitStop === 0) f.dying[i] = f.dying[i]! - 1;
+          if (f.dying[i] === 0) {
+            p[i * 3] = PARK.x;
+            p[i * 3 + 1] = PARK.y;
+            sprite.visible[i] = 0;
+          }
+        } else {
+          sprite.visible[i] = f.active[i] && g.phase !== Phase.Title && lit(world, g, f.cx[i]!, f.cy[i]!) ? 1 : 0;
+        }
+        // A charged strike glows red the turn before it lands.
+        const red = f.charging[i] ? 0.45 : 1;
+        sprite.color[i * 3 + 1] = red;
+        sprite.color[i * 3 + 2] = red;
+        const x = f.active[i] ? f.cx[i]! : -1;
+        const y = f.active[i] ? f.cy[i]! : -1;
+        if (board[`x${slot}`] !== x) board[`x${slot}`] = x;
+        if (board[`y${slot}`] !== y) board[`y${slot}`] = y;
+      }
+    }
+    if (g.strikeSlot >= 0) g.strikeSlot = -1;
+  },
+);
+
+function strike(world: World, g: GameV, f: View<typeof Foe>, i: number, me: Entity, p: Float32Array): void {
+  const dmg = g.strikeDamage;
+  const hp = Math.max(0, f.hp[i]! - dmg);
+  f.hp[i] = hp;
+  g.hits += 1;
+  g.sfx |= Sound.Hit;
+  const x = p[i * 3]!;
+  const y = p[i * 3 + 1]!;
+  const kind = f.kind[i]!;
+  const crit = dmg > g.attack;
+  float(world, say(world, "float.hit", { n: dmg }), x, y + 0.6, crit ? GOLD : WHITE, crit);
+  must(og.tween.flash(world, { entity: me, duration: 0.12 }));
+  must(og.tween.squash(world, { entity: me, impact: { x: 1.3, y: 0.7 }, duration: 0.2 }));
+  const t = lazyTuning(world);
+  must(og.time.hitStop(world, t.hitStop + (crit ? 2 : 0)));
+  const k = feel(world);
+  must(og.camera.shake(world, (kind === FoeKind.Guardian ? 0.3 : 0.15) * k));
+  must(og.camera.kick(world, { x: x - (g.heroX + 0.5), y: y - (H - g.heroY - 0.5), z: 0 }, 0.1 * k));
+  if (hp === 0) {
+    f.active[i] = 0;
+    f.dying[i] = 24;
+    g.kills += 1;
+    g.sfx |= kind === FoeKind.Guardian ? Sound.Roar : Sound.Kill;
+    if (kind === FoeKind.Guardian) {
+      must(og.time.hitStop(world, 12));
+      must(og.camera.shake(world, 0.6 * feel(world)));
+    }
+    must(og.tween.to(world, { entity: me, field: "scale", to: [1.6, 0, 1], duration: 0.3, delay: 0.05, ease: "backIn" }));
+    must(og.tween.to(world, { entity: me, component: og.Sprite, field: "opacity", to: [0], duration: 0.3, delay: 0.05, ease: "quadIn" }));
+  }
+}
+
+/** Finds: placed when a floor is carved, taken when the lamp-bearer steps on them, shown where the lamp lights. */
+export const LootTurn = defineSystem(
+  "Loot",
+  { reads: [Prefs, og.Rng], writes: [Game, Loot, og.Transform, og.Sprite, og.Flipbook], after: ["Foes"] },
+  (q, time, world) => {
+    const game = world.resource(Game);
+    const rngR = world.resource(og.Rng);
+    if (!game.ok || !rngR.ok) return;
+    const g = game.value;
+    const plan = g.place ? planOf(rngR.value, g) : null;
+    for (const a of q.archetypes()) {
+      const l = a.column(Loot);
+      const p = a.column(og.Transform).position;
+      const sprite = a.column(og.Sprite);
+      const fb = a.column(og.Flipbook);
+      for (let i = 0; i < a.count; i++) {
+        const me = a.entity(i);
+        if (plan !== null) {
+          const spot = plan.loot[l.slot[i]!];
+          l.taken[i] = 0;
+          if (spot) {
+            l.active[i] = 1;
+            l.kind[i] = spot.kind;
+            l.amount[i] = spot.amount;
+            l.cx[i] = spot.x;
+            l.cy[i] = spot.y;
+            const c = cellCenter(spot.x, spot.y);
+            p[i * 3] = c.x;
+            p[i * 3 + 1] = c.y;
+            fb.clip[i] = clipOf(LOOT[spot.kind]!);
+            sprite.opacity[i] = 1;
+          } else {
+            l.active[i] = 0;
+            p[i * 3] = PARK.x;
+            p[i * 3 + 1] = PARK.y;
+          }
+        }
+        if (l.taken[i]! > 0) {
+          if (time.hitStop === 0) l.taken[i] = l.taken[i]! + 1;
+          if (l.taken[i]! > 30) {
+            l.taken[i] = 0;
+            sprite.visible[i] = 0;
+            p[i * 3] = PARK.x;
+            p[i * 3 + 1] = PARK.y;
+          }
+          continue;
+        }
+        if (!l.active[i]) {
+          sprite.visible[i] = 0;
+          continue;
+        }
+        sprite.visible[i] = g.phase !== Phase.Title && lit(world, g, l.cx[i]!, l.cy[i]!) ? 1 : 0;
+        if (g.phase !== Phase.Play || l.cx[i] !== g.heroX || l.cy[i] !== g.heroY || g.hp <= 0) continue;
+        take(world, g, l.kind[i]!, l.amount[i]!, p[i * 3]!, p[i * 3 + 1]!);
+        l.active[i] = 0;
+        l.taken[i] = 1;
+        must(og.tween.to(world, { entity: me, field: "position.y", to: [p[i * 3 + 1]! + 0.8], duration: 0.35, ease: "quadOut" }));
+        must(og.tween.to(world, { entity: me, component: og.Sprite, field: "opacity", to: [0], duration: 0.3, delay: 0.1, ease: "quadIn" }));
+        must(og.tween.squash(world, { entity: me, impact: { x: 0.6, y: 1.5 }, duration: 0.3 }));
+      }
+    }
+    if (plan !== null) g.place = false;
+  },
+);
+
+function take(world: World, g: GameV, kind: number, amount: number, x: number, y: number): void {
+  g.finds += 1;
+  const say1 = (key: string, args?: Record<string, number>) => float(world, say(world, key, args), x, y + 0.8, GOLD, kind === LootKind.Relic, 0.34);
+  switch (kind) {
+    case LootKind.Potion:
+      g.potions += 1;
+      g.sfx |= Sound.Pickup;
+      say1("item.potion");
+      break;
+    case LootKind.Blade:
+      g.attack += 1;
+      g.sfx |= Sound.Item;
+      say1("item.blade");
+      break;
+    case LootKind.Ward:
+      g.armour += 1;
+      g.sfx |= Sound.Item;
+      say1("item.ward");
+      break;
+    case LootKind.Oil:
+      g.lamp += 1;
+      g.fogDirty = true;
+      g.sfx |= Sound.Item;
+      say1("item.oil");
+      break;
+    case LootKind.Coin:
+      g.gold += amount;
+      g.sfx |= Sound.Pickup;
+      say1("item.coin", { n: amount });
+      break;
+    case LootKind.Relic:
+      g.won = true;
+      g.overTicks = 0;
+      g.sfx |= Sound.Won;
+      say1("item.relic");
+      must(og.camera.punch(world, 0.15 * feel(world)));
+      break;
+  }
+}
+
+/**
+ * What the lamp lights: when the lamp-bearer moves, every cell within the
+ * lamp's reach that a straight line from it reaches without crossing stone
+ * is cleared of fog; cells lit before and not now are remembered (dimmed);
+ * cells never lit stay dark.
+ */
+export const Fog = defineSystem("Fog", { writes: [Game], after: ["Loot"] }, (_q, _time, world) => {
+  const game = world.resource(Game);
+  if (!game.ok) return;
+  const g = game.value;
+  if (!g.fogDirty || g.build) return;
+  g.fogDirty = false;
+  const map = mapOf(g);
+  const r = g.lamp;
+  const reach = Math.ceil(r);
+  const seen = new Set<number>();
+  for (let dy = -reach; dy <= reach; dy++) {
+    for (let dx = -reach; dx <= reach; dx++) {
+      if (dx * dx + dy * dy > r * r) continue;
+      const x = g.heroX + dx;
+      const y = g.heroY + dy;
+      if (x < 0 || y < 0 || x >= W || y >= H) continue;
+      if (lineClear(world, g, g.heroX, g.heroY, x, y)) seen.add(y * W + x);
+    }
+  }
+  let known = 0;
+  for (let y = 0; y < H; y++) {
+    for (let x = 0; x < W; x++) {
+      const now = og.tilemap.getTile(world, map, "fog", x, y);
+      const want = seen.has(y * W + x) ? -1 : now === TILE.unseen ? TILE.unseen : TILE.remembered;
+      if (want !== now) must(og.tilemap.setTile(world, { entity: map, layer: "fog", x, y, tile: want }));
+      if (want !== TILE.unseen) known += 1;
+    }
+  }
+  if (g.lit !== seen.size) g.lit = seen.size;
+  if (g.seen !== known) g.seen = known;
+});
+
+/** Whether a straight line from one cell to another crosses no stone before it (the end cell itself may be stone: walls are seen). */
+function lineClear(world: World, g: GameV, x0: number, y0: number, x1: number, y1: number): boolean {
+  let x = x0;
+  let y = y0;
+  const dx = Math.abs(x1 - x0);
+  const dy = -Math.abs(y1 - y0);
+  const sx = x0 < x1 ? 1 : -1;
+  const sy = y0 < y1 ? 1 : -1;
+  let err = dx + dy;
+  for (;;) {
+    if (x === x1 && y === y1) return true;
+    if ((x !== x0 || y !== y0) && isWall(world, g, x, y)) return false;
+    const e2 = 2 * err;
+    if (e2 >= dy) {
+      err += dy;
+      x += sx;
+    }
+    if (e2 <= dx) {
+      err += dx;
+      y += sy;
+    }
+  }
+}
+
+/** Plays each requested sound once: a voice already playing is stopped this tick and restarted the next. */
+export const Voices = defineSystem("Voices", { writes: [Game, Sfx, og.AudioSource, og.Rng], after: ["Fog"] }, (q, _time, world) => {
+  const game = world.resource(Game);
+  if (!game.ok) return;
+  const g = game.value;
+  if (g.sfx === 0) return;
+  const rng = world.resource(og.Rng);
+  let left = g.sfx;
+  for (const a of q.archetypes()) {
+    const sfx = a.column(Sfx);
+    const src = a.column(og.AudioSource);
+    for (let i = 0; i < a.count; i++) {
+      const b = sfx.bit[i]!;
+      if ((g.sfx & b) === 0) continue;
+      if (src.playing[i]) {
+        src.playing[i] = 0;
+      } else {
+        src.playing[i] = 1;
+        sfx.plays[i] = sfx.plays[i]! + 1;
+        if ((b === Sound.Step || b === Sound.Hit || b === Sound.Pickup) && rng.ok) src.pitch[i] = rng.value.range(0.92, 1.08);
+        left &= ~b;
+      }
+    }
+  }
+  g.sfx = left;
+});
+
+export { EMBER, RED, GOLD, WHITE, LootKind };