@fnndsc/brasa 0.37.1 → 0.38.1

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

@@ -0,0 +1,61 @@
+import { ENTERPRISE } from './consts.js';
+import { sprintf } from './printf.js';
+import { Skitab } from './setup.js';
+/** One line of the score; nothing when it is worth nothing. */
+function scoreitem(t, amount, descfmt, ...args) {
+    if (amount === 0)
+        return;
+    // vsnprintf into char buf[128]
+    const buf = sprintf(descfmt, ...args).slice(0, 127);
+    t.io.printf('%-40s %10ld\n', buf, amount);
+}
+/** PRINT OUT THE CURRENT SCORE */
+export function score(t) {
+    const { Game, Param, Now, Move, Ship } = t.s;
+    let u;
+    let tt;
+    let s;
+    let r;
+    t.io.printf('\n*** Your score:\n');
+    s = tt = Math.trunc(Param.klingpwr / 4) * (u = Game.killk);
+    scoreitem(t, tt, '%d Klingons killed', u);
+    r = Now.date - Param.date;
+    if (r < 1.0)
+        r = 1.0;
+    r = Game.killk / r;
+    s += tt = Math.trunc(400 * r);
+    scoreitem(t, tt, 'Kill rate %.2f Klingons/stardate', r);
+    r = Now.klings;
+    r /= Game.killk + 1;
+    s += tt = Math.trunc(-400 * r);
+    scoreitem(t, tt, 'Penalty for %d klingons remaining', Now.klings);
+    if (Move.endgame > 0) {
+        s += tt = 100 * (u = Game.skill);
+        const p = Skitab[u - 1];
+        scoreitem(t, tt, 'Bonus for winning a %s%s game', p.abbrev, p.full);
+    }
+    if (Game.killed) {
+        s -= 500;
+        scoreitem(t, -500, 'Penalty for getting killed');
+    }
+    s += tt = -100 * (u = Game.killb);
+    scoreitem(t, tt, '%d starbases killed', u);
+    s += tt = -100 * (u = Game.helps);
+    scoreitem(t, tt, '%d calls for help', u);
+    s += tt = -5 * (u = Game.kills);
+    scoreitem(t, tt, '%d stars destroyed', u);
+    s += tt = -150 * (u = Game.killinhab);
+    scoreitem(t, tt, '%d inhabited starsystems destroyed', u);
+    if (Ship.ship !== ENTERPRISE) {
+        s -= 200;
+        scoreitem(t, -200, 'penalty for abandoning ship');
+    }
+    s += tt = 3 * (u = Game.captives);
+    scoreitem(t, tt, '%d Klingons captured', u);
+    s += tt = -(u = Game.deaths);
+    scoreitem(t, tt, '%d casualties', u);
+    t.io.printf('\n');
+    scoreitem(t, s, '***  TOTAL');
+    return s;
+}
+//# sourceMappingURL=score.js.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"score.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/score.ts"],"names":[],"mappings":"AAsCA,OAAO,EAAE,UAAU,EAAE,MAAM,aAAa,CAAC;AAEzC,OAAO,EAAE,OAAO,EAAkB,MAAM,aAAa,CAAC;AACtD,OAAO,EAAE,MAAM,EAAE,MAAM,YAAY,CAAC;AAEpC,+DAA+D;AAC/D,SAAS,SAAS,CAAC,CAAO,EAAE,MAAc,EAAE,OAAe,EAAE,GAAG,IAAiB;IAC/E,IAAI,MAAM,KAAK,CAAC;QAAE,OAAO;IACzB,+BAA+B;IAC/B,MAAM,GAAG,GAAW,OAAO,CAAC,OAAO,EAAE,GAAG,IAAI,CAAC,CAAC,KAAK,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC;IAC5D,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,eAAe,EAAE,GAAG,EAAE,MAAM,CAAC,CAAC;AAC5C,CAAC;AAED,kCAAkC;AAClC,MAAM,UAAU,KAAK,CAAC,CAAO;IAC3B,MAAM,EAAE,IAAI,EAAE,KAAK,EAAE,GAAG,EAAE,IAAI,EAAE,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;IAC7C,IAAI,CAAS,CAAC;IACd,IAAI,EAAU,CAAC;IACf,IAAI,CAAS,CAAC;IACd,IAAI,CAAS,CAAC;IAEd,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,qBAAqB,CAAC,CAAC;IAEnC,CAAC,GAAG,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,QAAQ,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC;IAC3D,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,oBAAoB,EAAE,CAAC,CAAC,CAAC;IAE1C,CAAC,GAAG,GAAG,CAAC,IAAI,GAAG,KAAK,CAAC,IAAI,CAAC;IAC1B,IAAI,CAAC,GAAG,GAAG;QAAE,CAAC,GAAG,GAAG,CAAC;IACrB,CAAC,GAAG,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC;IACnB,CAAC,IAAI,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,GAAG,GAAG,CAAC,CAAC,CAAC;IAC9B,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,kCAAkC,EAAE,CAAC,CAAC,CAAC;IAExD,CAAC,GAAG,GAAG,CAAC,MAAM,CAAC;IACf,CAAC,IAAI,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC;IACpB,CAAC,IAAI,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,GAAG,GAAG,CAAC,CAAC,CAAC;IAC/B,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,mCAAmC,EAAE,GAAG,CAAC,MAAM,CAAC,CAAC;IAElE,IAAI,IAAI,CAAC,OAAO,GAAG,CAAC,EAAE,CAAC;QACrB,CAAC,IAAI,EAAE,GAAG,GAAG,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC;QACjC,MAAM,CAAC,GAAW,MAAM,CAAC,CAAC,GAAG,CAAC,CAAW,CAAC;QAC1C,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,+BAA+B,EAAE,CAAC,CAAC,MAAM,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC;IACtE,CAAC;IAED,IAAI,IAAI,CAAC,MAAM,EAAE,CAAC;QAChB,CAAC,IAAI,GAAG,CAAC;QACT,SAAS,CAAC,CAAC,EAAE,CAAC,GAAG,EAAE,4BAA4B,CAAC,CAAC;IACnD,CAAC;IAED,CAAC,IAAI,EAAE,GAAG,CAAC,GAAG,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC;IAClC,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,qBAAqB,EAAE,CAAC,CAAC,CAAC;IAE3C,CAAC,IAAI,EAAE,GAAG,CAAC,GAAG,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC;IAClC,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,mBAAmB,EAAE,CAAC,CAAC,CAAC;IAEzC,CAAC,IAAI,EAAE,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC;IAChC,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,oBAAoB,EAAE,CAAC,CAAC,CAAC;IAE1C,CAAC,IAAI,EAAE,GAAG,CAAC,GAAG,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,SAAS,CAAC,CAAC;IACtC,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,oCAAoC,EAAE,CAAC,CAAC,CAAC;IAE1D,IAAI,IAAI,CAAC,IAAI,KAAK,UAAU,EAAE,CAAC;QAC7B,CAAC,IAAI,GAAG,CAAC;QACT,SAAS,CAAC,CAAC,EAAE,CAAC,GAAG,EAAE,6BAA6B,CAAC,CAAC;IACpD,CAAC;IAED,CAAC,IAAI,EAAE,GAAG,CAAC,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,QAAQ,CAAC,CAAC;IAClC,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,sBAAsB,EAAE,CAAC,CAAC,CAAC;IAE5C,CAAC,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,MAAM,CAAC,CAAC;IAC7B,SAAS,CAAC,CAAC,EAAE,EAAE,EAAE,eAAe,EAAE,CAAC,CAAC,CAAC;IAErC,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC;IAClB,SAAS,CAAC,CAAC,EAAE,CAAC,EAAE,YAAY,CAAC,CAAC;IAC9B,OAAO,CAAC,CAAC;AACX,CAAC"}

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

@@ -0,0 +1,18 @@
+/**
+ * @file Initializing a game: its length, skill and password are read, and
+ * the galaxy, the ship and the event queue are laid out. Game restart and
+ * tournament games are handled here.
+ *
+ * Deviation: the C's tables cast a length or a skill to a function pointer
+ * (`(cmdfun)4`); here the number rides in `value2`.
+ *
+ * @module
+ */
+import type { Trek } from './context.js';
+import { type Cvntab } from './getpar.js';
+/** The game lengths. */
+export declare const Lentab: ReadonlyArray<Cvntab>;
+/** The skills, in rank order. */
+export declare const Skitab: ReadonlyArray<Cvntab>;
+/** INITIALIZE THE GAME */
+export declare function setup(t: Trek): Promise<void>;

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

@@ -0,0 +1,251 @@
+import { CLOAK, COMPUTER, Device, E_ISSUE, E_KATSB, E_KDESB, E_ENSLV, E_LRTB, E_REPRO, E_SNAP, E_SNOVA, ENTERPRISE, GREEN, IMPULSE, KM_EA, KM_EB, KM_LA, KM_LB, KM_OA, KM_OB, LIFESUP, LRSCAN, MAXEVENTS, MAXKLQUAD, NDEV, NINHAB, NQUADS, NSECTS, PHASER, SHIELD, SINS, SRSCAN, SSRADIO, TOOLARGE, TORPED, WARP, XPORTER, } from './consts.js';
+import { attack } from './attack.js';
+import { restartgame } from './dumpgame.js';
+import { getcodpar, getstrpar } from './getpar.js';
+import { initquad } from './initquad.js';
+import { franf, ranf } from './rand.js';
+import { xsched } from './schedule.js';
+import { srscan } from './srscan.js';
+/** The game lengths. */
+export const Lentab = [
+    { abbrev: 's', full: 'hort', value: null, value2: 1 },
+    { abbrev: 'm', full: 'edium', value: null, value2: 2 },
+    { abbrev: 'l', full: 'ong', value: null, value2: 4 },
+    { abbrev: 'restart', full: '', value: null, value2: 0 },
+];
+/** The skills, in rank order. */
+export const Skitab = [
+    { abbrev: 'n', full: 'ovice', value: null, value2: 1 },
+    { abbrev: 'f', full: 'air', value: null, value2: 2 },
+    { abbrev: 'g', full: 'ood', value: null, value2: 3 },
+    { abbrev: 'e', full: 'xpert', value: null, value2: 4 },
+    { abbrev: 'c', full: 'ommodore', value: null, value2: 5 },
+    { abbrev: 'i', full: 'mpossible', value: null, value2: 6 },
+];
+/** A store into a C `char`: gcc truncates to int, then keeps the low byte, signed. */
+function char_of(n) {
+    return (Math.trunc(n) << 24) >> 24;
+}
+/** INITIALIZE THE GAME */
+export async function setup(t) {
+    const { Game, Param, Now, Ship, Move } = t.s;
+    let r;
+    let i;
+    let j;
+    let d;
+    let q;
+    while (true) {
+        r = await getcodpar(t, 'What length game', Lentab);
+        Game.length = r.value2;
+        if (Game.length === 0) {
+            if (await restartgame(t))
+                continue;
+            return;
+        }
+        break;
+    }
+    r = await getcodpar(t, 'What skill game', Skitab);
+    Game.skill = r.value2;
+    Game.tourn = 0;
+    Game.passwd = await getstrpar(t, 'Enter a password', 14, null);
+    if (Game.passwd === 'tournament') {
+        Game.passwd = await getstrpar(t, 'Enter tournament code', 14, null);
+        Game.tourn = 1;
+        d = 0;
+        for (i = 0; i < Game.passwd.length; i++)
+            d += Game.passwd.charCodeAt(i) << i;
+        t.rnd.srandom(d);
+    }
+    Param.bases = Now.bases = ranf(t.rnd, 6 - Game.skill) + 2;
+    if (Game.skill === 6)
+        Param.bases = Now.bases = 1;
+    Param.time = Now.time = 6.0 * Game.length + 2.0;
+    i = Game.skill;
+    j = Game.length;
+    Param.klings = Now.klings = char_of(i * j * 3.5 * (franf(t.rnd) + 0.75));
+    if (Param.klings < i * j * 5)
+        Param.klings = Now.klings = char_of(i * j * 5);
+    // numerical overflow problems
+    if (Param.klings <= i)
+        Param.klings = Now.klings = 127;
+    Param.energy = Ship.energy = 5000;
+    Param.torped = Ship.torped = 10;
+    Ship.ship = ENTERPRISE;
+    Ship.shipname = 'Enterprise';
+    Param.shield = Ship.shield = 1500;
+    Param.resource = Now.resource = Param.klings * Param.time;
+    Param.reserves = Ship.reserves = (6 - Game.skill) * 2.0;
+    Param.crew = Ship.crew = 387;
+    Param.brigfree = Ship.brigfree = 400;
+    Ship.shldup = 1;
+    Ship.cond = GREEN;
+    Ship.warp = 5.0;
+    Ship.warp2 = 25.0;
+    Ship.warp3 = 125.0;
+    Ship.sinsbad = 0;
+    Ship.cloaked = 0;
+    Param.date = Now.date = (ranf(t.rnd, 20) + 20) * 100;
+    let f = Game.skill;
+    f = Math.log(f + 0.5);
+    for (i = 0; i < NDEV; i++) {
+        if (Device[i].name.startsWith('*'))
+            Param.damfac[i] = 0;
+        else
+            Param.damfac[i] = f;
+    }
+    // these probabilities must sum to 1000
+    Param.damprob[WARP] = 70; // warp drive		 7.0%
+    Param.damprob[SRSCAN] = 110; // short range scanners	11.0%
+    Param.damprob[LRSCAN] = 110; // long range scanners	11.0%
+    Param.damprob[PHASER] = 125; // phasers		12.5%
+    Param.damprob[TORPED] = 125; // photon torpedoes	12.5%
+    Param.damprob[IMPULSE] = 75; // impulse engines	 7.5%
+    Param.damprob[SHIELD] = 150; // shield control	15.0%
+    Param.damprob[COMPUTER] = 20; // computer		 2.0%
+    Param.damprob[SSRADIO] = 35; // subspace radio	 3.5%
+    Param.damprob[LIFESUP] = 30; // life support		 3.0%
+    Param.damprob[SINS] = 20; // navigation system	 2.0%
+    Param.damprob[CLOAK] = 50; // cloaking device	 5.0%
+    Param.damprob[XPORTER] = 80; // transporter		 8.0%
+    // check to see that I didn't blow it
+    for (i = j = 0; i < NDEV; i++)
+        j += Param.damprob[i];
+    if (j !== 1000) {
+        t.io.printf('trek: Device probabilities sum to %d\n', j);
+        t.io.exit(1);
+    }
+    Param.dockfac = 0.5;
+    Param.regenfac = (5 - Game.skill) * 0.05;
+    if (Param.regenfac < 0.0)
+        Param.regenfac = 0.0;
+    Param.warptime = 10;
+    Param.stopengy = 50;
+    Param.shupengy = 40;
+    i = Game.skill;
+    Param.klingpwr = 100 + 150 * i;
+    if (i >= 6)
+        Param.klingpwr += 150;
+    Param.phasfac = 0.8;
+    Param.hitfac = 0.5;
+    Param.klingcrew = 200;
+    Param.srndrprob = 0.0035;
+    Param.moveprob[KM_OB] = 45;
+    Param.movefac[KM_OB] = 0.09;
+    Param.moveprob[KM_OA] = 40;
+    Param.movefac[KM_OA] = -0.05;
+    Param.moveprob[KM_EB] = 40;
+    Param.movefac[KM_EB] = 0.075;
+    Param.moveprob[KM_EA] = 25 + 5 * Game.skill;
+    Param.movefac[KM_EA] = -0.06 * Game.skill;
+    Param.moveprob[KM_LB] = 0;
+    Param.movefac[KM_LB] = 0.0;
+    Param.moveprob[KM_LA] = 10 + 10 * Game.skill;
+    Param.movefac[KM_LA] = 0.25;
+    Param.eventdly[E_SNOVA] = 0.5;
+    Param.eventdly[E_LRTB] = 25.0;
+    Param.eventdly[E_KATSB] = 1.0;
+    Param.eventdly[E_KDESB] = 3.0;
+    Param.eventdly[E_ISSUE] = 1.0;
+    Param.eventdly[E_SNAP] = 0.5;
+    Param.eventdly[E_ENSLV] = 0.5;
+    Param.eventdly[E_REPRO] = 2.0;
+    Param.navigcrud[0] = 1.5;
+    Param.navigcrud[1] = 0.75;
+    Param.cloakenergy = 1000;
+    Param.energylow = 1000;
+    for (i = 0; i < MAXEVENTS; i++) {
+        const e = t.s.Event[i];
+        e.date = TOOLARGE;
+        e.evcode = 0;
+    }
+    xsched(t, E_SNOVA, 1, 0, 0, 0);
+    xsched(t, E_LRTB, Param.klings, 0, 0, 0);
+    xsched(t, E_KATSB, 1, 0, 0, 0);
+    xsched(t, E_ISSUE, 1, 0, 0, 0);
+    xsched(t, E_SNAP, 1, 0, 0, 0);
+    Ship.sectx = ranf(t.rnd, NSECTS);
+    Ship.secty = ranf(t.rnd, NSECTS);
+    Game.killk = Game.kills = Game.killb = 0;
+    Game.deaths = Game.negenbar = 0;
+    Game.captives = 0;
+    Game.killinhab = 0;
+    Game.helps = 0;
+    Game.killed = 0;
+    Game.snap = 0;
+    Move.endgame = 0;
+    // setup stars
+    for (i = 0; i < NQUADS; i++) {
+        for (j = 0; j < NQUADS; j++) {
+            q = t.s.Quad[i][j];
+            q.klings = q.bases = 0;
+            q.scanned = -1;
+            q.stars = ranf(t.rnd, 9) + 1;
+            q.holes = ranf(t.rnd, 3);
+            const s5 = Math.trunc(q.stars / 5);
+            q.holes = q.holes > s5 ? q.holes - s5 : 0;
+            q.qsystemname = 0;
+        }
+    }
+    // select inhabited starsystems
+    for (d = 1; d < NINHAB; d++) {
+        do {
+            i = ranf(t.rnd, NQUADS);
+            j = ranf(t.rnd, NQUADS);
+            q = t.s.Quad[i][j];
+        } while (q.qsystemname);
+        q.qsystemname = d;
+    }
+    // position starbases
+    for (i = 0; i < Param.bases; i++) {
+        let ix;
+        let iy;
+        while (true) {
+            ix = ranf(t.rnd, NQUADS);
+            iy = ranf(t.rnd, NQUADS);
+            q = t.s.Quad[ix][iy];
+            if (q.bases > 0)
+                continue;
+            break;
+        }
+        q.bases = 1;
+        const base = Now.base[i];
+        base.x = ix;
+        base.y = iy;
+        q.scanned = 1001;
+        // start the Enterprise near starbase
+        if (i === 0) {
+            Ship.quadx = ix;
+            Ship.quady = iy;
+        }
+    }
+    // position klingons
+    for (i = Param.klings; i > 0;) {
+        let klump = ranf(t.rnd, 4) + 1;
+        if (klump > i)
+            klump = i;
+        while (true) {
+            const ix = ranf(t.rnd, NQUADS);
+            const iy = ranf(t.rnd, NQUADS);
+            q = t.s.Quad[ix][iy];
+            if (q.klings + klump > MAXKLQUAD)
+                continue;
+            q.klings += klump;
+            i -= klump;
+            break;
+        }
+    }
+    // initialize this quadrant
+    const bases = Now.base;
+    t.io.printf('%d Klingons\n%d starbase', Param.klings, Param.bases);
+    if (Param.bases > 1)
+        t.io.printf('s');
+    t.io.printf(' at %d,%d', bases[0].x, bases[0].y);
+    for (i = 1; i < Param.bases; i++)
+        t.io.printf(', %d,%d', bases[i].x, bases[i].y);
+    t.io.printf('\nIt takes %d units to kill a Klingon\n', Param.klingpwr);
+    Move.free = 0;
+    await initquad(t, 0);
+    await srscan(t, 1);
+    await attack(t, 0);
+}
+//# sourceMappingURL=setup.js.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"setup.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/setup.ts"],"names":[],"mappings":"AA2CA,OAAO,EACL,KAAK,EAAE,QAAQ,EAAE,MAAM,EAAE,OAAO,EAAE,OAAO,EAAE,OAAO,EAAE,OAAO,EAAE,MAAM,EAAE,OAAO,EAAE,MAAM,EAAE,OAAO,EAAE,UAAU,EAAE,KAAK,EAAE,OAAO,EACzH,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,OAAO,EAAE,MAAM,EAAE,SAAS,EAAE,SAAS,EAAE,IAAI,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,EACrH,MAAM,EAAE,IAAI,EAAE,MAAM,EAAE,OAAO,EAAE,QAAQ,EAAE,MAAM,EAAE,IAAI,EAAE,OAAO,GAC/D,MAAM,aAAa,CAAC;AACrB,OAAO,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AACrC,OAAO,EAAE,WAAW,EAAE,MAAM,eAAe,CAAC;AAC5C,OAAO,EAAE,SAAS,EAAE,SAAS,EAAe,MAAM,aAAa,CAAC;AAChE,OAAO,EAAE,QAAQ,EAAE,MAAM,eAAe,CAAC;AACzC,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,WAAW,CAAC;AACxC,OAAO,EAAE,MAAM,EAAE,MAAM,eAAe,CAAC;AACvC,OAAO,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AAGrC,wBAAwB;AACxB,MAAM,CAAC,MAAM,MAAM,GAA0B;IAC3C,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,MAAM,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;IACrD,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;IACtD,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,KAAK,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;IACpD,EAAE,MAAM,EAAE,SAAS,EAAE,IAAI,EAAE,EAAE,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;CACxD,CAAC;AAEF,iCAAiC;AACjC,MAAM,CAAC,MAAM,MAAM,GAA0B;IAC3C,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;IACtD,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,KAAK,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;IACpD,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,KAAK,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;IACpD,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;IACtD,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,UAAU,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;IACzD,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,WAAW,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;CAC3D,CAAC;AAEF,sFAAsF;AACtF,SAAS,OAAO,CAAC,CAAS;IACxB,OAAO,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC,IAAI,EAAE,CAAC;AACrC,CAAC;AAED,0BAA0B;AAC1B,MAAM,CAAC,KAAK,UAAU,KAAK,CAAC,CAAO;IACjC,MAAM,EAAE,IAAI,EAAE,KAAK,EAAE,GAAG,EAAE,IAAI,EAAE,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;IAC7C,IAAI,CAAS,CAAC;IACd,IAAI,CAAS,CAAC;IACd,IAAI,CAAS,CAAC;IACd,IAAI,CAAS,CAAC;IACd,IAAI,CAAO,CAAC;IAEZ,OAAO,IAAI,EAAE,CAAC;QACZ,CAAC,GAAG,MAAM,SAAS,CAAC,CAAC,EAAE,kBAAkB,EAAE,MAAM,CAAC,CAAC;QACnD,IAAI,CAAC,MAAM,GAAG,CAAC,CAAC,MAAM,CAAC;QACvB,IAAI,IAAI,CAAC,MAAM,KAAK,CAAC,EAAE,CAAC;YACtB,IAAI,MAAM,WAAW,CAAC,CAAC,CAAC;gBAAE,SAAS;YACnC,OAAO;QACT,CAAC;QACD,MAAM;IACR,CAAC;IACD,CAAC,GAAG,MAAM,SAAS,CAAC,CAAC,EAAE,iBAAiB,EAAE,MAAM,CAAC,CAAC;IAClD,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC,MAAM,CAAC;IACtB,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC;IACf,IAAI,CAAC,MAAM,GAAG,MAAM,SAAS,CAAC,CAAC,EAAE,kBAAkB,EAAE,EAAE,EAAE,IAAI,CAAC,CAAC;IAC/D,IAAI,IAAI,CAAC,MAAM,KAAK,YAAY,EAAE,CAAC;QACjC,IAAI,CAAC,MAAM,GAAG,MAAM,SAAS,CAAC,CAAC,EAAE,uBAAuB,EAAE,EAAE,EAAE,IAAI,CAAC,CAAC;QACpE,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC;QACf,CAAC,GAAG,CAAC,CAAC;QACN,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,CAAC,MAAM,CAAC,MAAM,EAAE,CAAC,EAAE;YAAE,CAAC,IAAI,IAAI,CAAC,MAAM,CAAC,UAAU,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;QAC7E,CAAC,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC;IACnB,CAAC;IACD,KAAK,CAAC,KAAK,GAAG,GAAG,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC;IAC1D,IAAI,IAAI,CAAC,KAAK,KAAK,CAAC;QAAE,KAAK,CAAC,KAAK,GAAG,GAAG,CAAC,KAAK,GAAG,CAAC,CAAC;IAClD,KAAK,CAAC,IAAI,GAAG,GAAG,CAAC,IAAI,GAAG,GAAG,GAAG,IAAI,CAAC,MAAM,GAAG,GAAG,CAAC;IAChD,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC;IACf,CAAC,GAAG,IAAI,CAAC,MAAM,CAAC;IAChB,KAAK,CAAC,MAAM,GAAG,GAAG,CAAC,MAAM,GAAG,OAAO,CAAC,CAAC,GAAG,CAAC,GAAG,GAAG,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC;IACzE,IAAI,KAAK,CAAC,MAAM,GAAG,CAAC,GAAG,CAAC,GAAG,CAAC;QAAE,KAAK,CAAC,MAAM,GAAG,GAAG,CAAC,MAAM,GAAG,OAAO,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC,CAAC;IAC7E,8BAA8B;IAC9B,IAAI,KAAK,CAAC,MAAM,IAAI,CAAC;QAAE,KAAK,CAAC,MAAM,GAAG,GAAG,CAAC,MAAM,GAAG,GAAG,CAAC;IACvD,KAAK,CAAC,MAAM,GAAG,IAAI,CAAC,MAAM,GAAG,IAAI,CAAC;IAClC,KAAK,CAAC,MAAM,GAAG,IAAI,CAAC,MAAM,GAAG,EAAE,CAAC;IAChC,IAAI,CAAC,IAAI,GAAG,UAAU,CAAC;IACvB,IAAI,CAAC,QAAQ,GAAG,YAAY,CAAC;IAC7B,KAAK,CAAC,MAAM,GAAG,IAAI,CAAC,MAAM,GAAG,IAAI,CAAC;IAClC,KAAK,CAAC,QAAQ,GAAG,GAAG,CAAC,QAAQ,GAAG,KAAK,CAAC,MAAM,GAAG,KAAK,CAAC,IAAI,CAAC;IAC1D,KAAK,CAAC,QAAQ,GAAG,IAAI,CAAC,QAAQ,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,GAAG,GAAG,CAAC;IACxD,KAAK,CAAC,IAAI,GAAG,IAAI,CAAC,IAAI,GAAG,GAAG,CAAC;IAC7B,KAAK,CAAC,QAAQ,GAAG,IAAI,CAAC,QAAQ,GAAG,GAAG,CAAC;IACrC,IAAI,CAAC,MAAM,GAAG,CAAC,CAAC;IAChB,IAAI,CAAC,IAAI,GAAG,KAAK,CAAC;IAClB,IAAI,CAAC,IAAI,GAAG,GAAG,CAAC;IAChB,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC;IAClB,IAAI,CAAC,KAAK,GAAG,KAAK,CAAC;IACnB,IAAI,CAAC,OAAO,GAAG,CAAC,CAAC;IACjB,IAAI,CAAC,OAAO,GAAG,CAAC,CAAC;IACjB,KAAK,CAAC,IAAI,GAAG,GAAG,CAAC,IAAI,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,EAAE,CAAC,GAAG,EAAE,CAAC,GAAG,GAAG,CAAC;IACrD,IAAI,CAAC,GAAW,IAAI,CAAC,KAAK,CAAC;IAC3B,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,GAAG,GAAG,CAAC,CAAC;IACtB,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC;QAC1B,IAAK,MAAM,CAAC,CAAC,CAAY,CAAC,IAAI,CAAC,UAAU,CAAC,GAAG,CAAC;YAAE,KAAK,CAAC,MAAM,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC;;YAC/D,KAAK,CAAC,MAAM,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC;IAC3B,CAAC;IACD,uCAAuC;IACvC,KAAK,CAAC,OAAO,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,CAAC,oBAAoB;IAC9C,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC,CAAC,6BAA6B;IAC1D,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC,CAAC,4BAA4B;IACzD,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC,CAAC,iBAAiB;IAC9C,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC,CAAC,yBAAyB;IACtD,KAAK,CAAC,OAAO,CAAC,OAAO,CAAC,GAAG,EAAE,CAAC,CAAC,wBAAwB;IACrD,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC,CAAC,uBAAuB;IACpD,KAAK,CAAC,OAAO,CAAC,QAAQ,CAAC,GAAG,EAAE,CAAC,CAAC,kBAAkB;IAChD,KAAK,CAAC,OAAO,CAAC,OAAO,CAAC,GAAG,EAAE,CAAC,CAAC,uBAAuB;IACpD,KAAK,CAAC,OAAO,CAAC,OAAO,CAAC,GAAG,EAAE,CAAC,CAAC,sBAAsB;IACnD,KAAK,CAAC,OAAO,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,CAAC,0BAA0B;IACpD,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,GAAG,EAAE,CAAC,CAAC,wBAAwB;IACnD,KAAK,CAAC,OAAO,CAAC,OAAO,CAAC,GAAG,EAAE,CAAC,CAAC,qBAAqB;IAClD,qCAAqC;IACrC,KAAK,CAAC,GAAG,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE;QAAE,CAAC,IAAI,KAAK,CAAC,OAAO,CAAC,CAAC,CAAW,CAAC;IAC/D,IAAI,CAAC,KAAK,IAAI,EAAE,CAAC;QACf,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,wCAAwC,EAAE,CAAC,CAAC,CAAC;QACzD,CAAC,CAAC,EAAE,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;IACf,CAAC;IACD,KAAK,CAAC,OAAO,GAAG,GAAG,CAAC;IACpB,KAAK,CAAC,QAAQ,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC,GAAG,IAAI,CAAC;IACzC,IAAI,KAAK,CAAC,QAAQ,GAAG,GAAG;QAAE,KAAK,CAAC,QAAQ,GAAG,GAAG,CAAC;IAC/C,KAAK,CAAC,QAAQ,GAAG,EAAE,CAAC;IACpB,KAAK,CAAC,QAAQ,GAAG,EAAE,CAAC;IACpB,KAAK,CAAC,QAAQ,GAAG,EAAE,CAAC;IACpB,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC;IACf,KAAK,CAAC,QAAQ,GAAG,GAAG,GAAG,GAAG,GAAG,CAAC,CAAC;IAC/B,IAAI,CAAC,IAAI,CAAC;QAAE,KAAK,CAAC,QAAQ,IAAI,GAAG,CAAC;IAClC,KAAK,CAAC,OAAO,GAAG,GAAG,CAAC;IACpB,KAAK,CAAC,MAAM,GAAG,GAAG,CAAC;IACnB,KAAK,CAAC,SAAS,GAAG,GAAG,CAAC;IACtB,KAAK,CAAC,SAAS,GAAG,MAAM,CAAC;IACzB,KAAK,CAAC,QAAQ,CAAC,KAAK,CAAC,GAAG,EAAE,CAAC;IAC3B,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,GAAG,IAAI,CAAC;IAC5B,KAAK,CAAC,QAAQ,CAAC,KAAK,CAAC,GAAG,EAAE,CAAC;IAC3B,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,GAAG,CAAC,IAAI,CAAC;IAC7B,KAAK,CAAC,QAAQ,CAAC,KAAK,CAAC,GAAG,EAAE,CAAC;IAC3B,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,GAAG,KAAK,CAAC;IAC7B,KAAK,CAAC,QAAQ,CAAC,KAAK,CAAC,GAAG,EAAE,GAAG,CAAC,GAAG,IAAI,CAAC,KAAK,CAAC;IAC5C,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,GAAG,CAAC,IAAI,GAAG,IAAI,CAAC,KAAK,CAAC;IAC1C,KAAK,CAAC,QAAQ,CAAC,KAAK,CAAC,GAAG,CAAC,CAAC;IAC1B,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,GAAG,GAAG,CAAC;IAC3B,KAAK,CAAC,QAAQ,CAAC,KAAK,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC;IAC7C,KAAK,CAAC,OAAO,CAAC,KAAK,CAAC,GAAG,IAAI,CAAC;IAC5B,KAAK,CAAC,QAAQ,CAAC,OAAO,CAAC,GAAG,GAAG,CAAC;IAC9B,KAAK,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;IAC9B,KAAK,CAAC,QAAQ,CAAC,OAAO,CAAC,GAAG,GAAG,CAAC;IAC9B,KAAK,CAAC,QAAQ,CAAC,OAAO,CAAC,GAAG,GAAG,CAAC;IAC9B,KAAK,CAAC,QAAQ,CAAC,OAAO,CAAC,GAAG,GAAG,CAAC;IAC9B,KAAK,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC;IAC7B,KAAK,CAAC,QAAQ,CAAC,OAAO,CAAC,GAAG,GAAG,CAAC;IAC9B,KAAK,CAAC,QAAQ,CAAC,OAAO,CAAC,GAAG,GAAG,CAAC;IAC9B,KAAK,CAAC,SAAS,CAAC,CAAC,CAAC,GAAG,GAAG,CAAC;IACzB,KAAK,CAAC,SAAS,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC;IAC1B,KAAK,CAAC,WAAW,GAAG,IAAI,CAAC;IACzB,KAAK,CAAC,SAAS,GAAG,IAAI,CAAC;IACvB,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,SAAS,EAAE,CAAC,EAAE,EAAE,CAAC;QAC/B,MAAM,CAAC,GAAc,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAc,CAAC;QAC/C,CAAC,CAAC,IAAI,GAAG,QAAQ,CAAC;QAClB,CAAC,CAAC,MAAM,GAAG,CAAC,CAAC;IACf,CAAC;IACD,MAAM,CAAC,CAAC,EAAE,OAAO,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;IAC/B,MAAM,CAAC,CAAC,EAAE,MAAM,EAAE,KAAK,CAAC,MAAM,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;IACzC,MAAM,CAAC,CAAC,EAAE,OAAO,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;IAC/B,MAAM,CAAC,CAAC,EAAE,OAAO,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;IAC/B,MAAM,CAAC,CAAC,EAAE,MAAM,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;IAC9B,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;IACjC,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;IACjC,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC;IACzC,IAAI,CAAC,MAAM,GAAG,IAAI,CAAC,QAAQ,GAAG,CAAC,CAAC;IAChC,IAAI,CAAC,QAAQ,GAAG,CAAC,CAAC;IAClB,IAAI,CAAC,SAAS,GAAG,CAAC,CAAC;IACnB,IAAI,CAAC,KAAK,GAAG,CAAC,CAAC;IACf,IAAI,CAAC,MAAM,GAAG,CAAC,CAAC;IAChB,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC;IACd,IAAI,CAAC,OAAO,GAAG,CAAC,CAAC;IAEjB,cAAc;IACd,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;QAC5B,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;YAC5B,CAAC,GAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAY,CAAC,CAAC,CAAS,CAAC;YACvC,CAAC,CAAC,MAAM,GAAG,CAAC,CAAC,KAAK,GAAG,CAAC,CAAC;YACvB,CAAC,CAAC,OAAO,GAAG,CAAC,CAAC,CAAC;YACf,CAAC,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC;YAC7B,CAAC,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC;YACzB,MAAM,EAAE,GAAW,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC;YAC3C,CAAC,CAAC,KAAK,GAAG,CAAC,CAAC,KAAK,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC;YAC1C,CAAC,CAAC,WAAW,GAAG,CAAC,CAAC;QACpB,CAAC;IACH,CAAC;IAED,+BAA+B;IAC/B,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;QAC5B,GAAG,CAAC;YACF,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;YACxB,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;YACxB,CAAC,GAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAY,CAAC,CAAC,CAAS,CAAC;QACzC,CAAC,QAAQ,CAAC,CAAC,WAAW,EAAE;QACxB,CAAC,CAAC,WAAW,GAAG,CAAC,CAAC;IACpB,CAAC;IAED,qBAAqB;IACrB,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,KAAK,CAAC,KAAK,EAAE,CAAC,EAAE,EAAE,CAAC;QACjC,IAAI,EAAU,CAAC;QACf,IAAI,EAAU,CAAC;QACf,OAAO,IAAI,EAAE,CAAC;YACZ,EAAE,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;YACzB,EAAE,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;YACzB,CAAC,GAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAY,CAAC,EAAE,CAAS,CAAC;YACzC,IAAI,CAAC,CAAC,KAAK,GAAG,CAAC;gBAAE,SAAS;YAC1B,MAAM;QACR,CAAC;QACD,CAAC,CAAC,KAAK,GAAG,CAAC,CAAC;QACZ,MAAM,IAAI,GAAO,GAAG,CAAC,IAAI,CAAC,CAAC,CAAO,CAAC;QACnC,IAAI,CAAC,CAAC,GAAG,EAAE,CAAC;QACZ,IAAI,CAAC,CAAC,GAAG,EAAE,CAAC;QACZ,CAAC,CAAC,OAAO,GAAG,IAAI,CAAC;QACjB,qCAAqC;QACrC,IAAI,CAAC,KAAK,CAAC,EAAE,CAAC;YACZ,IAAI,CAAC,KAAK,GAAG,EAAE,CAAC;YAChB,IAAI,CAAC,KAAK,GAAG,EAAE,CAAC;QAClB,CAAC;IACH,CAAC;IAED,oBAAoB;IACpB,KAAK,CAAC,GAAG,KAAK,CAAC,MAAM,EAAE,CAAC,GAAG,CAAC,GAAI,CAAC;QAC/B,IAAI,KAAK,GAAW,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC,CAAC,GAAG,CAAC,CAAC;QACvC,IAAI,KAAK,GAAG,CAAC;YAAE,KAAK,GAAG,CAAC,CAAC;QACzB,OAAO,IAAI,EAAE,CAAC;YACZ,MAAM,EAAE,GAAW,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;YACvC,MAAM,EAAE,GAAW,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;YACvC,CAAC,GAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAY,CAAC,EAAE,CAAS,CAAC;YACzC,IAAI,CAAC,CAAC,MAAM,GAAG,KAAK,GAAG,SAAS;gBAAE,SAAS;YAC3C,CAAC,CAAC,MAAM,IAAI,KAAK,CAAC;YAClB,CAAC,IAAI,KAAK,CAAC;YACX,MAAM;QACR,CAAC;IACH,CAAC;IAED,2BAA2B;IAC3B,MAAM,KAAK,GAAS,GAAG,CAAC,IAAI,CAAC;IAC7B,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,0BAA0B,EAAE,KAAK,CAAC,MAAM,EAAE,KAAK,CAAC,KAAK,CAAC,CAAC;IACnE,IAAI,KAAK,CAAC,KAAK,GAAG,CAAC;QAAE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC;IACtC,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,WAAW,EAAG,KAAK,CAAC,CAAC,CAAQ,CAAC,CAAC,EAAG,KAAK,CAAC,CAAC,CAAQ,CAAC,CAAC,CAAC,CAAC;IACjE,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,KAAK,CAAC,KAAK,EAAE,CAAC,EAAE;QAAE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,SAAS,EAAG,KAAK,CAAC,CAAC,CAAQ,CAAC,CAAC,EAAG,KAAK,CAAC,CAAC,CAAQ,CAAC,CAAC,CAAC,CAAC;IACjG,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,yCAAyC,EAAE,KAAK,CAAC,QAAQ,CAAC,CAAC;IACvE,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC;IACd,MAAM,QAAQ,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;IACrB,MAAM,MAAM,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;IACnB,MAAM,MAAM,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;AACrB,CAAC"}

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

@@ -0,0 +1,8 @@
+/**
+ * @file Setting the warp factor for the moves to come.
+ *
+ * @module
+ */
+import type { Trek } from './context.js';
+/** The warp command. */
+export declare function setwarp(t: Trek, _v: number): Promise<void>;

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

@@ -0,0 +1,28 @@
+import { getfltpar } from './getpar.js';
+/*
+**  SET WARP FACTOR
+**
+**	The warp factor is set for future move commands.  It is
+**	checked for consistency.
+*/
+/** The warp command. */
+export async function setwarp(t, _v) {
+    const { Ship } = t.s;
+    const warpfac = await getfltpar(t, 'Warp factor');
+    if (warpfac < 0.0)
+        return;
+    if (warpfac < 1.0) {
+        t.io.printf('Minimum warp speed is 1.0\n');
+        return;
+    }
+    if (warpfac > 10.0) {
+        t.io.printf('Maximum speed is warp 10.0\n');
+        return;
+    }
+    if (warpfac > 6.0)
+        t.io.printf('Damage to warp engines may occur above warp 6.0\n');
+    Ship.warp = warpfac;
+    Ship.warp2 = Ship.warp * warpfac;
+    Ship.warp3 = Ship.warp2 * warpfac;
+}
+//# sourceMappingURL=setwarp.js.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"setwarp.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/setwarp.ts"],"names":[],"mappings":"AAsCA,OAAO,EAAE,SAAS,EAAE,MAAM,aAAa,CAAC;AAExC;;;;;EAKE;AAEF,wBAAwB;AACxB,MAAM,CAAC,KAAK,UAAU,OAAO,CAAC,CAAO,EAAE,EAAU;IAC/C,MAAM,EAAE,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;IAErB,MAAM,OAAO,GAAW,MAAM,SAAS,CAAC,CAAC,EAAE,aAAa,CAAC,CAAC;IAC1D,IAAI,OAAO,GAAG,GAAG;QAAE,OAAO;IAC1B,IAAI,OAAO,GAAG,GAAG,EAAE,CAAC;QAClB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,6BAA6B,CAAC,CAAC;QAC3C,OAAO;IACT,CAAC;IACD,IAAI,OAAO,GAAG,IAAI,EAAE,CAAC;QACnB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,8BAA8B,CAAC,CAAC;QAC5C,OAAO;IACT,CAAC;IACD,IAAI,OAAO,GAAG,GAAG;QAAE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,mDAAmD,CAAC,CAAC;IACpF,IAAI,CAAC,IAAI,GAAG,OAAO,CAAC;IACpB,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC,IAAI,GAAG,OAAO,CAAC;IACjC,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC,KAAK,GAAG,OAAO,CAAC;AACpC,CAAC"}

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

@@ -0,0 +1,3 @@
+import type { Trek } from './context.js';
+/** SHIELD AND CLOAKING DEVICE CONTROL */
+export declare function shield(t: Trek, f: number): Promise<void>;

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

@@ -0,0 +1,139 @@
+/*
+ * shield.ts: a TypeScript port of BSD trek(6), from shield.c.
+ * Ported from NetBSD src/games/trek (trunk 7a9ca154a8f6144307865f23390a3c63b400b801): shield.c 1.13 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 shields and the cloaking device: up, down, or asked.
+ *
+ * Deviation: the C's Udtab carries up/down as `(cmdfun)1` and
+ * `(cmdfun)0` in the value slot; here they ride in value2.
+ *
+ * @module
+ */
+import { CLOAK, DOCKED, QUEENE, SHIELD, SRSCAN } from './consts.js';
+import { damaged } from './damaged.js';
+import { getcodpar, getynpar, testnl } from './getpar.js';
+import { out } from './out.js';
+import { sprintf } from './printf.js';
+/*
+**  SHIELD AND CLOAKING DEVICE CONTROL
+**
+**	'f' is one for auto shield up (in case of Condition RED),
+**	zero for shield control, and negative one for cloaking
+**	device control.
+**
+**	Called with an 'up' or 'down' on the same line, it puts
+**	the shields/cloak into the specified mode.  Otherwise it
+**	reports to the user the current mode, and asks if she wishes
+**	to change.
+**
+**	This is not a free move.  Hits that occur as a result of
+**	this move appear as though the shields are half up/down,
+**	so you get partial hits.
+*/
+const Udtab = [
+    { abbrev: 'u', full: 'p', value: null, value2: 1 },
+    { abbrev: 'd', full: 'own', value: null, value2: 0 },
+];
+/** SHIELD AND CLOAKING DEVICE CONTROL */
+export async function shield(t, f) {
+    let i;
+    let device;
+    let dev2;
+    let dev3;
+    let ind;
+    let stat;
+    if (f > 0 && (t.s.Ship.shldup || damaged(t, SRSCAN)))
+        return;
+    if (f < 0) {
+        /* cloaking device */
+        if (t.s.Ship.ship === QUEENE) {
+            t.io.printf('Ye Faire Queene does not have the cloaking device.\n');
+            return;
+        }
+        device = 'Cloaking device';
+        dev2 = 'is';
+        ind = CLOAK;
+        dev3 = 'it';
+        stat = 'cloaked';
+    }
+    else {
+        /* shields */
+        device = 'Shields';
+        dev2 = 'are';
+        dev3 = 'them';
+        ind = SHIELD;
+        stat = 'shldup';
+    }
+    if (damaged(t, ind)) {
+        if (f <= 0)
+            await out(t, ind);
+        return;
+    }
+    if (t.s.Ship.cond === DOCKED) {
+        t.io.printf('%s %s down while docked\n', device, dev2);
+        return;
+    }
+    if (f <= 0 && !(await testnl(t))) {
+        const r = await getcodpar(t, 'Up or down', Udtab);
+        i = r.value2;
+    }
+    else {
+        let s;
+        if (t.s.Ship[stat])
+            s = sprintf('%s %s up.  Do you want %s down', device, dev2, dev3);
+        else
+            s = sprintf('%s %s down.  Do you want %s up', device, dev2, dev3);
+        if (!(await getynpar(t, s)))
+            return;
+        i = t.s.Ship[stat] ? 0 : 1;
+    }
+    if (t.s.Ship[stat] === i) {
+        t.io.printf('%s already ', device);
+        if (i)
+            t.io.printf('up\n');
+        else
+            t.io.printf('down\n');
+        return;
+    }
+    if (i) {
+        if (f >= 0)
+            t.s.Ship.energy -= t.s.Param.shupengy;
+        else
+            t.s.Ship.cloakgood = 0;
+    }
+    t.s.Move.free = 0;
+    if (f >= 0)
+        t.s.Move.shldchg = 1;
+    t.s.Ship[stat] = i;
+    return;
+}
+//# sourceMappingURL=shield.js.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"shield.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/shield.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GA+BG;AACH;;;;;;;GAOG;AACH,OAAO,EAAE,KAAK,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AAEpE,OAAO,EAAE,OAAO,EAAE,MAAM,cAAc,CAAC;AACvC,OAAO,EAAE,SAAS,EAAE,QAAQ,EAAE,MAAM,EAAe,MAAM,aAAa,CAAC;AACvE,OAAO,EAAE,GAAG,EAAE,MAAM,UAAU,CAAC;AAC/B,OAAO,EAAE,OAAO,EAAE,MAAM,aAAa,CAAC;AAEtC;;;;;;;;;;;;;;;EAeE;AAEF,MAAM,KAAK,GAA0B;IACnC,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,GAAG,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;IAClD,EAAE,MAAM,EAAE,GAAG,EAAE,IAAI,EAAE,KAAK,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,EAAE,CAAC,EAAE;CACrD,CAAC;AAEF,yCAAyC;AACzC,MAAM,CAAC,KAAK,UAAU,MAAM,CAAC,CAAO,EAAE,CAAS;IAC7C,IAAI,CAAS,CAAC;IACd,IAAI,MAAc,CAAC;IACnB,IAAI,IAAY,CAAC;IACjB,IAAI,IAAY,CAAC;IACjB,IAAI,GAAW,CAAC;IAChB,IAAI,IAA0B,CAAC;IAE/B,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,MAAM,IAAI,OAAO,CAAC,CAAC,EAAE,MAAM,CAAC,CAAC;QAAE,OAAO;IAC7D,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC;QACV,qBAAqB;QACrB,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,KAAK,MAAM,EAAE,CAAC;YAC7B,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,sDAAsD,CAAC,CAAC;YACpE,OAAO;QACT,CAAC;QACD,MAAM,GAAG,iBAAiB,CAAC;QAC3B,IAAI,GAAG,IAAI,CAAC;QACZ,GAAG,GAAG,KAAK,CAAC;QACZ,IAAI,GAAG,IAAI,CAAC;QACZ,IAAI,GAAG,SAAS,CAAC;IACnB,CAAC;SAAM,CAAC;QACN,aAAa;QACb,MAAM,GAAG,SAAS,CAAC;QACnB,IAAI,GAAG,KAAK,CAAC;QACb,IAAI,GAAG,MAAM,CAAC;QACd,GAAG,GAAG,MAAM,CAAC;QACb,IAAI,GAAG,QAAQ,CAAC;IAClB,CAAC;IACD,IAAI,OAAO,CAAC,CAAC,EAAE,GAAG,CAAC,EAAE,CAAC;QACpB,IAAI,CAAC,IAAI,CAAC;YAAE,MAAM,GAAG,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC;QAC9B,OAAO;IACT,CAAC;IACD,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,KAAK,MAAM,EAAE,CAAC;QAC7B,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,2BAA2B,EAAE,MAAM,EAAE,IAAI,CAAC,CAAC;QACvD,OAAO;IACT,CAAC;IACD,IAAI,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,MAAM,MAAM,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC;QACjC,MAAM,CAAC,GAAW,MAAM,SAAS,CAAC,CAAC,EAAE,YAAY,EAAE,KAAK,CAAC,CAAC;QAC1D,CAAC,GAAG,CAAC,CAAC,MAAM,CAAC;IACf,CAAC;SAAM,CAAC;QACN,IAAI,CAAS,CAAC;QACd,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC;YAAE,CAAC,GAAG,OAAO,CAAC,gCAAgC,EAAE,MAAM,EAAE,IAAI,EAAE,IAAI,CAAC,CAAC;;YACjF,CAAC,GAAG,OAAO,CAAC,gCAAgC,EAAE,MAAM,EAAE,IAAI,EAAE,IAAI,CAAC,CAAC;QACvE,IAAI,CAAC,CAAC,MAAM,QAAQ,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;YAAE,OAAO;QACpC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;IAC7B,CAAC;IACD,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,KAAK,CAAC,EAAE,CAAC;QACzB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,aAAa,EAAE,MAAM,CAAC,CAAC;QACnC,IAAI,CAAC;YAAE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,MAAM,CAAC,CAAC;;YACtB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,QAAQ,CAAC,CAAC;QAC3B,OAAO;IACT,CAAC;IACD,IAAI,CAAC,EAAE,CAAC;QACN,IAAI,CAAC,IAAI,CAAC;YAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,MAAM,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,QAAQ,CAAC;;YAC7C,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,SAAS,GAAG,CAAC,CAAC;IAC9B,CAAC;IACD,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC;IAClB,IAAI,CAAC,IAAI,CAAC;QAAE,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,OAAO,GAAG,CAAC,CAAC;IACjC,CAAC,CAAC,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IACnB,OAAO;AACT,CAAC"}

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

@@ -0,0 +1,3 @@
+import type { Trek } from './context.js';
+/** Cause a supernova to occur. */
+export declare function snova(t: Trek, x: number, y: number): Promise<void>;