@modplayjs/fmt-sid 0.0.0-stage → 0.2.2

package/dist/loader.js

@@ -0,0 +1,383 @@
+// SPDX-License-Identifier: BSD-3-Clause
+// Copyright (c) 2026 Bitti09 — modplayjs contributors
+// Ported from: cRSID 1.58 libcRSID/host/file.c (cRSID_processSIDfileData)
+// and libcRSID/libcRSID.c (cRSID_init / cRSID_initSIDtune / sample
+// generation entry).
+// (c) Hermit (Mihaly Horvath), license: WTF ("do what the frick you want").
+//
+// cRSID_processSIDfileData in C reads the header through a struct overlaid
+// on the raw file bytes (big-endian multi-byte fields on a little-endian
+// host are read byte-wise via LoadAddressH/L etc.). The TS port decodes the
+// big-endian byte layout explicitly into a CRSIDheader, then runs the same
+// processing steps.
+import { cRSID, cRSID_C64 } from './instance.js';
+import { CRSID_FILEVERSION_WEBSID, CRSID_SECONDS_PER_MINUTE } from './host.js';
+import { cRSID_setC64, cRSID_initC64, cRSID_emulateC64 } from './c64.js';
+import { cRSID_playPSIDdigi } from './psiddigi.js';
+import { cRSID_initCPU, cRSID_emulateCPU } from './cpu.js';
+import { cRSID_readMem } from './mem.js';
+// ---------------------------------------------------------------------------
+// Header decode (host/file.c struct-overlay → explicit BE decoding)
+// ---------------------------------------------------------------------------
+/** Decode the PSID/RSID header from raw file bytes (libcRSID.h:10-56 layout).
+ *  Strings are using 1252 codepage per the spec — decoded latin1 here. */
+export function cRSID_decodeSIDheader(filedata) {
+    const be16 = (o) => (filedata[o] << 8) | filedata[o + 1];
+    const magic = String.fromCharCode(filedata[0], filedata[1], filedata[2], filedata[3]);
+    const version = filedata[5];
+    const headerSize = filedata[7];
+    return {
+        MagicString: magic,
+        Version: version,
+        HeaderSize: headerSize,
+        LoadAddress: be16(8), // if 0 it's a PRG and its loadaddress is used
+        InitAddress: be16(10), // if 0 it's taken from load-address (but should be set)
+        PlayAddress: be16(12), // if 0 play-routine-call is set by the initializer
+        SubtuneAmount: be16(14), // 1..256
+        DefaultSubtune: filedata[17], // 1..256 (optional, defaults to 1)
+        SubtuneTimeSources: ((filedata[0x12] << 24) | (filedata[0x13] << 16) | (filedata[0x14] << 8) | filedata[0x15]) >>> 0,
+        Title: latin1(filedata, 0x16, 32),
+        Author: latin1(filedata, 0x36, 32),
+        ReleaseInfo: latin1(filedata, 0x56, 32),
+        ModelFormatStandardH: filedata[0x76],
+        ModelFormatStandard: filedata[0x77],
+        RelocStartPage: filedata[0x78],
+        RelocFreePages: filedata[0x79],
+        SID2baseAddress: filedata[0x7a],
+        SID3baseAddress: filedata[0x7b],
+        SID2flagsH: filedata[0x7a],
+        SID2flagsL: filedata[0x7b],
+        SID3flagsH: filedata[0x7c],
+        SID3flagsL: filedata[0x7d],
+        SID4baseAddress: filedata[0x7e],
+        SID4flagsL: filedata[0x7f],
+    };
+}
+function latin1(b, o, n) {
+    let s = '';
+    for (let i = 0; i < n; ++i) {
+        const c = b[o + i];
+        if (c === 0)
+            break; // C char[] printed via %s stops at NUL
+        s += String.fromCharCode(c);
+    }
+    return s;
+}
+// ---------------------------------------------------------------------------
+// cRSID_processSIDfileData (host/file.c:141-185)
+// ---------------------------------------------------------------------------
+export function cRSID_processSIDfileData(filedata, filesize) {
+    let i;
+    let SIDdataOffset;
+    const MagicStringPSID = 'PSID';
+    const header = cRSID_decodeSIDheader(filedata);
+    cRSID.SIDheader = header;
+    // copy KERNAL & BASIC ROM contents into the RAM under them? (So PSIDs that
+    // don't select bank correctly will work better.)
+    for (i = 0xa000; i < 0x10000; ++i)
+        cRSID_C64.RAMbank[i] = cRSID_C64.ROMbanks[i];
+    for (i = 0x0000; i < 0xa000; ++i)
+        cRSID_C64.RAMbank[i] = 0; // fresh start (maybe some bugged SIDs want 0 at certain RAM-locations)
+    for (i = 0xc000; i < 0xd000; ++i)
+        cRSID_C64.RAMbank[i] = 0;
+    const m = header.MagicString;
+    if (m[0] !== 'P' && m[0] !== 'R')
+        return null;
+    for (i = 1; i < MagicStringPSID.length; ++i) {
+        if (m[i] !== MagicStringPSID[i])
+            return null;
+    }
+    cRSID.RealSIDmode = m[0] === 'R' ? 1 : 0;
+    cRSID_C64.RealSIDmode = cRSID.RealSIDmode; // update shadowed copy used by the audio thread (sound-thread shouldn't run at this moment)
+    if (header.LoadAddress === 0) {
+        // load-address taken from first 2 bytes of the C64 PRG
+        cRSID.LoadAddress = ((filedata[header.HeaderSize + 1] << 8) + filedata[header.HeaderSize + 0]) >>> 0;
+        SIDdataOffset = header.HeaderSize + 2;
+    }
+    else {
+        // load-adress taken from SID-header
+        cRSID.LoadAddress = header.LoadAddress;
+        SIDdataOffset = header.HeaderSize;
+    }
+    // Used by subtune-playback too after first init, so tunes that modify
+    // memory can start with a freshly loaded data:
+    for (i = SIDdataOffset; i < filesize; ++i) {
+        cRSID_C64.RAMbank[(cRSID.LoadAddress + (i - SIDdataOffset)) & 0xffff] = filedata[i];
+    }
+    i = (cRSID.LoadAddress + (filesize - SIDdataOffset)) & 0x1ffff; // (C: plain int math, clamped below)
+    cRSID.EndAddress = i < 0x10000 ? i : 0xffff;
+    cRSID.PSIDdigiMode = (!cRSID.RealSIDmode && (header.ModelFormatStandard & 2)) === 1 ? 1 : 0;
+    // cRSID_getPlaylengths (host/file.c:37-79): only active when
+    // cRSID.SongLengths != NULL, which the TS port never sets (no MD5
+    // song-length database support) — the loop below is the direct equivalent
+    // of the C fallback-fill that runs after it.
+    if (cRSID.FallbackPlayTime > 0) {
+        for (i = 0; i <= 256; ++i) {
+            if (cRSID.SubtuneDurations[i] <= 0)
+                cRSID.SubtuneDurations[i] = cRSID.FallbackPlayTime;
+        }
+    }
+    return cRSID.SIDheader;
+}
+// ---------------------------------------------------------------------------
+// cRSID_init (libcRSID.c:35-67) — init emulation objects; the host-sound
+// call (cRSID_initSound, CRSID_PLATFORM_PC only) is out of scope, matching
+// the embedded build path where `buflen` only silences an unused-param
+// warning. PlaySID-compat defaults from cRSID_init.
+// ---------------------------------------------------------------------------
+export function cRSID_init(samplerate, buflen) {
+    cRSID.RealSIDmode = 1;
+    cRSID.Stereo = 0 /* CRSID_CHANNELMODE_MONO */;
+    cRSID.HighQualitySID = 1;
+    cRSID.HighQualityResampler = 0; // was problematic (noisy) with lowpass-filtered triangles on all SID-channels
+    cRSID_C64.RealSIDmode = cRSID.RealSIDmode;
+    cRSID_C64.Stereo = cRSID.Stereo; // init shadow-variables to defaults for audio-thread as well
+    cRSID_C64.HighQualitySID = cRSID.HighQualitySID;
+    cRSID_C64.HighQualityResampler = cRSID.HighQualityResampler;
+    cRSID.SelectedSIDmodel = 0; // default model and mode selections
+    cRSID.PlaybackSpeed = 1;
+    cRSID.MainVolume = 255; // 230;
+    cRSID.CLImode = 0;
+    cRSID.AutoExit = cRSID.BuiltInMusic = cRSID.BuiltInMusicSize = 0;
+    cRSID.BuiltInMusicData = null;
+    cRSID.OpenedMusic = 0;
+    cRSID.AutoAdvance = cRSID.FadeOut = 1;
+    cRSID_C64.FadeLevel = 0xf;
+    cRSID.PlayListSize = 0;
+    cRSID.PlayListNumber = 1;
+    cRSID.PlayListPlayPosition = cRSID.PlayListAdvance = 0;
+    cRSID.SongLengths = null;
+    cRSID.KERNALfileData = null;
+    cRSID.BASICfileData = null;
+    cRSID_setCallBack__autoAdvance(dummyCallBack, null); // to prevent segfault if not assigned by user
+    cRSID_createC64(cRSID_C64, samplerate);
+    if (buflen)
+        return cRSID_C64; // this is here just to eliminate unused 'buflen' variable warning
+    return cRSID_C64;
+}
+function dummyCallBack(_subtunestepping, _data) {
+    return;
+}
+export function cRSID_setCallBack__autoAdvance(callback, data) {
+    cRSID_C64.callBack__autoAdvance = callback;
+    cRSID_C64.callBackData__autoAdvance = data;
+}
+import { cRSID_createC64 } from './c64.js';
+// ---------------------------------------------------------------------------
+// cRSID_initSIDtune (libcRSID.c:69-140) — subtune: 1..255
+// ---------------------------------------------------------------------------
+/** PowersOf2 (libcRSID.c:70). */
+const PowersOf2 = new Uint8Array([0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80]);
+export function cRSID_initSIDtune(SIDheader, subtune) {
+    const C64 = cRSID_C64;
+    let InitTimeout = 10000000; // allowed instructions, value should be selected to allow for long-running memory-copiers in init-routines (e.g. Synth Sample)
+    cRSID.PlaytimeExpired = 0;
+    C64.FadeLevel = 0xf;
+    cRSID.Paused = 1;
+    if (subtune === 0)
+        subtune = 1;
+    else if (subtune > SIDheader.SubtuneAmount)
+        subtune = SIDheader.SubtuneAmount; // printf( "Subtune: %d\n", subtune );
+    cRSID.SubTune = subtune;
+    C64.SecondCnt = cRSID.PlayTime = 0;
+    cRSID.PlaybackSpeed = 1; // cRSID.Paused = 0; //don't unpause this early, before init!
+    cRSID_setC64();
+    cRSID_initC64(C64); // cRSID_writeMemC64(C64,0xD418,0xF); //set C64 hardware and init (reset) it
+    // cRSID.Paused = 0;
+    // determine init-address:
+    cRSID.InitAddress = SIDheader.InitAddress; // get info from BASIC-startupcode for some tunes
+    if (C64.RAMbank[1] === 0x37) {
+        // are there SIDs with routine under IO area? some PSIDs don't set bank-registers themselves
+        if ((0xa000 <= cRSID.InitAddress && cRSID.InitAddress < 0xc000) ||
+            (cRSID.LoadAddress < 0xc000 && cRSID.EndAddress >= 0xa000))
+            C64.RAMbank[1] = 0x36;
+        else if (cRSID.InitAddress >= 0xe000 || cRSID.EndAddress >= 0xe000)
+            C64.RAMbank[1] = 0x35;
+    }
+    cRSID_initCPU(C64, cRSID.InitAddress); // prepare init-routine call
+    C64.CPU.A = subtune - 1;
+    if (!cRSID.RealSIDmode) {
+        // call init-routine:
+        for (InitTimeout = 10000000; InitTimeout > 0; InitTimeout--) {
+            if (cRSID_emulateCPU(C64) >= 0xfe)
+                break;
+        } // give error when timed out?
+    }
+    // determine timing-source, if CIA, replace FrameCycles previouisly set to
+    // VIC-timing
+    // C: SubtuneTimeSources[0] — byte $12 of the file (the byte overlaid at
+    // array index 0), which is the MSB of the BE u32.
+    if (subtune > 32)
+        cRSID.TimerSource = (SIDheader.SubtuneTimeSources >>> 24) & 0x80; // subtunes above 32 should use subtune32's timing
+    else {
+        const byteIdx = (32 - subtune) >> 3; // C: SubtuneTimeSources[(32-subtune)>>3]
+        const bitIdx = (subtune - 1) & 7; // C: PowersOf2[(subtune-1)&7]
+        // The C byte-array overlay reads file bytes $12..$15 in file order:
+        // byte0 = filedata[0x12] … byte3 = filedata[0x15]; reconstruct per-byte:
+        const bytes = [
+            (SIDheader.SubtuneTimeSources >>> 24) & 0xff,
+            (SIDheader.SubtuneTimeSources >>> 16) & 0xff,
+            (SIDheader.SubtuneTimeSources >>> 8) & 0xff,
+            SIDheader.SubtuneTimeSources & 0xff,
+        ];
+        cRSID.TimerSource = bytes[byteIdx] & PowersOf2[bitIdx];
+    }
+    if (cRSID.TimerSource || C64.IObankWR[0xdc05] !== 0x40 || C64.IObankWR[0xdc04] !== 0x24) {
+        // CIA1-timing (probably multispeed tune)
+        cRSID.FrameCycles = C64.IObankWR[0xdc04] + (C64.IObankWR[0xdc05] << 8);
+        cRSID.TimerSource = 1; // if init-routine changed DC04 or DC05, assume CIA-timing
+    }
+    // determine playaddress:
+    cRSID.PlayAddress = SIDheader.PlayAddress;
+    if (cRSID.PlayAddress) {
+        // normal play-address called with JSR
+        if (C64.RAMbank[1] === 0x37) {
+            // are there SIDs with routine under IO area?
+            if (0xa000 <= cRSID.PlayAddress && cRSID.PlayAddress < 0xc000)
+                C64.RAMbank[1] = 0x36;
+        }
+        else if (cRSID.PlayAddress >= 0xe000)
+            C64.RAMbank[1] = 0x35; // player under KERNAL (e.g. Crystal Kingdom Dizzy)
+    }
+    else {
+        // IRQ-playaddress for multispeed-tunes set by init-routine (some tunes
+        // turn off KERNAL ROM but doesn't set IRQ-vector!)
+        cRSID.PlayAddress =
+            (C64.RAMbank[1] & 3) < 2
+                ? cRSID_readMem(C64, 0xfffe) + (cRSID_readMem(C64, 0xffff) << 8) // for PSID
+                : cRSID_readMem(C64, 0x314) + (cRSID_readMem(C64, 0x315) << 8);
+        if (cRSID.PlayAddress === 0) {
+            // if 0, still try with RSID-mode fallback
+            cRSID_initCPU(C64, cRSID.PlayAddress); // point CPU to play-routine
+            C64.Finished = 1;
+            C64.Returned = 1;
+            cRSID.Paused = 0;
+            return;
+        }
+    }
+    if (!cRSID.RealSIDmode) {
+        // prepare (PSID) play-routine playback:
+        cRSID_initCPU(C64, cRSID.PlayAddress); // point CPU to play-routine
+        C64.FrameCycleCnt = 0;
+        C64.Finished = 1;
+        C64.SampleCycleCnt = 0; // C64.CIAisSet=0;
+    }
+    else {
+        C64.Finished = 0;
+        C64.Returned = 0;
+    }
+    cRSID.Paused = 0;
+}
+// ---------------------------------------------------------------------------
+// cRSID_generateSample (host/audio.c:306-335) — the sample-generation entry
+// that the modplayjs host buffer loop calls. Everything between `Paused`
+// short-circuit and the saturation is host-audio-private (commented-out
+// shadow-variable sync + dither noise) — ported verbatim.
+// ---------------------------------------------------------------------------
+/** C integer division (truncates toward zero; JS `/` is not integer and
+ *  `Math.floor` rounds down — not the same for negative operands). */
+function divTrunc(a, b) {
+    return Math.trunc(a / b);
+}
+const MIX_SCALING = 256 * 16 /* FADE_SCALING */;
+const SCRAMBLER_BITS = 8;
+const DITHERNOISE_DIVSHIFTS = 6 /* 5 */;
+const DITHERNOISE_MID = (1 << (SCRAMBLER_BITS - DITHERNOISE_DIVSHIFTS)) / 2;
+export let ditherLFSR = 0x0055a5aa;
+export function cRSID_generateSample() {
+    const C64 = cRSID_C64;
+    let VolumeMul;
+    let Insert;
+    const Output = { L: 0, R: 0 };
+    if (cRSID.Paused) {
+        Output.L = Output.R = 0;
+        return Output;
+    }
+    // If calling cRSID_generateSample() directly, don't forget to keep the
+    // audio-thread shadow-variables updated, as seen above in
+    // cRSID_generateSound() (host/audio.c:283-296):
+    C64.RealSIDmode = cRSID.RealSIDmode;
+    C64.AudioThread_SIDchipCount = C64.SIDchipCount;
+    C64.Stereo = C64.AudioThread_SIDchipCount > 1 ? cRSID.Stereo : 0 /* CRSID_CHANNELMODE_MONO */; // this might be changed regularly during playback by the user
+    C64.HighQualitySID = cRSID.HighQualitySID;
+    C64.HighQualityResampler = cRSID.HighQualityResampler;
+    const emulatedOutput = cRSID_emulateC64(C64);
+    Output.L = emulatedOutput.L;
+    Output.R = emulatedOutput.R;
+    if (cRSID.PSIDdigiMode) {
+        Insert = cRSID_playPSIDdigi();
+        Output.L += Insert;
+        Output.R += Insert;
+    }
+    VolumeMul = cRSID.MainVolume * C64.FadeLevel;
+    Output.L = divTrunc(Output.L * VolumeMul, MIX_SCALING); // Having the attenuator before saturation allows avoiding filter/many-SIDs overdrive-distortion
+    Output.R = divTrunc(Output.R * VolumeMul, MIX_SCALING); // (By simply adjusting the main volume knob to a lower level. Real SID distorts as well in those cases btw.)
+    // Add dithering noise for more natural sound and to override any small
+    // quantization/correlated/mixdown noises (might add C64 bus-noise in the
+    // future)
+    // This is my fast LFSR+scrambler-routine generating perfect even
+    // white-noise spectrum (measured with 'ENT' tool)
+    // 23bit LFSR (pow(2,23)-1=8388607 states) with XOR-ed taps of bit22 and
+    // bit13 (realized by 24 bits = 3 bytes and bit23^bit14 (LFSR_HH[7],
+    // LFSR_H[6]) feedback to bit1)
+    const fb = (ditherLFSR & 0x800000) ^ ((ditherLFSR & 0x004000) << 9);
+    // C: `LFSR <<= 1` on a signed int — 32-bit wraparound, then `>> 16` reads
+    // are ARITHMETIC (sign-extending). Keep the variable as a signed int32.
+    ditherLFSR = (Math.imul(ditherLFSR, 2) | (fb ? 2 : 0)) | 0;
+    if (fb)
+        ditherLFSR |= 2; // (redundant with the |2 above; kept for C parity)
+    // scramble 24bit value into a 8bit output (e.g. make LFSR 8bit output
+    // non-linear and therefore more random)
+    // We use AND-masks to combine into output (instead of free bit-to-bit
+    // mapping)
+    // (this method has ENT-correlation=0.000002, PI-error=0.02%, a nice evenly
+    // distributed spectrum that fits between -45.4..-45.8dB)
+    Insert =
+        ((((ditherLFSR >> 16) & 0x99) + ((ditherLFSR >> 8) & 0x72) + (ditherLFSR & 0xb4) + 0x7c) & 0xff) >>>
+            DITHERNOISE_DIVSHIFTS;
+    // (signed char) cast — reinterpret the byte as signed:
+    const sc = Insert > 127 ? Insert - 256 : Insert;
+    Insert = sc - DITHERNOISE_MID;
+    Output.L += Insert;
+    Output.R += Insert;
+    if (Output.L >= 32767)
+        Output.L = 32767;
+    else if (Output.L <= -32768)
+        Output.L = -32768; // saturation arithmetic on overflow
+    if (Output.R >= 32767)
+        Output.R = 32767;
+    else if (Output.R <= -32768)
+        Output.R = -32768; // saturation arithmetic on overflow
+    return Output;
+}
+/** cRSID_generateSound (host/audio.c:299-304) — fill a buffer with samples
+ *  (S16LE interleaved stereo), matching the C helper's shadow-update
+ *  references above. */
+export function cRSID_generateSound(buf, len) {
+    // C: cRSID_soundCallback sets SoundStarted then calls generateSound +
+    // autoAdvance; the host loop equivalent only generates.
+    for (let i = 0; i < len; i += 4) {
+        const out = cRSID_generateSample();
+        const L = out.L > 32767 ? 32767 : out.L < -32768 ? -32768 : out.L;
+        const R = out.R > 32767 ? 32767 : out.R < -32768 ? -32768 : out.R;
+        buf[i + 0] = L & 0xff;
+        buf[i + 1] = (L >>> 8) & 0xff;
+        buf[i + 2] = R & 0xff;
+        buf[i + 3] = (R >>> 8) & 0xff;
+    }
+}
+/** cRSID_playSIDtune / cRSID_pauseSIDtune (libcRSID.c:158-176) — the
+ *  host-sound #ifdef blocks are PC-only; the TS port keeps the Paused flag.
+ */
+export function cRSID_playSIDtune() {
+    cRSID.Paused = 0;
+}
+export function cRSID_pauseSIDtune() {
+    cRSID.Paused = 1;
+}
+/** cRSID_close (libcRSID.c:152-156) — host-sound close is PC-only. */
+export function cRSID_close() {
+    cRSID.Paused = 1;
+}
+export { CRSID_SECONDS_PER_MINUTE, CRSID_FILEVERSION_WEBSID };
+//# sourceMappingURL=loader.js.map

package/dist/loader.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"loader.js","sourceRoot":"","sources":["../src/loader.ts"],"names":[],"mappings":"AAAA,wCAAwC;AACxC,sDAAsD;AACtD,0EAA0E;AAC1E,mEAAmE;AACnE,qBAAqB;AACrB,4EAA4E;AAC5E,EAAE;AACF,2EAA2E;AAC3E,yEAAyE;AACzE,4EAA4E;AAC5E,2EAA2E;AAC3E,oBAAoB;AAGpB,OAAO,EAAE,KAAK,EAAE,SAAS,EAAE,MAAM,eAAe,CAAC;AACjD,OAAO,EAAE,wBAAwB,EAAE,wBAAwB,EAAE,MAAM,WAAW,CAAC;AAC/E,OAAO,EAAE,YAAY,EAAE,aAAa,EAAE,gBAAgB,EAAE,MAAM,UAAU,CAAC;AACzE,OAAO,EAAE,kBAAkB,EAAE,MAAM,eAAe,CAAC;AACnD,OAAO,EAAE,aAAa,EAAE,gBAAgB,EAAE,MAAM,UAAU,CAAC;AAC3D,OAAO,EAAE,aAAa,EAAE,MAAM,UAAU,CAAC;AAGzC,8EAA8E;AAC9E,oEAAoE;AACpE,8EAA8E;AAE9E;0EAC0E;AAC1E,MAAM,UAAU,qBAAqB,CAAC,QAAoB;IACxD,MAAM,IAAI,GAAG,CAAC,CAAS,EAAE,EAAE,CAAC,CAAC,QAAQ,CAAC,CAAC,CAAE,IAAI,CAAC,CAAC,GAAG,QAAQ,CAAC,CAAC,GAAG,CAAC,CAAE,CAAC;IACnE,MAAM,KAAK,GACT,MAAM,CAAC,YAAY,CAAC,QAAQ,CAAC,CAAC,CAAE,EAAE,QAAQ,CAAC,CAAC,CAAE,EAAE,QAAQ,CAAC,CAAC,CAAE,EAAE,QAAQ,CAAC,CAAC,CAAE,CAAC,CAAC;IAC9E,MAAM,OAAO,GAAG,QAAQ,CAAC,CAAC,CAAE,CAAC;IAC7B,MAAM,UAAU,GAAG,QAAQ,CAAC,CAAC,CAAE,CAAC;IAChC,OAAO;QACL,WAAW,EAAE,KAAK;QAClB,OAAO,EAAE,OAAO;QAChB,UAAU,EAAE,UAAU;QACtB,WAAW,EAAE,IAAI,CAAC,CAAC,CAAC,EAAE,8CAA8C;QACpE,WAAW,EAAE,IAAI,CAAC,EAAE,CAAC,EAAE,wDAAwD;QAC/E,WAAW,EAAE,IAAI,CAAC,EAAE,CAAC,EAAE,mDAAmD;QAC1E,aAAa,EAAE,IAAI,CAAC,EAAE,CAAC,EAAE,SAAS;QAClC,cAAc,EAAE,QAAQ,CAAC,EAAE,CAAE,EAAE,mCAAmC;QAClE,kBAAkB,EAChB,CAAC,CAAC,QAAQ,CAAC,IAAI,CAAE,IAAI,EAAE,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAE,IAAI,EAAE,CAAC,GAAG,CAAC,QAAQ,CAAC,IAAI,CAAE,IAAI,CAAC,CAAC,GAAG,QAAQ,CAAC,IAAI,CAAE,CAAC,KAAK,CAAC;QACtG,KAAK,EAAE,MAAM,CAAC,QAAQ,EAAE,IAAI,EAAE,EAAE,CAAC;QACjC,MAAM,EAAE,MAAM,CAAC,QAAQ,EAAE,IAAI,EAAE,EAAE,CAAC;QAClC,WAAW,EAAE,MAAM,CAAC,QAAQ,EAAE,IAAI,EAAE,EAAE,CAAC;QACvC,oBAAoB,EAAE,QAAQ,CAAC,IAAI,CAAE;QACrC,mBAAmB,EAAE,QAAQ,CAAC,IAAI,CAAE;QACpC,cAAc,EAAE,QAAQ,CAAC,IAAI,CAAE;QAC/B,cAAc,EAAE,QAAQ,CAAC,IAAI,CAAE;QAC/B,eAAe,EAAE,QAAQ,CAAC,IAAI,CAAE;QAChC,eAAe,EAAE,QAAQ,CAAC,IAAI,CAAE;QAChC,UAAU,EAAE,QAAQ,CAAC,IAAI,CAAE;QAC3B,UAAU,EAAE,QAAQ,CAAC,IAAI,CAAE;QAC3B,UAAU,EAAE,QAAQ,CAAC,IAAI,CAAE;QAC3B,UAAU,EAAE,QAAQ,CAAC,IAAI,CAAE;QAC3B,eAAe,EAAE,QAAQ,CAAC,IAAI,CAAE;QAChC,UAAU,EAAE,QAAQ,CAAC,IAAI,CAAE;KAC5B,CAAC;AACJ,CAAC;AAED,SAAS,MAAM,CAAC,CAAa,EAAE,CAAS,EAAE,CAAS;IACjD,IAAI,CAAC,GAAG,EAAE,CAAC;IACX,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,EAAE,CAAC,EAAE,CAAC;QAC3B,MAAM,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC,CAAE,CAAC;QACpB,IAAI,CAAC,KAAK,CAAC;YAAE,MAAM,CAAC,uCAAuC;QAC3D,CAAC,IAAI,MAAM,CAAC,YAAY,CAAC,CAAC,CAAC,CAAC;IAC9B,CAAC;IACD,OAAO,CAAC,CAAC;AACX,CAAC;AAED,8EAA8E;AAC9E,iDAAiD;AACjD,8EAA8E;AAE9E,MAAM,UAAU,wBAAwB,CAAC,QAAoB,EAAE,QAAgB;IAC7E,IAAI,CAAS,CAAC;IACd,IAAI,aAAqB,CAAC;IAE1B,MAAM,eAAe,GAAG,MAAM,CAAC;IAE/B,MAAM,MAAM,GAAG,qBAAqB,CAAC,QAAQ,CAAC,CAAC;IAC/C,KAAK,CAAC,SAAS,GAAG,MAAM,CAAC;IAEzB,2EAA2E;IAC3E,iDAAiD;IACjD,KAAK,CAAC,GAAG,MAAM,EAAE,CAAC,GAAG,OAAO,EAAE,EAAE,CAAC;QAAE,SAAS,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,SAAS,CAAC,QAAQ,CAAC,CAAC,CAAE,CAAC;IACjF,KAAK,CAAC,GAAG,MAAM,EAAE,CAAC,GAAG,MAAM,EAAE,EAAE,CAAC;QAAE,SAAS,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,uEAAuE;IACnI,KAAK,CAAC,GAAG,MAAM,EAAE,CAAC,GAAG,MAAM,EAAE,EAAE,CAAC;QAAE,SAAS,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC;IAE3D,MAAM,CAAC,GAAG,MAAM,CAAC,WAAW,CAAC;IAC7B,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK,GAAG;QAAE,OAAO,IAAI,CAAC;IAC9C,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,eAAe,CAAC,MAAM,EAAE,EAAE,CAAC,EAAE,CAAC;QAC5C,IAAI,CAAC,CAAC,CAAC,CAAC,KAAK,eAAe,CAAC,CAAC,CAAC;YAAE,OAAO,IAAI,CAAC;IAC/C,CAAC;IACD,KAAK,CAAC,WAAW,GAAG,CAAC,CAAC,CAAC,CAAC,KAAK,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;IACzC,SAAS,CAAC,WAAW,GAAG,KAAK,CAAC,WAAW,CAAC,CAAC,4FAA4F;IAEvI,IAAI,MAAM,CAAC,WAAW,KAAK,CAAC,EAAE,CAAC;QAC7B,uDAAuD;QACvD,KAAK,CAAC,WAAW,GAAG,CAAC,CAAC,QAAQ,CAAC,MAAM,CAAC,UAAU,GAAG,CAAC,CAAE,IAAI,CAAC,CAAC,GAAG,QAAQ,CAAC,MAAM,CAAC,UAAU,GAAG,CAAC,CAAE,CAAC,KAAK,CAAC,CAAC;QACvG,aAAa,GAAG,MAAM,CAAC,UAAU,GAAG,CAAC,CAAC;IACxC,CAAC;SAAM,CAAC;QACN,oCAAoC;QACpC,KAAK,CAAC,WAAW,GAAG,MAAM,CAAC,WAAW,CAAC;QACvC,aAAa,GAAG,MAAM,CAAC,UAAU,CAAC;IACpC,CAAC;IAED,sEAAsE;IACtE,+CAA+C;IAC/C,KAAK,CAAC,GAAG,aAAa,EAAE,CAAC,GAAG,QAAQ,EAAE,EAAE,CAAC,EAAE,CAAC;QAC1C,SAAS,CAAC,OAAO,CAAC,CAAC,KAAK,CAAC,WAAW,GAAG,CAAC,CAAC,GAAG,aAAa,CAAC,CAAC,GAAG,MAAM,CAAC,GAAG,QAAQ,CAAC,CAAC,CAAE,CAAC;IACvF,CAAC;IAED,CAAC,GAAG,CAAC,KAAK,CAAC,WAAW,GAAG,CAAC,QAAQ,GAAG,aAAa,CAAC,CAAC,GAAG,OAAO,CAAC,CAAC,qCAAqC;IACrG,KAAK,CAAC,UAAU,GAAG,CAAC,GAAG,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC;IAE5C,KAAK,CAAC,YAAY,GAAG,CAAC,CAAC,KAAK,CAAC,WAAW,IAAI,CAAC,MAAM,CAAC,mBAAmB,GAAG,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;IAE5F,6DAA6D;IAC7D,kEAAkE;IAClE,0EAA0E;IAC1E,6CAA6C;IAC7C,IAAI,KAAK,CAAC,gBAAgB,GAAG,CAAC,EAAE,CAAC;QAC/B,KAAK,CAAC,GAAG,CAAC,EAAE,CAAC,IAAI,GAAG,EAAE,EAAE,CAAC,EAAE,CAAC;YAC1B,IAAI,KAAK,CAAC,gBAAgB,CAAC,CAAC,CAAE,IAAI,CAAC;gBAAE,KAAK,CAAC,gBAAgB,CAAC,CAAC,CAAC,GAAG,KAAK,CAAC,gBAAgB,CAAC;QAC1F,CAAC;IACH,CAAC;IAED,OAAO,KAAK,CAAC,SAAS,CAAC;AACzB,CAAC;AAED,8EAA8E;AAC9E,yEAAyE;AACzE,2EAA2E;AAC3E,uEAAuE;AACvE,oDAAoD;AACpD,8EAA8E;AAE9E,MAAM,UAAU,UAAU,CAAC,UAAkB,EAAE,MAAc;IAC3D,KAAK,CAAC,WAAW,GAAG,CAAC,CAAC;IACtB,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC,4BAA4B,CAAC;IAC9C,KAAK,CAAC,cAAc,GAAG,CAAC,CAAC;IACzB,KAAK,CAAC,oBAAoB,GAAG,CAAC,CAAC,CAAC,8EAA8E;IAC9G,SAAS,CAAC,WAAW,GAAG,KAAK,CAAC,WAAW,CAAC;IAC1C,SAAS,CAAC,MAAM,GAAG,KAAK,CAAC,MAAM,CAAC,CAAC,6DAA6D;IAC9F,SAAS,CAAC,cAAc,GAAG,KAAK,CAAC,cAAc,CAAC;IAChD,SAAS,CAAC,oBAAoB,GAAG,KAAK,CAAC,oBAAoB,CAAC;IAC5D,KAAK,CAAC,gBAAgB,GAAG,CAAC,CAAC,CAAC,oCAAoC;IAChE,KAAK,CAAC,aAAa,GAAG,CAAC,CAAC;IACxB,KAAK,CAAC,UAAU,GAAG,GAAG,CAAC,CAAC,OAAO;IAC/B,KAAK,CAAC,OAAO,GAAG,CAAC,CAAC;IAClB,KAAK,CAAC,QAAQ,GAAG,KAAK,CAAC,YAAY,GAAG,KAAK,CAAC,gBAAgB,GAAG,CAAC,CAAC;IACjE,KAAK,CAAC,gBAAgB,GAAG,IAAI,CAAC;IAC9B,KAAK,CAAC,WAAW,GAAG,CAAC,CAAC;IACtB,KAAK,CAAC,WAAW,GAAG,KAAK,CAAC,OAAO,GAAG,CAAC,CAAC;IACtC,SAAS,CAAC,SAAS,GAAG,GAAG,CAAC;IAC1B,KAAK,CAAC,YAAY,GAAG,CAAC,CAAC;IACvB,KAAK,CAAC,cAAc,GAAG,CAAC,CAAC;IACzB,KAAK,CAAC,oBAAoB,GAAG,KAAK,CAAC,eAAe,GAAG,CAAC,CAAC;IACvD,KAAK,CAAC,WAAW,GAAG,IAAI,CAAC;IACzB,KAAK,CAAC,cAAc,GAAG,IAAI,CAAC;IAC5B,KAAK,CAAC,aAAa,GAAG,IAAI,CAAC;IAC3B,8BAA8B,CAAC,aAAa,EAAE,IAAI,CAAC,CAAC,CAAC,8CAA8C;IAEnG,eAAe,CAAC,SAAS,EAAE,UAAU,CAAC,CAAC;IACvC,IAAI,MAAM;QAAE,OAAO,SAAS,CAAC,CAAC,kEAAkE;IAEhG,OAAO,SAAS,CAAC;AACnB,CAAC;AAED,SAAS,aAAa,CAAC,gBAAwB,EAAE,KAAc;IAC7D,OAAO;AACT,CAAC;AAED,MAAM,UAAU,8BAA8B,CAC5C,QAA0D,EAC1D,IAAa;IAEb,SAAS,CAAC,qBAAqB,GAAG,QAAQ,CAAC;IAC3C,SAAS,CAAC,yBAAyB,GAAG,IAAI,CAAC;AAC7C,CAAC;AAED,OAAO,EAAE,eAAe,EAAE,MAAM,UAAU,CAAC;AAG3C,8EAA8E;AAC9E,0DAA0D;AAC1D,8EAA8E;AAE9E,iCAAiC;AACjC,MAAM,SAAS,GAAe,IAAI,UAAU,CAAC,CAAC,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,CAAC,CAAC,CAAC;AAE/F,MAAM,UAAU,iBAAiB,CAAC,SAAsB,EAAE,OAAe;IACvE,MAAM,GAAG,GAAG,SAAS,CAAC;IACtB,IAAI,WAAW,GAAG,QAAQ,CAAC,CAAC,+HAA+H;IAE3J,KAAK,CAAC,eAAe,GAAG,CAAC,CAAC;IAC1B,GAAG,CAAC,SAAS,GAAG,GAAG,CAAC;IACpB,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC;IAEjB,IAAI,OAAO,KAAK,CAAC;QAAE,OAAO,GAAG,CAAC,CAAC;SAC1B,IAAI,OAAO,GAAG,SAAS,CAAC,aAAa;QAAE,OAAO,GAAG,SAAS,CAAC,aAAa,CAAC,CAAC,sCAAsC;IACrH,KAAK,CAAC,OAAO,GAAG,OAAO,CAAC;IACxB,GAAG,CAAC,SAAS,GAAG,KAAK,CAAC,QAAQ,GAAG,CAAC,CAAC;IACnC,KAAK,CAAC,aAAa,GAAG,CAAC,CAAC,CAAC,6DAA6D;IAEtF,YAAY,EAAE,CAAC;IACf,aAAa,CAAC,GAAG,CAAC,CAAC,CAAC,4EAA4E;IAChG,oBAAoB;IAEpB,0BAA0B;IAC1B,KAAK,CAAC,WAAW,GAAG,SAAS,CAAC,WAAW,CAAC,CAAC,iDAAiD;IAC5F,IAAI,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,KAAK,IAAI,EAAE,CAAC;QAC5B,4FAA4F;QAC5F,IACE,CAAC,MAAM,IAAI,KAAK,CAAC,WAAW,IAAI,KAAK,CAAC,WAAW,GAAG,MAAM,CAAC;YAC3D,CAAC,KAAK,CAAC,WAAW,GAAG,MAAM,IAAI,KAAK,CAAC,UAAU,IAAI,MAAM,CAAC;YAE1D,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC;aACnB,IAAI,KAAK,CAAC,WAAW,IAAI,MAAM,IAAI,KAAK,CAAC,UAAU,IAAI,MAAM;YAAE,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC;IAC5F,CAAC;IACD,aAAa,CAAC,GAAG,EAAE,KAAK,CAAC,WAAW,CAAC,CAAC,CAAC,4BAA4B;IACnE,GAAG,CAAC,GAAG,CAAC,CAAC,GAAG,OAAO,GAAG,CAAC,CAAC;IAExB,IAAI,CAAC,KAAK,CAAC,WAAW,EAAE,CAAC;QACvB,qBAAqB;QACrB,KAAK,WAAW,GAAG,QAAQ,EAAE,WAAW,GAAG,CAAC,EAAE,WAAW,EAAE,EAAE,CAAC;YAC5D,IAAI,gBAAgB,CAAC,GAAG,CAAC,IAAI,IAAI;gBAAE,MAAM;QAC3C,CAAC,CAAC,6BAA6B;IACjC,CAAC;IAED,0EAA0E;IAC1E,aAAa;IACb,wEAAwE;IACxE,kDAAkD;IAClD,IAAI,OAAO,GAAG,EAAE;QAAE,KAAK,CAAC,WAAW,GAAG,CAAC,SAAS,CAAC,kBAAkB,KAAK,EAAE,CAAC,GAAG,IAAI,CAAC,CAAC,kDAAkD;SACjI,CAAC;QACJ,MAAM,OAAO,GAAG,CAAC,EAAE,GAAG,OAAO,CAAC,IAAI,CAAC,CAAC,CAAC,yCAAyC;QAC9E,MAAM,MAAM,GAAG,CAAC,OAAO,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,8BAA8B;QAChE,oEAAoE;QACpE,yEAAyE;QACzE,MAAM,KAAK,GAAG;YACZ,CAAC,SAAS,CAAC,kBAAkB,KAAK,EAAE,CAAC,GAAG,IAAI;YAC5C,CAAC,SAAS,CAAC,kBAAkB,KAAK,EAAE,CAAC,GAAG,IAAI;YAC5C,CAAC,SAAS,CAAC,kBAAkB,KAAK,CAAC,CAAC,GAAG,IAAI;YAC3C,SAAS,CAAC,kBAAkB,GAAG,IAAI;SACtC,CAAC;QACA,KAAK,CAAC,WAAW,GAAG,KAAK,CAAC,OAAO,CAAE,GAAG,SAAS,CAAC,MAAM,CAAE,CAAC;IAC3D,CAAC;IACD,IAAI,KAAK,CAAC,WAAW,IAAI,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,KAAK,IAAI,IAAI,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,KAAK,IAAI,EAAE,CAAC;QACxF,yCAAyC;QACzC,KAAK,CAAC,WAAW,GAAG,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAE,GAAG,CAAC,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAE,IAAI,CAAC,CAAC,CAAC;QACzE,KAAK,CAAC,WAAW,GAAG,CAAC,CAAC,CAAC,0DAA0D;IACnF,CAAC;IAED,yBAAyB;IACzB,KAAK,CAAC,WAAW,GAAG,SAAS,CAAC,WAAW,CAAC;IAC1C,IAAI,KAAK,CAAC,WAAW,EAAE,CAAC;QACtB,sCAAsC;QACtC,IAAI,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,KAAK,IAAI,EAAE,CAAC;YAC5B,6CAA6C;YAC7C,IAAI,MAAM,IAAI,KAAK,CAAC,WAAW,IAAI,KAAK,CAAC,WAAW,GAAG,MAAM;gBAAE,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC;QACvF,CAAC;aAAM,IAAI,KAAK,CAAC,WAAW,IAAI,MAAM;YAAE,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,mDAAmD;IACpH,CAAC;SAAM,CAAC;QACN,uEAAuE;QACvE,mDAAmD;QACnD,KAAK,CAAC,WAAW;YACf,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC,CAAE,GAAG,CAAC,CAAC,GAAG,CAAC;gBACvB,CAAC,CAAC,aAAa,CAAC,GAAG,EAAE,MAAM,CAAC,GAAG,CAAC,aAAa,CAAC,GAAG,EAAE,MAAM,CAAC,IAAI,CAAC,CAAC,CAAC,WAAW;gBAC5E,CAAC,CAAC,aAAa,CAAC,GAAG,EAAE,KAAK,CAAC,GAAG,CAAC,aAAa,CAAC,GAAG,EAAE,KAAK,CAAC,IAAI,CAAC,CAAC,CAAC;QACnE,IAAI,KAAK,CAAC,WAAW,KAAK,CAAC,EAAE,CAAC;YAC5B,0CAA0C;YAC1C,aAAa,CAAC,GAAG,EAAE,KAAK,CAAC,WAAW,CAAC,CAAC,CAAC,4BAA4B;YACnE,GAAG,CAAC,QAAQ,GAAG,CAAC,CAAC;YACjB,GAAG,CAAC,QAAQ,GAAG,CAAC,CAAC;YACjB,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC;YACjB,OAAO;QACT,CAAC;IACH,CAAC;IAED,IAAI,CAAC,KAAK,CAAC,WAAW,EAAE,CAAC;QACvB,wCAAwC;QACxC,aAAa,CAAC,GAAG,EAAE,KAAK,CAAC,WAAW,CAAC,CAAC,CAAC,4BAA4B;QACnE,GAAG,CAAC,aAAa,GAAG,CAAC,CAAC;QACtB,GAAG,CAAC,QAAQ,GAAG,CAAC,CAAC;QACjB,GAAG,CAAC,cAAc,GAAG,CAAC,CAAC,CAAC,kBAAkB;IAC5C,CAAC;SAAM,CAAC;QACN,GAAG,CAAC,QAAQ,GAAG,CAAC,CAAC;QACjB,GAAG,CAAC,QAAQ,GAAG,CAAC,CAAC;IACnB,CAAC;IAED,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC;AACnB,CAAC;AAED,8EAA8E;AAC9E,4EAA4E;AAC5E,yEAAyE;AACzE,wEAAwE;AACxE,0DAA0D;AAC1D,8EAA8E;AAG9E;sEACsE;AACtE,SAAS,QAAQ,CAAC,CAAS,EAAE,CAAS;IACpC,OAAO,IAAI,CAAC,KAAK,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;AAC3B,CAAC;AAED,MAAM,WAAW,GAAG,GAAG,GAAG,EAAE,CAAC,kBAAkB,CAAC;AAChD,MAAM,cAAc,GAAG,CAAC,CAAC;AACzB,MAAM,qBAAqB,GAAG,CAAC,CAAC,OAAO,CAAC;AACxC,MAAM,eAAe,GAAG,CAAC,CAAC,IAAI,CAAC,cAAc,GAAG,qBAAqB,CAAC,CAAC,GAAG,CAAC,CAAC;AAE5E,MAAM,CAAC,IAAI,UAAU,GAAG,UAAU,CAAC;AAEnC,MAAM,UAAU,oBAAoB;IAClC,MAAM,GAAG,GAAG,SAAS,CAAC;IACtB,IAAI,SAAiB,CAAC;IACtB,IAAI,MAAc,CAAC;IACnB,MAAM,MAAM,GAAgB,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,CAAC;IAE3C,IAAI,KAAK,CAAC,MAAM,EAAE,CAAC;QACjB,MAAM,CAAC,CAAC,GAAG,MAAM,CAAC,CAAC,GAAG,CAAC,CAAC;QACxB,OAAO,MAAM,CAAC;IAChB,CAAC;IAED,uEAAuE;IACvE,0DAA0D;IAC1D,gDAAgD;IAChD,GAAG,CAAC,WAAW,GAAG,KAAK,CAAC,WAAW,CAAC;IACpC,GAAG,CAAC,wBAAwB,GAAG,GAAG,CAAC,YAAY,CAAC;IAChD,GAAG,CAAC,MAAM,GAAG,GAAG,CAAC,wBAAwB,GAAG,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAC,4BAA4B,CAAC,CAAC,8DAA8D;IAC7J,GAAG,CAAC,cAAc,GAAG,KAAK,CAAC,cAAc,CAAC;IAC1C,GAAG,CAAC,oBAAoB,GAAG,KAAK,CAAC,oBAAoB,CAAC;IAEtD,MAAM,cAAc,GAAG,gBAAgB,CAAC,GAAG,CAAC,CAAC;IAC7C,MAAM,CAAC,CAAC,GAAG,cAAc,CAAC,CAAC,CAAC;IAC5B,MAAM,CAAC,CAAC,GAAG,cAAc,CAAC,CAAC,CAAC;IAE5B,IAAI,KAAK,CAAC,YAAY,EAAE,CAAC;QACvB,MAAM,GAAG,kBAAkB,EAAE,CAAC;QAC9B,MAAM,CAAC,CAAC,IAAI,MAAM,CAAC;QACnB,MAAM,CAAC,CAAC,IAAI,MAAM,CAAC;IACrB,CAAC;IAED,SAAS,GAAG,KAAK,CAAC,UAAU,GAAG,GAAG,CAAC,SAAS,CAAC;IAC7C,MAAM,CAAC,CAAC,GAAG,QAAQ,CAAC,MAAM,CAAC,CAAC,GAAG,SAAS,EAAE,WAAW,CAAC,CAAC,CAAC,gGAAgG;IACxJ,MAAM,CAAC,CAAC,GAAG,QAAQ,CAAC,MAAM,CAAC,CAAC,GAAG,SAAS,EAAE,WAAW,CAAC,CAAC,CAAC,6GAA6G;IAErK,uEAAuE;IACvE,yEAAyE;IACzE,UAAU;IACV,iEAAiE;IACjE,kDAAkD;IAClD,wEAAwE;IACxE,oEAAoE;IACpE,+BAA+B;IAC/B,MAAM,EAAE,GAAG,CAAC,UAAU,GAAG,QAAQ,CAAC,GAAG,CAAC,CAAC,UAAU,GAAG,QAAQ,CAAC,IAAI,CAAC,CAAC,CAAC;IACpE,0EAA0E;IAC1E,wEAAwE;IACxE,UAAU,GAAG,CAAC,IAAI,CAAC,IAAI,CAAC,UAAU,EAAE,CAAC,CAAC,GAAG,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC;IAC3D,IAAI,EAAE;QAAE,UAAU,IAAI,CAAC,CAAC,CAAC,mDAAmD;IAC5E,sEAAsE;IACtE,wCAAwC;IACxC,sEAAsE;IACtE,WAAW;IACX,2EAA2E;IAC3E,yDAAyD;IACzD,MAAM;QACJ,CAAC,CAAC,CAAC,CAAC,UAAU,IAAI,EAAE,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,UAAU,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,UAAU,GAAG,IAAI,CAAC,GAAG,IAAI,CAAC,GAAG,IAAI,CAAC;YAChG,qBAAqB,CAAC;IACxB,uDAAuD;IACvD,MAAM,EAAE,GAAG,MAAM,GAAG,GAAG,CAAC,CAAC,CAAC,MAAM,GAAG,GAAG,CAAC,CAAC,CAAC,MAAM,CAAC;IAChD,MAAM,GAAG,EAAE,GAAG,eAAe,CAAC;IAE9B,MAAM,CAAC,CAAC,IAAI,MAAM,CAAC;IACnB,MAAM,CAAC,CAAC,IAAI,MAAM,CAAC;IAEnB,IAAI,MAAM,CAAC,CAAC,IAAI,KAAK;QAAE,MAAM,CAAC,CAAC,GAAG,KAAK,CAAC;SACnC,IAAI,MAAM,CAAC,CAAC,IAAI,CAAC,KAAK;QAAE,MAAM,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,oCAAoC;IACpF,IAAI,MAAM,CAAC,CAAC,IAAI,KAAK;QAAE,MAAM,CAAC,CAAC,GAAG,KAAK,CAAC;SACnC,IAAI,MAAM,CAAC,CAAC,IAAI,CAAC,KAAK;QAAE,MAAM,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,oCAAoC;IACpF,OAAO,MAAM,CAAC;AAChB,CAAC;AAED;;wBAEwB;AACxB,MAAM,UAAU,mBAAmB,CAAC,GAA2B,EAAE,GAAW;IAC1E,sEAAsE;IACtE,wDAAwD;IACxD,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,IAAI,CAAC,EAAE,CAAC;QAChC,MAAM,GAAG,GAAG,oBAAoB,EAAE,CAAC;QACnC,MAAM,CAAC,GAAG,GAAG,CAAC,CAAC,GAAG,KAAK,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;QAClE,MAAM,CAAC,GAAG,GAAG,CAAC,CAAC,GAAG,KAAK,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;QAClE,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,CAAC,GAAG,IAAI,CAAC;QACtB,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,CAAC,GAAG,IAAI,CAAC;QAC9B,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,CAAC,GAAG,IAAI,CAAC;QACtB,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,CAAC,GAAG,IAAI,CAAC;IAChC,CAAC;AACH,CAAC;AAED;;GAEG;AACH,MAAM,UAAU,iBAAiB;IAC/B,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC;AACnB,CAAC;AAED,MAAM,UAAU,kBAAkB;IAChC,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC;AACnB,CAAC;AAED,sEAAsE;AACtE,MAAM,UAAU,WAAW;IACzB,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC;AACnB,CAAC;AAED,OAAO,EAAE,wBAAwB,EAAE,wBAAwB,EAAE,CAAC"}

package/dist/mem.d.ts

@@ -0,0 +1,30 @@
+import type { CRC64instance } from './c64types.js';
+import { CRMemAddresses } from './c64types.js';
+/** cRSID_generateMemoryBankPointers (MEM.c:10-25). */
+export declare function cRSID_generateMemoryBankPointers(C64: CRC64instance): void;
+/**
+ * cRSID_getMemReadPtr (MEM.c:28-51) — TS-port form: instead of returning a
+ * raw pointer, this reads the byte through the resolved (bank, address).
+ *
+ * The special case that made C return `&IObankWR[address]` (SID-read
+ * bitfading of the last written register, e.g. Lift Off `ROR $D400,x`)
+ * reads from IObankWR here — same value.
+ */
+export declare function cRSID_readMemPtr(C64: CRC64instance, address: number): number;
+/**
+ * cRSID_getMemWritePtr (MEM.c:76-106) — TS-port form: writes the byte through
+ * the resolved (bank, address), including the SID-mirror redirect.
+ */
+export declare function cRSID_writeMemPtr(C64: CRC64instance, address: number, data: number): void;
+/** cRSID_readMem (MEM.c:110-112). */
+export declare function cRSID_readMem(C64: CRC64instance, address: number): number;
+/** cRSID_writeMem (MEM.c:118-120). */
+export declare function cRSID_writeMem(C64: CRC64instance, address: number, data: number): void;
+/** cRSID_setROMcontent (MEM.c:124-166) — fill KERNAL/BASIC-ROM areas with
+ *  content needed for SID-playback. */
+export declare function cRSID_setROMcontent(C64: CRC64instance): void;
+/** cRSID_initMem (MEM.c:168-197) — set default values that normally KERNEL
+ *  ensures after startup/reset (only SID-playback related). */
+export declare function cRSID_initMem(C64: CRC64instance): void;
+export { CRMemAddresses };
+//# sourceMappingURL=mem.d.ts.map

package/dist/mem.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"mem.d.ts","sourceRoot":"","sources":["../src/mem.ts"],"names":[],"mappings":"AAYA,OAAO,KAAK,EAAE,aAAa,EAAE,MAAM,eAAe,CAAC;AAEnD,OAAO,EAAE,cAAc,EAAE,MAAM,eAAe,CAAC;AAG/C,sDAAsD;AACtD,wBAAgB,gCAAgC,CAAC,GAAG,EAAE,aAAa,GAAG,IAAI,CAmBzE;AASD;;;;;;;GAOG;AACH,wBAAgB,gBAAgB,CAAC,GAAG,EAAE,aAAa,EAAE,OAAO,EAAE,MAAM,GAAG,MAAM,CAW5E;AAED;;;GAGG;AACH,wBAAgB,iBAAiB,CAAC,GAAG,EAAE,aAAa,EAAE,OAAO,EAAE,MAAM,EAAE,IAAI,EAAE,MAAM,GAAG,IAAI,CAsBzF;AAED,qCAAqC;AACrC,wBAAgB,aAAa,CAAC,GAAG,EAAE,aAAa,EAAE,OAAO,EAAE,MAAM,GAAG,MAAM,CAEzE;AAED,sCAAsC;AACtC,wBAAgB,cAAc,CAAC,GAAG,EAAE,aAAa,EAAE,OAAO,EAAE,MAAM,EAAE,IAAI,EAAE,MAAM,GAAG,IAAI,CAEtF;AAgBD;uCACuC;AACvC,wBAAgB,mBAAmB,CAAC,GAAG,EAAE,aAAa,GAAG,IAAI,CAuB5D;AAED;+DAC+D;AAC/D,wBAAgB,aAAa,CAAC,GAAG,EAAE,aAAa,GAAG,IAAI,CAqCtD;AAGD,OAAO,EAAE,cAAc,EAAE,CAAC"}

package/dist/mem.js

@@ -0,0 +1,187 @@
+// SPDX-License-Identifier: BSD-3-Clause
+// Copyright (c) 2026 Bitti09 — modplayjs contributors
+// Ported from: cRSID 1.58 libcRSID/C64/MEM.c — emulation of C64 memories and
+// memory bus (PLA & MUXes). (c) Hermit (Mihaly Horvath), license: WTF
+// ("do what the frick you want", mention the author).
+//
+// C stores raw `unsigned char*` per (bank, page) in
+// MemoryBankPointersRD/WR and compares them against the four base arrays.
+// The TS port encodes each entry as bankCode<<16 with bankCode:
+//   0 = RAMbank, 1 = IObankRD, 2 = ROMbanks, 3 = IObankWR
+// and resolves to (array, offset) at access time — same dispatch semantics.
+import { BANK_RAM, BANK_IO_RD, BANK_ROM, BANK_IO_WR, bankCode } from './c64types.js';
+import { CRMemAddresses } from './c64types.js';
+import { cRSID } from './instance.js';
+/** cRSID_generateMemoryBankPointers (MEM.c:10-25). */
+export function cRSID_generateMemoryBankPointers(C64) {
+    for (let i = 0; i < 4; ++i) {
+        for (let j = 0; j < 256; ++j) {
+            // RD table (MEM.c:14-17)
+            let rd;
+            if (j < 0xA0)
+                rd = BANK_RAM;
+            else if (0xD0 <= j && j < 0xE0 && i)
+                rd = BANK_IO_RD;
+            else if ((j < 0xC0 && i === 3) || (0xE0 <= j && i & 2))
+                rd = BANK_ROM;
+            else
+                rd = BANK_RAM;
+            C64.MemoryBankPointersRD[(i << 8) | j] = rd << 16;
+            // WR table (MEM.c:19-21)
+            let wr;
+            if (j < 0xD0 || 0xE0 <= j)
+                wr = BANK_RAM;
+            else if (i)
+                wr = BANK_IO_WR;
+            else
+                wr = BANK_RAM;
+            C64.MemoryBankPointersWR[(i << 8) | j] = wr << 16;
+        }
+    }
+}
+var BankSel;
+(function (BankSel) {
+    BankSel[BankSel["RAM"] = 0] = "RAM";
+    BankSel[BankSel["IO_RD"] = 1] = "IO_RD";
+    BankSel[BankSel["ROM"] = 2] = "ROM";
+    BankSel[BankSel["IO_WR"] = 3] = "IO_WR";
+})(BankSel || (BankSel = {}));
+/**
+ * cRSID_getMemReadPtr (MEM.c:28-51) — TS-port form: instead of returning a
+ * raw pointer, this reads the byte through the resolved (bank, address).
+ *
+ * The special case that made C return `&IObankWR[address]` (SID-read
+ * bitfading of the last written register, e.g. Lift Off `ROR $D400,x`)
+ * reads from IObankWR here — same value.
+ */
+export function cRSID_readMemPtr(C64, address) {
+    const entry = C64.MemoryBankPointersRD[((C64.RAMbank[1] & 3) << 8) | (address >>> 8)];
+    const bank = bankCode(entry);
+    if (bank !== BankSel.IO_RD) {
+        return bank === BankSel.ROM ? C64.ROMbanks[address] : C64.RAMbank[address];
+    }
+    // MOSTLY (address < 0xD400 || 0xD419 <= address) → IObankRD
+    if (address < 0xd400 || 0xd419 <= address)
+        return C64.IObankRD[address];
+    // else return &IObankWR[address] — emulate bitfading aka SID-read of last
+    // written reg (e.g. Lift Off ROR $D400,x)
+    return C64.IObankWR[address];
+}
+/**
+ * cRSID_getMemWritePtr (MEM.c:76-106) — TS-port form: writes the byte through
+ * the resolved (bank, address), including the SID-mirror redirect.
+ */
+export function cRSID_writeMemPtr(C64, address, data) {
+    const entry = C64.MemoryBankPointersWR[((C64.RAMbank[1] & 3) << 8) | (address >>> 8)];
+    const bank = bankCode(entry);
+    if (bank !== BankSel.IO_WR) {
+        // MOSTLY branch: RAM (the WR table only stores RAM or IO_WR)
+        C64.RAMbank[address] = data;
+        return;
+    }
+    // else if ( RARELY (0xD420 <= address && address < 0xD800) ) — CIA/VIC mirrors
+    if (0xd420 <= address && address < 0xd800) {
+        if (!(cRSID.PSIDdigiMode && 0xd418 <= address && address < 0xd500) &&
+            !(C64.SID[2].BaseAddress <= address && address < C64.SID[2].BaseAddress + 0x20) &&
+            !(C64.SID[3].BaseAddress <= address && address < C64.SID[3].BaseAddress + 0x20) &&
+            !(C64.SID[4].BaseAddress <= address && address < C64.SID[4].BaseAddress + 0x20)) {
+            // write to $D400..D41F if not in SID2/SID3 address-space
+            C64.IObankWR[0xd400 + (address & 0x1f)] = data;
+            return;
+        }
+    }
+    C64.IObankWR[address] = data;
+}
+/** cRSID_readMem (MEM.c:110-112). */
+export function cRSID_readMem(C64, address) {
+    return cRSID_readMemPtr(C64, address);
+}
+/** cRSID_writeMem (MEM.c:118-120). */
+export function cRSID_writeMem(C64, address, data) {
+    cRSID_writeMemPtr(C64, address, data);
+}
+// ---------------------------------------------------------------------------
+// ROM stub content (MEM.c:124-166)
+// ---------------------------------------------------------------------------
+/** CIA1-acknowledge IRQ-return (MEM.c:127). */
+const ROM_IRQreturnCode = [0xad, 0x0d, 0xdc, 0x68, 0xa8, 0x68, 0xaa, 0x68, 0x40];
+/** SEI and jmp($0318) (MEM.c:128). */
+const ROM_NMIstartCode = [0x78, 0x6c, 0x18, 0x03, 0x40];
+/** Full IRQ-return (handling BRK with the same RAM vector as IRQ) (MEM.c:129-134). */
+const ROM_IRQBRKstartCode = [
+    0x48, 0x8a, 0x48, 0x98, 0x48, 0xba, 0xbd, 0x04, 0x01, 0x29, 0x10, 0xea, 0xea, 0xea, 0xea, 0xea, 0x6c, 0x14, 0x03,
+];
+/** cRSID_setROMcontent (MEM.c:124-166) — fill KERNAL/BASIC-ROM areas with
+ *  content needed for SID-playback. */
+export function cRSID_setROMcontent(C64) {
+    for (let i = 0xa000; i < 0x10000; ++i)
+        C64.ROMbanks[i] = 0x60; // RTS (at least return if some unsupported call is made to ROM)
+    if (cRSID.BASICfileData != null) {
+        for (let i = 0; i < 0x2000; ++i)
+            C64.ROMbanks[0xa000 + i] = cRSID.BASICfileData[i];
+    }
+    if (cRSID.KERNALfileData != null) {
+        for (let i = 0; i < 0x2000; ++i)
+            C64.ROMbanks[0xe000 + i] = cRSID.KERNALfileData[i];
+    }
+    else {
+        for (let i = 0xea31; i < 0xea7e; ++i)
+            C64.ROMbanks[i] = 0xea; // NOP (full IRQ-return leading to simple IRQ-return without other tasks)
+        for (let i = 0; i < 9; ++i)
+            C64.ROMbanks[0xea7e + i] = ROM_IRQreturnCode[i];
+        for (let i = 0; i < 4; ++i)
+            C64.ROMbanks[0xfe43 + i] = ROM_NMIstartCode[i];
+        for (let i = 0; i < 19; ++i)
+            C64.ROMbanks[0xff48 + i] = ROM_IRQBRKstartCode[i];
+        C64.ROMbanks[0xfffb] = 0xfe;
+        C64.ROMbanks[0xfffa] = 0x43; // ROM NMI-vector
+        C64.ROMbanks[0xffff] = 0xff;
+        C64.ROMbanks[0xfffe] = 0x48; // ROM IRQ-vector
+    }
+    // copy KERNAL & BASIC ROM contents into the RAM under them? (So PSIDs that
+    // don't select bank correctly will work better.)
+    for (let i = 0xa000; i < 0x10000; ++i)
+        C64.RAMbank[i] = C64.ROMbanks[i];
+}
+/** cRSID_initMem (MEM.c:168-197) — set default values that normally KERNEL
+ *  ensures after startup/reset (only SID-playback related). */
+export function cRSID_initMem(C64) {
+    // data required by both PSID and RSID (according to HVSC SID_file_format.txt):
+    cRSID_writeMem(C64, 0x02a6, cRSID.VideoStandard); // $02A6 should be pre-set to: 0:NTSC / 1:PAL
+    cRSID_writeMem(C64, 0x0001, 0x37); // initialize bank-reg. (ROM-banks and IO enabled)
+    // if (C64.ROMbanks[0xE000]==0) — wasn't a KERNAL-ROM loaded? (e.g. PSID)
+    cRSID_writeMem(C64, 0x00cb, 0x40); // Some tunes might check for keypress here (e.g. Master Blaster Intro)
+    // if (cRSID.RealSIDmode) {
+    cRSID_writeMem(C64, 0x0315, 0xea);
+    cRSID_writeMem(C64, 0x0314, 0x31); // IRQ
+    cRSID_writeMem(C64, 0x0319, 0xea /*0xFE*/);
+    cRSID_writeMem(C64, 0x0318, 0x81 /*0x47*/); // NMI
+    // }
+    for (let i = 0xd000; i < 0xd7ff; ++i)
+        C64.IObankRD[i] = C64.IObankWR[i] = 0; // initialize the whole IO area for a known base-state
+    if (cRSID.RealSIDmode) {
+        C64.IObankWR[0xd012] = 0x37;
+        C64.IObankWR[0xd011] = 0x8b;
+    } // else C64.IObankWR[0xD012] = 0;
+    // C64.IObankWR[0xD019] = 0; // PSID: rasterrow: any value <= $FF, IRQ:enable later if there is VIC-timingsource
+    C64.IObankRD[0xdc00] = 0x10;
+    C64.IObankRD[0xdc01] = 0xff; // Imitate CIA1 keyboard/joy port, some tunes check if buttons are not pressed
+    if (cRSID.VideoStandard) {
+        C64.IObankWR[0xdc04] = 0x24;
+        C64.IObankWR[0xdc05] = 0x40;
+    } // initialize CIAs
+    else {
+        C64.IObankWR[0xdc04] = 0x95;
+        C64.IObankWR[0xdc05] = 0x42;
+    }
+    if (cRSID.RealSIDmode)
+        C64.IObankWR[0xdc0d] = 0x81; // Reset-default, but for PSID CIA1 TimerA IRQ should be enabled anyway if SID is CIA-timed
+    C64.IObankWR[0xdc0e] = 0x01; // some tunes (and PSID doc) expect already running CIA (Reset-default)
+    C64.IObankWR[0xdc0f] = 0x00; // All counters other than CIA1 TimerA should be disabled and set to 0xFF for PSID:
+    C64.IObankWR[0xdd00] = C64.IObankRD[0xdd00] = 0x03; // VICbank-selector default
+    C64.IObankWR[0xdd04] = C64.IObankWR[0xdd05] = 0xff;
+    // C64.IObankWR[0xDD0E] = C64.IObank[0xDD0F] = 0x08;
+}
+// re-exported for the module-safety zone (C's CRSID_SID_SAFE_ADDRESS base)
+export { CRMemAddresses };
+//# sourceMappingURL=mem.js.map

package/dist/mem.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"mem.js","sourceRoot":"","sources":["../src/mem.ts"],"names":[],"mappings":"AAAA,wCAAwC;AACxC,sDAAsD;AACtD,6EAA6E;AAC7E,sEAAsE;AACtE,sDAAsD;AACtD,EAAE;AACF,oDAAoD;AACpD,0EAA0E;AAC1E,gEAAgE;AAChE,0DAA0D;AAC1D,4EAA4E;AAG5E,OAAO,EAAE,QAAQ,EAAE,UAAU,EAAE,QAAQ,EAAE,UAAU,EAAE,QAAQ,EAAE,MAAM,eAAe,CAAC;AACrF,OAAO,EAAE,cAAc,EAAE,MAAM,eAAe,CAAC;AAC/C,OAAO,EAAE,KAAK,EAAE,MAAM,eAAe,CAAC;AAEtC,sDAAsD;AACtD,MAAM,UAAU,gCAAgC,CAAC,GAAkB;IACjE,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,EAAE,CAAC,EAAE,CAAC;QAC3B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,EAAE,CAAC,EAAE,CAAC;YAC7B,yBAAyB;YACzB,IAAI,EAAU,CAAC;YACf,IAAI,CAAC,GAAG,IAAI;gBAAE,EAAE,GAAG,QAAQ,CAAC;iBACvB,IAAI,IAAI,IAAI,CAAC,IAAI,CAAC,GAAG,IAAI,IAAI,CAAC;gBAAE,EAAE,GAAG,UAAU,CAAC;iBAChD,IAAI,CAAC,CAAC,GAAG,IAAI,IAAI,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,IAAI,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;gBAAE,EAAE,GAAG,QAAQ,CAAC;;gBACjE,EAAE,GAAG,QAAQ,CAAC;YACnB,GAAG,CAAC,oBAAoB,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,EAAE,IAAI,EAAE,CAAC;YAElD,yBAAyB;YACzB,IAAI,EAAU,CAAC;YACf,IAAI,CAAC,GAAG,IAAI,IAAI,IAAI,IAAI,CAAC;gBAAE,EAAE,GAAG,QAAQ,CAAC;iBACpC,IAAI,CAAC;gBAAE,EAAE,GAAG,UAAU,CAAC;;gBACvB,EAAE,GAAG,QAAQ,CAAC;YACnB,GAAG,CAAC,oBAAoB,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,EAAE,IAAI,EAAE,CAAC;QACpD,CAAC;IACH,CAAC;AACH,CAAC;AAED,IAAW,OAKV;AALD,WAAW,OAAO;IAChB,mCAAO,CAAA;IACP,uCAAS,CAAA;IACT,mCAAO,CAAA;IACP,uCAAS,CAAA;AACX,CAAC,EALU,OAAO,KAAP,OAAO,QAKjB;AAED;;;;;;;GAOG;AACH,MAAM,UAAU,gBAAgB,CAAC,GAAkB,EAAE,OAAe;IAClE,MAAM,KAAK,GAAG,GAAG,CAAC,oBAAoB,CAAC,CAAC,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC,CAAE,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,OAAO,KAAK,CAAC,CAAC,CAAC,CAAC;IACvF,MAAM,IAAI,GAAG,QAAQ,CAAC,KAAM,CAAC,CAAC;IAC9B,IAAI,IAAI,KAAK,OAAO,CAAC,KAAK,EAAE,CAAC;QAC3B,OAAO,IAAI,KAAK,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC,QAAQ,CAAC,OAAO,CAAE,CAAC,CAAC,CAAC,GAAG,CAAC,OAAO,CAAC,OAAO,CAAE,CAAC;IAC/E,CAAC;IACD,4DAA4D;IAC5D,IAAI,OAAO,GAAG,MAAM,IAAI,MAAM,IAAI,OAAO;QAAE,OAAO,GAAG,CAAC,QAAQ,CAAC,OAAO,CAAE,CAAC;IACzE,0EAA0E;IAC1E,0CAA0C;IAC1C,OAAO,GAAG,CAAC,QAAQ,CAAC,OAAO,CAAE,CAAC;AAChC,CAAC;AAED;;;GAGG;AACH,MAAM,UAAU,iBAAiB,CAAC,GAAkB,EAAE,OAAe,EAAE,IAAY;IACjF,MAAM,KAAK,GAAG,GAAG,CAAC,oBAAoB,CAAC,CAAC,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC,CAAE,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,OAAO,KAAK,CAAC,CAAC,CAAC,CAAC;IACvF,MAAM,IAAI,GAAG,QAAQ,CAAC,KAAM,CAAC,CAAC;IAC9B,IAAI,IAAI,KAAK,OAAO,CAAC,KAAK,EAAE,CAAC;QAC3B,6DAA6D;QAC7D,GAAG,CAAC,OAAO,CAAC,OAAO,CAAC,GAAG,IAAI,CAAC;QAC5B,OAAO;IACT,CAAC;IACD,+EAA+E;IAC/E,IAAI,MAAM,IAAI,OAAO,IAAI,OAAO,GAAG,MAAM,EAAE,CAAC;QAC1C,IACE,CAAC,CAAC,KAAK,CAAC,YAAY,IAAI,MAAM,IAAI,OAAO,IAAI,OAAO,GAAG,MAAM,CAAC;YAC9D,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC,CAAE,CAAC,WAAW,IAAI,OAAO,IAAI,OAAO,GAAG,GAAG,CAAC,GAAG,CAAC,CAAC,CAAE,CAAC,WAAW,GAAG,IAAI,CAAC;YACjF,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC,CAAE,CAAC,WAAW,IAAI,OAAO,IAAI,OAAO,GAAG,GAAG,CAAC,GAAG,CAAC,CAAC,CAAE,CAAC,WAAW,GAAG,IAAI,CAAC;YACjF,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC,CAAE,CAAC,WAAW,IAAI,OAAO,IAAI,OAAO,GAAG,GAAG,CAAC,GAAG,CAAC,CAAC,CAAE,CAAC,WAAW,GAAG,IAAI,CAAC,EACjF,CAAC;YACD,yDAAyD;YACzD,GAAG,CAAC,QAAQ,CAAC,MAAM,GAAG,CAAC,OAAO,GAAG,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC;YAC/C,OAAO;QACT,CAAC;IACH,CAAC;IACD,GAAG,CAAC,QAAQ,CAAC,OAAO,CAAC,GAAG,IAAI,CAAC;AAC/B,CAAC;AAED,qCAAqC;AACrC,MAAM,UAAU,aAAa,CAAC,GAAkB,EAAE,OAAe;IAC/D,OAAO,gBAAgB,CAAC,GAAG,EAAE,OAAO,CAAC,CAAC;AACxC,CAAC;AAED,sCAAsC;AACtC,MAAM,UAAU,cAAc,CAAC,GAAkB,EAAE,OAAe,EAAE,IAAY;IAC9E,iBAAiB,CAAC,GAAG,EAAE,OAAO,EAAE,IAAI,CAAC,CAAC;AACxC,CAAC;AAED,8EAA8E;AAC9E,mCAAmC;AACnC,8EAA8E;AAE9E,+CAA+C;AAC/C,MAAM,iBAAiB,GAAG,CAAC,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,CAAC,CAAC;AACjF,sCAAsC;AACtC,MAAM,gBAAgB,GAAG,CAAC,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,CAAC,CAAC;AACxD,sFAAsF;AAEtF,MAAM,mBAAmB,GAAG;IAC1B,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI,EAAE,IAAI;CACjH,CAAC;AAEF;uCACuC;AACvC,MAAM,UAAU,mBAAmB,CAAC,GAAkB;IACpD,KAAK,IAAI,CAAC,GAAG,MAAM,EAAE,CAAC,GAAG,OAAO,EAAE,EAAE,CAAC;QAAE,GAAG,CAAC,QAAQ,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,gEAAgE;IAE/H,IAAI,KAAK,CAAC,aAAa,IAAI,IAAI,EAAE,CAAC;QAChC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,MAAM,EAAE,EAAE,CAAC;YAAE,GAAG,CAAC,QAAQ,CAAC,MAAM,GAAG,CAAC,CAAC,GAAG,KAAK,CAAC,aAAa,CAAC,CAAC,CAAE,CAAC;IACtF,CAAC;IAED,IAAI,KAAK,CAAC,cAAc,IAAI,IAAI,EAAE,CAAC;QACjC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,MAAM,EAAE,EAAE,CAAC;YAAE,GAAG,CAAC,QAAQ,CAAC,MAAM,GAAG,CAAC,CAAC,GAAG,KAAK,CAAC,cAAc,CAAC,CAAC,CAAE,CAAC;IACvF,CAAC;SAAM,CAAC;QACN,KAAK,IAAI,CAAC,GAAG,MAAM,EAAE,CAAC,GAAG,MAAM,EAAE,EAAE,CAAC;YAAE,GAAG,CAAC,QAAQ,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,yEAAyE;QACvI,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,EAAE,CAAC;YAAE,GAAG,CAAC,QAAQ,CAAC,MAAM,GAAG,CAAC,CAAC,GAAG,iBAAiB,CAAC,CAAC,CAAE,CAAC;QAC7E,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,EAAE,CAAC;YAAE,GAAG,CAAC,QAAQ,CAAC,MAAM,GAAG,CAAC,CAAC,GAAG,gBAAgB,CAAC,CAAC,CAAE,CAAC;QAC5E,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,EAAE,CAAC;YAAE,GAAG,CAAC,QAAQ,CAAC,MAAM,GAAG,CAAC,CAAC,GAAG,mBAAmB,CAAC,CAAC,CAAE,CAAC;QAChF,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;QAC5B,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,iBAAiB;QAC9C,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;QAC5B,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,iBAAiB;IAChD,CAAC;IAED,2EAA2E;IAC3E,iDAAiD;IACjD,KAAK,IAAI,CAAC,GAAG,MAAM,EAAE,CAAC,GAAG,OAAO,EAAE,EAAE,CAAC;QAAE,GAAG,CAAC,OAAO,CAAC,CAAC,CAAE,GAAG,GAAG,CAAC,QAAQ,CAAC,CAAC,CAAE,CAAC;AAC5E,CAAC;AAED;+DAC+D;AAC/D,MAAM,UAAU,aAAa,CAAC,GAAkB;IAC9C,+EAA+E;IAC/E,cAAc,CAAC,GAAG,EAAE,MAAM,EAAE,KAAK,CAAC,aAAa,CAAC,CAAC,CAAC,6CAA6C;IAC/F,cAAc,CAAC,GAAG,EAAE,MAAM,EAAE,IAAI,CAAC,CAAC,CAAC,kDAAkD;IAErF,yEAAyE;IACzE,cAAc,CAAC,GAAG,EAAE,MAAM,EAAE,IAAI,CAAC,CAAC,CAAC,uEAAuE;IAC1G,2BAA2B;IAC3B,cAAc,CAAC,GAAG,EAAE,MAAM,EAAE,IAAI,CAAC,CAAC;IAClC,cAAc,CAAC,GAAG,EAAE,MAAM,EAAE,IAAI,CAAC,CAAC,CAAC,MAAM;IACzC,cAAc,CAAC,GAAG,EAAE,MAAM,EAAE,IAAI,CAAC,QAAQ,CAAC,CAAC;IAC3C,cAAc,CAAC,GAAG,EAAE,MAAM,EAAE,IAAI,CAAC,QAAQ,CAAC,CAAC,CAAC,MAAM;IAClD,IAAI;IAEJ,KAAK,IAAI,CAAC,GAAG,MAAM,EAAE,CAAC,GAAG,MAAM,EAAE,EAAE,CAAC;QAAE,GAAG,CAAC,QAAQ,CAAC,CAAC,CAAC,GAAG,GAAG,CAAC,QAAQ,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,sDAAsD;IACnI,IAAI,KAAK,CAAC,WAAW,EAAE,CAAC;QACtB,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;QAC5B,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;IAC9B,CAAC,CAAC,iCAAiC;IACnC,gHAAgH;IAEhH,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;IAC5B,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,8EAA8E;IAC3G,IAAI,KAAK,CAAC,aAAa,EAAE,CAAC;QACxB,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;QAC5B,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;IAC9B,CAAC,CAAC,kBAAkB;SACf,CAAC;QACJ,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;QAC5B,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;IAC9B,CAAC;IACD,IAAI,KAAK,CAAC,WAAW;QAAE,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,2FAA2F;IAC/I,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,uEAAuE;IACpG,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,mFAAmF;IAChH,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,2BAA2B;IAC/E,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,GAAG,CAAC,QAAQ,CAAC,MAAM,CAAC,GAAG,IAAI,CAAC;IACnD,oDAAoD;AACtD,CAAC;AAED,2EAA2E;AAC3E,OAAO,EAAE,cAAc,EAAE,CAAC"}

package/dist/psiddigi.d.ts

@@ -0,0 +1,3 @@
+/** cRSID_playPSIDdigi (C64_SIDrouting.c:377-427) — returns short. */
+export declare function cRSID_playPSIDdigi(): number;
+//# sourceMappingURL=psiddigi.d.ts.map