@fnndsc/brasa 0.37.0 → 0.38.0

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

@@ -0,0 +1,407 @@
+/*
+ * events.ts: a TypeScript port of BSD trek(6), from events.c.
+ * Ported from NetBSD src/games/trek (trunk 7a9ca154a8f6144307865f23390a3c63b400b801): events.c 1.11 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 Causing time to elapse: energy eaten and regenerated, and every
+ * event that falls due processed in date order: supernovas, tractor beams,
+ * attacks on starbases, distress calls, enslavement, Klingon
+ * reproduction, galaxy snapshots, attacks during a rest, and repairs.
+ *
+ * Deviation: the snapshot is a copy of the state (state.ts), not a block
+ * of bytes.
+ *
+ * @module
+ */
+import { attack } from './attack.js';
+import { compkldist } from './compkl.js';
+import { Device, DOCKED, E_ATTACK, E_ENSLV, E_EVENT, E_FIXDV, E_GHOST, E_HIDDEN, E_ISSUE, E_KATSB, E_KDESB, E_LRTB, E_REPRO, E_SNAP, E_SNOVA, KLINGON, L_NOTIME, LIFESUP, MAXDISTR, MAXEVENTS, MAXKLQUAD, NQUADS, NSECTS, Q_DISTRESSED, Q_SYSTEM, SINS, SSRADIO, Systemname, } from './consts.js';
+import { damaged } from './damaged.js';
+import { dumpssradio } from './dumpssradio.js';
+import { getynpar } from './getpar.js';
+import { initquad, sector } from './initquad.js';
+import { killb } from './kill.js';
+import { lose } from './lose.js';
+import { franf, ranf } from './rand.js';
+import { reschedule, schedule, unschedule, xresched, xsched } from './schedule.js';
+import { snova } from './snova.js';
+import { snapshot_take } from './state.js';
+/** CAUSE TIME TO ELAPSE: 'timewarp' is set if called in a time warp. */
+export async function events(t, timewarp) {
+    const s = t.s;
+    const { Move, Now, Ship, Param, Etc, Game } = s;
+    const quad = (x, y) => s.Quad[x][y];
+    const event = (n) => s.Event[n];
+    let i;
+    let j = 0;
+    let rtime;
+    let xdate;
+    let ev = -1;
+    let ix = 0;
+    let iy = 0;
+    let q;
+    let e;
+    let evnum;
+    let restcancel;
+    // if nothing happened, just allow for any Klingons killed
+    if (Move.time <= 0.0) {
+        Now.time = Now.resource / Now.klings;
+        return 0;
+    }
+    // indicate that the cloaking device is now working
+    Ship.cloakgood = 1;
+    // idate is the initial date
+    const idate = Now.date;
+    // schedule attacks if resting too long
+    if (Move.time > 0.5 && Move.resting)
+        schedule(t, E_ATTACK, 0.5, 0, 0, 0);
+    // scan the event list
+    while (true) {
+        restcancel = 0;
+        evnum = -1;
+        // xdate is the date of the current event
+        xdate = idate + Move.time;
+        // find the first event that has happened
+        for (i = 0; i < MAXEVENTS; i++) {
+            const one = event(i);
+            if (one.evcode === 0 || one.evcode & E_GHOST)
+                continue;
+            if (one.date < xdate) {
+                xdate = one.date;
+                ev = i;
+                evnum = i;
+            }
+        }
+        e = ev;
+        // find the time between events
+        rtime = xdate - Now.date;
+        // decrement the magic "Federation Resources" pseudo-variable
+        Now.resource -= Now.klings * rtime;
+        // and recompute the time left
+        Now.time = Now.resource / Now.klings;
+        // move us up to the next date
+        Now.date = xdate;
+        // check for out of time
+        if (Now.time <= 0.0)
+            await lose(t, L_NOTIME);
+        if (evnum >= 0 && s.Trace) {
+            const one = event(e);
+            t.io.printf('xdate = %.2f, evcode %d params %d %d %d\n', xdate, one.evcode, one.x, one.y, one.systemname);
+        }
+        // if evnum < 0, no events occurred
+        if (evnum < 0)
+            break;
+        // otherwise one did.  Find out what it is
+        switch (event(e).evcode & E_EVENT) {
+            case E_SNOVA: // supernova
+                // cause the supernova to happen
+                await snova(t, -1, 0);
+                // and schedule the next one
+                xresched(t, e, E_SNOVA, 1);
+                break;
+            case E_LRTB: // long range tractor beam
+                // schedule the next one
+                xresched(t, e, E_LRTB, Now.klings);
+                // LRTB cannot occur if we are docked
+                if (Ship.cond !== DOCKED) {
+                    // pick a new quadrant
+                    i = ranf(t.rnd, Now.klings) + 1;
+                    for (ix = 0; ix < NQUADS; ix++) {
+                        for (iy = 0; iy < NQUADS; iy++) {
+                            q = quad(ix, iy);
+                            if (q.stars >= 0)
+                                if ((i -= q.klings) <= 0)
+                                    break;
+                        }
+                        if (i <= 0)
+                            break;
+                    }
+                    // test for LRTB to same quadrant
+                    if (Ship.quadx === ix && Ship.quady === iy)
+                        break;
+                    // nope, dump him in the new quadrant
+                    Ship.quadx = ix;
+                    Ship.quady = iy;
+                    t.io.printf('\n%s caught in long range tractor beam\n', Ship.shipname);
+                    t.io.printf('*** Pulled to quadrant %d,%d\n', Ship.quadx, Ship.quady);
+                    Ship.sectx = ranf(t.rnd, NSECTS);
+                    Ship.secty = ranf(t.rnd, NSECTS);
+                    await initquad(t, 0);
+                    // truncate the move time
+                    Move.time = xdate - idate;
+                }
+                break;
+            case E_KATSB: // Klingon attacks starbase
+                // if out of bases, forget it
+                if (Now.bases <= 0) {
+                    unschedule(t, e);
+                    break;
+                }
+                // check for starbase and Klingons in same quadrant
+                for (i = 0; i < Now.bases; i++) {
+                    ix = Now.base[i].x;
+                    iy = Now.base[i].y;
+                    // see if a Klingon exists in this quadrant
+                    q = quad(ix, iy);
+                    if (q.klings <= 0)
+                        continue;
+                    // see if already distressed
+                    for (j = 0; j < MAXEVENTS; j++) {
+                        const one = event(j);
+                        if ((one.evcode & E_EVENT) !== E_KDESB)
+                            continue;
+                        if (one.x === ix && one.y === iy)
+                            break;
+                    }
+                    if (j < MAXEVENTS)
+                        continue;
+                    // got a potential attack
+                    break;
+                }
+                e = ev;
+                if (i >= Now.bases) {
+                    // not now; wait a while and see if some Klingons move in
+                    reschedule(t, e, 0.5 + 3.0 * franf(t.rnd));
+                    break;
+                }
+                // schedule a new attack, and a destruction of the base
+                xresched(t, e, E_KATSB, 1);
+                e = xsched(t, E_KDESB, 1, ix, iy, 0);
+                // report it if we can
+                if (!damaged(t, SSRADIO)) {
+                    t.io.printf('\nUhura:  Captain, we have received a distress signal\n');
+                    t.io.printf('  from the starbase in quadrant %d,%d.\n', ix, iy);
+                    restcancel++;
+                }
+                else {
+                    // SSRADIO out, make it so we can't see the distress call but it's still there!!!
+                    event(e).evcode |= E_HIDDEN;
+                }
+                break;
+            case E_KDESB: { // Klingon destroys starbase
+                unschedule(t, e);
+                const one = event(e);
+                q = quad(one.x, one.y);
+                // if the base has mysteriously gone away, or if the Klingon got tired and went home, ignore this event
+                if (q.bases <= 0 || q.klings <= 0)
+                    break;
+                // are we in the same quadrant?
+                if (one.x === Ship.quadx && one.y === Ship.quady) {
+                    // yep, kill one in this quadrant
+                    t.io.printf('\nSpock: ');
+                    await killb(t, Ship.quadx, Ship.quady);
+                }
+                else {
+                    // kill one in some other quadrant
+                    await killb(t, one.x, one.y);
+                }
+                break;
+            }
+            case E_ISSUE: // issue a distress call
+                xresched(t, e, E_ISSUE, 1);
+                // if we already have too many, throw this one away
+                if (Ship.distressed >= MAXDISTR)
+                    break;
+                // try a bunch of times to find something suitable
+                q = quad(0, 0);
+                for (i = 0; i < 100; i++) {
+                    ix = ranf(t.rnd, NQUADS);
+                    iy = ranf(t.rnd, NQUADS);
+                    q = quad(ix, iy);
+                    // need a quadrant which is not the current one, which has some inhabited stars which are not
+                    // already under attack, which is not supernova'ed, and which has some Klingons in it
+                    if (!((ix === Ship.quadx && iy === Ship.quady) || q.stars < 0 || q.qsystemname & Q_DISTRESSED || (q.qsystemname & Q_SYSTEM) === 0 || q.klings <= 0))
+                        break;
+                }
+                // can't seem to find one; ignore this call
+                if (i >= 100)
+                    break;
+                // got one!!  Schedule its enslavement
+                Ship.distressed++;
+                e = xsched(t, E_ENSLV, 1, ix, iy, q.qsystemname);
+                q.qsystemname = e | Q_DISTRESSED;
+                // tell the captain about it if we can
+                if (!damaged(t, SSRADIO)) {
+                    t.io.printf('\nUhura: Captain, starsystem %s in quadrant %d,%d is under attack\n', Systemname[event(e).systemname], ix, iy);
+                    restcancel++;
+                }
+                else {
+                    // if we can't tell him, make it invisible
+                    event(e).evcode |= E_HIDDEN;
+                }
+                break;
+            case E_ENSLV: { // starsystem is enslaved
+                unschedule(t, e);
+                // see if current distress call still active
+                const one = event(e);
+                q = quad(one.x, one.y);
+                if (q.klings <= 0) {
+                    // no Klingons, clean up
+                    // restore the system name
+                    q.qsystemname = one.systemname;
+                    break;
+                }
+                // play stork and schedule the first baby
+                e = schedule(t, E_REPRO, Param.eventdly[E_REPRO] * franf(t.rnd), one.x, one.y, one.systemname);
+                // report the disaster if we can
+                const baby = event(e);
+                if (!damaged(t, SSRADIO)) {
+                    t.io.printf("\nUhura:  We've lost contact with starsystem %s\n", Systemname[baby.systemname]);
+                    t.io.printf('  in quadrant %d,%d.\n', baby.x, baby.y);
+                }
+                else {
+                    baby.evcode |= E_HIDDEN;
+                }
+                break;
+            }
+            case E_REPRO: { // Klingon reproduces
+                // see if distress call is still active
+                const one = event(e);
+                q = quad(one.x, one.y);
+                if (q.klings <= 0) {
+                    unschedule(t, e);
+                    q.qsystemname = one.systemname;
+                    break;
+                }
+                xresched(t, e, E_REPRO, 1);
+                // reproduce one Klingon
+                ix = one.x;
+                iy = one.y;
+                if (Now.klings === 127) {
+                    // full right now
+                    break;
+                }
+                if (q.klings >= MAXKLQUAD) {
+                    // this quadrant not ok, pick an adjacent one
+                    for (i = ix - 1; i <= ix + 1; i++) {
+                        if (i < 0 || i >= NQUADS)
+                            continue;
+                        for (j = iy - 1; j <= iy + 1; j++) {
+                            if (j < 0 || j >= NQUADS)
+                                continue;
+                            q = quad(i, j);
+                            // check for this quad ok (not full & no snova)
+                            if (q.klings >= MAXKLQUAD || q.stars < 0)
+                                continue;
+                            break;
+                        }
+                        if (j <= iy + 1)
+                            break;
+                    }
+                    // cannot create another yet
+                    if (j > iy + 1)
+                        break;
+                    ix = i;
+                    iy = j;
+                }
+                // deliver the child
+                q.klings++;
+                Now.klings++;
+                if (ix === Ship.quadx && iy === Ship.quady) {
+                    // we must position Klingon
+                    const r = sector(t);
+                    ix = r.x;
+                    iy = r.y;
+                    s.Sect[ix][iy] = KLINGON;
+                    const k = Etc.klingon[Etc.nkling++];
+                    k.x = ix;
+                    k.y = iy;
+                    k.power = Param.klingpwr;
+                    k.srndreq = 0;
+                    const first = Etc.klingon[0];
+                    compkldist(t, first.dist === first.avgdist ? 0 : 1);
+                }
+                // recompute time left
+                Now.time = Now.resource / Now.klings;
+                break;
+            }
+            case E_SNAP: // take a snapshot of the galaxy
+                xresched(t, e, E_SNAP, 1);
+                Etc.snapshot = snapshot_take(s);
+                Game.snap = 1;
+                break;
+            case E_ATTACK: // Klingons attack during rest period
+                if (!Move.resting) {
+                    unschedule(t, e);
+                    break;
+                }
+                await attack(t, 1);
+                reschedule(t, e, 0.5);
+                break;
+            case E_FIXDV: {
+                i = event(e).systemname;
+                unschedule(t, e);
+                // de-damage the device
+                const device = Device[i];
+                t.io.printf('%s reports repair work on the %s finished.\n', device.person, device.name);
+                // handle special processing upon fix
+                switch (i) {
+                    case LIFESUP:
+                        Ship.reserves = Param.reserves;
+                        break;
+                    case SINS:
+                        if (Ship.cond === DOCKED)
+                            break;
+                        t.io.printf('Spock has tried to recalibrate your Space Internal Navigation System,\n');
+                        t.io.printf('  but he has no standard base to calibrate to.  Suggest you get\n');
+                        t.io.printf('  to a starbase immediately so that you can properly recalibrate.\n');
+                        Ship.sinsbad = 1;
+                        break;
+                    case SSRADIO:
+                        restcancel = dumpssradio(t);
+                        break;
+                }
+                break;
+            }
+            default:
+                break;
+        }
+        if (restcancel && Move.resting && (await getynpar(t, 'Spock: Shall we cancel our rest period')))
+            Move.time = xdate - idate;
+    }
+    // unschedule an attack during a rest period
+    if ((e = Now.eventptr[E_ATTACK]) !== -1)
+        unschedule(t, e);
+    if (!timewarp) {
+        // eat up energy if cloaked
+        if (Ship.cloaked)
+            Ship.energy = Math.trunc(Ship.energy - Param.cloakenergy * Move.time);
+        // regenerate resources
+        rtime = 1.0 - Math.exp(-Param.regenfac * Move.time);
+        Ship.shield = Math.trunc(Ship.shield + (Param.shield - Ship.shield) * rtime);
+        Ship.energy = Math.trunc(Ship.energy + (Param.energy - Ship.energy) * rtime);
+        // decrement life support reserves
+        if (damaged(t, LIFESUP) && Ship.cond !== DOCKED)
+            Ship.reserves -= Move.time;
+    }
+    return 0;
+}
+//# sourceMappingURL=events.js.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"events.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/events.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GA+BG;AACH;;;;;;;;;;GAUG;AACH,OAAO,EAAE,MAAM,EAAE,MAAM,aAAa,CAAC;AACrC,OAAO,EAAE,UAAU,EAAE,MAAM,aAAa,CAAC;AACzC,OAAO,EACL,MAAM,EAAE,MAAM,EAAE,QAAQ,EAAE,OAAO,EAAE,OAAO,EAAE,OAAO,EAAE,OAAO,EAAE,QAAQ,EAAE,OAAO,EAAE,OAAO,EAAE,OAAO,EAAE,MAAM,EAAE,OAAO,EAAE,MAAM,EAC1H,OAAO,EAAE,OAAO,EAAE,QAAQ,EAAE,OAAO,EAAE,QAAQ,EAAE,SAAS,EAAE,SAAS,EAAE,MAAM,EAAE,MAAM,EAAE,YAAY,EAAE,QAAQ,EAAE,IAAI,EAAE,OAAO,EAC1H,UAAU,GACX,MAAM,aAAa,CAAC;AAErB,OAAO,EAAE,OAAO,EAAE,MAAM,cAAc,CAAC;AACvC,OAAO,EAAE,WAAW,EAAE,MAAM,kBAAkB,CAAC;AAC/C,OAAO,EAAE,QAAQ,EAAE,MAAM,aAAa,CAAC;AACvC,OAAO,EAAE,QAAQ,EAAE,MAAM,EAAE,MAAM,eAAe,CAAC;AACjD,OAAO,EAAE,KAAK,EAAE,MAAM,WAAW,CAAC;AAClC,OAAO,EAAE,IAAI,EAAE,MAAM,WAAW,CAAC;AACjC,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,MAAM,WAAW,CAAC;AACxC,OAAO,EAAE,UAAU,EAAE,QAAQ,EAAE,UAAU,EAAE,QAAQ,EAAE,MAAM,EAAE,MAAM,eAAe,CAAC;AACnF,OAAO,EAAE,KAAK,EAAE,MAAM,YAAY,CAAC;AACnC,OAAO,EAAE,aAAa,EAAkD,MAAM,YAAY,CAAC;AAE3F,wEAAwE;AACxE,MAAM,CAAC,KAAK,UAAU,MAAM,CAAC,CAAO,EAAE,QAAgB;IACpD,MAAM,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC;IACd,MAAM,EAAE,IAAI,EAAE,GAAG,EAAE,IAAI,EAAE,KAAK,EAAE,GAAG,EAAE,IAAI,EAAE,GAAG,CAAC,CAAC;IAChD,MAAM,IAAI,GAAG,CAAC,CAAS,EAAE,CAAS,EAAQ,EAAE,CAAE,CAAC,CAAC,IAAI,CAAC,CAAC,CAAY,CAAC,CAAC,CAAS,CAAC;IAC9E,MAAM,KAAK,GAAG,CAAC,CAAS,EAAa,EAAE,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAc,CAAC;IAChE,IAAI,CAAS,CAAC;IACd,IAAI,CAAC,GAAW,CAAC,CAAC;IAClB,IAAI,KAAa,CAAC;IAClB,IAAI,KAAa,CAAC;IAClB,IAAI,EAAE,GAAW,CAAC,CAAC,CAAC;IACpB,IAAI,EAAE,GAAW,CAAC,CAAC;IACnB,IAAI,EAAE,GAAW,CAAC,CAAC;IACnB,IAAI,CAAO,CAAC;IACZ,IAAI,CAAS,CAAC;IACd,IAAI,KAAa,CAAC;IAClB,IAAI,UAAkB,CAAC;IAEvB,0DAA0D;IAC1D,IAAI,IAAI,CAAC,IAAI,IAAI,GAAG,EAAE,CAAC;QACrB,GAAG,CAAC,IAAI,GAAG,GAAG,CAAC,QAAQ,GAAG,GAAG,CAAC,MAAM,CAAC;QACrC,OAAO,CAAC,CAAC;IACX,CAAC;IAED,mDAAmD;IACnD,IAAI,CAAC,SAAS,GAAG,CAAC,CAAC;IAEnB,4BAA4B;IAC5B,MAAM,KAAK,GAAW,GAAG,CAAC,IAAI,CAAC;IAE/B,uCAAuC;IACvC,IAAI,IAAI,CAAC,IAAI,GAAG,GAAG,IAAI,IAAI,CAAC,OAAO;QAAE,QAAQ,CAAC,CAAC,EAAE,QAAQ,EAAE,GAAG,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;IAEzE,sBAAsB;IACtB,OAAO,IAAI,EAAE,CAAC;QACZ,UAAU,GAAG,CAAC,CAAC;QACf,KAAK,GAAG,CAAC,CAAC,CAAC;QACX,yCAAyC;QACzC,KAAK,GAAG,KAAK,GAAG,IAAI,CAAC,IAAI,CAAC;QAE1B,yCAAyC;QACzC,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,SAAS,EAAE,CAAC,EAAE,EAAE,CAAC;YAC/B,MAAM,GAAG,GAAc,KAAK,CAAC,CAAC,CAAC,CAAC;YAChC,IAAI,GAAG,CAAC,MAAM,KAAK,CAAC,IAAI,GAAG,CAAC,MAAM,GAAG,OAAO;gBAAE,SAAS;YACvD,IAAI,GAAG,CAAC,IAAI,GAAG,KAAK,EAAE,CAAC;gBACrB,KAAK,GAAG,GAAG,CAAC,IAAI,CAAC;gBACjB,EAAE,GAAG,CAAC,CAAC;gBACP,KAAK,GAAG,CAAC,CAAC;YACZ,CAAC;QACH,CAAC;QACD,CAAC,GAAG,EAAE,CAAC;QAEP,+BAA+B;QAC/B,KAAK,GAAG,KAAK,GAAG,GAAG,CAAC,IAAI,CAAC;QAEzB,6DAA6D;QAC7D,GAAG,CAAC,QAAQ,IAAI,GAAG,CAAC,MAAM,GAAG,KAAK,CAAC;QACnC,8BAA8B;QAC9B,GAAG,CAAC,IAAI,GAAG,GAAG,CAAC,QAAQ,GAAG,GAAG,CAAC,MAAM,CAAC;QAErC,8BAA8B;QAC9B,GAAG,CAAC,IAAI,GAAG,KAAK,CAAC;QAEjB,wBAAwB;QACxB,IAAI,GAAG,CAAC,IAAI,IAAI,GAAG;YAAE,MAAM,IAAI,CAAC,CAAC,EAAE,QAAQ,CAAC,CAAC;QAC7C,IAAI,KAAK,IAAI,CAAC,IAAI,CAAC,CAAC,KAAK,EAAE,CAAC;YAC1B,MAAM,GAAG,GAAc,KAAK,CAAC,CAAC,CAAC,CAAC;YAChC,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,2CAA2C,EAAE,KAAK,EAAE,GAAG,CAAC,MAAM,EAAE,GAAG,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,EAAE,GAAG,CAAC,UAAU,CAAC,CAAC;QAC5G,CAAC;QAED,mCAAmC;QACnC,IAAI,KAAK,GAAG,CAAC;YAAE,MAAM;QAErB,0CAA0C;QAC1C,QAAQ,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,GAAG,OAAO,EAAE,CAAC;YAClC,KAAK,OAAO,EAAE,YAAY;gBACxB,gCAAgC;gBAChC,MAAM,KAAK,CAAC,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;gBACtB,4BAA4B;gBAC5B,QAAQ,CAAC,CAAC,EAAE,CAAC,EAAE,OAAO,EAAE,CAAC,CAAC,CAAC;gBAC3B,MAAM;YAER,KAAK,MAAM,EAAE,0BAA0B;gBACrC,wBAAwB;gBACxB,QAAQ,CAAC,CAAC,EAAE,CAAC,EAAE,MAAM,EAAE,GAAG,CAAC,MAAM,CAAC,CAAC;gBACnC,qCAAqC;gBACrC,IAAI,IAAI,CAAC,IAAI,KAAK,MAAM,EAAE,CAAC;oBACzB,sBAAsB;oBACtB,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,GAAG,CAAC,MAAM,CAAC,GAAG,CAAC,CAAC;oBAChC,KAAK,EAAE,GAAG,CAAC,EAAE,EAAE,GAAG,MAAM,EAAE,EAAE,EAAE,EAAE,CAAC;wBAC/B,KAAK,EAAE,GAAG,CAAC,EAAE,EAAE,GAAG,MAAM,EAAE,EAAE,EAAE,EAAE,CAAC;4BAC/B,CAAC,GAAG,IAAI,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC;4BACjB,IAAI,CAAC,CAAC,KAAK,IAAI,CAAC;gCAAE,IAAI,CAAC,CAAC,IAAI,CAAC,CAAC,MAAM,CAAC,IAAI,CAAC;oCAAE,MAAM;wBACpD,CAAC;wBACD,IAAI,CAAC,IAAI,CAAC;4BAAE,MAAM;oBACpB,CAAC;oBAED,iCAAiC;oBACjC,IAAI,IAAI,CAAC,KAAK,KAAK,EAAE,IAAI,IAAI,CAAC,KAAK,KAAK,EAAE;wBAAE,MAAM;oBAElD,qCAAqC;oBACrC,IAAI,CAAC,KAAK,GAAG,EAAE,CAAC;oBAChB,IAAI,CAAC,KAAK,GAAG,EAAE,CAAC;oBAChB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,0CAA0C,EAAE,IAAI,CAAC,QAAQ,CAAC,CAAC;oBACvE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,gCAAgC,EAAE,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,KAAK,CAAC,CAAC;oBACtE,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;oBACjC,IAAI,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;oBACjC,MAAM,QAAQ,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;oBACrB,yBAAyB;oBACzB,IAAI,CAAC,IAAI,GAAG,KAAK,GAAG,KAAK,CAAC;gBAC5B,CAAC;gBACD,MAAM;YAER,KAAK,OAAO,EAAE,2BAA2B;gBACvC,6BAA6B;gBAC7B,IAAI,GAAG,CAAC,KAAK,IAAI,CAAC,EAAE,CAAC;oBACnB,UAAU,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;oBACjB,MAAM;gBACR,CAAC;gBAED,mDAAmD;gBACnD,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,CAAC,KAAK,EAAE,CAAC,EAAE,EAAE,CAAC;oBAC/B,EAAE,GAAI,GAAG,CAAC,IAAI,CAAC,CAAC,CAAQ,CAAC,CAAC,CAAC;oBAC3B,EAAE,GAAI,GAAG,CAAC,IAAI,CAAC,CAAC,CAAQ,CAAC,CAAC,CAAC;oBAC3B,2CAA2C;oBAC3C,CAAC,GAAG,IAAI,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC;oBACjB,IAAI,CAAC,CAAC,MAAM,IAAI,CAAC;wBAAE,SAAS;oBAE5B,4BAA4B;oBAC5B,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,SAAS,EAAE,CAAC,EAAE,EAAE,CAAC;wBAC/B,MAAM,GAAG,GAAc,KAAK,CAAC,CAAC,CAAC,CAAC;wBAChC,IAAI,CAAC,GAAG,CAAC,MAAM,GAAG,OAAO,CAAC,KAAK,OAAO;4BAAE,SAAS;wBACjD,IAAI,GAAG,CAAC,CAAC,KAAK,EAAE,IAAI,GAAG,CAAC,CAAC,KAAK,EAAE;4BAAE,MAAM;oBAC1C,CAAC;oBACD,IAAI,CAAC,GAAG,SAAS;wBAAE,SAAS;oBAE5B,yBAAyB;oBACzB,MAAM;gBACR,CAAC;gBACD,CAAC,GAAG,EAAE,CAAC;gBACP,IAAI,CAAC,IAAI,GAAG,CAAC,KAAK,EAAE,CAAC;oBACnB,yDAAyD;oBACzD,UAAU,CAAC,CAAC,EAAE,CAAC,EAAE,GAAG,GAAG,GAAG,GAAG,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;oBAC3C,MAAM;gBACR,CAAC;gBACD,uDAAuD;gBACvD,QAAQ,CAAC,CAAC,EAAE,CAAC,EAAE,OAAO,EAAE,CAAC,CAAC,CAAC;gBAC3B,CAAC,GAAG,MAAM,CAAC,CAAC,EAAE,OAAO,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC;gBAErC,sBAAsB;gBACtB,IAAI,CAAC,OAAO,CAAC,CAAC,EAAE,OAAO,CAAC,EAAE,CAAC;oBACzB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,yDAAyD,CAAC,CAAC;oBACvE,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,0CAA0C,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;oBAChE,UAAU,EAAE,CAAC;gBACf,CAAC;qBAAM,CAAC;oBACN,iFAAiF;oBACjF,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,IAAI,QAAQ,CAAC;gBAC9B,CAAC;gBACD,MAAM;YAER,KAAK,OAAO,CAAC,CAAC,CAAC,CAAC,4BAA4B;gBAC1C,UAAU,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;gBACjB,MAAM,GAAG,GAAc,KAAK,CAAC,CAAC,CAAC,CAAC;gBAChC,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;gBACvB,uGAAuG;gBACvG,IAAI,CAAC,CAAC,KAAK,IAAI,CAAC,IAAI,CAAC,CAAC,MAAM,IAAI,CAAC;oBAAE,MAAM;gBACzC,+BAA+B;gBAC/B,IAAI,GAAG,CAAC,CAAC,KAAK,IAAI,CAAC,KAAK,IAAI,GAAG,CAAC,CAAC,KAAK,IAAI,CAAC,KAAK,EAAE,CAAC;oBACjD,iCAAiC;oBACjC,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,WAAW,CAAC,CAAC;oBACzB,MAAM,KAAK,CAAC,CAAC,EAAE,IAAI,CAAC,KAAK,EAAE,IAAI,CAAC,KAAK,CAAC,CAAC;gBACzC,CAAC;qBAAM,CAAC;oBACN,kCAAkC;oBAClC,MAAM,KAAK,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;gBAC/B,CAAC;gBACD,MAAM;YACR,CAAC;YAED,KAAK,OAAO,EAAE,wBAAwB;gBACpC,QAAQ,CAAC,CAAC,EAAE,CAAC,EAAE,OAAO,EAAE,CAAC,CAAC,CAAC;gBAC3B,mDAAmD;gBACnD,IAAI,IAAI,CAAC,UAAU,IAAI,QAAQ;oBAAE,MAAM;gBACvC,kDAAkD;gBAClD,CAAC,GAAG,IAAI,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;gBACf,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE,EAAE,CAAC;oBACzB,EAAE,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;oBACzB,EAAE,GAAG,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC;oBACzB,CAAC,GAAG,IAAI,CAAC,EAAE,EAAE,EAAE,CAAC,CAAC;oBACjB,6FAA6F;oBAC7F,qFAAqF;oBACrF,IAAI,CAAC,CAAC,CAAC,EAAE,KAAK,IAAI,CAAC,KAAK,IAAI,EAAE,KAAK,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,KAAK,GAAG,CAAC,IAAI,CAAC,CAAC,WAAW,GAAG,YAAY,IAAI,CAAC,CAAC,CAAC,WAAW,GAAG,QAAQ,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,MAAM,IAAI,CAAC,CAAC;wBAAE,MAAM;gBAC7J,CAAC;gBACD,2CAA2C;gBAC3C,IAAI,CAAC,IAAI,GAAG;oBAAE,MAAM;gBAEpB,sCAAsC;gBACtC,IAAI,CAAC,UAAU,EAAE,CAAC;gBAClB,CAAC,GAAG,MAAM,CAAC,CAAC,EAAE,OAAO,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC,WAAW,CAAC,CAAC;gBACjD,CAAC,CAAC,WAAW,GAAG,CAAC,GAAG,YAAY,CAAC;gBAEjC,sCAAsC;gBACtC,IAAI,CAAC,OAAO,CAAC,CAAC,EAAE,OAAO,CAAC,EAAE,CAAC;oBACzB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,qEAAqE,EAAE,UAAU,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,UAAU,CAAW,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;oBACtI,UAAU,EAAE,CAAC;gBACf,CAAC;qBAAM,CAAC;oBACN,0CAA0C;oBAC1C,KAAK,CAAC,CAAC,CAAC,CAAC,MAAM,IAAI,QAAQ,CAAC;gBAC9B,CAAC;gBACD,MAAM;YAER,KAAK,OAAO,CAAC,CAAC,CAAC,CAAC,yBAAyB;gBACvC,UAAU,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;gBACjB,4CAA4C;gBAC5C,MAAM,GAAG,GAAc,KAAK,CAAC,CAAC,CAAC,CAAC;gBAChC,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;gBACvB,IAAI,CAAC,CAAC,MAAM,IAAI,CAAC,EAAE,CAAC;oBAClB,wBAAwB;oBACxB,0BAA0B;oBAC1B,CAAC,CAAC,WAAW,GAAG,GAAG,CAAC,UAAU,CAAC;oBAC/B,MAAM;gBACR,CAAC;gBAED,yCAAyC;gBACzC,CAAC,GAAG,QAAQ,CAAC,CAAC,EAAE,OAAO,EAAG,KAAK,CAAC,QAAQ,CAAC,OAAO,CAAY,GAAG,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,EAAE,GAAG,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,EAAE,GAAG,CAAC,UAAU,CAAC,CAAC;gBAE3G,gCAAgC;gBAChC,MAAM,IAAI,GAAc,KAAK,CAAC,CAAC,CAAC,CAAC;gBACjC,IAAI,CAAC,OAAO,CAAC,CAAC,EAAE,OAAO,CAAC,EAAE,CAAC;oBACzB,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,mDAAmD,EAAE,UAAU,CAAC,IAAI,CAAC,UAAU,CAAW,CAAC,CAAC;oBACxG,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,wBAAwB,EAAE,IAAI,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC,CAAC,CAAC;gBACxD,CAAC;qBAAM,CAAC;oBACN,IAAI,CAAC,MAAM,IAAI,QAAQ,CAAC;gBAC1B,CAAC;gBACD,MAAM;YACR,CAAC;YAED,KAAK,OAAO,CAAC,CAAC,CAAC,CAAC,qBAAqB;gBACnC,uCAAuC;gBACvC,MAAM,GAAG,GAAc,KAAK,CAAC,CAAC,CAAC,CAAC;gBAChC,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;gBACvB,IAAI,CAAC,CAAC,MAAM,IAAI,CAAC,EAAE,CAAC;oBAClB,UAAU,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;oBACjB,CAAC,CAAC,WAAW,GAAG,GAAG,CAAC,UAAU,CAAC;oBAC/B,MAAM;gBACR,CAAC;gBACD,QAAQ,CAAC,CAAC,EAAE,CAAC,EAAE,OAAO,EAAE,CAAC,CAAC,CAAC;gBAC3B,wBAAwB;gBACxB,EAAE,GAAG,GAAG,CAAC,CAAC,CAAC;gBACX,EAAE,GAAG,GAAG,CAAC,CAAC,CAAC;gBACX,IAAI,GAAG,CAAC,MAAM,KAAK,GAAG,EAAE,CAAC;oBACvB,iBAAiB;oBACjB,MAAM;gBACR,CAAC;gBACD,IAAI,CAAC,CAAC,MAAM,IAAI,SAAS,EAAE,CAAC;oBAC1B,6CAA6C;oBAC7C,KAAK,CAAC,GAAG,EAAE,GAAG,CAAC,EAAE,CAAC,IAAI,EAAE,GAAG,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC;wBAClC,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,IAAI,MAAM;4BAAE,SAAS;wBACnC,KAAK,CAAC,GAAG,EAAE,GAAG,CAAC,EAAE,CAAC,IAAI,EAAE,GAAG,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC;4BAClC,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,IAAI,MAAM;gCAAE,SAAS;4BACnC,CAAC,GAAG,IAAI,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;4BACf,+CAA+C;4BAC/C,IAAI,CAAC,CAAC,MAAM,IAAI,SAAS,IAAI,CAAC,CAAC,KAAK,GAAG,CAAC;gCAAE,SAAS;4BACnD,MAAM;wBACR,CAAC;wBACD,IAAI,CAAC,IAAI,EAAE,GAAG,CAAC;4BAAE,MAAM;oBACzB,CAAC;oBACD,4BAA4B;oBAC5B,IAAI,CAAC,GAAG,EAAE,GAAG,CAAC;wBAAE,MAAM;oBACtB,EAAE,GAAG,CAAC,CAAC;oBACP,EAAE,GAAG,CAAC,CAAC;gBACT,CAAC;gBACD,oBAAoB;gBACpB,CAAC,CAAC,MAAM,EAAE,CAAC;gBACX,GAAG,CAAC,MAAM,EAAE,CAAC;gBACb,IAAI,EAAE,KAAK,IAAI,CAAC,KAAK,IAAI,EAAE,KAAK,IAAI,CAAC,KAAK,EAAE,CAAC;oBAC3C,2BAA2B;oBAC3B,MAAM,CAAC,GAAO,MAAM,CAAC,CAAC,CAAC,CAAC;oBACxB,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;oBACT,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC;oBACR,CAAC,CAAC,IAAI,CAAC,EAAE,CAAc,CAAC,EAAE,CAAC,GAAG,OAAO,CAAC;oBACvC,MAAM,CAAC,GAAU,GAAG,CAAC,OAAO,CAAC,GAAG,CAAC,MAAM,EAAE,CAAU,CAAC;oBACpD,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC;oBACT,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC;oBACT,CAAC,CAAC,KAAK,GAAG,KAAK,CAAC,QAAQ,CAAC;oBACzB,CAAC,CAAC,OAAO,GAAG,CAAC,CAAC;oBACd,MAAM,KAAK,GAAU,GAAG,CAAC,OAAO,CAAC,CAAC,CAAU,CAAC;oBAC7C,UAAU,CAAC,CAAC,EAAE,KAAK,CAAC,IAAI,KAAK,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;gBACtD,CAAC;gBAED,sBAAsB;gBACtB,GAAG,CAAC,IAAI,GAAG,GAAG,CAAC,QAAQ,GAAG,GAAG,CAAC,MAAM,CAAC;gBACrC,MAAM;YACR,CAAC;YAED,KAAK,MAAM,EAAE,gCAAgC;gBAC3C,QAAQ,CAAC,CAAC,EAAE,CAAC,EAAE,MAAM,EAAE,CAAC,CAAC,CAAC;gBAC1B,GAAG,CAAC,QAAQ,GAAG,aAAa,CAAC,CAAC,CAAC,CAAC;gBAChC,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC;gBACd,MAAM;YAER,KAAK,QAAQ,EAAE,qCAAqC;gBAClD,IAAI,CAAC,IAAI,CAAC,OAAO,EAAE,CAAC;oBAClB,UAAU,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;oBACjB,MAAM;gBACR,CAAC;gBACD,MAAM,MAAM,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;gBACnB,UAAU,CAAC,CAAC,EAAE,CAAC,EAAE,GAAG,CAAC,CAAC;gBACtB,MAAM;YAER,KAAK,OAAO,CAAC,CAAC,CAAC;gBACb,CAAC,GAAG,KAAK,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC;gBACxB,UAAU,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;gBAEjB,uBAAuB;gBACvB,MAAM,MAAM,GAAW,MAAM,CAAC,CAAC,CAAW,CAAC;gBAC3C,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,8CAA8C,EAAE,MAAM,CAAC,MAAM,EAAE,MAAM,CAAC,IAAI,CAAC,CAAC;gBAExF,qCAAqC;gBACrC,QAAQ,CAAC,EAAE,CAAC;oBACV,KAAK,OAAO;wBACV,IAAI,CAAC,QAAQ,GAAG,KAAK,CAAC,QAAQ,CAAC;wBAC/B,MAAM;oBAER,KAAK,IAAI;wBACP,IAAI,IAAI,CAAC,IAAI,KAAK,MAAM;4BAAE,MAAM;wBAChC,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,yEAAyE,CAAC,CAAC;wBACvF,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,mEAAmE,CAAC,CAAC;wBACjF,CAAC,CAAC,EAAE,CAAC,MAAM,CAAC,qEAAqE,CAAC,CAAC;wBACnF,IAAI,CAAC,OAAO,GAAG,CAAC,CAAC;wBACjB,MAAM;oBAER,KAAK,OAAO;wBACV,UAAU,GAAG,WAAW,CAAC,CAAC,CAAC,CAAC;wBAC5B,MAAM;gBACV,CAAC;gBACD,MAAM;YACR,CAAC;YAED;gBACE,MAAM;QACV,CAAC;QAED,IAAI,UAAU,IAAI,IAAI,CAAC,OAAO,IAAI,CAAC,MAAM,QAAQ,CAAC,CAAC,EAAE,wCAAwC,CAAC,CAAC;YAAE,IAAI,CAAC,IAAI,GAAG,KAAK,GAAG,KAAK,CAAC;IAC7H,CAAC;IAED,4CAA4C;IAC5C,IAAI,CAAC,CAAC,GAAG,GAAG,CAAC,QAAQ,CAAC,QAAQ,CAAW,CAAC,KAAK,CAAC,CAAC;QAAE,UAAU,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC;IAEpE,IAAI,CAAC,QAAQ,EAAE,CAAC;QACd,2BAA2B;QAC3B,IAAI,IAAI,CAAC,OAAO;YAAE,IAAI,CAAC,MAAM,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,MAAM,GAAG,KAAK,CAAC,WAAW,GAAG,IAAI,CAAC,IAAI,CAAC,CAAC;QAExF,uBAAuB;QACvB,KAAK,GAAG,GAAG,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,QAAQ,GAAG,IAAI,CAAC,IAAI,CAAC,CAAC;QACpD,IAAI,CAAC,MAAM,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,MAAM,GAAG,CAAC,KAAK,CAAC,MAAM,GAAG,IAAI,CAAC,MAAM,CAAC,GAAG,KAAK,CAAC,CAAC;QAC7E,IAAI,CAAC,MAAM,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,CAAC,MAAM,GAAG,CAAC,KAAK,CAAC,MAAM,GAAG,IAAI,CAAC,MAAM,CAAC,GAAG,KAAK,CAAC,CAAC;QAE7E,kCAAkC;QAClC,IAAI,OAAO,CAAC,CAAC,EAAE,OAAO,CAAC,IAAI,IAAI,CAAC,IAAI,KAAK,MAAM;YAAE,IAAI,CAAC,QAAQ,IAAI,IAAI,CAAC,IAAI,CAAC;IAC9E,CAAC;IACD,OAAO,CAAC,CAAC;AACX,CAAC"}

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

@@ -0,0 +1,14 @@
+/**
+ * @file Asking for a course and a distance.
+ *
+ * Deviation: the C returned 1 for an invalid input and filled its out
+ * parameters; the port returns null, or the course and distance.
+ *
+ * @module
+ */
+import type { Trek } from './context.js';
+/** Asks the course and distance; null for an invalid input. */
+export declare function getcodi(t: Trek): Promise<{
+    co: number;
+    value: number;
+} | null>;

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

@@ -0,0 +1,24 @@
+import { getfltpar, getintpar } from './getpar.js';
+/*
+**  get course and distance
+**
+**	The user is asked for a course and distance.  This is used by
+**	move, impulse, and some of the computer functions.
+**
+**	The return value is zero for success, one for an invalid input
+**	(meaning to drop the request).
+*/
+/** Asks the course and distance; null for an invalid input. */
+export async function getcodi(t) {
+    const co = await getintpar(t, 'Course');
+    /* course must be in the interval [0, 360] */
+    if (co < 0 || co > 360)
+        return null;
+    const di = await getfltpar(t, 'Distance');
+    /* distance must be in the interval [0, 15] */
+    if (di <= 0.0 || di > 15.0)
+        return null;
+    /* good return */
+    return { co, value: di };
+}
+//# sourceMappingURL=getcodi.js.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"getcodi.js","sourceRoot":"","sources":["../../../../src/builtins/games/trek/getcodi.ts"],"names":[],"mappings":"AAyCA,OAAO,EAAE,SAAS,EAAE,SAAS,EAAE,MAAM,aAAa,CAAC;AAEnD;;;;;;;;EAQE;AAEF,+DAA+D;AAC/D,MAAM,CAAC,KAAK,UAAU,OAAO,CAAC,CAAO;IACnC,MAAM,EAAE,GAAW,MAAM,SAAS,CAAC,CAAC,EAAE,QAAQ,CAAC,CAAC;IAEhD,6CAA6C;IAC7C,IAAI,EAAE,GAAG,CAAC,IAAI,EAAE,GAAG,GAAG;QAAE,OAAO,IAAI,CAAC;IACpC,MAAM,EAAE,GAAW,MAAM,SAAS,CAAC,CAAC,EAAE,UAAU,CAAC,CAAC;IAElD,8CAA8C;IAC9C,IAAI,EAAE,IAAI,GAAG,IAAI,EAAE,GAAG,IAAI;QAAE,OAAO,IAAI,CAAC;IAExC,iBAAiB;IACjB,OAAO,EAAE,EAAE,EAAE,KAAK,EAAE,EAAE,EAAE,CAAC;AAC3B,CAAC"}

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

@@ -0,0 +1,40 @@
+/**
+ * @file Reading a parameter: an integer, a double, yes or no, a code from a
+ * table, a string; and the stream tests the rest of the game reads with.
+ *
+ * As the C: a prompt is printed only when the next character is a
+ * newline, so parameters typed ahead on the command line are taken
+ * without being asked for.
+ *
+ * @module
+ */
+import type { CmdFun, Trek } from './context.js';
+/** One entry of a conversion table: an abbreviation, the rest of the word, what it does, a value. */
+export interface Cvntab {
+    abbrev: string;
+    full: string;
+    value: CmdFun | null;
+    value2: number;
+}
+/** get integer parameter */
+export declare function getintpar(t: Trek, s: string | null): Promise<number>;
+/** get floating parameter */
+export declare function getfltpar(t: Trek, s: string | null): Promise<number>;
+/** get yes/no parameter */
+export declare function getynpar(t: Trek, s: string): Promise<number>;
+/**
+ * get coded parameter: a word matched against a table by its abbreviation
+ * and as much of the rest as was typed; `?` lists the table.
+ */
+export declare function getcodpar(t: Trek, s: string, tab: ReadonlyArray<Cvntab>): Promise<Cvntab>;
+/** get string parameter: up to l characters, ended by any of t (default white space and ;). */
+export declare function getstrpar(t: Trek, s: string | null, l: number, terminators: string | null): Promise<string>;
+/** test if newline is next valid character */
+export declare function testnl(t: Trek): Promise<boolean>;
+/** scan for newline */
+export declare function skiptonl(t: Trek, c: number): Promise<void>;
+/**
+ * TEST FOR SPECIFIED DELIMITER: the input is scanned for the delimiter;
+ * found, it is thrown away and true is returned; not found, false.
+ */
+export declare function readdelim(t: Trek, d: number): Promise<boolean>;