@modplayjs/fmt-prowizard 0.0.0-stage → 0.2.1

package/dist/pw-mp.js

@@ -0,0 +1,171 @@
+// SPDX-License-Identifier: BSD-3-Clause
+// Copyright (c) 2026 Bitti09 — modplayjs contributors
+// Ported from: libxmp src/loaders/prowizard/mp.c (Module Protector, id +
+// noID variants share depack_mp :36-80; test_mp_id :177-212, test_mp_noid
+// :82-173).
+import { readmem16b, readmem32b, moveData, writeZero, pwReadTitle } from './prowiz.js';
+const MAGIC_TRK1 = 0x54524b31; // 'TRK1'
+const PW_MOD_MAGIC = 0x4d2e4b2e; // 'M.K.'
+function put8(out, b) { out.push(b & 0xff); }
+function put16b(out, v) { out.push((v >> 8) & 0xff, v & 0xff); }
+function put32b(out, v) {
+    out.push((v >>> 24) & 0xff, (v >> 16) & 0xff, (v >> 8) & 0xff, v & 0xff);
+}
+/** depack_mp (mp.c:36-80). */
+function depackMp(data, start) {
+    let pos = start;
+    const out = [];
+    const u8 = () => data[pos++] ?? 0;
+    const u16 = () => { const v = readmem16b(data, pos); pos += 2; return v; };
+    const u32 = () => { const v = readmem32b(data, pos); pos += 4; return v; };
+    writeZero(out, 20); // title
+    // TRK1 magic present → skip it; otherwise rewind (mp.c:48-49)
+    if (u32() !== MAGIC_TRK1)
+        pos -= 4;
+    // Sample headers (mp.c:51-59)
+    let ssize = 0;
+    for (let i = 0; i < 31; i++) {
+        writeZero(out, 22); // name
+        const size = u16();
+        ssize += size * 2;
+        put16b(out, size);
+        put8(out, u8()); // finetune
+        put8(out, u8()); // volume
+        put16b(out, u16()); // loop start
+        put16b(out, u16()); // loop size
+    }
+    put8(out, u8()); // pattern table length
+    put8(out, u8()); // NoiseTracker restart byte
+    // Pattern list (mp.c:64-69)
+    let max = 0;
+    for (let i = 0; i < 128; i++) {
+        const c1 = u8();
+        put8(out, c1);
+        if (c1 > max)
+            max = c1;
+    }
+    max++;
+    put32b(out, PW_MOD_MAGIC);
+    // Bypass unknown empty bytes (mp.c:73-74)
+    if (u32() !== 0)
+        pos -= 4;
+    // Pattern + sample data (mp.c:76-77)
+    moveData(data, pos, out, 1024 * max);
+    pos += 1024 * max;
+    moveData(data, pos, out, ssize);
+    return Uint8Array.from(out);
+}
+/** test_mp_noid (mp.c:82-173). */
+function testMpNoid(data, start) {
+    const s = data.length - start;
+    if (s < 378)
+        return 378 - s;
+    // test #2 (mp.c:86-120): 31 × 8-byte sample headers
+    let hdrSsize = 0;
+    for (let i = 0; i < 31; i++) {
+        const d = start + i * 8;
+        const size = readmem16b(data, d) << 1;
+        const lstart = readmem16b(data, d + 4) << 1;
+        const lsize = readmem16b(data, d + 6) << 1;
+        hdrSsize += size;
+        if (data[d + 2] > 0x0f)
+            return -1;
+        if (lsize !== 2 && lstart + lsize > size)
+            return -1;
+        if (lsize > size + 2)
+            return -1;
+        if (lstart !== 0 && lsize <= 2)
+            return -1;
+        if (size !== 0 && lsize === 0)
+            return -1;
+    }
+    if (hdrSsize <= 2)
+        return -1;
+    // test #3 (mp.c:122-127)
+    const len = data[start + 248];
+    if (len === 0 || len > 0x7f)
+        return -1;
+    // test #4 (mp.c:129-142)
+    let psize = 0;
+    for (let i = 0; i < 128; i++) {
+        const pat = data[start + 250 + i];
+        if (pat > 0x7f)
+            return -1;
+        if (pat > psize)
+            psize = pat;
+        if (i > len + 3 && pat !== 0)
+            return -1;
+    }
+    psize++;
+    psize <<= 8;
+    if (s < 378 + psize * 4)
+        return 378 + psize * 4 - s;
+    // test #5 (mp.c:145-151): ptk note check on pattern data
+    // test #5 (mp.c:144-152): sample-header words must be >= 0x71 (d = i*8)
+    for (let i = 0; i < 31; i++) {
+        const d = start + i * 8;
+        const val = readmem16b(data, d) & 0x0fff;
+        if (val > 0 && val < 0x71)
+            return -1;
+    }
+    // test #6 (mp.c:156-164)
+    for (let i = 0; i < 31; i++) {
+        const d = start + i * 8;
+        const size = readmem16b(data, d) << 1;
+        const lend = (readmem16b(data, d + 4) + readmem16b(data, d + 6)) << 1;
+        if (lend > size + 2)
+            return -1;
+    }
+    pwReadTitle(null, 0);
+    return 0;
+}
+/** test_mp_id (mp.c:177-212) — "TRK1" signature. */
+function testMpId(data, start) {
+    const s = data.length - start;
+    if (s < 382)
+        return 382 - s;
+    if (readmem32b(data, start) !== MAGIC_TRK1)
+        return -1;
+    // test #1 (mp.c:184-188)
+    for (let i = 0; i < 31; i++) {
+        if (data[start + 6 + 8 * i] > 0x0f)
+            return -1;
+    }
+    // test #2 (mp.c:190-194)
+    const len = data[start + 252];
+    if (len === 0 || len > 0x7f)
+        return -1;
+    // test #4 (mp.c:196-207)
+    let psize = 0;
+    for (let i = 0; i < 128; i++) {
+        const pat = data[start + 254 + i];
+        if (pat > 0x7f)
+            return -1;
+        if (pat > psize)
+            psize = pat;
+    }
+    psize++;
+    psize <<= 8;
+    if (s < 382 + psize * 4)
+        return 382 + psize * 4 - s;
+    // test #5 (mp.c:210-214)
+    for (let i = 0; i < psize; i++) {
+        if (data[start + 382 + i * 4] > 19)
+            return -1;
+    }
+    pwReadTitle(null, 0);
+    return 0;
+}
+/** pw_mp_id: "Module Protector" (TRK1). */
+export const pwMpId = {
+    name: 'Module Protector',
+    test: testMpId,
+    depack: depackMp,
+};
+/** pw_mp_noid: "Module Protector noID". */
+export const pwMpNoid = {
+    name: 'Module Protector noID',
+    test: testMpNoid,
+    depack: depackMp,
+};
+//# sourceMappingURL=pw-mp.js.map

package/dist/pw-mp.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"pw-mp.js","sourceRoot":"","sources":["../src/pw-mp.ts"],"names":[],"mappings":"AAAA,wCAAwC;AACxC,sDAAsD;AACtD,yEAAyE;AACzE,0EAA0E;AAC1E,YAAY;AAEZ,OAAO,EAAE,UAAU,EAAE,UAAU,EAAE,QAAQ,EAAE,SAAS,EAAE,WAAW,EAAiB,MAAM,aAAa,CAAC;AAEtG,MAAM,UAAU,GAAG,UAAU,CAAC,CAAC,SAAS;AACxC,MAAM,YAAY,GAAG,UAAU,CAAC,CAAC,SAAS;AAE1C,SAAS,IAAI,CAAC,GAAa,EAAE,CAAS,IAAU,GAAG,CAAC,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC;AACrE,SAAS,MAAM,CAAC,GAAa,EAAE,CAAS,IAAU,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,IAAI,EAAE,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC;AACxF,SAAS,MAAM,CAAC,GAAa,EAAE,CAAS;IACtC,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,KAAK,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,CAAC,IAAI,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,IAAI,EAAE,CAAC,GAAG,IAAI,CAAC,CAAC;AAC3E,CAAC;AAED,8BAA8B;AAC9B,SAAS,QAAQ,CAAC,IAAgB,EAAE,KAAa;IAC/C,IAAI,GAAG,GAAG,KAAK,CAAC;IAChB,MAAM,GAAG,GAAa,EAAE,CAAC;IACzB,MAAM,EAAE,GAAG,GAAG,EAAE,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC;IAClC,MAAM,GAAG,GAAG,GAAG,EAAE,GAAG,MAAM,CAAC,GAAG,UAAU,CAAC,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC;IAC3E,MAAM,GAAG,GAAG,GAAG,EAAE,GAAG,MAAM,CAAC,GAAG,UAAU,CAAC,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC;IAE3E,SAAS,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC,CAAC,QAAQ;IAE5B,8DAA8D;IAC9D,IAAI,GAAG,EAAE,KAAK,UAAU;QAAE,GAAG,IAAI,CAAC,CAAC;IAEnC,8BAA8B;IAC9B,IAAI,KAAK,GAAG,CAAC,CAAC;IACd,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;QAC5B,SAAS,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC,CAAC,OAAO;QAC3B,MAAM,IAAI,GAAG,GAAG,EAAE,CAAC;QACnB,KAAK,IAAI,IAAI,GAAG,CAAC,CAAC;QAClB,MAAM,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC;QAClB,IAAI,CAAC,GAAG,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,WAAW;QAC5B,IAAI,CAAC,GAAG,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,SAAS;QAC1B,MAAM,CAAC,GAAG,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,aAAa;QACjC,MAAM,CAAC,GAAG,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,YAAY;IAClC,CAAC;IAED,IAAI,CAAC,GAAG,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,uBAAuB;IACxC,IAAI,CAAC,GAAG,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,4BAA4B;IAE7C,4BAA4B;IAC5B,IAAI,GAAG,GAAG,CAAC,CAAC;IACZ,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE,EAAE,CAAC;QAC7B,MAAM,EAAE,GAAG,EAAE,EAAE,CAAC;QAChB,IAAI,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC;QACd,IAAI,EAAE,GAAG,GAAG;YAAE,GAAG,GAAG,EAAE,CAAC;IACzB,CAAC;IACD,GAAG,EAAE,CAAC;IAEN,MAAM,CAAC,GAAG,EAAE,YAAY,CAAC,CAAC;IAE1B,0CAA0C;IAC1C,IAAI,GAAG,EAAE,KAAK,CAAC;QAAE,GAAG,IAAI,CAAC,CAAC;IAE1B,qCAAqC;IACrC,QAAQ,CAAC,IAAI,EAAE,GAAG,EAAE,GAAG,EAAE,IAAI,GAAG,GAAG,CAAC,CAAC;IACrC,GAAG,IAAI,IAAI,GAAG,GAAG,CAAC;IAClB,QAAQ,CAAC,IAAI,EAAE,GAAG,EAAE,GAAG,EAAE,KAAK,CAAC,CAAC;IAEhC,OAAO,UAAU,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;AAC9B,CAAC;AAED,kCAAkC;AAClC,SAAS,UAAU,CAAC,IAAgB,EAAE,KAAa;IACjD,MAAM,CAAC,GAAG,IAAI,CAAC,MAAM,GAAG,KAAK,CAAC;IAC9B,IAAI,CAAC,GAAG,GAAG;QAAE,OAAO,GAAG,GAAG,CAAC,CAAC;IAE5B,oDAAoD;IACpD,IAAI,QAAQ,GAAG,CAAC,CAAC;IACjB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;QAC5B,MAAM,CAAC,GAAG,KAAK,GAAG,CAAC,GAAG,CAAC,CAAC;QACxB,MAAM,IAAI,GAAG,UAAU,CAAC,IAAI,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC;QACtC,MAAM,MAAM,GAAG,UAAU,CAAC,IAAI,EAAE,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC;QAC5C,MAAM,KAAK,GAAG,UAAU,CAAC,IAAI,EAAE,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC;QAE3C,QAAQ,IAAI,IAAI,CAAC;QAEjB,IAAI,IAAI,CAAC,CAAC,GAAG,CAAC,CAAE,GAAG,IAAI;YAAE,OAAO,CAAC,CAAC,CAAC;QACnC,IAAI,KAAK,KAAK,CAAC,IAAI,MAAM,GAAG,KAAK,GAAG,IAAI;YAAE,OAAO,CAAC,CAAC,CAAC;QACpD,IAAI,KAAK,GAAG,IAAI,GAAG,CAAC;YAAE,OAAO,CAAC,CAAC,CAAC;QAChC,IAAI,MAAM,KAAK,CAAC,IAAI,KAAK,IAAI,CAAC;YAAE,OAAO,CAAC,CAAC,CAAC;QAC1C,IAAI,IAAI,KAAK,CAAC,IAAI,KAAK,KAAK,CAAC;YAAE,OAAO,CAAC,CAAC,CAAC;IAC3C,CAAC;IAED,IAAI,QAAQ,IAAI,CAAC;QAAE,OAAO,CAAC,CAAC,CAAC;IAE7B,yBAAyB;IACzB,MAAM,GAAG,GAAG,IAAI,CAAC,KAAK,GAAG,GAAG,CAAE,CAAC;IAC/B,IAAI,GAAG,KAAK,CAAC,IAAI,GAAG,GAAG,IAAI;QAAE,OAAO,CAAC,CAAC,CAAC;IAEvC,yBAAyB;IACzB,IAAI,KAAK,GAAG,CAAC,CAAC;IACd,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE,EAAE,CAAC;QAC7B,MAAM,GAAG,GAAG,IAAI,CAAC,KAAK,GAAG,GAAG,GAAG,CAAC,CAAE,CAAC;QACnC,IAAI,GAAG,GAAG,IAAI;YAAE,OAAO,CAAC,CAAC,CAAC;QAC1B,IAAI,GAAG,GAAG,KAAK;YAAE,KAAK,GAAG,GAAG,CAAC;QAC7B,IAAI,CAAC,GAAG,GAAG,GAAG,CAAC,IAAI,GAAG,KAAK,CAAC;YAAE,OAAO,CAAC,CAAC,CAAC;IAC1C,CAAC;IACD,KAAK,EAAE,CAAC;IACR,KAAK,KAAK,CAAC,CAAC;IAEZ,IAAI,CAAC,GAAG,GAAG,GAAG,KAAK,GAAG,CAAC;QAAE,OAAO,GAAG,GAAG,KAAK,GAAG,CAAC,GAAG,CAAC,CAAC;IAEpD,yDAAyD;IACzD,wEAAwE;IACxE,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;QAC5B,MAAM,CAAC,GAAG,KAAK,GAAG,CAAC,GAAG,CAAC,CAAC;QACxB,MAAM,GAAG,GAAG,UAAU,CAAC,IAAI,EAAE,CAAC,CAAC,GAAG,MAAM,CAAC;QACzC,IAAI,GAAG,GAAG,CAAC,IAAI,GAAG,GAAG,IAAI;YAAE,OAAO,CAAC,CAAC,CAAC;IACvC,CAAC;IAED,yBAAyB;IACzB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;QAC5B,MAAM,CAAC,GAAG,KAAK,GAAG,CAAC,GAAG,CAAC,CAAC;QACxB,MAAM,IAAI,GAAG,UAAU,CAAC,IAAI,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC;QACtC,MAAM,IAAI,GAAG,CAAC,UAAU,CAAC,IAAI,EAAE,CAAC,GAAG,CAAC,CAAC,GAAG,UAAU,CAAC,IAAI,EAAE,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;QACtE,IAAI,IAAI,GAAG,IAAI,GAAG,CAAC;YAAE,OAAO,CAAC,CAAC,CAAC;IACjC,CAAC;IAED,WAAW,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;IAErB,OAAO,CAAC,CAAC;AACX,CAAC;AAED,oDAAoD;AACpD,SAAS,QAAQ,CAAC,IAAgB,EAAE,KAAa;IAC/C,MAAM,CAAC,GAAG,IAAI,CAAC,MAAM,GAAG,KAAK,CAAC;IAC9B,IAAI,CAAC,GAAG,GAAG;QAAE,OAAO,GAAG,GAAG,CAAC,CAAC;IAE5B,IAAI,UAAU,CAAC,IAAI,EAAE,KAAK,CAAC,KAAK,UAAU;QAAE,OAAO,CAAC,CAAC,CAAC;IAEtD,yBAAyB;IACzB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;QAC5B,IAAI,IAAI,CAAC,KAAK,GAAG,CAAC,GAAG,CAAC,GAAG,CAAC,CAAE,GAAG,IAAI;YAAE,OAAO,CAAC,CAAC,CAAC;IACjD,CAAC;IAED,yBAAyB;IACzB,MAAM,GAAG,GAAG,IAAI,CAAC,KAAK,GAAG,GAAG,CAAE,CAAC;IAC/B,IAAI,GAAG,KAAK,CAAC,IAAI,GAAG,GAAG,IAAI;QAAE,OAAO,CAAC,CAAC,CAAC;IAEvC,yBAAyB;IACzB,IAAI,KAAK,GAAG,CAAC,CAAC;IACd,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE,EAAE,CAAC;QAC7B,MAAM,GAAG,GAAG,IAAI,CAAC,KAAK,GAAG,GAAG,GAAG,CAAC,CAAE,CAAC;QACnC,IAAI,GAAG,GAAG,IAAI;YAAE,OAAO,CAAC,CAAC,CAAC;QAC1B,IAAI,GAAG,GAAG,KAAK;YAAE,KAAK,GAAG,GAAG,CAAC;IAC/B,CAAC;IACD,KAAK,EAAE,CAAC;IACR,KAAK,KAAK,CAAC,CAAC;IAEZ,IAAI,CAAC,GAAG,GAAG,GAAG,KAAK,GAAG,CAAC;QAAE,OAAO,GAAG,GAAG,KAAK,GAAG,CAAC,GAAG,CAAC,CAAC;IAEpD,yBAAyB;IACzB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,KAAK,EAAE,CAAC,EAAE,EAAE,CAAC;QAC/B,IAAI,IAAI,CAAC,KAAK,GAAG,GAAG,GAAG,CAAC,GAAG,CAAC,CAAE,GAAG,EAAE;YAAE,OAAO,CAAC,CAAC,CAAC;IACjD,CAAC;IAED,WAAW,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;IAErB,OAAO,CAAC,CAAC;AACX,CAAC;AAED,2CAA2C;AAC3C,MAAM,CAAC,MAAM,MAAM,GAAa;IAC9B,IAAI,EAAE,kBAAkB;IACxB,IAAI,EAAE,QAAQ;IACd,MAAM,EAAE,QAAQ;CACjB,CAAC;AAEF,2CAA2C;AAC3C,MAAM,CAAC,MAAM,QAAQ,GAAa;IAChC,IAAI,EAAE,uBAAuB;IAC7B,IAAI,EAAE,UAAU;IAChB,MAAM,EAAE,QAAQ;CACjB,CAAC"}

package/dist/pw-np12.d.ts

@@ -0,0 +1,6 @@
+import { type PwFormat } from './prowiz.js';
+/** pw_np1: "NoisePacker v1". */
+export declare const pwNp1: PwFormat;
+/** pw_np2: "NoisePacker v2". */
+export declare const pwNp2: PwFormat;
+//# sourceMappingURL=pw-np12.d.ts.map

package/dist/pw-np12.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"pw-np12.d.ts","sourceRoot":"","sources":["../src/pw-np12.ts"],"names":[],"mappings":"AAMA,OAAO,EAA4D,KAAK,QAAQ,EAAE,MAAM,aAAa,CAAC;AAiOtG,gCAAgC;AAChC,eAAO,MAAM,KAAK,EAAE,QAInB,CAAC;AAEF,gCAAgC;AAChC,eAAO,MAAM,KAAK,EAAE,QAInB,CAAC"}

package/dist/pw-np12.js

@@ -0,0 +1,234 @@
+// SPDX-License-Identifier: BSD-3-Clause
+// Copyright (c) 2026 Bitti09 — modplayjs contributors
+// Ported from: libxmp src/loaders/prowizard/np1.c (NoisePacker v1) and
+// np2.c (NoisePacker v2) — np2 shares np1's layout with small deltas.
+import { ptkTable, ptkIsValidNote } from './ptktable.js';
+import { readmem16b, readmem32b, moveData, writeZero, pwReadTitle } from './prowiz.js';
+const PW_MOD_MAGIC = 0x4d2e4b2e; // 'M.K.'
+function put8(out, b) { out.push(b & 0xff); }
+function put16b(out, v) { out.push((v >> 8) & 0xff, v & 0xff); }
+function put32b(out, v) {
+    out.push((v >>> 24) & 0xff, (v >> 16) & 0xff, (v >> 8) & 0xff, v & 0xff);
+}
+/**
+ * Shared depack (np1.c:40-156, np2.c:34-155). ver1: loop start halved and
+ * effect table lacks the 0x0e case + npat sanity.
+ */
+function depackNp12(data, start, ver1) {
+    let pos = start;
+    const out = [];
+    const u8 = () => data[pos++] ?? 0;
+    const u16 = () => { const v = readmem16b(data, pos); pos += 2; return v; };
+    const u32 = () => { const v = readmem32b(data, pos); pos += 4; return v; };
+    const c1 = u8();
+    const c2 = u8();
+    const nins = ((c1 << 4) & 0xf0) | ((c2 >> 4) & 0x0f);
+    writeZero(out, 20); // title
+    const len = u16() >> 1; // size of pattern list
+    if (len > 128)
+        throw new Error('np: pattern list too long');
+    u16(); // 2 unknown bytes
+    u16(); // track data size
+    // Sample descriptions (np1.c:65-83 / np2.c:63-82)
+    let ssize = 0;
+    for (let i = 0; i < nins; i++) {
+        u32(); // bypass 4 unknown bytes
+        writeZero(out, 22); // sample name
+        const size = u16();
+        ssize += size * 2;
+        put16b(out, size);
+        put8(out, u8()); // finetune
+        put8(out, u8()); // volume
+        u32(); // bypass 4 unknown bytes
+        const loopSize = u16();
+        put16b(out, ver1 ? u16() / 2 : u16()); // loop start
+        put16b(out, loopSize); // loop size
+    }
+    // Fill to 31 samples (np1.c:86-92): zeros with 0x01 loop flag.
+    {
+        const pad = new Array(30).fill(0);
+        pad[29] = 0x01;
+        for (let i = nins; i < 31; i++)
+            out.push(...pad);
+    }
+    put8(out, len);
+    put8(out, 0x7f); // noisetracker byte
+    pos += 2; // always $02? (np1.c:98)
+    pos += 2; // unknown (np1.c:99)
+    // Pattern table (np1.c:102-111)
+    const ptable = [];
+    let npat = 0;
+    for (let i = 0; i < len; i++) {
+        const p = u16() >> 3;
+        ptable.push(p);
+        if (p > npat)
+            npat = p;
+    }
+    npat++;
+    if (!ver1 && npat > 128)
+        throw new Error('np2: too many patterns');
+    for (let i = 0; i < 128; i++)
+        put8(out, ptable[i]);
+    put32b(out, PW_MOD_MAGIC);
+    // Track addresses per pattern (np1.c:114-129)
+    const trkAddr = [];
+    let maxAddr = 0;
+    for (let i = 0; i < npat; i++) {
+        const row = [];
+        for (let j = 0; j < 4; j++) {
+            const a = u16();
+            row.push(a);
+            if (a > maxAddr)
+                maxAddr = a;
+        }
+        trkAddr.push(row);
+    }
+    const trkStart = pos;
+    // Track data (np1.c:132-152): channel j reads track [3-j] (reversed);
+    // cells are placed ROW-MAJOR into the pattern body (tmp[x], x = k*16 + j*4).
+    for (let i = 0; i < npat; i++) {
+        const tmp = new Uint8Array(1024);
+        for (let j = 0; j < 4; j++) {
+            pos = trkStart + trkAddr[i][3 - j];
+            for (let k = 0; k < 64; k++) {
+                const x = k * 16 + j * 4;
+                const c1 = u8();
+                const c2 = u8();
+                const c3 = u8();
+                const c4 = Math.trunc((c1 & 0xfe) / 2);
+                if (!ptkIsValidNote(c4))
+                    throw new Error('np: invalid note');
+                let eff2 = c2;
+                let eff3 = c3;
+                switch (c2 & 0x0f) {
+                    case 0x08:
+                        eff2 &= 0xf0;
+                        break;
+                    case 0x07:
+                        eff2 = (eff2 & 0xf0) + 0x0a;
+                        // falls through to 06/05 handling
+                        eff3 = eff3 > 0x80 ? 0x100 - eff3 : (eff3 << 4) & 0xf0;
+                        break;
+                    case 0x06:
+                    case 0x05:
+                        eff3 = eff3 > 0x80 ? 0x100 - eff3 : (eff3 << 4) & 0xf0;
+                        break;
+                    case 0x0b:
+                        eff3 = Math.trunc((eff3 + 4) / 2);
+                        break;
+                    case 0x0e:
+                        if (!ver1)
+                            eff3--;
+                        break;
+                }
+                tmp[x] = ((c1 << 4) & 0x10) | ptkTable[c4][0];
+                tmp[x + 1] = ptkTable[c4][1];
+                tmp[x + 2] = eff2 & 0xff;
+                tmp[x + 3] = eff3 & 0xff;
+            }
+        }
+        for (let k = 0; k < 1024; k++)
+            out.push(tmp[k]);
+    }
+    // Sample data (np1.c:155-158)
+    moveData(data, start + maxAddr + 192 + trkStart, out, ssize);
+    return Uint8Array.from(out);
+}
+/** Shared test (np1.c:161-251, np2.c:158-269). */
+function testNp12(data, start, ver1) {
+    const s = data.length - start;
+    if (s < 10)
+        return 10 - s;
+    // Pattern table size (np1.c:169-173)
+    const ptabSize = readmem16b(data, start + 2);
+    if (ptabSize === 0 || (ptabSize & 1) !== 0 || ptabSize > 0xff)
+        return -1;
+    // Sample count nibble check (np1.c:176-178)
+    if ((data[start + 1] & 0x0f) !== 0x0c)
+        return -1;
+    const numIns = ((data[start] << 4) & 0xf0) | ((data[start + 1] >> 4) & 0x0f);
+    if (numIns === 0 || numIns > 0x1f)
+        return -1;
+    // PW_REQUEST_DATA(s, 15 + num_ins * 16)
+    if (s < 15 + numIns * 16)
+        return 15 + numIns * 16 - s;
+    for (let i = 0; i < numIns; i++) {
+        if (data[start + 15 + i * 16] > 0x40)
+            return -1; // volumes
+    }
+    // Sample sizes (np1.c:185-206)
+    let ssize = 0;
+    for (let i = 0; i < numIns; i++) {
+        const d = start + i * 16;
+        const len = readmem16b(data, d + 12) << 1;
+        const lstart = readmem16b(data, d + 20) << 1;
+        const lsize = ver1 ? readmem16b(data, d + 22) : readmem16b(data, d + 22) << 1;
+        if (len > 0xffff || lstart > 0xffff || lsize > 0xffff)
+            return -1;
+        if (lstart + lsize > len + 2)
+            return -1;
+        if (lstart === 0 && lsize !== 0)
+            return -1;
+        ssize += len;
+    }
+    if (ssize <= 4)
+        return -1;
+    // Header size (np1.c:209-211)
+    let hdrSize = numIns * 16 + 8 + 4;
+    // PW_REQUEST_DATA(s, hdr_size + ptab_size + 2)
+    if (s < hdrSize + ptabSize + 2)
+        return hdrSize + ptabSize + 2 - s;
+    // Pattern table (np1.c:213-224)
+    let maxPptr = 0;
+    for (let i = 0; i < ptabSize; i += 2) {
+        const pptr = readmem16b(data, start + hdrSize + i);
+        if (ver1) {
+            if ((pptr & 0x07) !== 0 || pptr >= 0x400)
+                return -1;
+        }
+        else {
+            if ((pptr & 0x07) !== 0 || pptr > 0x400)
+                return -1;
+        }
+        if (pptr > maxPptr)
+            maxPptr = pptr;
+    }
+    // Header to end of track list (np1.c:227-231)
+    hdrSize += ptabSize + maxPptr + 8;
+    // Track data size (np1.c:234-237)
+    const trkSize = readmem16b(data, start + 6);
+    if (trkSize < 192 || (trkSize & 0x3f) !== 0)
+        return -1;
+    // PW_REQUEST_DATA(s, hdr_size + trk_size [+16 for np2])
+    const need = hdrSize + trkSize + (ver1 ? 0 : 16);
+    if (s < need)
+        return need - s;
+    // Notes (np1.c:239-247, np2.c:245-262)
+    for (let i = 0; i < trkSize; i += 3) {
+        const d = start + hdrSize + i;
+        if (data[d] > 0x49)
+            return -1;
+        if (!ver1) {
+            const ins = ((data[d] << 4) & 0x10) | ((data[d + 1] >> 4) & 0x0f);
+            if (ins > numIns)
+                return -1;
+            if ((data[d + 1] & 0x0f) === 0 && data[d + 2] !== 0)
+                return -1;
+        }
+    }
+    pwReadTitle(null, 0);
+    return 0;
+}
+/** pw_np1: "NoisePacker v1". */
+export const pwNp1 = {
+    name: 'NoisePacker v1',
+    test: (data, st) => testNp12(data, st, true),
+    depack: (data, st) => depackNp12(data, st, true),
+};
+/** pw_np2: "NoisePacker v2". */
+export const pwNp2 = {
+    name: 'NoisePacker v2',
+    test: (data, st) => testNp12(data, st, false),
+    depack: (data, st) => depackNp12(data, st, false),
+};
+//# sourceMappingURL=pw-np12.js.map

package/dist/pw-np12.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"pw-np12.js","sourceRoot":"","sources":["../src/pw-np12.ts"],"names":[],"mappings":"AAAA,wCAAwC;AACxC,sDAAsD;AACtD,uEAAuE;AACvE,sEAAsE;AAEtE,OAAO,EAAE,QAAQ,EAAE,cAAc,EAAE,MAAM,eAAe,CAAC;AACzD,OAAO,EAAE,UAAU,EAAE,UAAU,EAAE,QAAQ,EAAE,SAAS,EAAE,WAAW,EAAiB,MAAM,aAAa,CAAC;AAEtG,MAAM,YAAY,GAAG,UAAU,CAAC,CAAC,SAAS;AAE1C,SAAS,IAAI,CAAC,GAAa,EAAE,CAAS,IAAU,GAAG,CAAC,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC;AACrE,SAAS,MAAM,CAAC,GAAa,EAAE,CAAS,IAAU,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,IAAI,EAAE,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC;AACxF,SAAS,MAAM,CAAC,GAAa,EAAE,CAAS;IACtC,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,KAAK,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,CAAC,IAAI,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,IAAI,EAAE,CAAC,GAAG,IAAI,CAAC,CAAC;AAC3E,CAAC;AAED;;;GAGG;AACH,SAAS,UAAU,CAAC,IAAgB,EAAE,KAAa,EAAE,IAAa;IAChE,IAAI,GAAG,GAAG,KAAK,CAAC;IAChB,MAAM,GAAG,GAAa,EAAE,CAAC;IACzB,MAAM,EAAE,GAAG,GAAG,EAAE,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC;IAClC,MAAM,GAAG,GAAG,GAAG,EAAE,GAAG,MAAM,CAAC,GAAG,UAAU,CAAC,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC;IAC3E,MAAM,GAAG,GAAG,GAAG,EAAE,GAAG,MAAM,CAAC,GAAG,UAAU,CAAC,IAAI,EAAE,GAAG,CAAC,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,CAAC,CAAC,CAAC;IAE3E,MAAM,EAAE,GAAG,EAAE,EAAE,CAAC;IAChB,MAAM,EAAE,GAAG,EAAE,EAAE,CAAC;IAChB,MAAM,IAAI,GAAG,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC;IAErD,SAAS,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC,CAAC,QAAQ;IAE5B,MAAM,GAAG,GAAG,GAAG,EAAE,IAAI,CAAC,CAAC,CAAC,uBAAuB;IAC/C,IAAI,GAAG,GAAG,GAAG;QAAE,MAAM,IAAI,KAAK,CAAC,2BAA2B,CAAC,CAAC;IAE5D,GAAG,EAAE,CAAC,CAAC,kBAAkB;IACzB,GAAG,EAAE,CAAC,CAAC,kBAAkB;IAEzB,kDAAkD;IAClD,IAAI,KAAK,GAAG,CAAC,CAAC;IACd,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC;QAC9B,GAAG,EAAE,CAAC,CAAC,yBAAyB;QAChC,SAAS,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC,CAAC,cAAc;QAClC,MAAM,IAAI,GAAG,GAAG,EAAE,CAAC;QACnB,KAAK,IAAI,IAAI,GAAG,CAAC,CAAC;QAClB,MAAM,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC;QAClB,IAAI,CAAC,GAAG,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,WAAW;QAC5B,IAAI,CAAC,GAAG,EAAE,EAAE,EAAE,CAAC,CAAC,CAAC,SAAS;QAC1B,GAAG,EAAE,CAAC,CAAC,yBAAyB;QAChC,MAAM,QAAQ,GAAG,GAAG,EAAE,CAAC;QACvB,MAAM,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC,CAAC,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC,aAAa;QACpD,MAAM,CAAC,GAAG,EAAE,QAAQ,CAAC,CAAC,CAAC,YAAY;IACrC,CAAC;IAED,+DAA+D;IAC/D,CAAC;QACC,MAAM,GAAG,GAAG,IAAI,KAAK,CAAS,EAAE,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;QAC1C,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,CAAC;QACf,KAAK,IAAI,CAAC,GAAG,IAAI,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE;YAAE,GAAG,CAAC,IAAI,CAAC,GAAG,GAAG,CAAC,CAAC;IACnD,CAAC;IAED,IAAI,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC;IACf,IAAI,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC,CAAC,oBAAoB;IAErC,GAAG,IAAI,CAAC,CAAC,CAAC,yBAAyB;IACnC,GAAG,IAAI,CAAC,CAAC,CAAC,qBAAqB;IAE/B,gCAAgC;IAChC,MAAM,MAAM,GAAa,EAAE,CAAC;IAC5B,IAAI,IAAI,GAAG,CAAC,CAAC;IACb,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE,EAAE,CAAC;QAC7B,MAAM,CAAC,GAAG,GAAG,EAAE,IAAI,CAAC,CAAC;QACrB,MAAM,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;QACf,IAAI,CAAC,GAAG,IAAI;YAAE,IAAI,GAAG,CAAC,CAAC;IACzB,CAAC;IACD,IAAI,EAAE,CAAC;IACP,IAAI,CAAC,IAAI,IAAI,IAAI,GAAG,GAAG;QAAE,MAAM,IAAI,KAAK,CAAC,wBAAwB,CAAC,CAAC;IAEnE,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE;QAAE,IAAI,CAAC,GAAG,EAAE,MAAM,CAAC,CAAC,CAAE,CAAC,CAAC;IACpD,MAAM,CAAC,GAAG,EAAE,YAAY,CAAC,CAAC;IAE1B,8CAA8C;IAC9C,MAAM,OAAO,GAAe,EAAE,CAAC;IAC/B,IAAI,OAAO,GAAG,CAAC,CAAC;IAChB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC;QAC9B,MAAM,GAAG,GAAa,EAAE,CAAC;QACzB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC;YAC3B,MAAM,CAAC,GAAG,GAAG,EAAE,CAAC;YAChB,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;YACZ,IAAI,CAAC,GAAG,OAAO;gBAAE,OAAO,GAAG,CAAC,CAAC;QAC/B,CAAC;QACD,OAAO,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IACpB,CAAC;IACD,MAAM,QAAQ,GAAG,GAAG,CAAC;IAErB,sEAAsE;IACtE,6EAA6E;IAC7E,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC;QAC9B,MAAM,GAAG,GAAG,IAAI,UAAU,CAAC,IAAI,CAAC,CAAC;QACjC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC;YAC3B,GAAG,GAAG,QAAQ,GAAG,OAAO,CAAC,CAAC,CAAE,CAAC,CAAC,GAAG,CAAC,CAAE,CAAC;YACrC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;gBAC5B,MAAM,CAAC,GAAG,CAAC,GAAG,EAAE,GAAG,CAAC,GAAG,CAAC,CAAC;gBACzB,MAAM,EAAE,GAAG,EAAE,EAAE,CAAC;gBAChB,MAAM,EAAE,GAAG,EAAE,EAAE,CAAC;gBAChB,MAAM,EAAE,GAAG,EAAE,EAAE,CAAC;gBAChB,MAAM,EAAE,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,EAAE,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC;gBACvC,IAAI,CAAC,cAAc,CAAC,EAAE,CAAC;oBAAE,MAAM,IAAI,KAAK,CAAC,kBAAkB,CAAC,CAAC;gBAE7D,IAAI,IAAI,GAAG,EAAE,CAAC;gBACd,IAAI,IAAI,GAAG,EAAE,CAAC;gBACd,QAAQ,EAAE,GAAG,IAAI,EAAE,CAAC;oBAClB,KAAK,IAAI;wBACP,IAAI,IAAI,IAAI,CAAC;wBACb,MAAM;oBACR,KAAK,IAAI;wBACP,IAAI,GAAG,CAAC,IAAI,GAAG,IAAI,CAAC,GAAG,IAAI,CAAC;wBAC5B,kCAAkC;wBAClC,IAAI,GAAG,IAAI,GAAG,IAAI,CAAC,CAAC,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC;wBACvD,MAAM;oBACR,KAAK,IAAI,CAAC;oBACV,KAAK,IAAI;wBACP,IAAI,GAAG,IAAI,GAAG,IAAI,CAAC,CAAC,CAAC,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC,IAAI,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC;wBACvD,MAAM;oBACR,KAAK,IAAI;wBACP,IAAI,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,IAAI,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;wBAClC,MAAM;oBACR,KAAK,IAAI;wBACP,IAAI,CAAC,IAAI;4BAAE,IAAI,EAAE,CAAC;wBAClB,MAAM;gBACV,CAAC;gBAED,GAAG,CAAC,CAAC,CAAC,GAAG,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,GAAG,QAAQ,CAAC,EAAE,CAAE,CAAC,CAAC,CAAC,CAAC;gBAC/C,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,QAAQ,CAAC,EAAE,CAAE,CAAC,CAAC,CAAC,CAAC;gBAC9B,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,IAAI,GAAG,IAAI,CAAC;gBACzB,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,IAAI,GAAG,IAAI,CAAC;YAC3B,CAAC;QACH,CAAC;QACD,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE;YAAE,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,CAAE,CAAC,CAAC;IACnD,CAAC;IAED,8BAA8B;IAC9B,QAAQ,CAAC,IAAI,EAAE,KAAK,GAAG,OAAO,GAAG,GAAG,GAAG,QAAQ,EAAE,GAAG,EAAE,KAAK,CAAC,CAAC;IAE7D,OAAO,UAAU,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;AAC9B,CAAC;AAED,kDAAkD;AAClD,SAAS,QAAQ,CAAC,IAAgB,EAAE,KAAa,EAAE,IAAa;IAC9D,MAAM,CAAC,GAAG,IAAI,CAAC,MAAM,GAAG,KAAK,CAAC;IAE9B,IAAI,CAAC,GAAG,EAAE;QAAE,OAAO,EAAE,GAAG,CAAC,CAAC;IAE1B,qCAAqC;IACrC,MAAM,QAAQ,GAAG,UAAU,CAAC,IAAI,EAAE,KAAK,GAAG,CAAC,CAAC,CAAC;IAC7C,IAAI,QAAQ,KAAK,CAAC,IAAI,CAAC,QAAQ,GAAG,CAAC,CAAC,KAAK,CAAC,IAAI,QAAQ,GAAG,IAAI;QAAE,OAAO,CAAC,CAAC,CAAC;IAEzE,4CAA4C;IAC5C,IAAI,CAAC,IAAI,CAAC,KAAK,GAAG,CAAC,CAAE,GAAG,IAAI,CAAC,KAAK,IAAI;QAAE,OAAO,CAAC,CAAC,CAAC;IAElD,MAAM,MAAM,GAAG,CAAC,CAAC,IAAI,CAAC,KAAK,CAAE,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,KAAK,GAAG,CAAC,CAAE,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC;IAC/E,IAAI,MAAM,KAAK,CAAC,IAAI,MAAM,GAAG,IAAI;QAAE,OAAO,CAAC,CAAC,CAAC;IAE7C,wCAAwC;IACxC,IAAI,CAAC,GAAG,EAAE,GAAG,MAAM,GAAG,EAAE;QAAE,OAAO,EAAE,GAAG,MAAM,GAAG,EAAE,GAAG,CAAC,CAAC;IAEtD,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;QAChC,IAAI,IAAI,CAAC,KAAK,GAAG,EAAE,GAAG,CAAC,GAAG,EAAE,CAAE,GAAG,IAAI;YAAE,OAAO,CAAC,CAAC,CAAC,CAAC,UAAU;IAC9D,CAAC;IAED,+BAA+B;IAC/B,IAAI,KAAK,GAAG,CAAC,CAAC;IACd,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;QAChC,MAAM,CAAC,GAAG,KAAK,GAAG,CAAC,GAAG,EAAE,CAAC;QACzB,MAAM,GAAG,GAAG,UAAU,CAAC,IAAI,EAAE,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC;QAC1C,MAAM,MAAM,GAAG,UAAU,CAAC,IAAI,EAAE,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC;QAC7C,MAAM,KAAK,GAAG,IAAI,CAAC,CAAC,CAAC,UAAU,CAAC,IAAI,EAAE,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC,UAAU,CAAC,IAAI,EAAE,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC;QAE9E,IAAI,GAAG,GAAG,MAAM,IAAI,MAAM,GAAG,MAAM,IAAI,KAAK,GAAG,MAAM;YAAE,OAAO,CAAC,CAAC,CAAC;QACjE,IAAI,MAAM,GAAG,KAAK,GAAG,GAAG,GAAG,CAAC;YAAE,OAAO,CAAC,CAAC,CAAC;QACxC,IAAI,MAAM,KAAK,CAAC,IAAI,KAAK,KAAK,CAAC;YAAE,OAAO,CAAC,CAAC,CAAC;QAC3C,KAAK,IAAI,GAAG,CAAC;IACf,CAAC;IACD,IAAI,KAAK,IAAI,CAAC;QAAE,OAAO,CAAC,CAAC,CAAC;IAE1B,8BAA8B;IAC9B,IAAI,OAAO,GAAG,MAAM,GAAG,EAAE,GAAG,CAAC,GAAG,CAAC,CAAC;IAElC,+CAA+C;IAC/C,IAAI,CAAC,GAAG,OAAO,GAAG,QAAQ,GAAG,CAAC;QAAE,OAAO,OAAO,GAAG,QAAQ,GAAG,CAAC,GAAG,CAAC,CAAC;IAElE,gCAAgC;IAChC,IAAI,OAAO,GAAG,CAAC,CAAC;IAChB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,QAAQ,EAAE,CAAC,IAAI,CAAC,EAAE,CAAC;QACrC,MAAM,IAAI,GAAG,UAAU,CAAC,IAAI,EAAE,KAAK,GAAG,OAAO,GAAG,CAAC,CAAC,CAAC;QACnD,IAAI,IAAI,EAAE,CAAC;YACT,IAAI,CAAC,IAAI,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,IAAI,IAAI,KAAK;gBAAE,OAAO,CAAC,CAAC,CAAC;QACtD,CAAC;aAAM,CAAC;YACN,IAAI,CAAC,IAAI,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,IAAI,GAAG,KAAK;gBAAE,OAAO,CAAC,CAAC,CAAC;QACrD,CAAC;QACD,IAAI,IAAI,GAAG,OAAO;YAAE,OAAO,GAAG,IAAI,CAAC;IACrC,CAAC;IAED,8CAA8C;IAC9C,OAAO,IAAI,QAAQ,GAAG,OAAO,GAAG,CAAC,CAAC;IAElC,kCAAkC;IAClC,MAAM,OAAO,GAAG,UAAU,CAAC,IAAI,EAAE,KAAK,GAAG,CAAC,CAAC,CAAC;IAC5C,IAAI,OAAO,GAAG,GAAG,IAAI,CAAC,OAAO,GAAG,IAAI,CAAC,KAAK,CAAC;QAAE,OAAO,CAAC,CAAC,CAAC;IAEvD,wDAAwD;IACxD,MAAM,IAAI,GAAG,OAAO,GAAG,OAAO,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC;IACjD,IAAI,CAAC,GAAG,IAAI;QAAE,OAAO,IAAI,GAAG,CAAC,CAAC;IAE9B,uCAAuC;IACvC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,OAAO,EAAE,CAAC,IAAI,CAAC,EAAE,CAAC;QACpC,MAAM,CAAC,GAAG,KAAK,GAAG,OAAO,GAAG,CAAC,CAAC;QAC9B,IAAI,IAAI,CAAC,CAAC,CAAE,GAAG,IAAI;YAAE,OAAO,CAAC,CAAC,CAAC;QAC/B,IAAI,CAAC,IAAI,EAAE,CAAC;YACV,MAAM,GAAG,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,CAAE,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAE,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC;YACpE,IAAI,GAAG,GAAG,MAAM;gBAAE,OAAO,CAAC,CAAC,CAAC;YAC5B,IAAI,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAE,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC;gBAAE,OAAO,CAAC,CAAC,CAAC;QAClE,CAAC;IACH,CAAC;IAED,WAAW,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;IAErB,OAAO,CAAC,CAAC;AACX,CAAC;AAED,gCAAgC;AAChC,MAAM,CAAC,MAAM,KAAK,GAAa;IAC7B,IAAI,EAAE,gBAAgB;IACtB,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,EAAE,EAAE,CAAC,QAAQ,CAAC,IAAI,EAAE,EAAE,EAAE,IAAI,CAAC;IAC5C,MAAM,EAAE,CAAC,IAAI,EAAE,EAAE,EAAE,EAAE,CAAC,UAAU,CAAC,IAAI,EAAE,EAAE,EAAE,IAAI,CAAC;CACjD,CAAC;AAEF,gCAAgC;AAChC,MAAM,CAAC,MAAM,KAAK,GAAa;IAC7B,IAAI,EAAE,gBAAgB;IACtB,IAAI,EAAE,CAAC,IAAI,EAAE,EAAE,EAAE,EAAE,CAAC,QAAQ,CAAC,IAAI,EAAE,EAAE,EAAE,KAAK,CAAC;IAC7C,MAAM,EAAE,CAAC,IAAI,EAAE,EAAE,EAAE,EAAE,CAAC,UAAU,CAAC,IAAI,EAAE,EAAE,EAAE,KAAK,CAAC;CAClD,CAAC"}

package/dist/pw-np3.d.ts

@@ -0,0 +1,4 @@
+import { type PwFormat } from './prowiz.js';
+/** pw_np3: "NoisePacker v3". */
+export declare const pwNp3: PwFormat;
+//# sourceMappingURL=pw-np3.d.ts.map

package/dist/pw-np3.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"pw-np3.d.ts","sourceRoot":"","sources":["../src/pw-np3.ts"],"names":[],"mappings":"AAMA,OAAO,EAAgD,KAAK,QAAQ,EAAE,MAAM,aAAa,CAAC;AAuN1F,gCAAgC;AAChC,eAAO,MAAM,KAAK,EAAE,QAInB,CAAC"}

package/dist/pw-np3.js

@@ -0,0 +1,218 @@
+// SPDX-License-Identifier: BSD-3-Clause
+// Copyright (c) 2026 Bitti09 — modplayjs contributors
+// Ported from: libxmp src/loaders/prowizard/np3.c (NoisePacker v3) —
+// depack_np3 :34-217, test_np3 :220-304.
+import { ptkTable, ptkIsValidNote } from './ptktable.js';
+import { readmem16b, moveData, writeZero, pwReadTitle } from './prowiz.js';
+const PW_MOD_MAGIC = 0x4d2e4b2e; // 'M.K.'
+function put8(out, b) { out.push(b & 0xff); }
+function put16b(out, v) { out.push((v >> 8) & 0xff, v & 0xff); }
+function put32b(out, v) {
+    out.push((v >>> 24) & 0xff, (v >> 16) & 0xff, (v >> 8) & 0xff, v & 0xff);
+}
+/** depack_np3 (np3.c:34-217). */
+function depackNp3(data, start) {
+    let pos = start;
+    const out = [];
+    const u8 = () => data[pos++] ?? 0;
+    const u16 = () => { const v = readmem16b(data, pos); pos += 2; return v; };
+    const c1 = u8();
+    const c2 = u8();
+    const nins = ((c1 << 4) & 0xf0) | ((c2 >> 4) & 0x0f);
+    writeZero(out, 20); // title
+    const len = u16() >> 1; // pattern list size
+    if (len > 128)
+        throw new Error('np3: pattern list too long');
+    u16(); // 2 unknown bytes
+    u16(); // track data size
+    // Sample descriptions (np3.c:64-74): 16-byte records, reordered fields.
+    let ssize = 0;
+    for (let i = 0; i < nins; i++) {
+        const rec = data.subarray(pos, pos + 16);
+        pos += 16;
+        writeZero(out, 22); // sample name
+        const size = readmem16b(rec, 6);
+        ssize += size * 2;
+        put16b(out, size);
+        put8(out, rec[0]); // finetune
+        put8(out, rec[1]); // volume
+        // write loop start (tmp+14) then loop size (tmp+12) — swapped in file
+        out.push(rec[14], rec[15]);
+        out.push(rec[12], rec[13]);
+    }
+    // Fill to 31 (np3.c:77-81)
+    {
+        const pad = new Array(30).fill(0);
+        pad[29] = 0x01;
+        for (let i = nins; i < 31; i++)
+            out.push(...pad);
+    }
+    put8(out, len);
+    put8(out, 0x7f);
+    pos += 2; // always $02?
+    pos += 2; // unknown
+    // Pattern table (np3.c:84-93): u16 / 8
+    const ptable = [];
+    let npat = 0;
+    for (let i = 0; i < len; i++) {
+        const p = Math.trunc(u16() / 8);
+        ptable.push(p);
+        if (p > npat)
+            npat = p;
+    }
+    npat++;
+    for (let i = 0; i < 128; i++)
+        put8(out, ptable[i]);
+    put32b(out, PW_MOD_MAGIC);
+    // Track addresses (np3.c:96-110)
+    const trkAddr = [];
+    for (let i = 0; i < npat; i++) {
+        const row = [];
+        for (let j = 0; j < 4; j++)
+            row.push(u16());
+        trkAddr.push(row);
+    }
+    const trkStart = pos;
+    // Track data (np3.c:113-196): 0x80-or-more = blank-run skip; smp_addr
+    // tracks the furthest read position across all tracks.
+    let smpAddr = 0;
+    for (let i = 0; i < npat; i++) {
+        const tmp = new Uint8Array(1024);
+        for (let j = 0; j < 4; j++) {
+            pos = trkStart + trkAddr[i][3 - j];
+            for (let k = 0; k < 64; k++) {
+                const x = k * 16 + j * 4;
+                const c1 = u8();
+                if (c1 >= 0x80) {
+                    k += (0x100 - c1) - 1;
+                    continue;
+                }
+                const c2 = u8();
+                const c3 = u8();
+                const c4 = Math.trunc((c1 & 0xfe) / 2);
+                if (!ptkIsValidNote(c4))
+                    throw new Error('np3: invalid note');
+                let eff2 = c2;
+                let eff3 = c3;
+                switch (c2 & 0x0f) {
+                    case 0x08:
+                        eff2 &= 0xf0;
+                        break;
+                    case 0x07:
+                        eff2 = (eff2 & 0xf0) + 0x0a;
+                        eff3 = eff3 > 0x80 ? 0x100 - eff3 : (eff3 << 4) & 0xf0;
+                        break;
+                    case 0x06:
+                    case 0x05:
+                        eff3 = eff3 > 0x80 ? 0x100 - eff3 : (eff3 << 4) & 0xf0;
+                        break;
+                    case 0x0e:
+                        eff3 = 1;
+                        break;
+                    case 0x0b:
+                        eff3 = Math.trunc((eff3 + 4) / 2);
+                        break;
+                }
+                tmp[x] = ((c1 << 4) & 0x10) | ptkTable[c4][0];
+                tmp[x + 1] = ptkTable[c4][1];
+                tmp[x + 2] = eff2;
+                tmp[x + 3] = eff3;
+                if ((c2 & 0x0f) === 0x0d)
+                    break; // pattern break ends the track
+            }
+            if (pos > smpAddr)
+                smpAddr = pos;
+        }
+        for (let k = 0; k < 1024; k++)
+            out.push(tmp[k]);
+    }
+    // Sample data (np3.c:200-206): smp_addr aligned to even.
+    if ((smpAddr & 1) !== 0)
+        smpAddr++;
+    moveData(data, smpAddr, out, ssize);
+    return Uint8Array.from(out);
+}
+/** test_np3 (np3.c:220-304). */
+function testNp3(data, start) {
+    const s = data.length - start;
+    if (s < 10)
+        return 10 - s;
+    const ptabSize = readmem16b(data, start + 2);
+    if (ptabSize === 0 || (ptabSize & 0x01) !== 0 || ptabSize > 0xff)
+        return -1;
+    if ((data[start + 1] & 0x0f) !== 0x0c)
+        return -1;
+    const numIns = ((data[start] << 4) & 0xf0) | ((data[start + 1] >> 4) & 0x0f);
+    if (numIns === 0 || numIns > 0x1f)
+        return -1;
+    if (s < 15 + numIns * 16)
+        return 15 + numIns * 16 - s;
+    // Volumes (np3.c:241-245) — note offset 9, not 15.
+    for (let i = 0; i < numIns; i++) {
+        if (data[start + 9 + i * 16] > 0x40)
+            return -1;
+    }
+    // Sample sizes (np3.c:248-268): len at d+14 (not d+12).
+    let ssize = 0;
+    for (let i = 0; i < numIns; i++) {
+        const d = start + i * 16;
+        const len = readmem16b(data, d + 14) << 1;
+        const lstart = readmem16b(data, d + 20) << 1;
+        const lsize = readmem16b(data, d + 22) << 1;
+        if (len > 0xffff || lstart > 0xffff || lsize > 0xffff)
+            return -1;
+        if (lstart + lsize > len + 2)
+            return -1;
+        if (lstart === 0 && lsize !== 0)
+            return -1;
+        ssize += len;
+    }
+    if (ssize <= 4)
+        return -1;
+    let hdrSize = numIns * 16 + 8 + 4;
+    if (s < hdrSize + ptabSize + 2)
+        return hdrSize + ptabSize + 2 - s;
+    // Pattern table (np3.c:275-284)
+    let maxPptr = 0;
+    for (let i = 0; i < ptabSize; i += 2) {
+        const pptr = readmem16b(data, start + hdrSize + i);
+        if ((pptr & 0x07) !== 0 || pptr >= 0x400)
+            return -1;
+        if (pptr > maxPptr)
+            maxPptr = pptr;
+    }
+    hdrSize += ptabSize + maxPptr + 8;
+    // Track data size (np3.c:291-294): > 63, no alignment check.
+    const trkSize = readmem16b(data, start + 6);
+    if (trkSize <= 63)
+        return -1;
+    if (s < hdrSize + trkSize + 2)
+        return hdrSize + trkSize + 2 - s;
+    // Notes (np3.c:297-322): errcount tolerance of 1 (Shadow Fighter quirk).
+    let errcount = 0;
+    for (let i = 0; i < trkSize; i++) {
+        const d = start + hdrSize + i;
+        if ((data[d] & 0x80) !== 0)
+            continue;
+        if (data[d] > 0x49 || (data[d + 1] & 0x0f) === 0x0a)
+            errcount++;
+        if ((data[d + 1] & 0x0f) === 0x0d && data[d + 2] > 0x40)
+            errcount++;
+        if ((((data[d] << 4) & 0x10) | ((data[d + 1] >> 4) & 0x0f)) > numIns)
+            errcount++;
+        if (data[d] === 0 && data[d + 1] === 0 && data[d + 2] === 0 && i < trkSize - 3)
+            errcount++;
+        if (errcount > 1)
+            return -1;
+        i += 2;
+    }
+    pwReadTitle(null, 0);
+    return 0;
+}
+/** pw_np3: "NoisePacker v3". */
+export const pwNp3 = {
+    name: 'NoisePacker v3',
+    test: testNp3,
+    depack: depackNp3,
+};
+//# sourceMappingURL=pw-np3.js.map