@fnndsc/brasa 0.37.1 → 0.38.1

package/dist/builtins/games/trek/style.js

@@ -0,0 +1,93 @@
+/**
+ * @file The scans as the bridge shows them: the game's own lines, each
+ * read once it is complete, with the short range grid in glyphs and
+ * colours and the long range counts coloured by what they count.
+ *
+ * Only the look changes: every glyph is one column wide, so the layout and
+ * the words are the original's, and `trek --classic` (or a plain output)
+ * skips this entirely.
+ *
+ * @module
+ */
+import chalk from 'chalk';
+/** A short range scan row: its number, ten sectors, its number again, the status beside it. */
+const SRS_ROW = /^(\d) ((?:[^ ] |  ){10})(\d)(.*)$/;
+/** A long range scan row: its number, then the cells between bars. */
+const LRS_ROW = /^(\d|\s) !(.*)$/;
+/** A sector's glyph and colour. */
+const SECTOR = {
+    '.': () => chalk.gray('·'),
+    '*': () => chalk.yellow('✶'),
+    '#': () => chalk.green.bold('◈'),
+    '@': () => chalk.magenta('◉'),
+    K: (one) => chalk.red.bold(one),
+    E: (one) => chalk.cyan.bold(one),
+    Q: (one) => chalk.cyan.bold(one),
+};
+/** A condition's colour, on the status line that names it. */
+const CONDITION = {
+    GREEN: (word) => chalk.green.bold(word),
+    YELLOW: (word) => chalk.yellow.bold(word),
+    RED: (word) => chalk.red.bold(word),
+    DOCKED: (word) => chalk.cyan.bold(word),
+};
+/**
+ * The status beside a scan row, its condition coloured.
+ *
+ * @param status - The text after the row.
+ * @returns The text, styled.
+ */
+function status_style(status) {
+    return status.replace(/^(\s*condition\s+)(GREEN|YELLOW|RED|DOCKED)/, (_all, lead, word) => `${lead}${CONDITION[word](word)}`);
+}
+/**
+ * A long range count, coloured by place: Klingons in the hundreds, starbases
+ * in the tens, stars in the units.
+ *
+ * @param digits - The count as printed.
+ * @returns The count, styled.
+ */
+function count_style(digits) {
+    const places = digits.split('');
+    return places.map((digit, at) => {
+        const fromRight = places.length - 1 - at;
+        if (fromRight === 0)
+            return chalk.yellow(digit);
+        if (fromRight === 1)
+            return chalk.green(digit);
+        return chalk.red.bold(digit);
+    }).join('');
+}
+/**
+ * One line of the game, styled when it is a scan's.
+ *
+ * @param line - A complete line, without its newline.
+ * @returns The line to show.
+ */
+export function trekLine_style(line) {
+    const srs = SRS_ROW.exec(line);
+    if (srs !== null) {
+        const [, row = '', cells = '', again = '', status = ''] = srs;
+        let shown = '';
+        for (let at = 0; at < cells.length; at += 2) {
+            const one = cells[at];
+            const glyph = SECTOR[one];
+            shown += `${glyph === undefined ? one : glyph(one)} `;
+        }
+        return `${chalk.gray(row)} ${shown}${chalk.gray(again)}${status_style(status)}`;
+    }
+    const lrs = LRS_ROW.exec(line);
+    if (lrs !== null && line.endsWith('!')) {
+        const [, row = '', cells = ''] = lrs;
+        const body = cells
+            .replace(/\d+/g, (digits) => count_style(digits))
+            .replace(/!/g, chalk.gray('!'))
+            .replace(/\*/g, chalk.gray('*'))
+            .replace(/\/\/\//g, chalk.red('///'));
+        return `${chalk.gray(row)} ${chalk.gray('!')}${body}`;
+    }
+    if (/^ {2}-+$/.test(line))
+        return chalk.gray(line);
+    return line;
+}
+//# sourceMappingURL=style.js.map

package/dist/builtins/games/trek/style.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"style.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/style.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;GAUG;AACH,OAAO,KAAK,MAAM,OAAO,CAAC;AAE1B,+FAA+F;AAC/F,MAAM,OAAO,GAAW,mCAAmC,CAAC;AAE5D,sEAAsE;AACtE,MAAM,OAAO,GAAW,iBAAiB,CAAC;AAE1C,mCAAmC;AACnC,MAAM,MAAM,GAAsD;IAChE,GAAG,EAAE,GAAW,EAAE,CAAC,KAAK,CAAC,IAAI,CAAC,GAAG,CAAC;IAClC,GAAG,EAAE,GAAW,EAAE,CAAC,KAAK,CAAC,MAAM,CAAC,GAAG,CAAC;IACpC,GAAG,EAAE,GAAW,EAAE,CAAC,KAAK,CAAC,KAAK,CAAC,IAAI,CAAC,GAAG,CAAC;IACxC,GAAG,EAAE,GAAW,EAAE,CAAC,KAAK,CAAC,OAAO,CAAC,GAAG,CAAC;IACrC,CAAC,EAAE,CAAC,GAAW,EAAU,EAAE,CAAC,KAAK,CAAC,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC;IAC/C,CAAC,EAAE,CAAC,GAAW,EAAU,EAAE,CAAC,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG,CAAC;IAChD,CAAC,EAAE,CAAC,GAAW,EAAU,EAAE,CAAC,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG,CAAC;CACjD,CAAC;AAEF,8DAA8D;AAC9D,MAAM,SAAS,GAAuD;IACpE,KAAK,EAAE,CAAC,IAAY,EAAU,EAAE,CAAC,KAAK,CAAC,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC;IACvD,MAAM,EAAE,CAAC,IAAY,EAAU,EAAE,CAAC,KAAK,CAAC,MAAM,CAAC,IAAI,CAAC,IAAI,CAAC;IACzD,GAAG,EAAE,CAAC,IAAY,EAAU,EAAE,CAAC,KAAK,CAAC,GAAG,CAAC,IAAI,CAAC,IAAI,CAAC;IACnD,MAAM,EAAE,CAAC,IAAY,EAAU,EAAE,CAAC,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,IAAI,CAAC;CACxD,CAAC;AAEF;;;;;GAKG;AACH,SAAS,YAAY,CAAC,MAAc;IAClC,OAAO,MAAM,CAAC,OAAO,CAAC,6CAA6C,EAAE,CAAC,IAAY,EAAE,IAAY,EAAE,IAAY,EAAU,EAAE,CAAC,GAAG,IAAI,GAAI,SAAS,CAAC,IAAI,CAA8B,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;AAC9L,CAAC;AAED;;;;;;GAMG;AACH,SAAS,WAAW,CAAC,MAAc;IACjC,MAAM,MAAM,GAAa,MAAM,CAAC,KAAK,CAAC,EAAE,CAAC,CAAC;IAC1C,OAAO,MAAM,CAAC,GAAG,CAAC,CAAC,KAAa,EAAE,EAAU,EAAU,EAAE;QACtD,MAAM,SAAS,GAAW,MAAM,CAAC,MAAM,GAAG,CAAC,GAAG,EAAE,CAAC;QACjD,IAAI,SAAS,KAAK,CAAC;YAAE,OAAO,KAAK,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC;QAChD,IAAI,SAAS,KAAK,CAAC;YAAE,OAAO,KAAK,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC;QAC/C,OAAO,KAAK,CAAC,GAAG,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;IAC/B,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC;AACd,CAAC;AAED;;;;;GAKG;AACH,MAAM,UAAU,cAAc,CAAC,IAAY;IACzC,MAAM,GAAG,GAA2B,OAAO,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACvD,IAAI,GAAG,KAAK,IAAI,EAAE,CAAC;QACjB,MAAM,CAAC,EAAE,GAAG,GAAG,EAAE,EAAE,KAAK,GAAG,EAAE,EAAE,KAAK,GAAG,EAAE,EAAE,MAAM,GAAG,EAAE,CAAC,GAAG,GAAG,CAAC;QAC9D,IAAI,KAAK,GAAW,EAAE,CAAC;QACvB,KAAK,IAAI,EAAE,GAAW,CAAC,EAAE,EAAE,GAAG,KAAK,CAAC,MAAM,EAAE,EAAE,IAAI,CAAC,EAAE,CAAC;YACpD,MAAM,GAAG,GAAW,KAAK,CAAC,EAAE,CAAW,CAAC;YACxC,MAAM,KAAK,GAAG,MAAM,CAAC,GAAG,CAAC,CAAC;YAC1B,KAAK,IAAI,GAAG,KAAK,KAAK,SAAS,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,GAAG,CAAC,GAAG,CAAC;QACxD,CAAC;QACD,OAAO,GAAG,KAAK,CAAC,IAAI,CAAC,GAAG,CAAC,IAAI,KAAK,GAAG,KAAK,CAAC,IAAI,CAAC,KAAK,CAAC,GAAG,YAAY,CAAC,MAAM,CAAC,EAAE,CAAC;IAClF,CAAC;IACD,MAAM,GAAG,GAA2B,OAAO,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACvD,IAAI,GAAG,KAAK,IAAI,IAAI,IAAI,CAAC,QAAQ,CAAC,GAAG,CAAC,EAAE,CAAC;QACvC,MAAM,CAAC,EAAE,GAAG,GAAG,EAAE,EAAE,KAAK,GAAG,EAAE,CAAC,GAAG,GAAG,CAAC;QACrC,MAAM,IAAI,GAAW,KAAK;aACvB,OAAO,CAAC,MAAM,EAAE,CAAC,MAAc,EAAU,EAAE,CAAC,WAAW,CAAC,MAAM,CAAC,CAAC;aAChE,OAAO,CAAC,IAAI,EAAE,KAAK,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;aAC9B,OAAO,CAAC,KAAK,EAAE,KAAK,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;aAC/B,OAAO,CAAC,SAAS,EAAE,KAAK,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC;QACxC,OAAO,GAAG,KAAK,CAAC,IAAI,CAAC,GAAG,CAAC,IAAI,KAAK,CAAC,IAAI,CAAC,GAAG,CAAC,GAAG,IAAI,EAAE,CAAC;IACxD,CAAC;IACD,IAAI,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC;QAAE,OAAO,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IACnD,OAAO,IAAI,CAAC;AACd,CAAC"}

package/dist/builtins/games/trek/systemname.d.ts

@@ -0,0 +1,10 @@
+/**
+ * @file The name of a quadrant's starsystem, knowing about distressed
+ * systems (whose name is held by the distress event).
+ *
+ * @module
+ */
+import type { Trek } from './context.js';
+import type { Quad } from './state.js';
+/** RETRIEVE THE STARSYSTEM NAME: null when the quadrant has none. */
+export declare function systemname(t: Trek, q: Quad): string | null;

package/dist/builtins/games/trek/systemname.js

@@ -0,0 +1,12 @@
+import { Q_DISTRESSED, Q_SYSTEM, Systemname } from './consts.js';
+/** RETRIEVE THE STARSYSTEM NAME: null when the quadrant has none. */
+export function systemname(t, q) {
+    let i = q.qsystemname;
+    if (i & Q_DISTRESSED)
+        i = t.s.Event[i & Q_SYSTEM].systemname;
+    i &= Q_SYSTEM;
+    if (i === 0)
+        return null;
+    return Systemname[i];
+}
+//# sourceMappingURL=systemname.js.map

package/dist/builtins/games/trek/systemname.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"systemname.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/systemname.ts"],"names":[],"mappings":"AAuCA,OAAO,EAAE,YAAY,EAAE,QAAQ,EAAE,UAAU,EAAE,MAAM,aAAa,CAAC;AAGjE,qEAAqE;AACrE,MAAM,UAAU,UAAU,CAAC,CAAO,EAAE,CAAO;IACzC,IAAI,CAAC,GAAW,CAAC,CAAC,WAAW,CAAC;IAC9B,IAAI,CAAC,GAAG,YAAY;QAAE,CAAC,GAAI,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,GAAG,QAAQ,CAAe,CAAC,UAAU,CAAC;IAC5E,CAAC,IAAI,QAAQ,CAAC;IACd,IAAI,CAAC,KAAK,CAAC;QAAE,OAAO,IAAI,CAAC;IACzB,OAAO,UAAU,CAAC,CAAC,CAAW,CAAC;AACjC,CAAC"}

package/dist/builtins/games/trek/torped.d.ts

@@ -0,0 +1,3 @@
+import type { Trek } from './context.js';
+/** Photon torpedo control. */
+export declare function torped(t: Trek, _v: number): Promise<void>;

package/dist/builtins/games/trek/torped.js

@@ -0,0 +1,232 @@
+/*
+ * torped.ts: a TypeScript port of BSD trek(6), from torped.c.
+ * Ported from NetBSD src/games/trek (trunk 7a9ca154a8f6144307865f23390a3c63b400b801): torped.c 1.14 2009/05/24.
+ *
+ * Copyright (c) 1980, 1993
+ *	The Regents of the University of California.  All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ *
+ */
+/**
+ * @file Photon torpedo control: one torpedo, or a burst of three across a
+ * spread angle, each on a randomly crudded course that may misfire.
+ *
+ * @module
+ */
+import { BASE, DOCKED, EMPTY, HOLE, INHABIT, KLINGON, NSECTS, STAR, TORPED } from './consts.js';
+import { check_out } from './check_out.js';
+import { damage } from './damage.js';
+import { damaged } from './damaged.js';
+import { getintpar, getynpar, testnl } from './getpar.js';
+import { killb, killk, kills } from './kill.js';
+import { nova } from './nova.js';
+import { franf, ranf } from './rand.js';
+/*
+**  PHOTON TORPEDO CONTROL
+**
+**	Either one or three photon torpedoes are fired.  If three
+**	are fired, it is called a "burst" and you also specify
+**	a spread angle.
+**
+**	Torpedoes are never 100% accurate.  There is always a random
+**	cludge factor in their course which is increased if you have
+**	your shields up.  Hence, you will find that they are more
+**	accurate at close range.  However, they have the advantage that
+**	at long range they don't lose any of their power as phasers
+**	do, i.e., a hit is a hit is a hit, by any other name.
+**
+**	When the course spreads too much, you get a misfire, and the
+**	course is randomized even more.  You also have the chance that
+**	the misfire damages your torpedo tubes.
+*/
+/** Photon torpedo control. */
+export async function torped(t, _v) {
+    const { Ship, Etc, Sect, Game, Move } = t.s;
+    let ix;
+    let iy;
+    let x;
+    let y;
+    let dx;
+    let dy;
+    let angle;
+    let course;
+    let course2;
+    let k;
+    let bigger;
+    let burst;
+    let n;
+    if (Ship.cloaked) {
+        t.io.printf('Federation regulations do not permit attack while cloaked.\n');
+        return;
+    }
+    if (check_out(t, TORPED))
+        return;
+    if (Ship.torped <= 0) {
+        t.io.printf('All photon torpedos expended\n');
+        return;
+    }
+    /* get the course */
+    course = await getintpar(t, 'Torpedo course');
+    if (course < 0 || course > 360)
+        return;
+    burst = -1;
+    /* need at least three torpedoes for a burst */
+    if (Ship.torped < 3) {
+        t.io.printf('No-burst mode selected\n');
+        burst = 0;
+    }
+    else {
+        /* see if the user wants one */
+        if (!(await testnl(t))) {
+            k = await t.io.getchar();
+            t.io.ungetc(k);
+            if (k >= 48 && k <= 57)
+                burst = 1;
+        }
+    }
+    if (burst < 0) {
+        burst = await getynpar(t, 'Do you want a burst');
+    }
+    if (burst) {
+        burst = await getintpar(t, 'burst angle');
+        if (burst <= 0)
+            return;
+        if (burst > 15) {
+            t.io.printf('Maximum burst angle is 15 degrees\n');
+            return;
+        }
+    }
+    const sectsize = NSECTS;
+    n = -1;
+    if (burst) {
+        n = 1;
+        course -= burst;
+    }
+    for (; n && n <= 3; n++) {
+        /* select a nice random course */
+        course2 = course + (await randcourse(t, n));
+        /* convert to radians */
+        angle = course2 * 0.0174532925;
+        dx = -Math.cos(angle);
+        dy = Math.sin(angle);
+        bigger = Math.abs(dx);
+        x = Math.abs(dy);
+        if (x > bigger)
+            bigger = x;
+        dx /= bigger;
+        dy /= bigger;
+        x = Ship.sectx + 0.5;
+        y = Ship.secty + 0.5;
+        if (Ship.cond !== DOCKED)
+            Ship.torped -= 1;
+        t.io.printf('Torpedo track');
+        if (n > 0)
+            t.io.printf(', torpedo number %d', n);
+        t.io.printf(':\n%6.1f\t%4.1f\n', x, y);
+        while (true) {
+            ix = Math.trunc((x += dx));
+            iy = Math.trunc((y += dy));
+            if (x < 0.0 || x >= sectsize || y < 0.0 || y >= sectsize) {
+                t.io.printf('Torpedo missed\n');
+                break;
+            }
+            t.io.printf('%6.1f\t%4.1f\n', x, y);
+            switch (Sect[ix][iy]) {
+                case EMPTY:
+                    continue;
+                case HOLE:
+                    t.io.printf('Torpedo disappears into a black hole\n');
+                    break;
+                case KLINGON:
+                    for (k = 0; k < Etc.nkling; k++) {
+                        if (Etc.klingon[k].x !== ix || Etc.klingon[k].y !== iy)
+                            continue;
+                        Etc.klingon[k].power -= 500 + ranf(t.rnd, 501);
+                        if (Etc.klingon[k].power > 0) {
+                            t.io.printf('*** Hit on Klingon at %d,%d: extensive damages\n', ix, iy);
+                            break;
+                        }
+                        await killk(t, ix, iy);
+                        break;
+                    }
+                    break;
+                case STAR:
+                    await nova(t, ix, iy);
+                    break;
+                case INHABIT:
+                    await kills(t, ix, iy, -1);
+                    break;
+                case BASE:
+                    await killb(t, Ship.quadx, Ship.quady);
+                    Game.killb += 1;
+                    break;
+                default:
+                    t.io.printf('Unknown object %c at %d,%d destroyed\n', Sect[ix][iy], ix, iy);
+                    Sect[ix][iy] = EMPTY;
+                    break;
+            }
+            break;
+        }
+        if (damaged(t, TORPED) || t.s.Quad[Ship.quadx][Ship.quady].stars < 0)
+            break;
+        course += burst;
+    }
+    Move.free = 0;
+}
+/*
+**  RANDOMIZE COURSE
+**
+**	This routine randomizes the course for torpedo number 'n'.
+**	Other things handled by this routine are misfires, damages
+**	to the tubes, etc.
+*/
+/** Randomize the course for torpedo number n. */
+async function randcourse(t, n) {
+    const { Ship, Param } = t.s;
+    let r;
+    let d;
+    d = Math.trunc((franf(t.rnd) + franf(t.rnd) - 1.0) * 20);
+    if (Math.abs(d) > 12) {
+        t.io.printf('Photon tubes misfire');
+        if (n < 0)
+            t.io.printf('\n');
+        else
+            t.io.printf(' on torpedo %d\n', n);
+        if (ranf(t.rnd, 2)) {
+            await damage(t, TORPED, 0.2 * Math.abs(d) * (franf(t.rnd) + 1.0));
+        }
+        d = Math.trunc(d * (1.0 + 2.0 * franf(t.rnd)));
+    }
+    if (Ship.shldup || Ship.cond === DOCKED) {
+        r = Ship.shield;
+        r = 1.0 + r / Param.shield;
+        if (Ship.cond === DOCKED)
+            r = 2.0;
+        d = Math.trunc(d * r);
+    }
+    return d;
+}
+//# sourceMappingURL=torped.js.map

package/dist/builtins/games/trek/torped.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"torped.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/torped.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GA+BG;AACH;;;;;GAKG;AACH,OAAO,EAAE,IAAI,EAAE,MAAM,EAAE,KAAK,EAAE,IAAI,EAAE,OAAO,EAAE,OAAO,EAAE,MAAM,EAAE,IAAI,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AAEhG,OAAO,EAAE,SAAS,EAAE,MAAM,gBAAgB,CAAC;AAC3C,OAAO,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AACrC,OAAO,EAAE,OAAO,EAAE,MAAM,cAAc,CAAC;AACvC,OAAO,EAAE,SAAS,EAAE,QAAQ,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AAC1D,OAAO,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,MAAM,WAAW,CAAC;AAChD,OAAO,EAAE,IAAI,EAAE,MAAM,WAAW,CAAC;AACjC,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,WAAW,CAAC;AAExC;;;;;;;;;;;;;;;;;EAiBE;AAEF,8BAA8B;AAC9B,MAAM,CAAC,KAAK,UAAU,MAAM,CAAC,CAAO,EAAE,EAAU;IAC9C,MAAM,EAAE,IAAI,EAAE,GAAG,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;IAC5C,IAAI,EAAU,CAAC;IACf,IAAI,EAAU,CAAC;IACf,IAAI,CAAS,CAAC;IACd,IAAI,CAAS,CAAC;IACd,IAAI,EAAU,CAAC;IACf,IAAI,EAAU,CAAC;IACf,IAAI,KAAa,CAAC;IAClB,IAAI,MAAc,CAAC;IACnB,IAAI,OAAe,CAAC;IACpB,IAAI,CAAS,CAAC;IACd,IAAI,MAAc,CAAC;IACnB,IAAI,KAAa,CAAC;IAClB,IAAI,CAAS,CAAC;IAEd,IAAI,IAAI,CAAC,OAAO,EAAE,CAAC;QACjB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,8DAA8D,CAAC,CAAC;QAC5E,OAAO;IACT,CAAC;IACD,IAAI,SAAS,CAAC,CAAC,EAAE,MAAM,CAAC;QAAE,OAAO;IACjC,IAAI,IAAI,CAAC,MAAM,IAAI,CAAC,EAAE,CAAC;QACrB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,gCAAgC,CAAC,CAAC;QAC9C,OAAO;IACT,CAAC;IAED,oBAAoB;IACpB,MAAM,GAAG,MAAM,SAAS,CAAC,CAAC,EAAE,gBAAgB,CAAC,CAAC;IAC9C,IAAI,MAAM,GAAG,CAAC,IAAI,MAAM,GAAG,GAAG;QAAE,OAAO;IACvC,KAAK,GAAG,CAAC,CAAC,CAAC;IAEX,+CAA+C;IAC/C,IAAI,IAAI,CAAC,MAAM,GAAG,CAAC,EAAE,CAAC;QACpB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,0BAA0B,CAAC,CAAC;QACxC,KAAK,GAAG,CAAC,CAAC;IACZ,CAAC;SAAM,CAAC;QACN,+BAA+B;QAC/B,IAAI,CAAC,CAAC,MAAM,MAAM,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC;YACvB,CAAC,GAAG,MAAM,CAAC,CAAC,EAAE,CAAC,OAAO,EAAE,CAAC;YACzB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC;YACf,IAAI,CAAC,IAAI,EAAE,IAAI,CAAC,IAAI,EAAE;gBAAE,KAAK,GAAG,CAAC,CAAC;QACpC,CAAC;IACH,CAAC;IACD,IAAI,KAAK,GAAG,CAAC,EAAE,CAAC;QACd,KAAK,GAAG,MAAM,QAAQ,CAAC,CAAC,EAAE,qBAAqB,CAAC,CAAC;IACnD,CAAC;IACD,IAAI,KAAK,EAAE,CAAC;QACV,KAAK,GAAG,MAAM,SAAS,CAAC,CAAC,EAAE,aAAa,CAAC,CAAC;QAC1C,IAAI,KAAK,IAAI,CAAC;YAAE,OAAO;QACvB,IAAI,KAAK,GAAG,EAAE,EAAE,CAAC;YACf,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,qCAAqC,CAAC,CAAC;YACnD,OAAO;QACT,CAAC;IACH,CAAC;IACD,MAAM,QAAQ,GAAW,MAAM,CAAC;IAChC,CAAC,GAAG,CAAC,CAAC,CAAC;IACP,IAAI,KAAK,EAAE,CAAC;QACV,CAAC,GAAG,CAAC,CAAC;QACN,MAAM,IAAI,KAAK,CAAC;IAClB,CAAC;IACD,OAAO,CAAC,IAAI,CAAC,IAAI,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC;QACxB,iCAAiC;QACjC,OAAO,GAAG,MAAM,GAAG,CAAC,MAAM,UAAU,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC;QAC5C,wBAAwB;QACxB,KAAK,GAAG,OAAO,GAAG,YAAY,CAAC;QAC/B,EAAE,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;QACtB,EAAE,GAAG,IAAI,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;QACrB,MAAM,GAAG,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,CAAC;QACtB,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,CAAC;QACjB,IAAI,CAAC,GAAG,MAAM;YAAE,MAAM,GAAG,CAAC,CAAC;QAC3B,EAAE,IAAI,MAAM,CAAC;QACb,EAAE,IAAI,MAAM,CAAC;QACb,CAAC,GAAG,IAAI,CAAC,KAAK,GAAG,GAAG,CAAC;QACrB,CAAC,GAAG,IAAI,CAAC,KAAK,GAAG,GAAG,CAAC;QACrB,IAAI,IAAI,CAAC,IAAI,KAAK,MAAM;YAAE,IAAI,CAAC,MAAM,IAAI,CAAC,CAAC;QAC3C,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,eAAe,CAAC,CAAC;QAC7B,IAAI,CAAC,GAAG,CAAC;YAAE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,qBAAqB,EAAE,CAAC,CAAC,CAAC;QACjD,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,mBAAmB,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;QACvC,OAAO,IAAI,EAAE,CAAC;YACZ,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;YAC3B,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;YAC3B,IAAI,CAAC,GAAG,GAAG,IAAI,CAAC,IAAI,QAAQ,IAAI,CAAC,GAAG,GAAG,IAAI,CAAC,IAAI,QAAQ,EAAE,CAAC;gBACzD,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,kBAAkB,CAAC,CAAC;gBAChC,MAAM;YACR,CAAC;YACD,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,gBAAgB,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;YACpC,QAAQ,IAAI,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC;gBACrB,KAAK,KAAK;oBACR,SAAS;gBAEX,KAAK,IAAI;oBACP,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,wCAAwC,CAAC,CAAC;oBACtD,MAAM;gBAER,KAAK,OAAO;oBACV,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,CAAC,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;wBAChC,IAAI,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,EAAE,IAAI,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,EAAE;4BAAE,SAAS;wBACjE,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,KAAK,IAAI,GAAG,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC;wBAC/C,IAAI,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,KAAK,GAAG,CAAC,EAAE,CAAC;4BAC7B,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,kDAAkD,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;4BACxE,MAAM;wBACR,CAAC;wBACD,MAAM,KAAK,CAAC,CAAC,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;wBACvB,MAAM;oBACR,CAAC;oBACD,MAAM;gBAER,KAAK,IAAI;oBACP,MAAM,IAAI,CAAC,CAAC,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;oBACtB,MAAM;gBAER,KAAK,OAAO;oBACV,MAAM,KAAK,CAAC,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC;oBAC3B,MAAM;gBAER,KAAK,IAAI;oBACP,MAAM,KAAK,CAAC,CAAC,EAAE,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,KAAK,CAAC,CAAC;oBACvC,IAAI,CAAC,KAAK,IAAI,CAAC,CAAC;oBAChB,MAAM;gBAER;oBACE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,wCAAwC,EAAE,IAAI,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;oBAC5E,IAAI,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,GAAG,KAAK,CAAC;oBACrB,MAAM;YACV,CAAC;YACD,MAAM;QACR,CAAC;QACD,IAAI,OAAO,CAAC,CAAC,EAAE,MAAM,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,KAAK,GAAG,CAAC;YAAE,MAAM;QAC5E,MAAM,IAAI,KAAK,CAAC;IAClB,CAAC;IACD,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC;AAChB,CAAC;AAED;;;;;;EAME;AAEF,iDAAiD;AACjD,KAAK,UAAU,UAAU,CAAC,CAAO,EAAE,CAAS;IAC1C,MAAM,EAAE,IAAI,EAAE,KAAK,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;IAC5B,IAAI,CAAS,CAAC;IACd,IAAI,CAAS,CAAC;IAEd,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,GAAG,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,GAAG,GAAG,CAAC,GAAG,EAAE,CAAC,CAAC;IACzD,IAAI,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,EAAE,EAAE,CAAC;QACrB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,sBAAsB,CAAC,CAAC;QACpC,IAAI,CAAC,GAAG,CAAC;YAAE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC;;YACxB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,kBAAkB,EAAE,CAAC,CAAC,CAAC;QACxC,IAAI,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC,CAAC,EAAE,CAAC;YACnB,MAAM,MAAM,CAAC,CAAC,EAAE,MAAM,EAAE,GAAG,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,GAAG,GAAG,CAAC,CAAC,CAAC;QACpE,CAAC;QACD,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,GAAG,CAAC,GAAG,GAAG,GAAG,GAAG,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC;IACjD,CAAC;IACD,IAAI,IAAI,CAAC,MAAM,IAAI,IAAI,CAAC,IAAI,KAAK,MAAM,EAAE,CAAC;QACxC,CAAC,GAAG,IAAI,CAAC,MAAM,CAAC;QAChB,CAAC,GAAG,GAAG,GAAG,CAAC,GAAG,KAAK,CAAC,MAAM,CAAC;QAC3B,IAAI,IAAI,CAAC,IAAI,KAAK,MAAM;YAAE,CAAC,GAAG,GAAG,CAAC;QAClC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;IACxB,CAAC;IACD,OAAO,CAAC,CAAC;AACX,CAAC"}

package/dist/builtins/games/trek/trek.d.ts

@@ -0,0 +1,27 @@
+import { CommandEnvelope } from '@fnndsc/menu';
+import type { TrekDump } from './context.js';
+import { type TrekTerminal } from './io.js';
+import { type TrekOptions } from './main.js';
+/** How a game is played: the game's own options, the look, and where it runs. */
+export interface TrekPlay extends TrekOptions {
+    /** The random seed. */
+    seed: number;
+    /** True to style the scans. */
+    styled: boolean;
+}
+/**
+ * Plays a game of trek on a terminal.
+ *
+ * @param terminal - Where it is played.
+ * @param play - How.
+ * @param dump - The saved game slot.
+ * @returns The exit status.
+ */
+export declare function trek_play(terminal: TrekTerminal, play: TrekPlay, dump?: TrekDump): Promise<number>;
+/**
+ * `trek [--classic] [-f | -s] [--seed N]`.
+ *
+ * @param args - The words after the command.
+ * @returns The game's end.
+ */
+export declare function builtin_trek(args: string[]): Promise<CommandEnvelope>;

package/dist/builtins/games/trek/trek.js

@@ -0,0 +1,96 @@
+/**
+ * @file `trek`: the 1976 Berkeley space war game (BSD trek(6)), played by
+ * question in the console or a terminal.
+ *
+ * The game is a line-for-line port (see main.ts and its neighbours) that
+ * prints through a TrekIO; this module wires that to the session: lines to
+ * the data channel, each pending partial line as the question asked, sleeps
+ * as real pauses. Scans wear glyphs and colours unless `--classic` asks for
+ * the original look or the output has no colour.
+ *
+ * @module
+ */
+import chalk from 'chalk';
+import { envelope_error, envelope_ok } from '@fnndsc/menu';
+import { repl_question } from '../../../core/question.js';
+import { sink_get } from '../../../core/sink.js';
+import { TrekIO } from './io.js';
+import { trek_main } from './main.js';
+import { TrekRandom } from './rand.js';
+import { state_new } from './state.js';
+import { trekLine_style } from './style.js';
+/** The session's saved game: `dump` writes it, a `restart` length reads it back. */
+const TREK_DUMP = { saved: null };
+/**
+ * Plays a game of trek on a terminal.
+ *
+ * @param terminal - Where it is played.
+ * @param play - How.
+ * @param dump - The saved game slot.
+ * @returns The exit status.
+ */
+export async function trek_play(terminal, play, dump = TREK_DUMP) {
+    const shown = play.styled ? terminal_styled(terminal) : terminal;
+    const t = { s: state_new(), io: new TrekIO(shown), rnd: new TrekRandom(play.seed), dump };
+    return trek_main(t, { fast: play.fast, trace: play.trace });
+}
+/**
+ * A terminal whose complete lines are styled before they are written.
+ *
+ * @param terminal - The terminal underneath.
+ * @returns The styling terminal.
+ */
+function terminal_styled(terminal) {
+    const lines_style = (text) => text.split('\n').map(trekLine_style).join('\n');
+    return {
+        write: (text) => terminal.write(lines_style(text)),
+        ask: (prompt) => terminal.ask(prompt),
+        sleep: (seconds) => terminal.sleep(seconds),
+    };
+}
+/** The session's terminal: the data channel, the question, a real pause. */
+const SESSION_TERMINAL = {
+    write: (text) => sink_get().data_write(text),
+    ask: async (prompt) => {
+        // What is printed before the last newline is output; the rest is the question.
+        const cut = prompt.lastIndexOf('\n');
+        if (cut >= 0)
+            sink_get().data_write(prompt.slice(0, cut + 1));
+        return repl_question(prompt.slice(cut + 1));
+    },
+    sleep: (seconds) => new Promise((resolve) => { setTimeout(resolve, seconds * 1000); }),
+};
+/** The flags trek takes. */
+const USAGE = 'trek: usage: trek [--classic] [-f | -s] [--seed N]\n';
+/**
+ * `trek [--classic] [-f | -s] [--seed N]`.
+ *
+ * @param args - The words after the command.
+ * @returns The game's end.
+ */
+export async function builtin_trek(args) {
+    let classic = false;
+    let fast = 1;
+    let seed = Math.floor(Date.now() / 1000);
+    for (let at = 0; at < args.length; at++) {
+        const word = args[at];
+        if (word === '--classic')
+            classic = true;
+        else if (word === '-f')
+            fast++;
+        else if (word === '-s')
+            fast = 0;
+        else if (word === '--seed' && at + 1 < args.length && /^-?\d+$/.test(args[at + 1]))
+            seed = Number(args[++at]);
+        else
+            return envelope_error('', undefined, word.startsWith('-') ? `trek: unknown option '${word}'\n${USAGE}` : USAGE);
+    }
+    try {
+        const code = await trek_play(SESSION_TERMINAL, { seed, fast, trace: 0, styled: !classic && chalk.level > 0 });
+        return envelope_ok('', { kind: 'games.trek', data: { seed, exit: code } });
+    }
+    catch (error) {
+        return envelope_error('', undefined, `trek: cannot ask here (${error instanceof Error ? error.message : String(error)})\n`);
+    }
+}
+//# sourceMappingURL=trek.js.map

package/dist/builtins/games/trek/trek.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"trek.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/trek.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;GAWG;AACH,OAAO,KAAK,MAAM,OAAO,CAAC;AAC1B,OAAO,EAAmB,cAAc,EAAE,WAAW,EAAE,MAAM,cAAc,CAAC;AAC5E,OAAO,EAAE,aAAa,EAAE,MAAM,2BAA2B,CAAC;AAC1D,OAAO,EAAE,QAAQ,EAAE,MAAM,uBAAuB,CAAC;AAEjD,OAAO,EAAE,MAAM,EAAqB,MAAM,SAAS,CAAC;AACpD,OAAO,EAAE,SAAS,EAAoB,MAAM,WAAW,CAAC;AACxD,OAAO,EAAE,UAAU,EAAE,MAAM,WAAW,CAAC;AACvC,OAAO,EAAE,SAAS,EAAE,MAAM,YAAY,CAAC;AACvC,OAAO,EAAE,cAAc,EAAE,MAAM,YAAY,CAAC;AAE5C,oFAAoF;AACpF,MAAM,SAAS,GAAa,EAAE,KAAK,EAAE,IAAI,EAAE,CAAC;AAU5C;;;;;;;GAOG;AACH,MAAM,CAAC,KAAK,UAAU,SAAS,CAAC,QAAsB,EAAE,IAAc,EAAE,OAAiB,SAAS;IAChG,MAAM,KAAK,GAAiB,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,eAAe,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,QAAQ,CAAC;IAC/E,MAAM,CAAC,GAAS,EAAE,CAAC,EAAE,SAAS,EAAE,EAAE,EAAE,EAAE,IAAI,MAAM,CAAC,KAAK,CAAC,EAAE,GAAG,EAAE,IAAI,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,EAAE,IAAI,EAAE,CAAC;IAChG,OAAO,SAAS,CAAC,CAAC,EAAE,EAAE,IAAI,EAAE,IAAI,CAAC,IAAI,EAAE,KAAK,EAAE,IAAI,CAAC,KAAK,EAAE,CAAC,CAAC;AAC9D,CAAC;AAED;;;;;GAKG;AACH,SAAS,eAAe,CAAC,QAAsB;IAC7C,MAAM,WAAW,GAAG,CAAC,IAAY,EAAU,EAAE,CAAC,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,cAAc,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;IAC9F,OAAO;QACL,KAAK,EAAE,CAAC,IAAY,EAAQ,EAAE,CAAC,QAAQ,CAAC,KAAK,CAAC,WAAW,CAAC,IAAI,CAAC,CAAC;QAChE,GAAG,EAAE,CAAC,MAAc,EAA0B,EAAE,CAAC,QAAQ,CAAC,GAAG,CAAC,MAAM,CAAC;QACrE,KAAK,EAAE,CAAC,OAAe,EAAiB,EAAE,CAAC,QAAQ,CAAC,KAAK,CAAC,OAAO,CAAC;KACnE,CAAC;AACJ,CAAC;AAED,4EAA4E;AAC5E,MAAM,gBAAgB,GAAiB;IACrC,KAAK,EAAE,CAAC,IAAY,EAAQ,EAAE,CAAC,QAAQ,EAAE,CAAC,UAAU,CAAC,IAAI,CAAC;IAC1D,GAAG,EAAE,KAAK,EAAE,MAAc,EAA0B,EAAE;QACpD,+EAA+E;QAC/E,MAAM,GAAG,GAAW,MAAM,CAAC,WAAW,CAAC,IAAI,CAAC,CAAC;QAC7C,IAAI,GAAG,IAAI,CAAC;YAAE,QAAQ,EAAE,CAAC,UAAU,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,EAAE,GAAG,GAAG,CAAC,CAAC,CAAC,CAAC;QAC9D,OAAO,aAAa,CAAC,MAAM,CAAC,KAAK,CAAC,GAAG,GAAG,CAAC,CAAC,CAAC,CAAC;IAC9C,CAAC;IACD,KAAK,EAAE,CAAC,OAAe,EAAiB,EAAE,CAAC,IAAI,OAAO,CAAC,CAAC,OAAmB,EAAQ,EAAE,GAAG,UAAU,CAAC,OAAO,EAAE,OAAO,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC;CAChI,CAAC;AAEF,4BAA4B;AAC5B,MAAM,KAAK,GAAW,sDAAsD,CAAC;AAE7E;;;;;GAKG;AACH,MAAM,CAAC,KAAK,UAAU,YAAY,CAAC,IAAc;IAC/C,IAAI,OAAO,GAAY,KAAK,CAAC;IAC7B,IAAI,IAAI,GAAW,CAAC,CAAC;IACrB,IAAI,IAAI,GAAW,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,GAAG,EAAE,GAAG,IAAI,CAAC,CAAC;IACjD,KAAK,IAAI,EAAE,GAAW,CAAC,EAAE,EAAE,GAAG,IAAI,CAAC,MAAM,EAAE,EAAE,EAAE,EAAE,CAAC;QAChD,MAAM,IAAI,GAAW,IAAI,CAAC,EAAE,CAAW,CAAC;QACxC,IAAI,IAAI,KAAK,WAAW;YAAE,OAAO,GAAG,IAAI,CAAC;aACpC,IAAI,IAAI,KAAK,IAAI;YAAE,IAAI,EAAE,CAAC;aAC1B,IAAI,IAAI,KAAK,IAAI;YAAE,IAAI,GAAG,CAAC,CAAC;aAC5B,IAAI,IAAI,KAAK,QAAQ,IAAI,EAAE,GAAG,CAAC,GAAG,IAAI,CAAC,MAAM,IAAI,SAAS,CAAC,IAAI,CAAC,IAAI,CAAC,EAAE,GAAG,CAAC,CAAW,CAAC;YAAE,IAAI,GAAG,MAAM,CAAC,IAAI,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC;;YACnH,OAAO,cAAc,CAAC,EAAE,EAAE,SAAS,EAAE,IAAI,CAAC,UAAU,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,yBAAyB,IAAI,MAAM,KAAK,EAAE,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC;IACvH,CAAC;IACD,IAAI,CAAC;QACH,MAAM,IAAI,GAAW,MAAM,SAAS,CAAC,gBAAgB,EAAE,EAAE,IAAI,EAAE,IAAI,EAAE,KAAK,EAAE,CAAC,EAAE,MAAM,EAAE,CAAC,OAAO,IAAI,KAAK,CAAC,KAAK,GAAG,CAAC,EAAE,CAAC,CAAC;QACtH,OAAO,WAAW,CAAC,EAAE,EAAE,EAAE,IAAI,EAAE,YAAY,EAAE,IAAI,EAAE,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,EAAE,CAAC,CAAC;IAC7E,CAAC;IAAC,OAAO,KAAc,EAAE,CAAC;QACxB,OAAO,cAAc,CAAC,EAAE,EAAE,SAAS,EAAE,0BAA0B,KAAK,YAAY,KAAK,CAAC,CAAC,CAAC,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC;IAC9H,CAAC;AACH,CAAC"}

package/dist/builtins/games/trek/visual.d.ts

@@ -0,0 +1,3 @@
+import type { Trek } from './context.js';
+/** VISUAL SCAN */
+export declare function visual(t: Trek, _z: number): Promise<void>;

package/dist/builtins/games/trek/visual.js

@@ -0,0 +1,87 @@
+/*
+ * visual.ts: a TypeScript port of BSD trek(6), from visual.c.
+ * Ported from NetBSD src/games/trek (trunk 7a9ca154a8f6144307865f23390a3c63b400b801): visual.c 1.10 2009/08/12.
+ *
+ * Copyright (c) 1980, 1993
+ *	The Regents of the University of California.  All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ *
+ */
+/**
+ * @file The visual scan: three sectors in the direction asked, for when
+ * the sensors are out.
+ *
+ * @module
+ */
+import { NSECTS } from './consts.js';
+import { getintpar } from './getpar.js';
+/*
+**  VISUAL SCAN
+**
+**	A visual scan is made in a particular direction of three sectors
+**	in the general direction specified.  This takes time, and
+**	Klingons can attack you, so it should be done only when sensors
+**	are out.
+*/
+/* This struct[] has the delta x, delta y for particular directions */
+// As compiled: struct xy holds unsigned chars, so the C's -1 is stored as 255 and those
+// directions look off the edge ('?'). Kept, so the scan reads as the original's does.
+const Visdelta = [
+    { x: 255, y: 255 },
+    { x: 255, y: 0 },
+    { x: 255, y: 1 },
+    { x: 0, y: 1 },
+    { x: 1, y: 1 },
+    { x: 1, y: 0 },
+    { x: 1, y: 255 },
+    { x: 0, y: 255 },
+    { x: 255, y: 255 },
+    { x: 255, y: 0 },
+    { x: 255, y: 1 },
+];
+/** The sector at a delta from the ship: its character, or '?' off the edge. */
+function look(t, v) {
+    const ix = t.s.Ship.sectx + v.x;
+    const iy = t.s.Ship.secty + v.y;
+    const co = ix < 0 || ix >= NSECTS || iy < 0 || iy >= NSECTS ? '?' : t.s.Sect[ix][iy];
+    return { ix, iy, co };
+}
+/** VISUAL SCAN */
+export async function visual(t, _z) {
+    let co = await getintpar(t, 'direction');
+    if (co < 0 || co > 360)
+        return;
+    co = Math.trunc((co + 22) / 45);
+    const a = look(t, Visdelta[co]);
+    t.io.printf('%d,%d %c ', a.ix, a.iy, a.co);
+    const b = look(t, Visdelta[co + 1]);
+    t.io.printf('%c ', b.co);
+    const c = look(t, Visdelta[co + 2]);
+    t.io.printf('%c %d,%d\n', c.co, c.ix, c.iy);
+    t.s.Move.time = 0.05;
+    t.s.Move.free = 0;
+}
+//# sourceMappingURL=visual.js.map

package/dist/builtins/games/trek/visual.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"visual.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/visual.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GA+BG;AACH;;;;;GAKG;AACH,OAAO,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AAErC,OAAO,EAAE,SAAS,EAAE,MAAM,aAAa,CAAC;AAGxC;;;;;;;EAOE;AAEF,sEAAsE;AACtE,wFAAwF;AACxF,sFAAsF;AACtF,MAAM,QAAQ,GAAsB;IAClC,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC,EAAE,GAAG,EAAE;IAClB,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC,EAAE,CAAC,EAAE;IAChB,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC,EAAE,CAAC,EAAE;IAChB,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE;IACd,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE;IACd,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE;IACd,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,GAAG,EAAE;IAChB,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,GAAG,EAAE;IAChB,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC,EAAE,GAAG,EAAE;IAClB,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC,EAAE,CAAC,EAAE;IAChB,EAAE,CAAC,EAAE,GAAG,EAAE,CAAC,EAAE,CAAC,EAAE;CACjB,CAAC;AAEF,+EAA+E;AAC/E,SAAS,IAAI,CAAC,CAAO,EAAE,CAAK;IAC1B,MAAM,EAAE,GAAW,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC,CAAC;IACxC,MAAM,EAAE,GAAW,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC,CAAC;IACxC,MAAM,EAAE,GAAW,EAAE,GAAG,CAAC,IAAI,EAAE,IAAI,MAAM,IAAI,EAAE,GAAG,CAAC,IAAI,EAAE,IAAI,MAAM,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;IAC7F,OAAO,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC;AACxB,CAAC;AAED,kBAAkB;AAClB,MAAM,CAAC,KAAK,UAAU,MAAM,CAAC,CAAO,EAAE,EAAU;IAC9C,IAAI,EAAE,GAAW,MAAM,SAAS,CAAC,CAAC,EAAE,WAAW,CAAC,CAAC;IACjD,IAAI,EAAE,GAAG,CAAC,IAAI,EAAE,GAAG,GAAG;QAAE,OAAO;IAC/B,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,EAAE,GAAG,EAAE,CAAC,GAAG,EAAE,CAAC,CAAC;IAChC,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,EAAE,QAAQ,CAAC,EAAE,CAAO,CAAC,CAAC;IACtC,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,WAAW,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;IAC3C,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,EAAE,QAAQ,CAAC,EAAE,GAAG,CAAC,CAAO,CAAC,CAAC;IAC1C,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;IACzB,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,EAAE,QAAQ,CAAC,EAAE,GAAG,CAAC,CAAO,CAAC,CAAC;IAC1C,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,YAAY,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;IAC5C,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,GAAG,IAAI,CAAC;IACrB,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC;AACpB,CAAC"}

package/dist/builtins/games/trek/warp.d.ts

@@ -0,0 +1,5 @@
+import type { Trek } from './context.js';
+/** The move and ram commands: asks the course and distance, then warps. */
+export declare function dowarp(t: Trek, fl: number): Promise<void>;
+/** Moves under warp power on course c for distance d. */
+export declare function warp(t: Trek, fl: number, c: number, d: number): Promise<void>;