@rpgm-tools/neo-angband-core 0.10.0

package/dist/mon/spell.d.ts

@@ -0,0 +1,155 @@
+/**
+ * Monster-spell substrate, ported from reference/src/mon-spell.c (Angband
+ * 4.2.6): the spell-type classification (the mon_spell_types table built from
+ * list-mon-spells.h), the spell-type predicates and masks, the spell-hit
+ * chance, and the breath-damage calculation. These are the pure computations
+ * over the bound spell / race data that both the spell executor (do_mon_spell,
+ * game/ layer) and the spell-selection AI (choose_attack_spell / remove_bad_
+ * spells, mon-attack.c) sit on; they do not touch the GameState, so they live
+ * here in mon/ below game/.
+ *
+ * The RST_ classification is generated as a string expression per spell
+ * (generated/mon-spells.ts keeps `type` as written, e.g. "RST_BREATH |
+ * RST_INNATE"); MON_SPELL_TYPES evaluates each once into a bitmask indexed by
+ * RSF value (index 0 is RSF_NONE, matching the enum), so the lookups mirror
+ * upstream's mon_spell_types[index] exactly.
+ *
+ * monSpellNonhpDamage (nonhp_dam, mon-spell.c L571) is the non-breath half of
+ * mon_spell_dam: the deterministic MAXIMISE sum of a spell's damaging effect
+ * dice, with each effect's SPELL_POWER expression (the only base value
+ * monster-spell damage dice reference) rebound to the calling race - upstream
+ * sets its global `ref_race` for the same duration. This is the seam the
+ * lore/recall layer (mon/lore-describe.ts) needed to wire mon_spell_lore_damage
+ * for real; breath damage keeps using breathDam below unchanged.
+ */
+import { FlagSet } from "../bitflag.js";
+import type { Rng } from "../rng.js";
+import type { TimedFailLike } from "../obj/object.js";
+import type { MonsterRace, MonsterSpell, MonsterSpellEffect } from "./types.js";
+import type { Monster } from "./monster.js";
+/**
+ * RST_ spell-type bitflags (mon-spell.h). RST_DAMAGE is the composite of the
+ * four damaging categories.
+ */
+export declare const RST: {
+    readonly NONE: 0;
+    readonly BOLT: 1;
+    readonly BALL: 2;
+    readonly BREATH: 4;
+    readonly DIRECT: 8;
+    readonly ANNOY: 16;
+    readonly HASTE: 32;
+    readonly HEAL: 64;
+    readonly HEAL_OTHER: 128;
+    readonly TACTIC: 256;
+    readonly ESCAPE: 512;
+    readonly SUMMON: 1024;
+    readonly INNATE: 2048;
+    readonly ARCHERY: 4096;
+};
+/** #define RST_DAMAGE (RST_BOLT | RST_BALL | RST_BREATH | RST_DIRECT). */
+export declare const RST_DAMAGE: number;
+/** CONF_HIT_REDUCTION (mon-timed.h): accuracy loss per level of confusion. */
+export declare const CONF_HIT_REDUCTION = 20;
+/**
+ * The per-spell type bitmask, indexed by RSF value (mon_spell_types[]). Built
+ * once from the generated entries; index 0 (RSF_NONE) and the trailing MAX
+ * entry are 0.
+ */
+export declare const MON_SPELL_TYPES: readonly number[];
+/** mon_spell_is_valid: a real RSF_ spell index. */
+export declare function monSpellIsValid(index: number): boolean;
+/** monster_spell_is_breath. */
+export declare function monSpellIsBreath(index: number): boolean;
+/** mon_spell_has_damage. */
+export declare function monSpellHasDamage(index: number): boolean;
+/** mon_spell_is_innate. */
+export declare function monSpellIsInnate(index: number): boolean;
+/** test_spells: whether any spell of a wanted type is set in the flagset. */
+export declare function testSpells(f: FlagSet, types: number): boolean;
+/** ignore_spells: clear every spell of the given type(s) from the flagset. */
+export declare function ignoreSpells(f: FlagSet, types: number): void;
+/** create_mon_spell_mask: a fresh flagset of every spell of the given type(s). */
+export declare function createMonSpellMask(...types: number[]): FlagSet;
+/**
+ * chance_of_spell_hit_base: MAX(race->level, 1) * 3 + spell->hit. See also the
+ * melee analogue chance_of_monster_hit_base.
+ */
+export declare function chanceOfSpellHitBase(race: MonsterRace, spell: MonsterSpell): number;
+/** chance_of_spell_hit: the base to-hit reduced for each level of confusion. */
+export declare function chanceOfSpellHit(mon: Monster, spell: MonsterSpell): number;
+/** The projection fields breath_dam reads (a structural view of ProjectionInfo). */
+export interface BreathProjection {
+    /** element->divisor: hp is divided by this. */
+    divisor: number;
+    /** element->damage_cap: the maximum breath damage. */
+    damageCap: number;
+}
+/**
+ * breath_dam: a monster breath does hp / divisor damage, capped at the
+ * element's damage cap.
+ */
+export declare function breathDam(proj: BreathProjection, hp: number): number;
+/**
+ * unset_spells (mon-spell.c L470): turn off spells with a side effect or
+ * projection type resisted by what the monster knows about the player, subject
+ * to intelligence and chance. `flags` / `pflags` / `el` are the monster's
+ * ai-memorized view of the player (known_pstate copies); `timedFail` resolves a
+ * TMD_ name to its fail-condition table (the bound player-timed data).
+ *
+ * RNG order preserved exactly, including the C short-circuit quirks:
+ * - every elemental (BOLT/BALL/BREATH) spell present draws one randint0(100),
+ *   even when the learn chance is 0;
+ * - a non-smart monster draws one_in_(3) per EFFECT LINE of every non-elemental
+ *   spell (the `(smart || !one_in_(3)) && index == EF_TIMED_INC` gate is
+ *   evaluated left-to-right for every effect), and one_in_(2) likewise for the
+ *   drain-mana gate.
+ * Upstream indexes el[] by the raw projection subtype; for the handful of
+ * non-element breath subtypes (TIME / INERTIA / GRAVITY / PLASMA / MANA /
+ * WATER) that read past the element table in C, the port treats the resist
+ * level as 0 (an unreproducible out-of-bounds read; the draw still happens).
+ */
+export declare function unsetSpells(rng: Rng, spells: FlagSet, flags: FlagSet, pflags: FlagSet, el: Int16Array, mon: Monster, spellTable: ReadonlyMap<number, MonsterSpell>, timedFail: (tmdName: string) => readonly TimedFailLike[] | null): void;
+/** The player-side seams update_smart_learn drives (mon-util.c L788). */
+export interface SmartLearnEnv {
+    /** OPT(p, birth_ai_learn). */
+    aiLearn: boolean;
+    /** equip_learn_flag(p, flag). */
+    equipLearnFlag: (of: number) => void;
+    /** equip_learn_element(p, element). */
+    equipLearnElement: (elem: number) => void;
+    /** player_of_has(p, flag). */
+    playerOfHas: (of: number) => boolean;
+    /** pf_has(p->state.pflags, pflag). */
+    playerPfHas: (pf: number) => boolean;
+    /** p->state.el_info[element].res_level. */
+    playerResLevel: (elem: number) => number;
+}
+/**
+ * update_smart_learn (mon-util.c L788): the monster learns an "observed"
+ * resistance or other player property (or its absence). The player always
+ * learns the corresponding rune (equip_learn_*); the monster's known_pstate is
+ * only updated under birth_ai_learn, for non-stupid monsters, with the
+ * one_in_(2) non-smart and one_in_(100) failure draws in upstream order.
+ * Robust to `element` being an arbitrary PROJ_ index, as upstream.
+ */
+export declare function updateSmartLearn(rng: Rng, mon: Monster, env: SmartLearnEnv, flag: number, pflag: number, element: number): void;
+/**
+ * FLAGGED ADDITION (#lore-damage): nonhp_dam (mon-spell.c L571), restricted to
+ * the MAXIMISE aspect mon_spell_lore_damage needs - deterministic, no RNG.
+ *
+ * Sums the MAXIMISE damage of every effect line except EF_TIMED_INC ("Timed
+ * effects increases don't count as damage in lore", upstream comment).
+ * EF_LASH is special-cased exactly as upstream: full damage from the race's
+ * first blow plus half from each of the rest (integer division per term,
+ * summed - not the total divided by two).
+ *
+ * Each non-LASH effect's dice is parsed fresh from its raw string and any
+ * SPELL_POWER expression rebound to `race` (the only base value monster-spell
+ * damage dice reference - see reference/lib/gamedata/monster_spell.txt),
+ * mirroring upstream's do_mon_spell / mon-cast.ts buildSpellEffectChain
+ * pattern of rebuilding the bound dice per caster rather than mutating the
+ * shared MonsterSpell record (which every race with that spell shares).
+ */
+export declare function monSpellNonhpDamage(effects: readonly MonsterSpellEffect[], race: MonsterRace): number;
+//# sourceMappingURL=spell.d.ts.map

package/dist/mon/spell.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"spell.d.ts","sourceRoot":"","sources":["../../src/mon/spell.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;GAuBG;AAIH,OAAO,EAAE,OAAO,EAAE,MAAM,eAAe,CAAC;AAExC,OAAO,KAAK,EAAe,GAAG,EAAE,MAAM,WAAW,CAAC;AAElD,OAAO,KAAK,EAAE,aAAa,EAAE,MAAM,kBAAkB,CAAC;AAEtD,OAAO,KAAK,EAAE,WAAW,EAAE,YAAY,EAAE,kBAAkB,EAAE,MAAM,YAAY,CAAC;AAChF,OAAO,KAAK,EAAE,OAAO,EAAE,MAAM,cAAc,CAAC;AAI5C;;;GAGG;AACH,eAAO,MAAM,GAAG;;;;;;;;;;;;;;;CAeN,CAAC;AAEX,0EAA0E;AAC1E,eAAO,MAAM,UAAU,QAAgD,CAAC;AAExE,8EAA8E;AAC9E,eAAO,MAAM,kBAAkB,KAAK,CAAC;AAerC;;;;GAIG;AACH,eAAO,MAAM,eAAe,EAAE,SAAS,MAAM,EAE5C,CAAC;AAEF,mDAAmD;AACnD,wBAAgB,eAAe,CAAC,KAAK,EAAE,MAAM,GAAG,OAAO,CAEtD;AAED,+BAA+B;AAC/B,wBAAgB,gBAAgB,CAAC,KAAK,EAAE,MAAM,GAAG,OAAO,CAEvD;AAED,4BAA4B;AAC5B,wBAAgB,iBAAiB,CAAC,KAAK,EAAE,MAAM,GAAG,OAAO,CAExD;AAED,2BAA2B;AAC3B,wBAAgB,gBAAgB,CAAC,KAAK,EAAE,MAAM,GAAG,OAAO,CAEvD;AAED,6EAA6E;AAC7E,wBAAgB,UAAU,CAAC,CAAC,EAAE,OAAO,EAAE,KAAK,EAAE,MAAM,GAAG,OAAO,CAK7D;AAED,8EAA8E;AAC9E,wBAAgB,YAAY,CAAC,CAAC,EAAE,OAAO,EAAE,KAAK,EAAE,MAAM,GAAG,IAAI,CAI5D;AAED,kFAAkF;AAClF,wBAAgB,kBAAkB,CAAC,GAAG,KAAK,EAAE,MAAM,EAAE,GAAG,OAAO,CAO9D;AAED;;;GAGG;AACH,wBAAgB,oBAAoB,CAClC,IAAI,EAAE,WAAW,EACjB,KAAK,EAAE,YAAY,GAClB,MAAM,CAER;AAED,gFAAgF;AAChF,wBAAgB,gBAAgB,CAAC,GAAG,EAAE,OAAO,EAAE,KAAK,EAAE,YAAY,GAAG,MAAM,CAO1E;AAED,oFAAoF;AACpF,MAAM,WAAW,gBAAgB;IAC/B,+CAA+C;IAC/C,OAAO,EAAE,MAAM,CAAC;IAChB,sDAAsD;IACtD,SAAS,EAAE,MAAM,CAAC;CACnB;AAED;;;GAGG;AACH,wBAAgB,SAAS,CAAC,IAAI,EAAE,gBAAgB,EAAE,EAAE,EAAE,MAAM,GAAG,MAAM,CAIpE;AAQD;;;;;;;;;;;;;;;;;;GAkBG;AACH,wBAAgB,WAAW,CACzB,GAAG,EAAE,GAAG,EACR,MAAM,EAAE,OAAO,EACf,KAAK,EAAE,OAAO,EACd,MAAM,EAAE,OAAO,EACf,EAAE,EAAE,UAAU,EACd,GAAG,EAAE,OAAO,EACZ,UAAU,EAAE,WAAW,CAAC,MAAM,EAAE,YAAY,CAAC,EAC7C,SAAS,EAAE,CAAC,OAAO,EAAE,MAAM,KAAK,SAAS,aAAa,EAAE,GAAG,IAAI,GAC9D,IAAI,CA8EN;AAED,yEAAyE;AACzE,MAAM,WAAW,aAAa;IAC5B,8BAA8B;IAC9B,OAAO,EAAE,OAAO,CAAC;IACjB,iCAAiC;IACjC,cAAc,EAAE,CAAC,EAAE,EAAE,MAAM,KAAK,IAAI,CAAC;IACrC,uCAAuC;IACvC,iBAAiB,EAAE,CAAC,IAAI,EAAE,MAAM,KAAK,IAAI,CAAC;IAC1C,8BAA8B;IAC9B,WAAW,EAAE,CAAC,EAAE,EAAE,MAAM,KAAK,OAAO,CAAC;IACrC,sCAAsC;IACtC,WAAW,EAAE,CAAC,EAAE,EAAE,MAAM,KAAK,OAAO,CAAC;IACrC,2CAA2C;IAC3C,cAAc,EAAE,CAAC,IAAI,EAAE,MAAM,KAAK,MAAM,CAAC;CAC1C;AAED;;;;;;;GAOG;AACH,wBAAgB,gBAAgB,CAC9B,GAAG,EAAE,GAAG,EACR,GAAG,EAAE,OAAO,EACZ,GAAG,EAAE,aAAa,EAClB,IAAI,EAAE,MAAM,EACZ,KAAK,EAAE,MAAM,EACb,OAAO,EAAE,MAAM,GACd,IAAI,CAsCN;AAYD;;;;;;;;;;;;;;;;GAgBG;AACH,wBAAgB,mBAAmB,CACjC,OAAO,EAAE,SAAS,kBAAkB,EAAE,EACtC,IAAI,EAAE,WAAW,GAChB,MAAM,CA+BR"}

package/dist/mon/spell.js

@@ -0,0 +1,355 @@
+/**
+ * Monster-spell substrate, ported from reference/src/mon-spell.c (Angband
+ * 4.2.6): the spell-type classification (the mon_spell_types table built from
+ * list-mon-spells.h), the spell-type predicates and masks, the spell-hit
+ * chance, and the breath-damage calculation. These are the pure computations
+ * over the bound spell / race data that both the spell executor (do_mon_spell,
+ * game/ layer) and the spell-selection AI (choose_attack_spell / remove_bad_
+ * spells, mon-attack.c) sit on; they do not touch the GameState, so they live
+ * here in mon/ below game/.
+ *
+ * The RST_ classification is generated as a string expression per spell
+ * (generated/mon-spells.ts keeps `type` as written, e.g. "RST_BREATH |
+ * RST_INNATE"); MON_SPELL_TYPES evaluates each once into a bitmask indexed by
+ * RSF value (index 0 is RSF_NONE, matching the enum), so the lookups mirror
+ * upstream's mon_spell_types[index] exactly.
+ *
+ * monSpellNonhpDamage (nonhp_dam, mon-spell.c L571) is the non-breath half of
+ * mon_spell_dam: the deterministic MAXIMISE sum of a spell's damaging effect
+ * dice, with each effect's SPELL_POWER expression (the only base value
+ * monster-spell damage dice reference) rebound to the calling race - upstream
+ * sets its global `ref_race` for the same duration. This is the seam the
+ * lore/recall layer (mon/lore-describe.ts) needed to wire mon_spell_lore_damage
+ * for real; breath damage keeps using breathDam below unchanged.
+ */
+import { Dice } from "../dice.js";
+import { Expression } from "../expression.js";
+import { FlagSet } from "../bitflag.js";
+import { ELEM, MON_SPELL_ENTRIES, MON_TMD, OF, PF, RSF } from "../generated/index.js";
+import { ELEM_MAX } from "../obj/types.js";
+import { RSF_SIZE } from "./types.js";
+import { monsterEffectLevel } from "./timed.js";
+import { monsterIsSmart, monsterIsStupid } from "./predicate.js";
+/**
+ * RST_ spell-type bitflags (mon-spell.h). RST_DAMAGE is the composite of the
+ * four damaging categories.
+ */
+export const RST = {
+    NONE: 0x0000,
+    BOLT: 0x0001,
+    BALL: 0x0002,
+    BREATH: 0x0004,
+    DIRECT: 0x0008,
+    ANNOY: 0x0010,
+    HASTE: 0x0020,
+    HEAL: 0x0040,
+    HEAL_OTHER: 0x0080,
+    TACTIC: 0x0100,
+    ESCAPE: 0x0200,
+    SUMMON: 0x0400,
+    INNATE: 0x0800,
+    ARCHERY: 0x1000,
+};
+/** #define RST_DAMAGE (RST_BOLT | RST_BALL | RST_BREATH | RST_DIRECT). */
+export const RST_DAMAGE = RST.BOLT | RST.BALL | RST.BREATH | RST.DIRECT;
+/** CONF_HIT_REDUCTION (mon-timed.h): accuracy loss per level of confusion. */
+export const CONF_HIT_REDUCTION = 20;
+/** Evaluate a generated RST_ type expression ("RST_A | RST_B" or 0). */
+function evalTypeExpr(expr) {
+    if (typeof expr === "number")
+        return expr;
+    let mask = 0;
+    for (const tok of expr.split("|")) {
+        const name = tok.trim().replace(/^RST_/, "");
+        const value = RST[name];
+        if (value === undefined)
+            throw new Error(`unknown RST token: ${tok}`);
+        mask |= value;
+    }
+    return mask;
+}
+/**
+ * The per-spell type bitmask, indexed by RSF value (mon_spell_types[]). Built
+ * once from the generated entries; index 0 (RSF_NONE) and the trailing MAX
+ * entry are 0.
+ */
+export const MON_SPELL_TYPES = MON_SPELL_ENTRIES.map((e) => evalTypeExpr(e.type));
+/** mon_spell_is_valid: a real RSF_ spell index. */
+export function monSpellIsValid(index) {
+    return index > RSF.NONE && index < RSF.MAX;
+}
+/** monster_spell_is_breath. */
+export function monSpellIsBreath(index) {
+    return (MON_SPELL_TYPES[index] & RST.BREATH) !== 0;
+}
+/** mon_spell_has_damage. */
+export function monSpellHasDamage(index) {
+    return (MON_SPELL_TYPES[index] & RST_DAMAGE) !== 0;
+}
+/** mon_spell_is_innate. */
+export function monSpellIsInnate(index) {
+    return (MON_SPELL_TYPES[index] & RST.INNATE) !== 0;
+}
+/** test_spells: whether any spell of a wanted type is set in the flagset. */
+export function testSpells(f, types) {
+    for (let index = RSF.NONE + 1; index < RSF.MAX; index++) {
+        if (f.has(index) && (MON_SPELL_TYPES[index] & types) !== 0)
+            return true;
+    }
+    return false;
+}
+/** ignore_spells: clear every spell of the given type(s) from the flagset. */
+export function ignoreSpells(f, types) {
+    for (let index = RSF.NONE + 1; index < RSF.MAX; index++) {
+        if (f.has(index) && (MON_SPELL_TYPES[index] & types) !== 0)
+            f.off(index);
+    }
+}
+/** create_mon_spell_mask: a fresh flagset of every spell of the given type(s). */
+export function createMonSpellMask(...types) {
+    const f = new FlagSet(RSF_SIZE);
+    const wanted = types.reduce((a, b) => a | b, 0);
+    for (let index = RSF.NONE + 1; index < RSF.MAX; index++) {
+        if ((MON_SPELL_TYPES[index] & wanted) !== 0)
+            f.on(index);
+    }
+    return f;
+}
+/**
+ * chance_of_spell_hit_base: MAX(race->level, 1) * 3 + spell->hit. See also the
+ * melee analogue chance_of_monster_hit_base.
+ */
+export function chanceOfSpellHitBase(race, spell) {
+    return Math.max(race.level, 1) * 3 + spell.hit;
+}
+/** chance_of_spell_hit: the base to-hit reduced for each level of confusion. */
+export function chanceOfSpellHit(mon, spell) {
+    let toHit = chanceOfSpellHitBase(mon.race, spell);
+    const conf = monsterEffectLevel(mon, MON_TMD.CONF);
+    for (let i = 0; i < conf; i++) {
+        toHit = Math.trunc((toHit * (100 - CONF_HIT_REDUCTION)) / 100);
+    }
+    return toHit;
+}
+/**
+ * breath_dam: a monster breath does hp / divisor damage, capped at the
+ * element's damage cap.
+ */
+export function breathDam(proj, hp) {
+    let dam = Math.trunc(hp / proj.divisor);
+    if (dam > proj.damageCap)
+        dam = proj.damageCap;
+    return dam;
+}
+/** TMD_FAIL_ codes (player-timed.h), for the unset_spells fail-table scan. */
+const TMD_FAIL_FLAG_OBJECT = 1;
+const TMD_FAIL_FLAG_RESIST = 2;
+const TMD_FAIL_FLAG_VULN = 3;
+const TMD_FAIL_FLAG_PLAYER = 4;
+/**
+ * unset_spells (mon-spell.c L470): turn off spells with a side effect or
+ * projection type resisted by what the monster knows about the player, subject
+ * to intelligence and chance. `flags` / `pflags` / `el` are the monster's
+ * ai-memorized view of the player (known_pstate copies); `timedFail` resolves a
+ * TMD_ name to its fail-condition table (the bound player-timed data).
+ *
+ * RNG order preserved exactly, including the C short-circuit quirks:
+ * - every elemental (BOLT/BALL/BREATH) spell present draws one randint0(100),
+ *   even when the learn chance is 0;
+ * - a non-smart monster draws one_in_(3) per EFFECT LINE of every non-elemental
+ *   spell (the `(smart || !one_in_(3)) && index == EF_TIMED_INC` gate is
+ *   evaluated left-to-right for every effect), and one_in_(2) likewise for the
+ *   drain-mana gate.
+ * Upstream indexes el[] by the raw projection subtype; for the handful of
+ * non-element breath subtypes (TIME / INERTIA / GRAVITY / PLASMA / MANA /
+ * WATER) that read past the element table in C, the port treats the resist
+ * level as 0 (an unreproducible out-of-bounds read; the draw still happens).
+ */
+export function unsetSpells(rng, spells, flags, pflags, el, mon, spellTable, timedFail) {
+    const smart = monsterIsSmart(mon);
+    for (let index = RSF.NONE + 1; index < RSF.MAX; index++) {
+        const spell = spellTable.get(index);
+        if (!spell)
+            continue;
+        if (!spells.has(index))
+            continue;
+        const types = MON_SPELL_TYPES[index];
+        if (types & (RST.BOLT | RST.BALL | RST.BREATH)) {
+            /* First we test the elemental spells. */
+            const typeName = spell.effects[0]?.type ?? "";
+            const element = ELEM[typeName];
+            const resLevel = element !== undefined && element < ELEM_MAX ? (el[element] ?? 0) : 0;
+            const learnChance = resLevel * (smart ? 50 : 25);
+            if (rng.randint0(100) < learnChance) {
+                spells.off(index);
+            }
+        }
+        else {
+            /* Now others with resisted effects. */
+            let stopped = false;
+            for (const effect of spell.effects) {
+                /* Timed effects: the intelligence/chance gate draws for every
+                 * effect line of a non-smart monster (C short-circuit order). */
+                const timedGate = smart || !rng.oneIn(3);
+                if (timedGate && effect.eff === "TIMED_INC") {
+                    let resisted = false;
+                    for (const f of timedFail(effect.type ?? "") ?? []) {
+                        if (resisted)
+                            break;
+                        switch (f.code) {
+                            case TMD_FAIL_FLAG_OBJECT: {
+                                const of = OF[f.flag];
+                                if (of !== undefined && flags.has(of))
+                                    resisted = true;
+                                break;
+                            }
+                            case TMD_FAIL_FLAG_RESIST: {
+                                const e = ELEM[f.flag];
+                                if (e !== undefined && (el[e] ?? 0) > 0)
+                                    resisted = true;
+                                break;
+                            }
+                            case TMD_FAIL_FLAG_VULN: {
+                                const e = ELEM[f.flag];
+                                if (e !== undefined && (el[e] ?? 0) < 0)
+                                    resisted = true;
+                                break;
+                            }
+                            case TMD_FAIL_FLAG_PLAYER: {
+                                const pf = PF[f.flag];
+                                if (pf !== undefined && pflags.has(pf))
+                                    resisted = true;
+                                break;
+                            }
+                            /* TMD_FAIL_FLAG_TIMED_EFFECT: the monster does not track the
+                             * player's timed effects; do nothing. */
+                            default:
+                                break;
+                        }
+                    }
+                    if (resisted) {
+                        stopped = true;
+                        break;
+                    }
+                }
+                /* Mana drain (the chance gate draws per effect for non-smart). */
+                const manaGate = smart || rng.oneIn(2);
+                if (manaGate &&
+                    effect.eff === "DRAIN_MANA" &&
+                    pflags.has(PF.NO_MANA)) {
+                    stopped = true;
+                    break;
+                }
+            }
+            if (stopped)
+                spells.off(index);
+        }
+    }
+}
+/**
+ * update_smart_learn (mon-util.c L788): the monster learns an "observed"
+ * resistance or other player property (or its absence). The player always
+ * learns the corresponding rune (equip_learn_*); the monster's known_pstate is
+ * only updated under birth_ai_learn, for non-stupid monsters, with the
+ * one_in_(2) non-smart and one_in_(100) failure draws in upstream order.
+ * Robust to `element` being an arbitrary PROJ_ index, as upstream.
+ */
+export function updateSmartLearn(rng, mon, env, flag, pflag, element) {
+    const elementOk = element >= 0 && element < ELEM_MAX;
+    /* Sanity check. */
+    if (!flag && !elementOk)
+        return;
+    /* Anything a monster might learn, the player should learn. */
+    if (flag)
+        env.equipLearnFlag(flag);
+    if (elementOk)
+        env.equipLearnElement(element);
+    /* Not allowed to learn. */
+    if (!env.aiLearn)
+        return;
+    /* Too stupid to learn anything. */
+    if (monsterIsStupid(mon))
+        return;
+    /* Not intelligent, only learn sometimes. */
+    if (!monsterIsSmart(mon) && rng.oneIn(2))
+        return;
+    /* Analyze the knowledge; fail very rarely. */
+    if (rng.oneIn(100))
+        return;
+    /* Learn the flag. */
+    if (flag) {
+        if (env.playerOfHas(flag))
+            mon.knownPstate.flags.on(flag);
+        else
+            mon.knownPstate.flags.off(flag);
+    }
+    /* Learn the pflag (upstream writes it with of_on/of_off; same bit ops). */
+    if (pflag) {
+        if (env.playerPfHas(pflag))
+            mon.knownPstate.pflags.on(pflag);
+        else
+            mon.knownPstate.pflags.off(pflag);
+    }
+    /* Learn the element. */
+    if (elementOk) {
+        mon.knownPstate.elInfo[element] = env.playerResLevel(element);
+    }
+}
+/**
+ * randcalc(v, 0, MAXIMISE): base + dice*sides + mBonus. Level and RNG never
+ * enter the MAXIMISE branch (rng.ts damcalc / mBonusCalc), so this mirrors
+ * that arithmetic directly rather than threading an Rng through a display
+ * path (the same choice obj/object-info.ts makes for its own rvMax).
+ */
+function maximiseRandomValue(rv) {
+    return rv.base + rv.dice * rv.sides + rv.mBonus;
+}
+/**
+ * FLAGGED ADDITION (#lore-damage): nonhp_dam (mon-spell.c L571), restricted to
+ * the MAXIMISE aspect mon_spell_lore_damage needs - deterministic, no RNG.
+ *
+ * Sums the MAXIMISE damage of every effect line except EF_TIMED_INC ("Timed
+ * effects increases don't count as damage in lore", upstream comment).
+ * EF_LASH is special-cased exactly as upstream: full damage from the race's
+ * first blow plus half from each of the rest (integer division per term,
+ * summed - not the total divided by two).
+ *
+ * Each non-LASH effect's dice is parsed fresh from its raw string and any
+ * SPELL_POWER expression rebound to `race` (the only base value monster-spell
+ * damage dice reference - see reference/lib/gamedata/monster_spell.txt),
+ * mirroring upstream's do_mon_spell / mon-cast.ts buildSpellEffectChain
+ * pattern of rebuilding the bound dice per caster rather than mutating the
+ * shared MonsterSpell record (which every race with that spell shares).
+ */
+export function monSpellNonhpDamage(effects, race) {
+    let dam = 0;
+    for (const effect of effects) {
+        if (effect.eff === "LASH") {
+            for (let i = 0; i < race.blows.length; i++) {
+                const blowDice = race.blows[i].dice;
+                if (!blowDice)
+                    continue;
+                const full = maximiseRandomValue(blowDice.randomValue());
+                dam += i === 0 ? full : Math.trunc(full / 2);
+            }
+            continue;
+        }
+        if (!effect.dice || effect.eff === "TIMED_INC" || effect.diceRaw === null) {
+            continue;
+        }
+        const dice = new Dice();
+        if (!dice.parseString(effect.diceRaw))
+            continue;
+        for (const x of effect.exprs) {
+            if (x.base.toUpperCase() !== "SPELL_POWER")
+                continue;
+            const expr = new Expression();
+            expr.setBaseValue(() => race.spellPower);
+            expr.addOperationsString(x.expr);
+            dice.bindExpression(x.name, expr);
+        }
+        dam += maximiseRandomValue(dice.randomValue());
+    }
+    return dam;
+}
+//# sourceMappingURL=spell.js.map

package/dist/mon/spell.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"spell.js","sourceRoot":"","sources":["../../src/mon/spell.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;GAuBG;AAEH,OAAO,EAAE,IAAI,EAAE,MAAM,YAAY,CAAC;AAClC,OAAO,EAAE,UAAU,EAAE,MAAM,kBAAkB,CAAC;AAC9C,OAAO,EAAE,OAAO,EAAE,MAAM,eAAe,CAAC;AACxC,OAAO,EAAE,IAAI,EAAE,iBAAiB,EAAE,OAAO,EAAE,EAAE,EAAE,EAAE,EAAE,GAAG,EAAE,MAAM,uBAAuB,CAAC;AAEtF,OAAO,EAAE,QAAQ,EAAE,MAAM,iBAAiB,CAAC;AAE3C,OAAO,EAAE,QAAQ,EAAE,MAAM,YAAY,CAAC;AAGtC,OAAO,EAAE,kBAAkB,EAAE,MAAM,YAAY,CAAC;AAChD,OAAO,EAAE,cAAc,EAAE,eAAe,EAAE,MAAM,gBAAgB,CAAC;AAEjE;;;GAGG;AACH,MAAM,CAAC,MAAM,GAAG,GAAG;IACjB,IAAI,EAAE,MAAM;IACZ,IAAI,EAAE,MAAM;IACZ,IAAI,EAAE,MAAM;IACZ,MAAM,EAAE,MAAM;IACd,MAAM,EAAE,MAAM;IACd,KAAK,EAAE,MAAM;IACb,KAAK,EAAE,MAAM;IACb,IAAI,EAAE,MAAM;IACZ,UAAU,EAAE,MAAM;IAClB,MAAM,EAAE,MAAM;IACd,MAAM,EAAE,MAAM;IACd,MAAM,EAAE,MAAM;IACd,MAAM,EAAE,MAAM;IACd,OAAO,EAAE,MAAM;CACP,CAAC;AAEX,0EAA0E;AAC1E,MAAM,CAAC,MAAM,UAAU,GAAG,GAAG,CAAC,IAAI,GAAG,GAAG,CAAC,IAAI,GAAG,GAAG,CAAC,MAAM,GAAG,GAAG,CAAC,MAAM,CAAC;AAExE,8EAA8E;AAC9E,MAAM,CAAC,MAAM,kBAAkB,GAAG,EAAE,CAAC;AAErC,wEAAwE;AACxE,SAAS,YAAY,CAAC,IAAqB;IACzC,IAAI,OAAO,IAAI,KAAK,QAAQ;QAAE,OAAO,IAAI,CAAC;IAC1C,IAAI,IAAI,GAAG,CAAC,CAAC;IACb,KAAK,MAAM,GAAG,IAAI,IAAI,CAAC,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC;QAClC,MAAM,IAAI,GAAG,GAAG,CAAC,IAAI,EAAE,CAAC,OAAO,CAAC,OAAO,EAAE,EAAE,CAAC,CAAC;QAC7C,MAAM,KAAK,GAAI,GAA8B,CAAC,IAAI,CAAC,CAAC;QACpD,IAAI,KAAK,KAAK,SAAS;YAAE,MAAM,IAAI,KAAK,CAAC,sBAAsB,GAAG,EAAE,CAAC,CAAC;QACtE,IAAI,IAAI,KAAK,CAAC;IAChB,CAAC;IACD,OAAO,IAAI,CAAC;AACd,CAAC;AAED;;;;GAIG;AACH,MAAM,CAAC,MAAM,eAAe,GAAsB,iBAAiB,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAC5E,YAAY,CAAC,CAAC,CAAC,IAAI,CAAC,CACrB,CAAC;AAEF,mDAAmD;AACnD,MAAM,UAAU,eAAe,CAAC,KAAa;IAC3C,OAAO,KAAK,GAAG,GAAG,CAAC,IAAI,IAAI,KAAK,GAAG,GAAG,CAAC,GAAG,CAAC;AAC7C,CAAC;AAED,+BAA+B;AAC/B,MAAM,UAAU,gBAAgB,CAAC,KAAa;IAC5C,OAAO,CAAC,eAAe,CAAC,KAAK,CAAE,GAAG,GAAG,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC;AACtD,CAAC;AAED,4BAA4B;AAC5B,MAAM,UAAU,iBAAiB,CAAC,KAAa;IAC7C,OAAO,CAAC,eAAe,CAAC,KAAK,CAAE,GAAG,UAAU,CAAC,KAAK,CAAC,CAAC;AACtD,CAAC;AAED,2BAA2B;AAC3B,MAAM,UAAU,gBAAgB,CAAC,KAAa;IAC5C,OAAO,CAAC,eAAe,CAAC,KAAK,CAAE,GAAG,GAAG,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC;AACtD,CAAC;AAED,6EAA6E;AAC7E,MAAM,UAAU,UAAU,CAAC,CAAU,EAAE,KAAa;IAClD,KAAK,IAAI,KAAK,GAAG,GAAG,CAAC,IAAI,GAAG,CAAC,EAAE,KAAK,GAAG,GAAG,CAAC,GAAG,EAAE,KAAK,EAAE,EAAE,CAAC;QACxD,IAAI,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,IAAI,CAAC,eAAe,CAAC,KAAK,CAAE,GAAG,KAAK,CAAC,KAAK,CAAC;YAAE,OAAO,IAAI,CAAC;IAC3E,CAAC;IACD,OAAO,KAAK,CAAC;AACf,CAAC;AAED,8EAA8E;AAC9E,MAAM,UAAU,YAAY,CAAC,CAAU,EAAE,KAAa;IACpD,KAAK,IAAI,KAAK,GAAG,GAAG,CAAC,IAAI,GAAG,CAAC,EAAE,KAAK,GAAG,GAAG,CAAC,GAAG,EAAE,KAAK,EAAE,EAAE,CAAC;QACxD,IAAI,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,IAAI,CAAC,eAAe,CAAC,KAAK,CAAE,GAAG,KAAK,CAAC,KAAK,CAAC;YAAE,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;IAC5E,CAAC;AACH,CAAC;AAED,kFAAkF;AAClF,MAAM,UAAU,kBAAkB,CAAC,GAAG,KAAe;IACnD,MAAM,CAAC,GAAG,IAAI,OAAO,CAAC,QAAQ,CAAC,CAAC;IAChC,MAAM,MAAM,GAAG,KAAK,CAAC,MAAM,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,GAAG,CAAC,EAAE,CAAC,CAAC,CAAC;IAChD,KAAK,IAAI,KAAK,GAAG,GAAG,CAAC,IAAI,GAAG,CAAC,EAAE,KAAK,GAAG,GAAG,CAAC,GAAG,EAAE,KAAK,EAAE,EAAE,CAAC;QACxD,IAAI,CAAC,eAAe,CAAC,KAAK,CAAE,GAAG,MAAM,CAAC,KAAK,CAAC;YAAE,CAAC,CAAC,EAAE,CAAC,KAAK,CAAC,CAAC;IAC5D,CAAC;IACD,OAAO,CAAC,CAAC;AACX,CAAC;AAED;;;GAGG;AACH,MAAM,UAAU,oBAAoB,CAClC,IAAiB,EACjB,KAAmB;IAEnB,OAAO,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,KAAK,EAAE,CAAC,CAAC,GAAG,CAAC,GAAG,KAAK,CAAC,GAAG,CAAC;AACjD,CAAC;AAED,gFAAgF;AAChF,MAAM,UAAU,gBAAgB,CAAC,GAAY,EAAE,KAAmB;IAChE,IAAI,KAAK,GAAG,oBAAoB,CAAC,GAAG,CAAC,IAAI,EAAE,KAAK,CAAC,CAAC;IAClD,MAAM,IAAI,GAAG,kBAAkB,CAAC,GAAG,EAAE,OAAO,CAAC,IAAI,CAAC,CAAC;IACnD,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC;QAC9B,KAAK,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,KAAK,GAAG,CAAC,GAAG,GAAG,kBAAkB,CAAC,CAAC,GAAG,GAAG,CAAC,CAAC;IACjE,CAAC;IACD,OAAO,KAAK,CAAC;AACf,CAAC;AAUD;;;GAGG;AACH,MAAM,UAAU,SAAS,CAAC,IAAsB,EAAE,EAAU;IAC1D,IAAI,GAAG,GAAG,IAAI,CAAC,KAAK,CAAC,EAAE,GAAG,IAAI,CAAC,OAAO,CAAC,CAAC;IACxC,IAAI,GAAG,GAAG,IAAI,CAAC,SAAS;QAAE,GAAG,GAAG,IAAI,CAAC,SAAS,CAAC;IAC/C,OAAO,GAAG,CAAC;AACb,CAAC;AAED,8EAA8E;AAC9E,MAAM,oBAAoB,GAAG,CAAC,CAAC;AAC/B,MAAM,oBAAoB,GAAG,CAAC,CAAC;AAC/B,MAAM,kBAAkB,GAAG,CAAC,CAAC;AAC7B,MAAM,oBAAoB,GAAG,CAAC,CAAC;AAE/B;;;;;;;;;;;;;;;;;;GAkBG;AACH,MAAM,UAAU,WAAW,CACzB,GAAQ,EACR,MAAe,EACf,KAAc,EACd,MAAe,EACf,EAAc,EACd,GAAY,EACZ,UAA6C,EAC7C,SAA+D;IAE/D,MAAM,KAAK,GAAG,cAAc,CAAC,GAAG,CAAC,CAAC;IAElC,KAAK,IAAI,KAAK,GAAG,GAAG,CAAC,IAAI,GAAG,CAAC,EAAE,KAAK,GAAG,GAAG,CAAC,GAAG,EAAE,KAAK,EAAE,EAAE,CAAC;QACxD,MAAM,KAAK,GAAG,UAAU,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;QACpC,IAAI,CAAC,KAAK;YAAE,SAAS;QACrB,IAAI,CAAC,MAAM,CAAC,GAAG,CAAC,KAAK,CAAC;YAAE,SAAS;QAEjC,MAAM,KAAK,GAAG,eAAe,CAAC,KAAK,CAAE,CAAC;QAEtC,IAAI,KAAK,GAAG,CAAC,GAAG,CAAC,IAAI,GAAG,GAAG,CAAC,IAAI,GAAG,GAAG,CAAC,MAAM,CAAC,EAAE,CAAC;YAC/C,yCAAyC;YACzC,MAAM,QAAQ,GAAG,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,IAAI,IAAI,EAAE,CAAC;YAC9C,MAAM,OAAO,GAAI,IAA+B,CAAC,QAAQ,CAAC,CAAC;YAC3D,MAAM,QAAQ,GACZ,OAAO,KAAK,SAAS,IAAI,OAAO,GAAG,QAAQ,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,OAAO,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;YACvE,MAAM,WAAW,GAAG,QAAQ,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC;YACjD,IAAI,GAAG,CAAC,QAAQ,CAAC,GAAG,CAAC,GAAG,WAAW,EAAE,CAAC;gBACpC,MAAM,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;YACpB,CAAC;QACH,CAAC;aAAM,CAAC;YACN,uCAAuC;YACvC,IAAI,OAAO,GAAG,KAAK,CAAC;YACpB,KAAK,MAAM,MAAM,IAAI,KAAK,CAAC,OAAO,EAAE,CAAC;gBACnC;iFACiE;gBACjE,MAAM,SAAS,GAAG,KAAK,IAAI,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC;gBACzC,IAAI,SAAS,IAAI,MAAM,CAAC,GAAG,KAAK,WAAW,EAAE,CAAC;oBAC5C,IAAI,QAAQ,GAAG,KAAK,CAAC;oBACrB,KAAK,MAAM,CAAC,IAAI,SAAS,CAAC,MAAM,CAAC,IAAI,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC;wBACnD,IAAI,QAAQ;4BAAE,MAAM;wBACpB,QAAQ,CAAC,CAAC,IAAI,EAAE,CAAC;4BACf,KAAK,oBAAoB,CAAC,CAAC,CAAC;gCAC1B,MAAM,EAAE,GAAI,EAA6B,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;gCAClD,IAAI,EAAE,KAAK,SAAS,IAAI,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC;oCAAE,QAAQ,GAAG,IAAI,CAAC;gCACvD,MAAM;4BACR,CAAC;4BACD,KAAK,oBAAoB,CAAC,CAAC,CAAC;gCAC1B,MAAM,CAAC,GAAI,IAA+B,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;gCACnD,IAAI,CAAC,KAAK,SAAS,IAAI,CAAC,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC;oCAAE,QAAQ,GAAG,IAAI,CAAC;gCACzD,MAAM;4BACR,CAAC;4BACD,KAAK,kBAAkB,CAAC,CAAC,CAAC;gCACxB,MAAM,CAAC,GAAI,IAA+B,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;gCACnD,IAAI,CAAC,KAAK,SAAS,IAAI,CAAC,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC;oCAAE,QAAQ,GAAG,IAAI,CAAC;gCACzD,MAAM;4BACR,CAAC;4BACD,KAAK,oBAAoB,CAAC,CAAC,CAAC;gCAC1B,MAAM,EAAE,GAAI,EAA6B,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;gCAClD,IAAI,EAAE,KAAK,SAAS,IAAI,MAAM,CAAC,GAAG,CAAC,EAAE,CAAC;oCAAE,QAAQ,GAAG,IAAI,CAAC;gCACxD,MAAM;4BACR,CAAC;4BACD;qEACyC;4BACzC;gCACE,MAAM;wBACV,CAAC;oBACH,CAAC;oBACD,IAAI,QAAQ,EAAE,CAAC;wBACb,OAAO,GAAG,IAAI,CAAC;wBACf,MAAM;oBACR,CAAC;gBACH,CAAC;gBAED,kEAAkE;gBAClE,MAAM,QAAQ,GAAG,KAAK,IAAI,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC;gBACvC,IACE,QAAQ;oBACR,MAAM,CAAC,GAAG,KAAK,YAAY;oBAC3B,MAAM,CAAC,GAAG,CAAC,EAAE,CAAC,OAAO,CAAC,EACtB,CAAC;oBACD,OAAO,GAAG,IAAI,CAAC;oBACf,MAAM;gBACR,CAAC;YACH,CAAC;YACD,IAAI,OAAO;gBAAE,MAAM,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;QACjC,CAAC;IACH,CAAC;AACH,CAAC;AAkBD;;;;;;;GAOG;AACH,MAAM,UAAU,gBAAgB,CAC9B,GAAQ,EACR,GAAY,EACZ,GAAkB,EAClB,IAAY,EACZ,KAAa,EACb,OAAe;IAEf,MAAM,SAAS,GAAG,OAAO,IAAI,CAAC,IAAI,OAAO,GAAG,QAAQ,CAAC;IAErD,mBAAmB;IACnB,IAAI,CAAC,IAAI,IAAI,CAAC,SAAS;QAAE,OAAO;IAEhC,8DAA8D;IAC9D,IAAI,IAAI;QAAE,GAAG,CAAC,cAAc,CAAC,IAAI,CAAC,CAAC;IACnC,IAAI,SAAS;QAAE,GAAG,CAAC,iBAAiB,CAAC,OAAO,CAAC,CAAC;IAE9C,2BAA2B;IAC3B,IAAI,CAAC,GAAG,CAAC,OAAO;QAAE,OAAO;IAEzB,mCAAmC;IACnC,IAAI,eAAe,CAAC,GAAG,CAAC;QAAE,OAAO;IAEjC,4CAA4C;IAC5C,IAAI,CAAC,cAAc,CAAC,GAAG,CAAC,IAAI,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC;QAAE,OAAO;IAEjD,8CAA8C;IAC9C,IAAI,GAAG,CAAC,KAAK,CAAC,GAAG,CAAC;QAAE,OAAO;IAE3B,qBAAqB;IACrB,IAAI,IAAI,EAAE,CAAC;QACT,IAAI,GAAG,CAAC,WAAW,CAAC,IAAI,CAAC;YAAE,GAAG,CAAC,WAAW,CAAC,KAAK,CAAC,EAAE,CAAC,IAAI,CAAC,CAAC;;YACrD,GAAG,CAAC,WAAW,CAAC,KAAK,CAAC,GAAG,CAAC,IAAI,CAAC,CAAC;IACvC,CAAC;IAED,2EAA2E;IAC3E,IAAI,KAAK,EAAE,CAAC;QACV,IAAI,GAAG,CAAC,WAAW,CAAC,KAAK,CAAC;YAAE,GAAG,CAAC,WAAW,CAAC,MAAM,CAAC,EAAE,CAAC,KAAK,CAAC,CAAC;;YACxD,GAAG,CAAC,WAAW,CAAC,MAAM,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;IACzC,CAAC;IAED,wBAAwB;IACxB,IAAI,SAAS,EAAE,CAAC;QACd,GAAG,CAAC,WAAW,CAAC,MAAM,CAAC,OAAO,CAAC,GAAG,GAAG,CAAC,cAAc,CAAC,OAAO,CAAC,CAAC;IAChE,CAAC;AACH,CAAC;AAED;;;;;GAKG;AACH,SAAS,mBAAmB,CAAC,EAAe;IAC1C,OAAO,EAAE,CAAC,IAAI,GAAG,EAAE,CAAC,IAAI,GAAG,EAAE,CAAC,KAAK,GAAG,EAAE,CAAC,MAAM,CAAC;AAClD,CAAC;AAED;;;;;;;;;;;;;;;;GAgBG;AACH,MAAM,UAAU,mBAAmB,CACjC,OAAsC,EACtC,IAAiB;IAEjB,IAAI,GAAG,GAAG,CAAC,CAAC;IAEZ,KAAK,MAAM,MAAM,IAAI,OAAO,EAAE,CAAC;QAC7B,IAAI,MAAM,CAAC,GAAG,KAAK,MAAM,EAAE,CAAC;YAC1B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;gBAC3C,MAAM,QAAQ,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,CAAE,CAAC,IAAI,CAAC;gBACrC,IAAI,CAAC,QAAQ;oBAAE,SAAS;gBACxB,MAAM,IAAI,GAAG,mBAAmB,CAAC,QAAQ,CAAC,WAAW,EAAE,CAAC,CAAC;gBACzD,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,IAAI,GAAG,CAAC,CAAC,CAAC;YAC/C,CAAC;YACD,SAAS;QACX,CAAC;QAED,IAAI,CAAC,MAAM,CAAC,IAAI,IAAI,MAAM,CAAC,GAAG,KAAK,WAAW,IAAI,MAAM,CAAC,OAAO,KAAK,IAAI,EAAE,CAAC;YAC1E,SAAS;QACX,CAAC;QAED,MAAM,IAAI,GAAG,IAAI,IAAI,EAAE,CAAC;QACxB,IAAI,CAAC,IAAI,CAAC,WAAW,CAAC,MAAM,CAAC,OAAO,CAAC;YAAE,SAAS;QAChD,KAAK,MAAM,CAAC,IAAI,MAAM,CAAC,KAAK,EAAE,CAAC;YAC7B,IAAI,CAAC,CAAC,IAAI,CAAC,WAAW,EAAE,KAAK,aAAa;gBAAE,SAAS;YACrD,MAAM,IAAI,GAAG,IAAI,UAAU,EAAE,CAAC;YAC9B,IAAI,CAAC,YAAY,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,UAAU,CAAC,CAAC;YACzC,IAAI,CAAC,mBAAmB,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;YACjC,IAAI,CAAC,cAAc,CAAC,CAAC,CAAC,IAAI,EAAE,IAAI,CAAC,CAAC;QACpC,CAAC;QACD,GAAG,IAAI,mBAAmB,CAAC,IAAI,CAAC,WAAW,EAAE,CAAC,CAAC;IACjD,CAAC;IAED,OAAO,GAAG,CAAC;AACb,CAAC"}

package/dist/mon/steal.d.ts

@@ -0,0 +1,112 @@
+/**
+ * Stealing objects from a monster, ported from reference/src/mon-util.c
+ * (Angband 4.2.6): get_random_monster_object (L1405) and steal_monster_item
+ * (L1430). This is the RNG core of the rogue / PF_STEAL "steal" command
+ * (do_cmd_steal, cmd-cave.c L1016) and, upstream, of the EAT_ITEM melee blow
+ * when the attacker's target is another monster (mon-blows.c L876).
+ *
+ * The heavy RNG order is the correctness crux, so it lives here worldless (like
+ * combat/mon-melee.ts): stealMonsterItem draws every roll in strict upstream
+ * order and mutates the monster's held pile directly, delegating the
+ * player-facing world work (gold gain, pack carry, drop_near, ignore checks,
+ * the hit-and-run teleport, EF_WAKE aggro) to the injected StealEnv. The game
+ * binding (game/steal.ts) supplies that env over the live GameState.
+ *
+ * RNG draw order (mon-util.c L1430-1539), verified against the C:
+ *   1. get_random_monster_object(mon): a reservoir pick over mon->held_obj -
+ *      one_in_(i) for each non-quest-artifact held object, i counting from 1.
+ *   2. (no object) one_in_(3), then monster_wake(mon, false, 100) on success
+ *      (which draws randint0(100) for awareness).
+ *   3. monster_reaction = guard/2 + randint1(MAX(guard, 1)); the item-weight
+ *      term adds no RNG.
+ *   4. success (reaction < skill): pile_excise, then either gold gain, or a
+ *      drop_near (its own breakage / grid RNG) when the item is ignored or the
+ *      pack is full, or a plain inven_carry; then mon_dec_timed(SLEEP) (which
+ *      may draw for its save), then the hit-and-run teleport when TMD_ATT_RUN.
+ *   5. decent fail (reaction/2 < skill): monster_wake(mon, true, 50).
+ *   6. bungle (else): monster_wake(mon, true, 100), then EF_WAKE aggro.
+ *
+ * DEFERRED (noted, no RNG impact): the object knowledge bookkeeping upstream
+ * threads here - object_grab / object_see / delist_object / object_delete - is
+ * the knowledge subsystem (#24), carried by the env's carry/gainGold seams; and
+ * react_to_slay blocking the monster-thief path (midx >= 0) is deferred exactly
+ * as the EAT_ITEM blow already defers it (game/mon-side.ts / mon-cmd.ts). The
+ * mon-vs-mon EAT_ITEM path wires stealMonsterItem from game/mon-cmd.ts.
+ */
+import type { Rng } from "../rng.js";
+import type { GameObject } from "../obj/object.js";
+import type { Monster } from "./monster.js";
+import type { LoreStore } from "./lore.js";
+/**
+ * get_random_monster_object (mon-util.c L1405): pick one object from the
+ * monster's held pile with uniform probability, skipping quest artifacts. The
+ * reservoir draw (one_in_(i), i from 1) matches upstream exactly, so the choice
+ * is the same for a given RNG stream.
+ */
+export declare function getRandomMonsterObject(rng: Rng, mon: Monster): GameObject | null;
+/**
+ * The world-facing operations steal_monster_item delegates, so the RNG core
+ * stays worldless. The game binding (game/steal.ts) supplies these over the
+ * live GameState; the RNG-drawing seams (dropStolen, wakeAll, hitAndRun) run at
+ * the exact point upstream draws them.
+ */
+export interface StealEnv {
+    /** msg(): route messages to the game's sink. */
+    msg(text: string): void;
+    /** monster_desc(mon, MDESC_TARG) (mon-util.c L1438): the victim's name. */
+    monName(mon: Monster): string;
+    /**
+     * monster_desc(mon, MDESC_STANDARD) (mon-util.c L1524): the re-described,
+     * capitalised name for the bungle "cries out in anger" line. Defaults to
+     * monName when absent.
+     */
+    monNameStandard?(mon: Monster): string;
+    /** player->state.skills[SKILL_STEALTH]. */
+    readonly stealthSkill: number;
+    /** adj_dex_th[player->state.stat_ind[STAT_DEX]]. */
+    readonly dexToHit: number;
+    /** player->state.speed. */
+    readonly playerSpeed: number;
+    /** player->timed[TMD_BLIND] || [TMD_CONFUSED] || [TMD_IMAGE]. */
+    readonly statusPenalty: boolean;
+    /** player->timed[TMD_ATT_RUN] (the hit-and-run stance is active). */
+    readonly attRun: boolean;
+    /** object_weight_one(obj), curses folded in. */
+    objectWeight(obj: GameObject): number;
+    /** tval_is_money(obj). */
+    isMoney(obj: GameObject): boolean;
+    /** object_desc(obj, PREFIX|FULL): the display name for messages. */
+    objectName(obj: GameObject): string;
+    /** ignore_item_ok(player, obj). */
+    isIgnored(obj: GameObject): boolean;
+    /** inven_carry_okay(obj): the pack can accept it. */
+    canCarry(obj: GameObject): boolean;
+    /** player->au += obj->pval; PR_GOLD redraw; delist / object_delete. */
+    gainGold(obj: GameObject): void;
+    /** object_grab + inven_carry(player, obj, true, true). */
+    carry(obj: GameObject): void;
+    /**
+     * drop_near(cave, &obj, 0, player->grid, true, true) then "You drop X." -
+     * the name is captured before the drop (upstream order); draws drop_near RNG.
+     */
+    dropStolen(obj: GameObject): void;
+    /** effect_simple(EF_WAKE, source_monster(mon)): aggro monsters in LOS. */
+    wakeAll?(mon: Monster): void;
+    /**
+     * The TMD_ATT_RUN hit-and-run: "You vanish into the shadows!", EF_TELEPORT
+     * "20", then clear TMD_ATT_RUN. Draws the teleport RNG.
+     */
+    hitAndRun?(): void;
+    /** monster_desc for the thief (midx >= 0 path); the race name (#25). */
+    thiefName?(midx: number): string;
+    /** monster_carry(cave, thief, obj) (midx >= 0 path). */
+    thiefCarry?(midx: number, obj: GameObject): void;
+}
+/**
+ * steal_monster_item (mon-util.c L1430): the thief with index `midx` steals a
+ * random item from `mon`. `midx < 0` is the player (do_cmd_steal); `midx >= 0`
+ * is a monster thief (the EAT_ITEM blow against another monster). Every RNG
+ * draw is issued in strict upstream order; see the module header.
+ */
+export declare function stealMonsterItem(rng: Rng, lore: LoreStore, mon: Monster, midx: number, env: StealEnv): void;
+//# sourceMappingURL=steal.d.ts.map

package/dist/mon/steal.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"steal.d.ts","sourceRoot":"","sources":["../../src/mon/steal.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GAkCG;AAGH,OAAO,KAAK,EAAE,GAAG,EAAE,MAAM,WAAW,CAAC;AACrC,OAAO,KAAK,EAAE,UAAU,EAAE,MAAM,kBAAkB,CAAC;AACnD,OAAO,KAAK,EAAE,OAAO,EAAE,MAAM,cAAc,CAAC;AAE5C,OAAO,KAAK,EAAE,SAAS,EAAE,MAAM,WAAW,CAAC;AAM3C;;;;;GAKG;AACH,wBAAgB,sBAAsB,CACpC,GAAG,EAAE,GAAG,EACR,GAAG,EAAE,OAAO,GACX,UAAU,GAAG,IAAI,CAUnB;AAED;;;;;GAKG;AACH,MAAM,WAAW,QAAQ;IACvB,gDAAgD;IAChD,GAAG,CAAC,IAAI,EAAE,MAAM,GAAG,IAAI,CAAC;IACxB,2EAA2E;IAC3E,OAAO,CAAC,GAAG,EAAE,OAAO,GAAG,MAAM,CAAC;IAC9B;;;;OAIG;IACH,eAAe,CAAC,CAAC,GAAG,EAAE,OAAO,GAAG,MAAM,CAAC;IACvC,2CAA2C;IAC3C,QAAQ,CAAC,YAAY,EAAE,MAAM,CAAC;IAC9B,oDAAoD;IACpD,QAAQ,CAAC,QAAQ,EAAE,MAAM,CAAC;IAC1B,2BAA2B;IAC3B,QAAQ,CAAC,WAAW,EAAE,MAAM,CAAC;IAC7B,iEAAiE;IACjE,QAAQ,CAAC,aAAa,EAAE,OAAO,CAAC;IAChC,qEAAqE;IACrE,QAAQ,CAAC,MAAM,EAAE,OAAO,CAAC;IACzB,gDAAgD;IAChD,YAAY,CAAC,GAAG,EAAE,UAAU,GAAG,MAAM,CAAC;IACtC,0BAA0B;IAC1B,OAAO,CAAC,GAAG,EAAE,UAAU,GAAG,OAAO,CAAC;IAClC,oEAAoE;IACpE,UAAU,CAAC,GAAG,EAAE,UAAU,GAAG,MAAM,CAAC;IACpC,mCAAmC;IACnC,SAAS,CAAC,GAAG,EAAE,UAAU,GAAG,OAAO,CAAC;IACpC,qDAAqD;IACrD,QAAQ,CAAC,GAAG,EAAE,UAAU,GAAG,OAAO,CAAC;IACnC,uEAAuE;IACvE,QAAQ,CAAC,GAAG,EAAE,UAAU,GAAG,IAAI,CAAC;IAChC,0DAA0D;IAC1D,KAAK,CAAC,GAAG,EAAE,UAAU,GAAG,IAAI,CAAC;IAC7B;;;OAGG;IACH,UAAU,CAAC,GAAG,EAAE,UAAU,GAAG,IAAI,CAAC;IAClC,0EAA0E;IAC1E,OAAO,CAAC,CAAC,GAAG,EAAE,OAAO,GAAG,IAAI,CAAC;IAC7B;;;OAGG;IACH,SAAS,CAAC,IAAI,IAAI,CAAC;IACnB,wEAAwE;IACxE,SAAS,CAAC,CAAC,IAAI,EAAE,MAAM,GAAG,MAAM,CAAC;IACjC,wDAAwD;IACxD,UAAU,CAAC,CAAC,IAAI,EAAE,MAAM,EAAE,GAAG,EAAE,UAAU,GAAG,IAAI,CAAC;CAClD;AAQD;;;;;GAKG;AACH,wBAAgB,gBAAgB,CAC9B,GAAG,EAAE,GAAG,EACR,IAAI,EAAE,SAAS,EACf,GAAG,EAAE,OAAO,EACZ,IAAI,EAAE,MAAM,EACZ,GAAG,EAAE,QAAQ,GACZ,IAAI,CAoGN"}