@fnndsc/brasa 0.43.0 → 0.43.1

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

@@ -1,157 +0,0 @@
-/**
- * @file C's printf formatting, as trek uses it.
- *
- * trek prints through printf with widths, precisions and flags
- * (`%5.1f`, `%14.14s`, `%-3d`); a faithful port prints exactly what the C
- * printed, so this formats as C does: conversions d i u c s f e g x o and
- * %%, flags - + space 0 #, width and precision (either may be `*`).
- * Written for the port (no BSD source here).
- *
- * @module
- */
-/**
- * Formats as C's sprintf.
- *
- * @param format - The format string.
- * @param args - The values, in order.
- * @returns The text.
- */
-export function sprintf(format, ...args) {
-    let out = '';
-    let next = 0;
-    const take = () => args[next++] ?? 0;
-    const spec = /%([-+ 0#]*)(\*|\d+)?(?:\.(\*|\d*))?(?:hh|h|ll|l|L|z|j|t)?([diucsfFeEgGxXo%])/g;
-    let last = 0;
-    let match;
-    while ((match = spec.exec(format)) !== null) {
-        out += format.slice(last, match.index);
-        last = spec.lastIndex;
-        const [, flags = '', widthSpec, precSpec, conversion = ''] = match;
-        if (conversion === '%') {
-            out += '%';
-            continue;
-        }
-        let width = widthSpec === undefined ? 0 : widthSpec === '*' ? Number(take()) : Number(widthSpec);
-        let left = flags.includes('-');
-        if (width < 0) {
-            left = true;
-            width = -width;
-        }
-        const precision = precSpec === undefined ? null : precSpec === '*' ? Number(take()) : Number(precSpec || '0');
-        const value = take();
-        let body;
-        let sign = '';
-        let numeric = true;
-        switch (conversion) {
-            case 'd':
-            case 'i':
-            case 'u': {
-                const n = Math.trunc(Number(value));
-                sign = n < 0 ? '-' : flags.includes('+') ? '+' : flags.includes(' ') ? ' ' : '';
-                body = String(Math.abs(n));
-                if (precision !== null)
-                    body = precision === 0 && n === 0 ? '' : body.padStart(precision, '0');
-                break;
-            }
-            case 'x':
-            case 'X':
-            case 'o': {
-                const n = Math.trunc(Number(value)) >>> 0;
-                body = n.toString(conversion === 'o' ? 8 : 16);
-                if (conversion === 'X')
-                    body = body.toUpperCase();
-                if (precision !== null)
-                    body = body.padStart(precision, '0');
-                if (flags.includes('#') && n !== 0)
-                    body = (conversion === 'o' ? '0' : conversion === 'x' ? '0x' : '0X') + body;
-                break;
-            }
-            case 'c':
-                numeric = false;
-                body = typeof value === 'number' ? String.fromCharCode(value) : String(value).charAt(0);
-                break;
-            case 's':
-                numeric = false;
-                body = String(value);
-                if (precision !== null)
-                    body = body.slice(0, precision);
-                break;
-            default: {
-                const n = Number(value);
-                sign = n < 0 || Object.is(n, -0) ? '-' : flags.includes('+') ? '+' : flags.includes(' ') ? ' ' : '';
-                body = float_format(Math.abs(n), conversion, precision ?? 6, flags.includes('#'));
-            }
-        }
-        let text = sign + body;
-        if (text.length < width) {
-            if (left)
-                text = text.padEnd(width);
-            else if (numeric && flags.includes('0') && !(precision !== null && 'diuxXo'.includes(conversion)))
-                text = sign + body.padStart(width - sign.length, '0');
-            else
-                text = text.padStart(width);
-        }
-        out += text;
-    }
-    return out + format.slice(last);
-}
-/** A non-negative double in %f, %e or %g. */
-function float_format(n, conversion, precision, alternate) {
-    if (!Number.isFinite(n))
-        return Number.isNaN(n) ? 'nan' : 'inf';
-    const lower = conversion.toLowerCase();
-    if (lower === 'f')
-        return fixed_exact(n, precision);
-    if (lower === 'e')
-        return exp_format(n, precision, conversion === 'E');
-    // %g: precision 0 is 1; %e when the exponent is < -4 or >= precision.
-    const p = precision === 0 ? 1 : precision;
-    const exponent = n === 0 ? 0 : Math.floor(Math.log10(Number(n.toExponential(p - 1))));
-    let text = exponent < -4 || exponent >= p ? exp_format(n, p - 1, conversion === 'G') : n.toFixed(Math.max(0, p - 1 - exponent));
-    if (!alternate) {
-        text = text.replace(/(\.\d*?)0+(e|E|$)/, '$1$2').replace(/\.(e|E|$)/, '$1');
-    }
-    return text;
-}
-/** %e: d.ddde+XX, at least two exponent digits. */
-function exp_format(n, precision, upper) {
-    const [mantissa, exp = '0'] = n.toExponential(precision).split('e');
-    const e = Number(exp);
-    const text = `${mantissa}e${e < 0 ? '-' : '+'}${String(Math.abs(e)).padStart(2, '0')}`;
-    return upper ? text.toUpperCase() : text;
-}
-/**
- * %f as glibc prints it: the double's exact binary value rounded to the
- * precision, an exact tie to even. (JavaScript's toFixed rounds a tie up:
- * `%.0f` of 2.5 is 2 in C and 3 in toFixed.)
- *
- * @param n - A non-negative finite double.
- * @param precision - Digits after the point.
- * @returns The digits.
- */
-export function fixed_exact(n, precision) {
-    const view = new DataView(new ArrayBuffer(8));
-    view.setFloat64(0, n);
-    const bits = view.getBigUint64(0);
-    const biased = Number((bits >> 52n) & 0x7ffn);
-    const fraction = bits & ((1n << 52n) - 1n);
-    // n = mantissa * 2^exponent, exactly.
-    const mantissa = biased === 0 ? fraction : fraction | (1n << 52n);
-    const exponent = (biased === 0 ? 1 : biased) - 1075;
-    const scale = 10n ** BigInt(precision);
-    let digits;
-    if (exponent >= 0) {
-        digits = (mantissa << BigInt(exponent)) * scale;
-    }
-    else {
-        const numerator = mantissa * scale;
-        const denominator = 1n << BigInt(-exponent);
-        digits = numerator / denominator;
-        const twice = (numerator % denominator) * 2n;
-        if (twice > denominator || (twice === denominator && digits % 2n === 1n))
-            digits += 1n;
-    }
-    const text = digits.toString().padStart(precision + 1, '0');
-    return precision === 0 ? text : `${text.slice(0, text.length - precision)}.${text.slice(text.length - precision)}`;
-}
-//# sourceMappingURL=printf.js.map

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

@@ -1 +0,0 @@
-{"version":3,"file":"printf.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/printf.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;GAUG;AAKH;;;;;;GAMG;AACH,MAAM,UAAU,OAAO,CAAC,MAAc,EAAE,GAAG,IAAiB;IAC1D,IAAI,GAAG,GAAW,EAAE,CAAC;IACrB,IAAI,IAAI,GAAW,CAAC,CAAC;IACrB,MAAM,IAAI,GAAG,GAAc,EAAE,CAAC,IAAI,CAAC,IAAI,EAAE,CAAC,IAAI,CAAC,CAAC;IAChD,MAAM,IAAI,GAAW,+EAA+E,CAAC;IACrG,IAAI,IAAI,GAAW,CAAC,CAAC;IACrB,IAAI,KAA6B,CAAC;IAClC,OAAO,CAAC,KAAK,GAAG,IAAI,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,KAAK,IAAI,EAAE,CAAC;QAC5C,GAAG,IAAI,MAAM,CAAC,KAAK,CAAC,IAAI,EAAE,KAAK,CAAC,KAAK,CAAC,CAAC;QACvC,IAAI,GAAG,IAAI,CAAC,SAAS,CAAC;QACtB,MAAM,CAAC,EAAE,KAAK,GAAG,EAAE,EAAE,SAAS,EAAE,QAAQ,EAAE,UAAU,GAAG,EAAE,CAAC,GAAG,KAAK,CAAC;QACnE,IAAI,UAAU,KAAK,GAAG,EAAE,CAAC;YAAC,GAAG,IAAI,GAAG,CAAC;YAAC,SAAS;QAAC,CAAC;QACjD,IAAI,KAAK,GAAW,SAAS,KAAK,SAAS,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,SAAS,KAAK,GAAG,CAAC,CAAC,CAAC,MAAM,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,SAAS,CAAC,CAAC;QACzG,IAAI,IAAI,GAAY,KAAK,CAAC,QAAQ,CAAC,GAAG,CAAC,CAAC;QACxC,IAAI,KAAK,GAAG,CAAC,EAAE,CAAC;YAAC,IAAI,GAAG,IAAI,CAAC;YAAC,KAAK,GAAG,CAAC,KAAK,CAAC;QAAC,CAAC;QAC/C,MAAM,SAAS,GAAkB,QAAQ,KAAK,SAAS,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,QAAQ,KAAK,GAAG,CAAC,CAAC,CAAC,MAAM,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,QAAQ,IAAI,GAAG,CAAC,CAAC;QAC7H,MAAM,KAAK,GAAc,IAAI,EAAE,CAAC;QAChC,IAAI,IAAY,CAAC;QACjB,IAAI,IAAI,GAAW,EAAE,CAAC;QACtB,IAAI,OAAO,GAAY,IAAI,CAAC;QAC5B,QAAQ,UAAU,EAAE,CAAC;YACnB,KAAK,GAAG,CAAC;YAAC,KAAK,GAAG,CAAC;YAAC,KAAK,GAAG,CAAC,CAAC,CAAC;gBAC7B,MAAM,CAAC,GAAW,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC;gBAC5C,IAAI,GAAG,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,QAAQ,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,QAAQ,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC;gBAChF,IAAI,GAAG,MAAM,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;gBAC3B,IAAI,SAAS,KAAK,IAAI;oBAAE,IAAI,GAAG,SAAS,KAAK,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC,QAAQ,CAAC,SAAS,EAAE,GAAG,CAAC,CAAC;gBAC/F,MAAM;YACR,CAAC;YACD,KAAK,GAAG,CAAC;YAAC,KAAK,GAAG,CAAC;YAAC,KAAK,GAAG,CAAC,CAAC,CAAC;gBAC7B,MAAM,CAAC,GAAW,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,KAAK,CAAC,CAAC;gBAClD,IAAI,GAAG,CAAC,CAAC,QAAQ,CAAC,UAAU,KAAK,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC;gBAC/C,IAAI,UAAU,KAAK,GAAG;oBAAE,IAAI,GAAG,IAAI,CAAC,WAAW,EAAE,CAAC;gBAClD,IAAI,SAAS,KAAK,IAAI;oBAAE,IAAI,GAAG,IAAI,CAAC,QAAQ,CAAC,SAAS,EAAE,GAAG,CAAC,CAAC;gBAC7D,IAAI,KAAK,CAAC,QAAQ,CAAC,GAAG,CAAC,IAAI,CAAC,KAAK,CAAC;oBAAE,IAAI,GAAG,CAAC,UAAU,KAAK,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,UAAU,KAAK,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,IAAI,CAAC;gBAChH,MAAM;YACR,CAAC;YACD,KAAK,GAAG;gBACN,OAAO,GAAG,KAAK,CAAC;gBAChB,IAAI,GAAG,OAAO,KAAK,KAAK,QAAQ,CAAC,CAAC,CAAC,MAAM,CAAC,YAAY,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC;gBACxF,MAAM;YACR,KAAK,GAAG;gBACN,OAAO,GAAG,KAAK,CAAC;gBAChB,IAAI,GAAG,MAAM,CAAC,KAAK,CAAC,CAAC;gBACrB,IAAI,SAAS,KAAK,IAAI;oBAAE,IAAI,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,EAAE,SAAS,CAAC,CAAC;gBACxD,MAAM;YACR,OAAO,CAAC,CAAC,CAAC;gBACR,MAAM,CAAC,GAAW,MAAM,CAAC,KAAK,CAAC,CAAC;gBAChC,IAAI,GAAG,CAAC,GAAG,CAAC,IAAI,MAAM,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,QAAQ,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,QAAQ,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC;gBACpG,IAAI,GAAG,YAAY,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,UAAU,EAAE,SAAS,IAAI,CAAC,EAAE,KAAK,CAAC,QAAQ,CAAC,GAAG,CAAC,CAAC,CAAC;YACpF,CAAC;QACH,CAAC;QACD,IAAI,IAAI,GAAW,IAAI,GAAG,IAAI,CAAC;QAC/B,IAAI,IAAI,CAAC,MAAM,GAAG,KAAK,EAAE,CAAC;YACxB,IAAI,IAAI;gBAAE,IAAI,GAAG,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC;iBAC/B,IAAI,OAAO,IAAI,KAAK,CAAC,QAAQ,CAAC,GAAG,CAAC,IAAI,CAAC,CAAC,SAAS,KAAK,IAAI,IAAI,QAAQ,CAAC,QAAQ,CAAC,UAAU,CAAC,CAAC;gBAAE,IAAI,GAAG,IAAI,GAAG,IAAI,CAAC,QAAQ,CAAC,KAAK,GAAG,IAAI,CAAC,MAAM,EAAE,GAAG,CAAC,CAAC;;gBACpJ,IAAI,GAAG,IAAI,CAAC,QAAQ,CAAC,KAAK,CAAC,CAAC;QACnC,CAAC;QACD,GAAG,IAAI,IAAI,CAAC;IACd,CAAC;IACD,OAAO,GAAG,GAAG,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC;AAClC,CAAC;AAED,6CAA6C;AAC7C,SAAS,YAAY,CAAC,CAAS,EAAE,UAAkB,EAAE,SAAiB,EAAE,SAAkB;IACxF,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,CAAC,CAAC;QAAE,OAAO,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,KAAK,CAAC;IAChE,MAAM,KAAK,GAAW,UAAU,CAAC,WAAW,EAAE,CAAC;IAC/C,IAAI,KAAK,KAAK,GAAG;QAAE,OAAO,WAAW,CAAC,CAAC,EAAE,SAAS,CAAC,CAAC;IACpD,IAAI,KAAK,KAAK,GAAG;QAAE,OAAO,UAAU,CAAC,CAAC,EAAE,SAAS,EAAE,UAAU,KAAK,GAAG,CAAC,CAAC;IACvE,sEAAsE;IACtE,MAAM,CAAC,GAAW,SAAS,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,SAAS,CAAC;IAClD,MAAM,QAAQ,GAAW,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC,CAAC,aAAa,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;IAC9F,IAAI,IAAI,GAAW,QAAQ,GAAG,CAAC,CAAC,IAAI,QAAQ,IAAI,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,UAAU,KAAK,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,EAAE,CAAC,GAAG,CAAC,GAAG,QAAQ,CAAC,CAAC,CAAC;IACxI,IAAI,CAAC,SAAS,EAAE,CAAC;QACf,IAAI,GAAG,IAAI,CAAC,OAAO,CAAC,mBAAmB,EAAE,MAAM,CAAC,CAAC,OAAO,CAAC,WAAW,EAAE,IAAI,CAAC,CAAC;IAC9E,CAAC;IACD,OAAO,IAAI,CAAC;AACd,CAAC;AAED,mDAAmD;AACnD,SAAS,UAAU,CAAC,CAAS,EAAE,SAAiB,EAAE,KAAc;IAC9D,MAAM,CAAC,QAAQ,EAAE,GAAG,GAAG,GAAG,CAAC,GAAG,CAAC,CAAC,aAAa,CAAC,SAAS,CAAC,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC;IACpE,MAAM,CAAC,GAAW,MAAM,CAAC,GAAG,CAAC,CAAC;IAC9B,MAAM,IAAI,GAAW,GAAG,QAAQ,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,GAAG,MAAM,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,QAAQ,CAAC,CAAC,EAAE,GAAG,CAAC,EAAE,CAAC;IAC/F,OAAO,KAAK,CAAC,CAAC,CAAC,IAAI,CAAC,WAAW,EAAE,CAAC,CAAC,CAAC,IAAI,CAAC;AAC3C,CAAC;AAED;;;;;;;;GAQG;AACH,MAAM,UAAU,WAAW,CAAC,CAAS,EAAE,SAAiB;IACtD,MAAM,IAAI,GAAa,IAAI,QAAQ,CAAC,IAAI,WAAW,CAAC,CAAC,CAAC,CAAC,CAAC;IACxD,IAAI,CAAC,UAAU,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;IACtB,MAAM,IAAI,GAAW,IAAI,CAAC,YAAY,CAAC,CAAC,CAAC,CAAC;IAC1C,MAAM,MAAM,GAAW,MAAM,CAAC,CAAC,IAAI,IAAI,GAAG,CAAC,GAAG,MAAM,CAAC,CAAC;IACtD,MAAM,QAAQ,GAAW,IAAI,GAAG,CAAC,CAAC,EAAE,IAAI,GAAG,CAAC,GAAG,EAAE,CAAC,CAAC;IACnD,sCAAsC;IACtC,MAAM,QAAQ,GAAW,MAAM,KAAK,CAAC,CAAC,CAAC,CAAC,QAAQ,CAAC,CAAC,CAAC,QAAQ,GAAG,CAAC,EAAE,IAAI,GAAG,CAAC,CAAC;IAC1E,MAAM,QAAQ,GAAW,CAAC,MAAM,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;IAC5D,MAAM,KAAK,GAAW,GAAG,IAAI,MAAM,CAAC,SAAS,CAAC,CAAC;IAC/C,IAAI,MAAc,CAAC;IACnB,IAAI,QAAQ,IAAI,CAAC,EAAE,CAAC;QAClB,MAAM,GAAG,CAAC,QAAQ,IAAI,MAAM,CAAC,QAAQ,CAAC,CAAC,GAAG,KAAK,CAAC;IAClD,CAAC;SAAM,CAAC;QACN,MAAM,SAAS,GAAW,QAAQ,GAAG,KAAK,CAAC;QAC3C,MAAM,WAAW,GAAW,EAAE,IAAI,MAAM,CAAC,CAAC,QAAQ,CAAC,CAAC;QACpD,MAAM,GAAG,SAAS,GAAG,WAAW,CAAC;QACjC,MAAM,KAAK,GAAW,CAAC,SAAS,GAAG,WAAW,CAAC,GAAG,EAAE,CAAC;QACrD,IAAI,KAAK,GAAG,WAAW,IAAI,CAAC,KAAK,KAAK,WAAW,IAAI,MAAM,GAAG,EAAE,KAAK,EAAE,CAAC;YAAE,MAAM,IAAI,EAAE,CAAC;IACzF,CAAC;IACD,MAAM,IAAI,GAAW,MAAM,CAAC,QAAQ,EAAE,CAAC,QAAQ,CAAC,SAAS,GAAG,CAAC,EAAE,GAAG,CAAC,CAAC;IACpE,OAAO,SAAS,KAAK,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,EAAE,IAAI,CAAC,MAAM,GAAG,SAAS,CAAC,IAAI,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,MAAM,GAAG,SAAS,CAAC,EAAE,CAAC;AACrH,CAAC"}

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

@@ -1,3 +0,0 @@
-import type { Trek } from './context.js';
-/** Rams whatever is at ix,iy. */
-export declare function ram(t: Trek, ix: number, iy: number): Promise<void>;

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

@@ -1,97 +0,0 @@
-/*
- * ram.ts: a TypeScript port of BSD trek(6), from ram.c.
- * Ported from NetBSD src/games/trek (trunk 7a9ca154a8f6144307865f23390a3c63b400b801): ram.c 1.8 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 Ramming an object: a Klingon, a star or a starbase.
- *
- * @module
- */
-import { BASE, INHABIT, KLINGON, L_STAR, NDEV, SINS, STAR } from './consts.js';
-import { damage } from './damage.js';
-import { damaged } from './damaged.js';
-import { killb, killk } from './kill.js';
-import { lose } from './lose.js';
-import { franf, ranf } from './rand.js';
-/*
-**  RAM SOME OBJECT
-**
-**	You have run into some sort of object.  It may be a Klingon,
-**	a star, or a starbase.  If you run into a star, you are really
-**	stupid, because there is no hope for you.
-**
-**	If you run into something else, you destroy that object.  You
-**	also rack up incredible damages.
-*/
-/** Rams whatever is at ix,iy. */
-export async function ram(t, ix, iy) {
-    const { Ship, Game, Param } = t.s;
-    let i;
-    t.io.printf('\x07RED ALERT\x07: collision imminent\n');
-    const c = t.s.Sect[ix][iy];
-    switch (c) {
-        case KLINGON:
-            t.io.printf('%s rams Klingon at %d,%d\n', Ship.shipname, ix, iy);
-            await killk(t, ix, iy);
-            break;
-        case STAR:
-        case INHABIT:
-            t.io.printf("Yeoman Rand: Captain, isn't it getting hot in here?\n");
-            await t.io.sleep(2);
-            t.io.printf('Spock: Hull temperature approaching 550 Degrees ' +
-                'Kelvin.\n');
-            await lose(t, L_STAR);
-        // falls through (lose() never returns)
-        case BASE:
-            t.io.printf('You ran into the starbase at %d,%d\n', ix, iy);
-            await killb(t, Ship.quadx, Ship.quady);
-            /* don't penalize the captain if it wasn't his fault */
-            if (!damaged(t, SINS))
-                Game.killb += 1;
-            break;
-    }
-    await t.io.sleep(2);
-    t.io.printf('%s heavily damaged\n', Ship.shipname);
-    /* select the number of deaths to occur */
-    i = 10 + ranf(t.rnd, 20 * Game.skill);
-    Game.deaths += i;
-    Ship.crew -= i;
-    t.io.printf('McCoy: Take it easy Jim; we had %d casualties.\n', i);
-    /* damage devices with an 80% probability */
-    for (i = 0; i < NDEV; i++) {
-        if (ranf(t.rnd, 100) < 20)
-            continue;
-        await damage(t, i, (2.5 * (franf(t.rnd) + franf(t.rnd)) + 1.0) * Param.damfac[i]);
-    }
-    /* no chance that your shields remained up in all that */
-    Ship.shldup = 0;
-}
-//# sourceMappingURL=ram.js.map

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

@@ -1 +0,0 @@
-{"version":3,"file":"ram.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/ram.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GA+BG;AACH;;;;GAIG;AACH,OAAO,EAAE,IAAI,EAAE,OAAO,EAAE,OAAO,EAAE,MAAM,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,MAAM,aAAa,CAAC;AAE/E,OAAO,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AACrC,OAAO,EAAE,OAAO,EAAE,MAAM,cAAc,CAAC;AACvC,OAAO,EAAE,KAAK,EAAE,KAAK,EAAE,MAAM,WAAW,CAAC;AACzC,OAAO,EAAE,IAAI,EAAE,MAAM,WAAW,CAAC;AACjC,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,WAAW,CAAC;AAExC;;;;;;;;;EASE;AAEF,iCAAiC;AACjC,MAAM,CAAC,KAAK,UAAU,GAAG,CAAC,CAAO,EAAE,EAAU,EAAE,EAAU;IACvD,MAAM,EAAE,IAAI,EAAE,IAAI,EAAE,KAAK,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;IAClC,IAAI,CAAS,CAAC;IAEd,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,yCAAyC,CAAC,CAAC;IACvD,MAAM,CAAC,GAAW,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC;IACnC,QAAQ,CAAC,EAAE,CAAC;QACV,KAAK,OAAO;YACV,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,4BAA4B,EAAE,IAAI,CAAC,QAAQ,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;YACjE,MAAM,KAAK,CAAC,CAAC,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;YACvB,MAAM;QAER,KAAK,IAAI,CAAC;QACV,KAAK,OAAO;YACV,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,uDAAuD,CAAC,CAAC;YACrE,MAAM,CAAC,CAAC,EAAE,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC;YACpB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,kDAAkD;gBAC5D,WAAW,CAAC,CAAC;YACf,MAAM,IAAI,CAAC,CAAC,EAAE,MAAM,CAAC,CAAC;QACtB,uCAAuC;QACzC,KAAK,IAAI;YACP,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,sCAAsC,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;YAC5D,MAAM,KAAK,CAAC,CAAC,EAAE,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,KAAK,CAAC,CAAC;YACvC,uDAAuD;YACvD,IAAI,CAAC,OAAO,CAAC,CAAC,EAAE,IAAI,CAAC;gBAAE,IAAI,CAAC,KAAK,IAAI,CAAC,CAAC;YACvC,MAAM;IACV,CAAC;IACD,MAAM,CAAC,CAAC,EAAE,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC;IACpB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,sBAAsB,EAAE,IAAI,CAAC,QAAQ,CAAC,CAAC;IAEnD,0CAA0C;IAC1C,CAAC,GAAG,EAAE,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC;IACtC,IAAI,CAAC,MAAM,IAAI,CAAC,CAAC;IACjB,IAAI,CAAC,IAAI,IAAI,CAAC,CAAC;IACf,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,kDAAkD,EAAE,CAAC,CAAC,CAAC;IAEnE,4CAA4C;IAC5C,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC;QAC1B,IAAI,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,GAAG,CAAC,GAAG,EAAE;YAAE,SAAS;QACpC,MAAM,MAAM,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,GAAG,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,GAAG,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,GAAG,CAAC,GAAG,KAAK,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAC;IACpF,CAAC;IAED,yDAAyD;IACzD,IAAI,CAAC,MAAM,GAAG,CAAC,CAAC;AAClB,CAAC"}

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

@@ -1,29 +0,0 @@
-/** glibc's random(), from a seed. */
-export declare class TrekRandom {
-    private table;
-    private front;
-    private rear;
-    /**
-     * @param seed - As srandom() takes it.
-     */
-    constructor(seed: number);
-    /** Seeds as glibc's srandom (TYPE_3, degree 31, separation 3). */
-    srandom(seed: number): void;
-    /** The next value, 0 .. RANDOM_MAX. */
-    random(): number;
-}
-/**
- * ranf: a random integer, 0 .. max-1 (0 when max <= 0).
- *
- * @param rnd - The source.
- * @param max - The bound.
- * @returns The integer.
- */
-export declare function ranf(rnd: TrekRandom, max: number): number;
-/**
- * franf: a random double, 0 .. 1.
- *
- * @param rnd - The source.
- * @returns The double.
- */
-export declare function franf(rnd: TrekRandom): number;

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

@@ -1,109 +0,0 @@
-/*
- * rand.ts: a TypeScript port of BSD trek(6), from ranf.c.
- * Ported from NetBSD src/games/trek (trunk 7a9ca154a8f6144307865f23390a3c63b400b801): ranf.c 1.7 2009/05/25.
- *
- * 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 trek's random source: ranf() and franf() over random().
- *
- * random() is glibc's, reproduced exactly (the additive feedback generator
- * of degree 31, seeded as srandom() seeds it), so a game played here from a
- * seed is the game the C plays from the same seed: the port is checked
- * against the original, transcript for transcript.
- *
- * @module
- */
-import { RANDOM_MAX } from './consts.js';
-/** glibc's random(), from a seed. */
-export class TrekRandom {
-    table = [];
-    front = 0;
-    rear = 0;
-    /**
-     * @param seed - As srandom() takes it.
-     */
-    constructor(seed) {
-        this.srandom(seed);
-    }
-    /** Seeds as glibc's srandom (TYPE_3, degree 31, separation 3). */
-    srandom(seed) {
-        let word = seed | 0;
-        if (word === 0)
-            word = 1;
-        const state = new Array(31);
-        state[0] = word;
-        for (let i = 1; i < 31; i++) {
-            // 16807 * state[i-1] % 2147483647, by Schrage's method, as glibc does.
-            const hi = Math.trunc(word / 127773);
-            const lo = word % 127773;
-            word = 16807 * lo - 2836 * hi;
-            if (word < 0)
-                word += 2147483647;
-            state[i] = word;
-        }
-        this.table = state;
-        this.front = 3;
-        this.rear = 0;
-        // glibc discards the first 310 outputs.
-        for (let i = 0; i < 310; i++)
-            this.random();
-    }
-    /** The next value, 0 .. RANDOM_MAX. */
-    random() {
-        const sum = (this.table[this.front] + this.table[this.rear]) | 0;
-        this.table[this.front] = sum;
-        const result = (sum >>> 1) & RANDOM_MAX;
-        this.front = (this.front + 1) % 31;
-        this.rear = (this.rear + 1) % 31;
-        return result;
-    }
-}
-/**
- * ranf: a random integer, 0 .. max-1 (0 when max <= 0).
- *
- * @param rnd - The source.
- * @param max - The bound.
- * @returns The integer.
- */
-export function ranf(rnd, max) {
-    if (max <= 0)
-        return 0;
-    return rnd.random() % max;
-}
-/**
- * franf: a random double, 0 .. 1.
- *
- * @param rnd - The source.
- * @returns The double.
- */
-export function franf(rnd) {
-    return rnd.random() / RANDOM_MAX;
-}
-//# sourceMappingURL=rand.js.map

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

@@ -1 +0,0 @@
-{"version":3,"file":"rand.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/rand.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GA+BG;AACH;;;;;;;;;GASG;AACH,OAAO,EAAE,UAAU,EAAE,MAAM,aAAa,CAAC;AAEzC,qCAAqC;AACrC,MAAM,OAAO,UAAU;IACb,KAAK,GAAa,EAAE,CAAC;IACrB,KAAK,GAAW,CAAC,CAAC;IAClB,IAAI,GAAW,CAAC,CAAC;IAEzB;;OAEG;IACH,YAAY,IAAY;QACtB,IAAI,CAAC,OAAO,CAAC,IAAI,CAAC,CAAC;IACrB,CAAC;IAED,kEAAkE;IAC3D,OAAO,CAAC,IAAY;QACzB,IAAI,IAAI,GAAW,IAAI,GAAG,CAAC,CAAC;QAC5B,IAAI,IAAI,KAAK,CAAC;YAAE,IAAI,GAAG,CAAC,CAAC;QACzB,MAAM,KAAK,GAAa,IAAI,KAAK,CAAS,EAAE,CAAC,CAAC;QAC9C,KAAK,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC;QAChB,KAAK,IAAI,CAAC,GAAW,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;YACpC,uEAAuE;YACvE,MAAM,EAAE,GAAW,IAAI,CAAC,KAAK,CAAC,IAAI,GAAG,MAAM,CAAC,CAAC;YAC7C,MAAM,EAAE,GAAW,IAAI,GAAG,MAAM,CAAC;YACjC,IAAI,GAAG,KAAK,GAAG,EAAE,GAAG,IAAI,GAAG,EAAE,CAAC;YAC9B,IAAI,IAAI,GAAG,CAAC;gBAAE,IAAI,IAAI,UAAU,CAAC;YACjC,KAAK,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC;QAClB,CAAC;QACD,IAAI,CAAC,KAAK,GAAG,KAAK,CAAC;QACnB,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC;QACf,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC;QACd,wCAAwC;QACxC,KAAK,IAAI,CAAC,GAAW,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE;YAAE,IAAI,CAAC,MAAM,EAAE,CAAC;IACtD,CAAC;IAED,uCAAuC;IAChC,MAAM;QACX,MAAM,GAAG,GAAW,CAAE,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,KAAK,CAAY,GAAI,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,IAAI,CAAY,CAAC,GAAG,CAAC,CAAC;QACjG,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,KAAK,CAAC,GAAG,GAAG,CAAC;QAC7B,MAAM,MAAM,GAAW,CAAC,GAAG,KAAK,CAAC,CAAC,GAAG,UAAU,CAAC;QAChD,IAAI,CAAC,KAAK,GAAG,CAAC,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC,GAAG,EAAE,CAAC;QACnC,IAAI,CAAC,IAAI,GAAG,CAAC,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC,GAAG,EAAE,CAAC;QACjC,OAAO,MAAM,CAAC;IAChB,CAAC;CACF;AAED;;;;;;GAMG;AACH,MAAM,UAAU,IAAI,CAAC,GAAe,EAAE,GAAW;IAC/C,IAAI,GAAG,IAAI,CAAC;QAAE,OAAO,CAAC,CAAC;IACvB,OAAO,GAAG,CAAC,MAAM,EAAE,GAAG,GAAG,CAAC;AAC5B,CAAC;AAED;;;;;GAKG;AACH,MAAM,UAAU,KAAK,CAAC,GAAe;IACnC,OAAO,GAAG,CAAC,MAAM,EAAE,GAAG,UAAU,CAAC;AACnC,CAAC"}

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

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

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

@@ -1,76 +0,0 @@
-/*
- * rest.ts: a TypeScript port of BSD trek(6), from rest.c.
- * Ported from NetBSD src/games/trek (trunk 7a9ca154a8f6144307865f23390a3c63b400b801): rest.c 1.9 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 Resting for repairs: waiting for something to happen, never
- * through a long range tractor beam.
- *
- * @module
- */
-import { DOCKED, E_LRTB } from './consts.js';
-import { getfltpar, getynpar } from './getpar.js';
-/*
-**  REST FOR REPAIRS
-**
-**	You sit around and wait for repairs to happen.  Actually, you
-**	sit around and wait for anything to happen.  I do want to point
-**	out however, that Klingons are not as patient as you are, and
-**	they tend to attack you while you are resting.
-**
-**	You can never rest through a long range tractor beam.
-**
-**	In events() you will be given an opportunity to cancel the
-**	rest period if anything momentous happens.
-*/
-/** The rest command. */
-export async function rest(t, _v) {
-    const { Ship, Move } = t.s;
-    let tm;
-    /* get the time to rest */
-    tm = await getfltpar(t, 'How long');
-    if (tm <= 0.0)
-        return;
-    const percent = Math.trunc(100 * tm / t.s.Now.time + 0.5);
-    if (percent >= 70) {
-        t.io.printf('Spock: That would take %d%% of our remaining time.\n', percent);
-        if (!(await getynpar(t, 'Are you really certain that is wise')))
-            return;
-    }
-    Move.time = tm;
-    /* boundary condition is the LRTB */
-    tm = t.s.Event[t.s.Now.eventptr[E_LRTB]].date - t.s.Now.date;
-    if (Ship.cond !== DOCKED && Move.time > tm)
-        Move.time = tm + 0.0001;
-    Move.free = 0;
-    Move.resting = 1;
-}
-//# sourceMappingURL=rest.js.map

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

@@ -1 +0,0 @@
-{"version":3,"file":"rest.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/rest.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GA+BG;AACH;;;;;GAKG;AACH,OAAO,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AAE7C,OAAO,EAAE,SAAS,EAAE,QAAQ,EAAE,MAAM,aAAa,CAAC;AAElD;;;;;;;;;;;;EAYE;AAEF,wBAAwB;AACxB,MAAM,CAAC,KAAK,UAAU,IAAI,CAAC,CAAO,EAAE,EAAU;IAC5C,MAAM,EAAE,IAAI,EAAE,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;IAC3B,IAAI,EAAU,CAAC;IAEf,0BAA0B;IAC1B,EAAE,GAAG,MAAM,SAAS,CAAC,CAAC,EAAE,UAAU,CAAC,CAAC;IACpC,IAAI,EAAE,IAAI,GAAG;QAAE,OAAO;IACtB,MAAM,OAAO,GAAW,IAAI,CAAC,KAAK,CAAC,GAAG,GAAG,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,IAAI,GAAG,GAAG,CAAC,CAAC;IAClE,IAAI,OAAO,IAAI,EAAE,EAAE,CAAC;QAClB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,sDAAsD,EAChE,OAAO,CAAC,CAAC;QACX,IAAI,CAAC,CAAC,MAAM,QAAQ,CAAC,CAAC,EAAE,qCAAqC,CAAC,CAAC;YAAE,OAAO;IAC1E,CAAC;IACD,IAAI,CAAC,IAAI,GAAG,EAAE,CAAC;IAEf,oCAAoC;IACpC,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,IAAI,CAAC;IAC7D,IAAI,IAAI,CAAC,IAAI,KAAK,MAAM,IAAI,IAAI,CAAC,IAAI,GAAG,EAAE;QAAE,IAAI,CAAC,IAAI,GAAG,EAAE,GAAG,MAAM,CAAC;IACpE,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC;IACd,IAAI,CAAC,OAAO,GAAG,CAAC,CAAC;AACnB,CAAC"}

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

@@ -1,23 +0,0 @@
-/**
- * @file The event queue: scheduling, rescheduling and unscheduling an
- * event, and the abbreviated forms whose dates are drawn at random.
- *
- * An event is named by its slot in `Event`; -1 stands for the C's NULL.
- *
- * @module
- */
-import type { Trek } from './context.js';
-/**
- * SCHEDULE AN EVENT: an event of type 'type' is scheduled for time NOW +
- * 'offset' into the first available slot; 'x', 'y' and 'z' are its
- * attributes. The slot is returned.
- */
-export declare function schedule(t: Trek, type: number, offset: number, x: number, y: number, z: number): number;
-/** RESCHEDULE AN EVENT: the event in slot 'e' is rescheduled to the current time plus 'offset'. */
-export declare function reschedule(t: Trek, e: number, offset: number): void;
-/** UNSCHEDULE AN EVENT: the event at slot 'e' is deleted. */
-export declare function unschedule(t: Trek, e: number): void;
-/** Abbreviated schedule routine: the event index and a factor for the time figure. */
-export declare function xsched(t: Trek, ev: number, factor: number, x: number, y: number, z: number): number;
-/** Simplified reschedule routine: the event, its index and the division factor. */
-export declare function xresched(t: Trek, e: number, ev: number, factor: number): void;

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

@@ -1,55 +0,0 @@
-import { E_EVENT, E_GHOST, MAXEVENTS, TOOLARGE } from './consts.js';
-import { franf } from './rand.js';
-/**
- * SCHEDULE AN EVENT: an event of type 'type' is scheduled for time NOW +
- * 'offset' into the first available slot; 'x', 'y' and 'z' are its
- * attributes. The slot is returned.
- */
-export function schedule(t, type, offset, x, y, z) {
-    const date = t.s.Now.date + offset;
-    for (let i = 0; i < MAXEVENTS; i++) {
-        const e = t.s.Event[i];
-        if (e.evcode)
-            continue;
-        // got a slot
-        if (t.s.Trace)
-            t.io.printf('schedule: type %d @ %.2f slot %d parm %d %d %d\n', type, date, i, x, y, z);
-        e.evcode = type;
-        e.date = date;
-        e.x = x;
-        e.y = y;
-        e.systemname = z;
-        t.s.Now.eventptr[type & ~E_GHOST] = i;
-        return i;
-    }
-    t.io.printf('trek: Cannot schedule event %d parm %d %d %d\n', type, x, y, z);
-    return t.io.exit(1);
-}
-/** RESCHEDULE AN EVENT: the event in slot 'e' is rescheduled to the current time plus 'offset'. */
-export function reschedule(t, e, offset) {
-    const ev = t.s.Event[e];
-    const date = t.s.Now.date + offset;
-    ev.date = date;
-    if (t.s.Trace)
-        t.io.printf('reschedule: type %d parm %d %d %d @ %.2f\n', ev.evcode, ev.x, ev.y, ev.systemname, date);
-}
-/** UNSCHEDULE AN EVENT: the event at slot 'e' is deleted. */
-export function unschedule(t, e) {
-    const ev = t.s.Event[e];
-    if (t.s.Trace)
-        t.io.printf('unschedule: type %d @ %.2f parm %d %d %d\n', ev.evcode, ev.date, ev.x, ev.y, ev.systemname);
-    t.s.Now.eventptr[ev.evcode & E_EVENT] = -1;
-    ev.date = TOOLARGE;
-    ev.evcode = 0;
-}
-/** Abbreviated schedule routine: the event index and a factor for the time figure. */
-export function xsched(t, ev, factor, x, y, z) {
-    const when = -t.s.Param.eventdly[ev] * t.s.Param.time * Math.log(franf(t.rnd)) / factor;
-    return schedule(t, ev, when, x, y, z);
-}
-/** Simplified reschedule routine: the event, its index and the division factor. */
-export function xresched(t, e, ev, factor) {
-    const when = -t.s.Param.eventdly[ev] * t.s.Param.time * Math.log(franf(t.rnd)) / factor;
-    reschedule(t, e, when);
-}
-//# sourceMappingURL=schedule.js.map

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

@@ -1 +0,0 @@
-{"version":3,"file":"schedule.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/schedule.ts"],"names":[],"mappings":"AAyCA,OAAO,EAAE,OAAO,EAAE,OAAO,EAAE,SAAS,EAAE,QAAQ,EAAE,MAAM,aAAa,CAAC;AACpE,OAAO,EAAE,KAAK,EAAE,MAAM,WAAW,CAAC;AAGlC;;;;GAIG;AACH,MAAM,UAAU,QAAQ,CAAC,CAAO,EAAE,IAAY,EAAE,MAAc,EAAE,CAAS,EAAE,CAAS,EAAE,CAAS;IAC7F,MAAM,IAAI,GAAW,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,IAAI,GAAG,MAAM,CAAC;IAC3C,KAAK,IAAI,CAAC,GAAW,CAAC,EAAE,CAAC,GAAG,SAAS,EAAE,CAAC,EAAE,EAAE,CAAC;QAC3C,MAAM,CAAC,GAAc,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAc,CAAC;QAC/C,IAAI,CAAC,CAAC,MAAM;YAAE,SAAS;QACvB,aAAa;QACb,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK;YAAE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,kDAAkD,EAAE,IAAI,EAAE,IAAI,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;QACvG,CAAC,CAAC,MAAM,GAAG,IAAI,CAAC;QAChB,CAAC,CAAC,IAAI,GAAG,IAAI,CAAC;QACd,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC;QACR,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC;QACR,CAAC,CAAC,UAAU,GAAG,CAAC,CAAC;QACjB,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,GAAG,CAAC,OAAO,CAAC,GAAG,CAAC,CAAC;QACtC,OAAO,CAAC,CAAC;IACX,CAAC;IACD,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,gDAAgD,EAAE,IAAI,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;IAC7E,OAAO,CAAC,CAAC,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;AACtB,CAAC;AAED,mGAAmG;AACnG,MAAM,UAAU,UAAU,CAAC,CAAO,EAAE,CAAS,EAAE,MAAc;IAC3D,MAAM,EAAE,GAAc,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAc,CAAC;IAChD,MAAM,IAAI,GAAW,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,IAAI,GAAG,MAAM,CAAC;IAC3C,EAAE,CAAC,IAAI,GAAG,IAAI,CAAC;IACf,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK;QAAE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,4CAA4C,EAAE,EAAE,CAAC,MAAM,EAAE,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,UAAU,EAAE,IAAI,CAAC,CAAC;AACvH,CAAC;AAED,6DAA6D;AAC7D,MAAM,UAAU,UAAU,CAAC,CAAO,EAAE,CAAS;IAC3C,MAAM,EAAE,GAAc,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAc,CAAC;IAChD,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK;QAAE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,4CAA4C,EAAE,EAAE,CAAC,MAAM,EAAE,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,EAAE,EAAE,CAAC,UAAU,CAAC,CAAC;IACxH,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,QAAQ,CAAC,EAAE,CAAC,MAAM,GAAG,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC;IAC3C,EAAE,CAAC,IAAI,GAAG,QAAQ,CAAC;IACnB,EAAE,CAAC,MAAM,GAAG,CAAC,CAAC;AAChB,CAAC;AAED,sFAAsF;AACtF,MAAM,UAAU,MAAM,CAAC,CAAO,EAAE,EAAU,EAAE,MAAc,EAAE,CAAS,EAAE,CAAS,EAAE,CAAS;IACzF,MAAM,IAAI,GAAW,CAAE,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,QAAQ,CAAC,EAAE,CAAY,GAAG,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,GAAG,IAAI,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,MAAM,CAAC;IAC5G,OAAO,QAAQ,CAAC,CAAC,EAAE,EAAE,EAAE,IAAI,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;AACxC,CAAC;AAED,mFAAmF;AACnF,MAAM,UAAU,QAAQ,CAAC,CAAO,EAAE,CAAS,EAAE,EAAU,EAAE,MAAc;IACrE,MAAM,IAAI,GAAW,CAAE,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,QAAQ,CAAC,EAAE,CAAY,GAAG,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,GAAG,IAAI,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,MAAM,CAAC;IAC5G,UAAU,CAAC,CAAC,EAAE,CAAC,EAAE,IAAI,CAAC,CAAC;AACzB,CAAC"}

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

@@ -1,8 +0,0 @@
-/**
- * @file The score: each item that counts, and the total.
- *
- * @module
- */
-import type { Trek } from './context.js';
-/** PRINT OUT THE CURRENT SCORE */
-export declare function score(t: Trek): number;