@thebattlearena/corner 0.10.1-beta.80 → 0.10.1-beta.82

package/README.md

@@ -439,7 +439,7 @@ accept|reject --why "<lo que dijo el humano>"`.
 
 **Revisión humana por bloques (PR Review Lab)**: cada punto del plan técnico es un bloque (`B<n>` es
 el punto n). `judges-card.mjs plan <pr> estimate <n> --minutes <m> [--priority 1-4]` le pone estimado y
-prioridad. Al pasar a «en curso» se anotan el inicio y el autor (el `user.email` de git del worktree),
+prioridad (sin ellos un bloque no arranca; también van en el mismo comando: `plan <pr> <n> "en curso" --minutes <m> --priority <p>`). Al pasar a «en curso» se anotan el inicio y el autor (el `user.email` de git del worktree),
 y al pasar a «espera al juez» el fin y el rango (`--range A..B` lo fija a mano); todo va en
 `plan.jsonl`, que es lo que lee el modo «Pelea del ring» de PR Review Lab. Cuando `humanReviewEvery`
 bloques (2 por default, `null` lo apaga) esperan al juez, suena la campana en PR Review Lab y

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@thebattlearena/corner",
-  "version": "0.10.1-beta.80",
+  "version": "0.10.1-beta.82",
   "description": "Corner: tu esquina de Battle Arena en Claude Code (el plugin `battlearena`). Hooks de tracking, objetivo del turno, plan de batalla /battlearena:conquer, Ringside (el panel de tu día), el ring y la radio. Zero-dependency.",
   "type": "module",
   "bin": {

package/ring/scripts/judges-card.mjs

@@ -610,10 +610,25 @@ function plan([pr, target, ...rest]) {
   const [state] = rest;
   if (!target || !state)
     throw new Error(
-      'usage: plan <pr> <n|title> <pendiente|espera al juez|en curso|hecho> [--ref <sha|round-bell>] [--range A..B] | estimate <n> --minutes <m> [--priority 1-4] | add … | list',
+      'usage: plan <pr> <n|title> <pendiente|espera al juez|en curso|hecho> [--ref <sha|round-bell>] [--range A..B] [--minutes <m> --priority <1-4>] | estimate <n> --minutes <m> [--priority 1-4] | add … | list',
     );
+  const { config } = loadConfig(projectDir(), {
+    contract: false,
+    venue: readState(dir).venue ?? DEFAULT_VENUE,
+  });
+  const inline = [value('--minutes'), value('--priority')].some(
+    (given) => given != null,
+  );
   const changed = setPlanState(dir, target, state, value('--ref'), undefined, {
     range: value('--range'),
+    estimate: inline
+      ? estimateFacts({
+          priority: value('--priority'),
+          minutes: value('--minutes'),
+        })
+      : null,
+    // Under the human review by blocks a block starts with its estimate and priority.
+    requireEstimate: Boolean(config.humanReviewEvery),
   });
   console.log(
     `${changed.n}. ${changed.title}: ${changed.from} → ${changed.to} at ${localStamp(new Date())}${changed.facts.range && changed.to === 'espera al juez' ? ` · range ${changed.facts.range}` : ''}`,

package/ring/scripts/review-blocks.mjs

@@ -70,6 +70,21 @@ export function factsForState(previous, to, { at, head, email, range }) {
   return {};
 }
 
+/**
+ * Why a block may not start: under the human review by blocks, a block enters «en curso» only with
+ * its estimate and priority (PR Review Lab orders by one and calibrates the other against the real
+ * time per person). Null when it may. PURE.
+ */
+export function startRefusal(facts, to, n) {
+  if (to !== 'en curso') return null;
+  const missing = [
+    facts.estimateMin == null && '--minutes <m>',
+    facts.priority == null && '--priority <1-4>',
+  ].filter(Boolean);
+  if (!missing.length) return null;
+  return `B${n} has no ${facts.estimateMin == null ? 'estimate' : 'priority'} yet: a block starts with its estimate and priority (the human review by blocks). Add ${missing.join(' ')} to this command, or run plan <pr> estimate ${n} ${missing.join(' ')} first`;
+}
+
 /** Checks an estimate: priority 1–4 and whole minutes. PURE. */
 export function estimateFacts({ priority, minutes }) {
   const facts = {};

package/ring/scripts/tech-plan-log.mjs

@@ -12,7 +12,12 @@ import { join } from 'node:path';
 
 import { readState } from './config.mjs';
 import { scriptJson } from './contract-endpoints.mjs';
-import { authorEmail, blockFacts, factsForState } from './review-blocks.mjs';
+import {
+  authorEmail,
+  blockFacts,
+  factsForState,
+  startRefusal,
+} from './review-blocks.mjs';
 import {
   parsePlan,
   parsePlanLog,
@@ -34,7 +39,7 @@ export function setPlanState(
   state,
   ref = null,
   at = new Date().toISOString(),
-  { range = null, estimate = null } = {},
+  { range = null, estimate = null, requireEstimate = false } = {},
 ) {
   const file = join(dir, PLAN);
   const markdown = read(file);
@@ -58,6 +63,11 @@ export function setPlanState(
           range,
         })),
   };
+  const refusal =
+    requireEstimate && next !== item.state
+      ? startRefusal(facts, next, item.n)
+      : null;
+  if (refusal) throw new Error(refusal);
   writeFileSync(file, withPlanState(markdown, item, next));
   appendFileSync(
     join(dir, PLAN_LOG),

package/ring/skills/referee/SKILL.md

@@ -2,6 +2,7 @@
 name: referee
 description: Orchestrates a refactor or a large delivery on a backend, frontend or mobile PR as its referee, at the venue the PR belongs to. One wrestler (Sonnet, effort high by default) writes in its own worktree; you (effort high) review each commit range with read-only cornermen against a numbered rulebook, every brief generated by `brief.mjs` with the rules embedded, send one rebound package at a time, open small do-not-merge round-bell PRs so the human reviews early, decide design doubts yourself from the rulebook and precedents (escalating only a short hard list), and keep a durable judges card so any new session can resume. Invoke with `/ring:referee start <pr>`, `/ring:referee resume [<pr>]`, `/ring:referee close`, "referee the refactor of #N", "resume the bout".
 argument-hint: "start <pr> | start --from-sparring <slug> | resume [<pr>] | close"
+effort: high
 ---
 
 # referee
@@ -212,7 +213,8 @@ way out, and it refuses without a KO. Then the bout runs as always, with three i
    `brief.mjs` briefs no wrestler. That is what a compaction or a new session resumes from.
    **Human review by blocks**: each point of the technical plan is a block. Give each its estimate
    and priority when the plan is made (`judges-card.mjs plan <pr> estimate <n> --minutes <m>
-   --priority <1-4>`), move it to «en curso» when its wrestler starts and to «espera al juez» when
+   --priority <1-4>`; the script refuses to start a block without both, or pass them with the
+   start: `plan <pr> <n> "en curso" --minutes <m> --priority <p>`), move it to «en curso» when its wrestler starts and to «espera al juez» when
    its review passes (that stamps the author, the times and the range PR Review Lab reviews). Every
    `humanReviewEvery` blocks waiting, brief.mjs stops: the human reviews that cut in PR Review Lab
    (bout mode) and signs a verdict with a Tape. The next brief applies it: a pass closes the

package/ring/skills/sparring/SKILL.md

@@ -1,7 +1,8 @@
 ---
 name: sparring
-description: Opens a sparring, a quick and deliberately low-quality draft (one PR per repo it touches, back and front included) that only proves whether a feature is worth building, before anyone pays for building it well. A rudo per repo (Sonnet at effort high by default) writes it inside a timebox in its own worktree; the draft PR (labels sparring + do-not-merge) is the event the host project's CI catches to deploy a preview; credentials travel by name only. The judge calls KO, rematch or discard, in two out of three falls: a KO passes the host gates (vestidor), faces the team's Tapes until a bell (unless «sin equipo»), keeps or loses the mask, and then hands each branch to a ring bout. Invoke with `/ring:sparring <idea | Linear ticket>`, `/ring:sparring preview <slug>`, `/ring:sparring verdict <slug>`, `/ring:sparring list`, "make a quick draft of this to try it", "spar this feature first".
-argument-hint: '<idea | ticket> | preview <slug> | verdict <slug> | vestidor <slug> | list'
+description: Opens a sparring, a quick and deliberately low-quality draft (one PR per repo it touches, back and front included) that only proves whether a feature is worth building, before anyone pays for building it well. A rudo per repo (Sonnet at effort high by default) writes it inside a timebox in its own worktree; the draft PR (labels sparring + do-not-merge) is the event the host project's CI catches to deploy a preview; credentials travel by name only. The judge calls KO, rematch or discard, in two out of three falls: a KO passes the host gates (vestidor), faces the team's Tapes until a bell (unless «sin equipo»), keeps or loses the mask, and then hands each branch to a ring bout. Invoke with `/ring:sparring <idea | Linear ticket>`, `/ring:sparring preview <slug>`, `/ring:sparring verdict <slug>`, `/ring:sparring bell <slug>`, `/ring:sparring mask <slug> [kept|lost]`, `/ring:sparring list`, "make a quick draft of this to try it", "spar this feature first".
+argument-hint: '<idea | ticket> | preview <slug> | verdict <slug> | vestidor <slug> | bell <slug> | mask <slug> [kept|lost] | list'
+effort: high
 ---
 
 # sparring
@@ -365,10 +366,12 @@ said «sin equipo». The team attacks with a storm of Tapes until **the bell**.
    The judge's original notes stay in the db. The PDF goes to the judge for validation, and
    nothing reaches the arbiter until the judge approves it.
 
-5. **At the bell**: `node "$RING/scripts/sparring.mjs" mark <slug> bell --note "<Tapes · accepted
-blows>"`. Late Tapes go to the referee bout as notes, not to the scoreboard.
-6. **The mask.** The scoreboard counts only the accepted blows; the team's Tapes are evidence, not
-   votes. The judge looks at it and decides (never you, never a count, never the server):
+5. **At the bell** (`/ring:sparring bell <slug>`, §5): `node "$RING/scripts/sparring.mjs" mark <slug>
+   bell --note "<Tapes · accepted blows>"`. Late Tapes go to the referee bout as notes, not to the
+   scoreboard.
+6. **The mask** (`/ring:sparring mask <slug> [kept|lost]`, §5). The scoreboard counts only the
+   accepted blows; the team's Tapes are evidence, not votes. The judge looks at it and decides
+   (never you, never a count, never the server):
    - **mask kept** (`mark <slug> mask-kept --note "<scoreboard>"`): the team found little; the rudo
      reaches the referee as a champion, with a short first package;
    - **mask lost** (`mark <slug> mask-lost --note "<scoreboard>"`): badly hurt; the accepted
@@ -391,7 +394,37 @@ catalog is its first rebound when the mask was lost, a short first package when
 The card and the PR body always carry the fixed warning: the credentials it used are assumed
 rotated. Nobody follows it up.
 
-## 5 · `list`
+## 5 · `bell <slug>` and `mask <slug> [kept|lost]`: the close of the second fall
+
+The judge closes the defense from here, without remembering script names. Both read
+`~/.claude/ring/sparrings/<slug>/sparring.json` first and refuse, saying why, when the last verdict
+is not `ko`, or when the moment is already marked (its milestone is there: say when, and stop).
+
+**`bell <slug>`**: the defense is over.
+
+1. Refuse unless `defense` was marked (or `no-team`: then there is no bell, say so and go to the
+   mask).
+2. The scoreboard: the Tapes the team recorded and the blows of the triage (`fallos` with
+   `ArtifactData`): how many apply, do not apply and are still pending. A pending blow is not
+   counted yet: tell the judge which ones and ask whether to ring anyway.
+3. `node "$RING/scripts/sparring.mjs" mark <slug> bell --note "<n> Tapes · <m> golpes · <a>
+   aplican · <d> no aplican"`, refresh the chronicle (`/ring:play-by-play --sparring <slug>`) and
+   show the scoreboard. Then ask for the mask (below) in the same message.
+
+**`mask <slug> [kept|lost]`**: the judge's call on how the rudo came out of the defense.
+
+1. Refuse unless `bell` (or `no-team`) is marked.
+2. Without `kept|lost`: show the scoreboard and the accepted blows by criticality, explain the two
+   outcomes in one line each, and ask with AskUserQuestion. The judge decides; never you, never a
+   count:
+   - **kept**: the team found little; the rudo reaches the referee as a champion and the bout's
+     first package is short;
+   - **lost**: badly hurt; the whole accepted catalog is the referee's first rebound.
+3. `node "$RING/scripts/sparring.mjs" mark <slug> mask-kept|mask-lost --note "<scoreboard>"`,
+   refresh the chronicle, and give the next step: in a session in each repo of the sparring,
+   `/ring:referee start --from-sparring <slug>` (the exact `cd … && claude "…"` line per repo).
+
+## 6 · `list`
 
 `node "$RING/scripts/sparring.mjs" list`: every sparring on this machine with its repos and PRs,
 verdict and age.