@modplayjs/fmt-prowizard 0.0.0-stage → 0.2.1

package/dist/pw-np3.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"pw-np3.js","sourceRoot":"","sources":["../src/pw-np3.ts"],"names":[],"mappings":"AAAA,wCAAwC;AACxC,sDAAsD;AACtD,qEAAqE;AACrE,yCAAyC;AAEzC,OAAO,EAAE,QAAQ,EAAE,cAAc,EAAE,MAAM,eAAe,CAAC;AACzD,OAAO,EAAE,UAAU,EAAE,QAAQ,EAAE,SAAS,EAAE,WAAW,EAAiB,MAAM,aAAa,CAAC;AAE1F,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,iCAAiC;AACjC,SAAS,SAAS,CAAC,IAAgB,EAAE,KAAa;IAChD,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;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,oBAAoB;IAC5C,IAAI,GAAG,GAAG,GAAG;QAAE,MAAM,IAAI,KAAK,CAAC,4BAA4B,CAAC,CAAC;IAC7D,GAAG,EAAE,CAAC,CAAC,kBAAkB;IACzB,GAAG,EAAE,CAAC,CAAC,kBAAkB;IAEzB,wEAAwE;IACxE,IAAI,KAAK,GAAG,CAAC,CAAC;IACd,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC;QAC9B,MAAM,GAAG,GAAG,IAAI,CAAC,QAAQ,CAAC,GAAG,EAAE,GAAG,GAAG,EAAE,CAAC,CAAC;QACzC,GAAG,IAAI,EAAE,CAAC;QACV,SAAS,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC,CAAC,cAAc;QAClC,MAAM,IAAI,GAAG,UAAU,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC;QAChC,KAAK,IAAI,IAAI,GAAG,CAAC,CAAC;QAClB,MAAM,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC;QAClB,IAAI,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC,CAAE,CAAC,CAAC,CAAC,WAAW;QAC/B,IAAI,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC,CAAE,CAAC,CAAC,CAAC,SAAS;QAC7B,sEAAsE;QACtE,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,EAAE,CAAE,EAAE,GAAG,CAAC,EAAE,CAAE,CAAC,CAAC;QAC7B,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,EAAE,CAAE,EAAE,GAAG,CAAC,EAAE,CAAE,CAAC,CAAC;IAC/B,CAAC;IAED,2BAA2B;IAC3B,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;IAChB,GAAG,IAAI,CAAC,CAAC,CAAC,cAAc;IACxB,GAAG,IAAI,CAAC,CAAC,CAAC,UAAU;IAEpB,uCAAuC;IACvC,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,IAAI,CAAC,KAAK,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC,CAAC;QAChC,MAAM,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC;QACf,IAAI,CAAC,GAAG,IAAI;YAAE,IAAI,GAAG,CAAC,CAAC;IACzB,CAAC;IACD,IAAI,EAAE,CAAC;IAEP,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,iCAAiC;IACjC,MAAM,OAAO,GAAe,EAAE,CAAC;IAC/B,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;YAAE,GAAG,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,CAAC;QAC5C,OAAO,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IACpB,CAAC;IACD,MAAM,QAAQ,GAAG,GAAG,CAAC;IAErB,sEAAsE;IACtE,uDAAuD;IACvD,IAAI,OAAO,GAAG,CAAC,CAAC;IAChB,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;gBAEzB,MAAM,EAAE,GAAG,EAAE,EAAE,CAAC;gBAChB,IAAI,EAAE,IAAI,IAAI,EAAE,CAAC;oBACf,CAAC,IAAI,CAAC,KAAK,GAAG,EAAE,CAAC,GAAG,CAAC,CAAC;oBACtB,SAAS;gBACX,CAAC;gBACD,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,mBAAmB,CAAC,CAAC;gBAE9D,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,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,CAAC,CAAC;wBACT,MAAM;oBACR,KAAK,IAAI;wBACP,IAAI,GAAG,IAAI,CAAC,KAAK,CAAC,CAAC,IAAI,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC;wBAClC,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,CAAC;gBAClB,GAAG,CAAC,CAAC,GAAG,CAAC,CAAC,GAAG,IAAI,CAAC;gBAElB,IAAI,CAAC,EAAE,GAAG,IAAI,CAAC,KAAK,IAAI;oBAAE,MAAM,CAAC,+BAA+B;YAClE,CAAC;YACD,IAAI,GAAG,GAAG,OAAO;gBAAE,OAAO,GAAG,GAAG,CAAC;QACnC,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,yDAAyD;IACzD,IAAI,CAAC,OAAO,GAAG,CAAC,CAAC,KAAK,CAAC;QAAE,OAAO,EAAE,CAAC;IACnC,QAAQ,CAAC,IAAI,EAAE,OAAO,EAAE,GAAG,EAAE,KAAK,CAAC,CAAC;IAEpC,OAAO,UAAU,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;AAC9B,CAAC;AAED,gCAAgC;AAChC,SAAS,OAAO,CAAC,IAAgB,EAAE,KAAa;IAC9C,MAAM,CAAC,GAAG,IAAI,CAAC,MAAM,GAAG,KAAK,CAAC;IAE9B,IAAI,CAAC,GAAG,EAAE;QAAE,OAAO,EAAE,GAAG,CAAC,CAAC;IAE1B,MAAM,QAAQ,GAAG,UAAU,CAAC,IAAI,EAAE,KAAK,GAAG,CAAC,CAAC,CAAC;IAC7C,IAAI,QAAQ,KAAK,CAAC,IAAI,CAAC,QAAQ,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,QAAQ,GAAG,IAAI;QAAE,OAAO,CAAC,CAAC,CAAC;IAE5E,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,IAAI,CAAC,GAAG,EAAE,GAAG,MAAM,GAAG,EAAE;QAAE,OAAO,EAAE,GAAG,MAAM,GAAG,EAAE,GAAG,CAAC,CAAC;IAEtD,mDAAmD;IACnD,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,MAAM,EAAE,CAAC,EAAE,EAAE,CAAC;QAChC,IAAI,IAAI,CAAC,KAAK,GAAG,CAAC,GAAG,CAAC,GAAG,EAAE,CAAE,GAAG,IAAI;YAAE,OAAO,CAAC,CAAC,CAAC;IAClD,CAAC;IAED,wDAAwD;IACxD,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,UAAU,CAAC,IAAI,EAAE,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,CAAC;QAE5C,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,IAAI,OAAO,GAAG,MAAM,GAAG,EAAE,GAAG,CAAC,GAAG,CAAC,CAAC;IAElC,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,CAAC,IAAI,GAAG,IAAI,CAAC,KAAK,CAAC,IAAI,IAAI,IAAI,KAAK;YAAE,OAAO,CAAC,CAAC,CAAC;QACpD,IAAI,IAAI,GAAG,OAAO;YAAE,OAAO,GAAG,IAAI,CAAC;IACrC,CAAC;IAED,OAAO,IAAI,QAAQ,GAAG,OAAO,GAAG,CAAC,CAAC;IAElC,6DAA6D;IAC7D,MAAM,OAAO,GAAG,UAAU,CAAC,IAAI,EAAE,KAAK,GAAG,CAAC,CAAC,CAAC;IAC5C,IAAI,OAAO,IAAI,EAAE;QAAE,OAAO,CAAC,CAAC,CAAC;IAE7B,IAAI,CAAC,GAAG,OAAO,GAAG,OAAO,GAAG,CAAC;QAAE,OAAO,OAAO,GAAG,OAAO,GAAG,CAAC,GAAG,CAAC,CAAC;IAEhE,yEAAyE;IACzE,IAAI,QAAQ,GAAG,CAAC,CAAC;IACjB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,OAAO,EAAE,CAAC,EAAE,EAAE,CAAC;QACjC,MAAM,CAAC,GAAG,KAAK,GAAG,OAAO,GAAG,CAAC,CAAC;QAC9B,IAAI,CAAC,IAAI,CAAC,CAAC,CAAE,GAAG,IAAI,CAAC,KAAK,CAAC;YAAE,SAAS;QAEtC,IAAI,IAAI,CAAC,CAAC,CAAE,GAAG,IAAI,IAAI,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAE,GAAG,IAAI,CAAC,KAAK,IAAI;YAAE,QAAQ,EAAE,CAAC;QAClE,IAAI,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAE,GAAG,IAAI,CAAC,KAAK,IAAI,IAAI,IAAI,CAAC,CAAC,GAAG,CAAC,CAAE,GAAG,IAAI;YAAE,QAAQ,EAAE,CAAC;QACtE,IAAI,CAAC,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,GAAG,MAAM;YAAE,QAAQ,EAAE,CAAC;QACnF,IAAI,IAAI,CAAC,CAAC,CAAC,KAAK,CAAC,IAAI,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,IAAI,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,GAAG,OAAO,GAAG,CAAC;YAAE,QAAQ,EAAE,CAAC;QAE3F,IAAI,QAAQ,GAAG,CAAC;YAAE,OAAO,CAAC,CAAC,CAAC;QAC5B,CAAC,IAAI,CAAC,CAAC;IACT,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,OAAO;IACb,MAAM,EAAE,SAAS;CAClB,CAAC"}

package/dist/pw-p40.d.ts

@@ -0,0 +1,4 @@
+import { type PwFormat } from './prowiz.js';
+/** pw_p4x (p40.c:313-317): "The Player 4.x". */
+export declare const pwP4x: PwFormat;
+//# sourceMappingURL=pw-p40.d.ts.map

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

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

package/dist/pw-p40.js

@@ -0,0 +1,221 @@
+// SPDX-License-Identifier: BSD-3-Clause
+// Copyright (c) 2026 Bitti09 — modplayjs contributors
+// Ported from: libxmp src/loaders/prowizard/p40.c (The Player 4.0a/4.0b/
+// 4.1a depacker) — depack_p4x :69-262, set_event :34-54, test_p4x :264-285.
+import { ptkTable, ptkIsValidNote } from './ptktable.js';
+import { readmem16b, readmem32b, moveData, writeZero, pwReadTitle } from './prowiz.js';
+const MAGIC_P40A = 0x50343041; // 'P40A'
+const MAGIC_P40B = 0x50343042; // 'P40B'
+const MAGIC_P41A = 0x50343141; // 'P41A'
+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);
+}
+/**
+ * set_event (p40.c:34-54): translate a 3-byte Player-4.x cell into a
+ * 4-byte Protracker cell. Junk after Dxx is dummied out. Returns void —
+ * the caller reads effect nibbles from the raw bytes.
+ */
+function setEvent(out, c1, c2, c3) {
+    let mynote = c1 & 0x7f;
+    if (!ptkIsValidNote(Math.trunc(mynote / 2))) {
+        mynote = c1 = c2 = c3 = 0;
+    }
+    out.push(((c1 << 4) & 0x10) | ptkTable[Math.trunc(mynote / 2)][0]);
+    out.push(ptkTable[Math.trunc(mynote / 2)][1]);
+    const b = c2 & 0x0f;
+    if (b === 0x08)
+        c2 -= 0x08;
+    out.push(c2 & 0xff);
+    if (b === 0x05 || b === 0x06 || b === 0x0a) {
+        c3 = c3 > 0x7f ? (c3 << 4) & 0xf0 : c3;
+    }
+    out.push(c3 & 0xff);
+}
+/** track(p,c,r) = tdata[(p * 4 + c) * 256 + r * 4] (p40.c:56). */
+function trackOff(p, c, r) {
+    return (p * 4 + c) * 256 + r * 4;
+}
+/**
+ * depack_p4x (p40.c:69-262).
+ */
+function depackP4x(data, start) {
+    const inSize = data.length - start;
+    let pos = start;
+    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 seek = (n) => { pos = start + n; };
+    const id = u32();
+    u8(); // real number of patterns
+    const len = u8(); // number of patterns in list
+    if (len >= 128)
+        throw new Error('p4x: pattern list too long');
+    const nsmp = u8(); // number of samples
+    if (nsmp > 31)
+        throw new Error('p4x: too many samples');
+    u8(); // bypass empty byte
+    const trkdatOfs = u32() + 4; // track data address
+    const trktabOfs = u32() + 4; // track table address
+    const smpOfs = u32() + 4; // sample data address
+    // Addresses count from after the magic string (p40.c:105-115)
+    if (trkdatOfs < 4 || trktabOfs < 4 || smpOfs < 4 ||
+        trkdatOfs >= inSize || trktabOfs >= inSize || smpOfs >= inSize) {
+        throw new Error('p4x: bad addresses');
+    }
+    const out = [];
+    writeZero(out, 20); // title
+    // Sample headers (p40.c:122-160)
+    const sampleAddress = [];
+    const sampleSize = [];
+    for (let i = 0; i < nsmp; i++) {
+        const addr = u32();
+        sampleAddress.push(addr);
+        const size = u16();
+        sampleSize.push(size * 2);
+        const loopAddr = u32();
+        const loopSize = u16();
+        let fine = 0;
+        if (id === MAGIC_P40A || id === MAGIC_P40B)
+            fine = u16();
+        u8(); // bypass 00h
+        const vol = u8();
+        if (id === MAGIC_P41A)
+            fine = u16();
+        // Sanity (p40.c:144-149)
+        if (addr < 0 || loopAddr < 0 || loopAddr < addr || addr > inSize - smpOfs) {
+            throw new Error('p4x: bad sample addresses');
+        }
+        writeZero(out, 22); // sample name
+        put16b(out, size);
+        put8(out, Math.trunc(fine / 74));
+        put8(out, vol);
+        put16b(out, Math.trunc((loopAddr - addr) / 2));
+        put16b(out, loopSize);
+    }
+    // Pad to 31 samples (p40.c:163-166): zeros with a 0x01 loop-size flag.
+    {
+        const pad = new Array(30).fill(0);
+        pad[29] = 0x01;
+        for (let i = nsmp; i < 31; i++)
+            out.push(...pad);
+    }
+    put8(out, len); // size of pattern list
+    put8(out, 0x7f); // noisetracker byte
+    seek(trktabOfs);
+    // Pattern list (p40.c:171-176)
+    for (let c1 = 0; c1 < len; c1++)
+        put8(out, c1);
+    for (let c1 = len; c1 < 128; c1++)
+        put8(out, 0);
+    put32b(out, PW_MOD_MAGIC);
+    // Track addresses per pattern (p40.c:178-182)
+    const trackAddr = [];
+    for (let i = 0; i < len; i++) {
+        const row = [];
+        for (let j = 0; j < 4; j++)
+            row.push(u16() + trkdatOfs);
+        trackAddr.push(row);
+    }
+    // Track data expansion (p40.c:184-262): tdata holds 512 tracks × 256.
+    const tdata = new Uint8Array(512 * 256);
+    const read4 = () => {
+        const v = [data[pos] ?? 0, data[pos + 1] ?? 0, data[pos + 2] ?? 0, data[pos + 3] ?? 0];
+        pos += 4;
+        return v;
+    };
+    const trySet = (p, j, k, c1, c2, c3) => {
+        const tmp = [];
+        setEvent(tmp, c1, c2, c3);
+        const base = trackOff(p, j, k);
+        for (let b = 0; b < 4; b++)
+            tdata[base + b] = tmp[b] ?? 0;
+    };
+    for (let i = 0; i < len; i++) {
+        for (let j = 0; j < 4; j++) {
+            pos = trackAddr[i][j]; // hio_seek once per (pattern, channel) — p40.c:189
+            for (let k = 0; k < 64; k++) {
+                let [c1, c2, c3, c4] = read4();
+                if (c1 !== 0x80) {
+                    if (pos > data.length)
+                        throw new Error('p4x: track read error');
+                    trySet(i, j, k, c1, c2, c3);
+                    if (c4 > 0x00 && c4 < 0x80)
+                        k += c4;
+                    if (c4 > 0x7f) {
+                        k++;
+                        for (let l = 256; l > c4; l--) {
+                            if (k >= 64)
+                                break;
+                            trySet(i, j, k, c1, c2, c3);
+                            k++;
+                        }
+                        k--;
+                    }
+                    continue;
+                }
+                // Case 0x80: repeat block (p40.c:210-246)
+                const a = pos; // position after the 0x80 marker
+                const c5 = c2;
+                const b = (c3 << 8) + c4 + trkdatOfs;
+                pos = start + b;
+                for (let c = 0; c <= c5; c++) {
+                    if (k >= 64)
+                        break;
+                    [c1, c2, c3, c4] = read4();
+                    trySet(i, j, k, c1, c2, c3);
+                    if (c4 > 0x00 && c4 < 0x80)
+                        k += c4;
+                    if (c4 > 0x7f) {
+                        k++;
+                        for (let l = 256; l > c4; l--) {
+                            if (k >= 64)
+                                break;
+                            trySet(i, j, k, c1, c2, c3);
+                            k++;
+                        }
+                        k--;
+                    }
+                    k++;
+                }
+                k--;
+                pos = a;
+            }
+        }
+    }
+    // Write pattern data (p40.c:264-277)
+    for (let i = 0; i < len; i++) {
+        for (let j = 0; j < 64; j++) {
+            for (let k = 0; k < 4; k++) {
+                const base = trackOff(i, k, j);
+                for (let b = 0; b < 4; b++)
+                    out.push(tdata[base + b]);
+            }
+        }
+    }
+    // Sample data (p40.c:280-284); Lost Vikings p4x.ingame2 has a sample at EOF.
+    for (let i = 0; i < nsmp; i++) {
+        moveData(data, start + sampleAddress[i] + smpOfs, out, sampleSize[i]);
+    }
+    return Uint8Array.from(out);
+}
+/** test_p4x (p40.c:287-311) — magic-only probe. */
+function testP4x(data, start) {
+    const s = data.length - start;
+    if (s < 8)
+        return 8 - s;
+    const id = readmem32b(data, start);
+    if (id !== MAGIC_P40A && id !== MAGIC_P40B && id !== MAGIC_P41A)
+        return -1;
+    pwReadTitle(null, 0);
+    return 0;
+}
+/** pw_p4x (p40.c:313-317): "The Player 4.x". */
+export const pwP4x = {
+    name: 'The Player 4.x',
+    test: testP4x,
+    depack: depackP4x,
+};
+//# sourceMappingURL=pw-p40.js.map

package/dist/pw-p40.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"pw-p40.js","sourceRoot":"","sources":["../src/pw-p40.ts"],"names":[],"mappings":"AAAA,wCAAwC;AACxC,sDAAsD;AACtD,yEAAyE;AACzE,4EAA4E;AAE5E,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,UAAU,GAAG,UAAU,CAAC,CAAC,SAAS;AACxC,MAAM,UAAU,GAAG,UAAU,CAAC,CAAC,SAAS;AACxC,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;;;;GAIG;AACH,SAAS,QAAQ,CAAC,GAAa,EAAE,EAAU,EAAE,EAAU,EAAE,EAAU;IACjE,IAAI,MAAM,GAAG,EAAE,GAAG,IAAI,CAAC;IAEvB,IAAI,CAAC,cAAc,CAAC,IAAI,CAAC,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC;QAC5C,MAAM,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAAC;IAC5B,CAAC;IAED,GAAG,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,GAAG,QAAQ,CAAC,IAAI,CAAC,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC,CAAE,CAAC,CAAC,CAAC,CAAC,CAAC;IACpE,GAAG,CAAC,IAAI,CAAC,QAAQ,CAAC,IAAI,CAAC,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC,CAAE,CAAC,CAAC,CAAC,CAAC,CAAC;IAE/C,MAAM,CAAC,GAAG,EAAE,GAAG,IAAI,CAAC;IACpB,IAAI,CAAC,KAAK,IAAI;QAAE,EAAE,IAAI,IAAI,CAAC;IAC3B,GAAG,CAAC,IAAI,CAAC,EAAE,GAAG,IAAI,CAAC,CAAC;IAEpB,IAAI,CAAC,KAAK,IAAI,IAAI,CAAC,KAAK,IAAI,IAAI,CAAC,KAAK,IAAI,EAAE,CAAC;QAC3C,EAAE,GAAG,EAAE,GAAG,IAAI,CAAC,CAAC,CAAC,CAAC,EAAE,IAAI,CAAC,CAAC,GAAG,IAAI,CAAC,CAAC,CAAC,EAAE,CAAC;IACzC,CAAC;IACD,GAAG,CAAC,IAAI,CAAC,EAAE,GAAG,IAAI,CAAC,CAAC;AACtB,CAAC;AAED,kEAAkE;AAClE,SAAS,QAAQ,CAAC,CAAS,EAAE,CAAS,EAAE,CAAS;IAC/C,OAAO,CAAC,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC,GAAG,GAAG,GAAG,CAAC,GAAG,CAAC,CAAC;AACnC,CAAC;AAED;;GAEG;AACH,SAAS,SAAS,CAAC,IAAgB,EAAE,KAAa;IAChD,MAAM,MAAM,GAAG,IAAI,CAAC,MAAM,GAAG,KAAK,CAAC;IACnC,IAAI,GAAG,GAAG,KAAK,CAAC;IAEhB,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;IAC3E,MAAM,IAAI,GAAG,CAAC,CAAS,EAAE,EAAE,GAAG,GAAG,GAAG,KAAK,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC;IAEjD,MAAM,EAAE,GAAG,GAAG,EAAE,CAAC;IACjB,EAAE,EAAE,CAAC,CAAC,0BAA0B;IAChC,MAAM,GAAG,GAAG,EAAE,EAAE,CAAC,CAAC,6BAA6B;IAC/C,IAAI,GAAG,IAAI,GAAG;QAAE,MAAM,IAAI,KAAK,CAAC,4BAA4B,CAAC,CAAC;IAE9D,MAAM,IAAI,GAAG,EAAE,EAAE,CAAC,CAAC,oBAAoB;IACvC,IAAI,IAAI,GAAG,EAAE;QAAE,MAAM,IAAI,KAAK,CAAC,uBAAuB,CAAC,CAAC;IAExD,EAAE,EAAE,CAAC,CAAC,oBAAoB;IAC1B,MAAM,SAAS,GAAG,GAAG,EAAE,GAAG,CAAC,CAAC,CAAC,qBAAqB;IAClD,MAAM,SAAS,GAAG,GAAG,EAAE,GAAG,CAAC,CAAC,CAAC,sBAAsB;IACnD,MAAM,MAAM,GAAG,GAAG,EAAE,GAAG,CAAC,CAAC,CAAI,sBAAsB;IAEnD,8DAA8D;IAC9D,IAAI,SAAS,GAAG,CAAC,IAAI,SAAS,GAAG,CAAC,IAAI,MAAM,GAAG,CAAC;QAC5C,SAAS,IAAI,MAAM,IAAI,SAAS,IAAI,MAAM,IAAI,MAAM,IAAI,MAAM,EAAE,CAAC;QACnE,MAAM,IAAI,KAAK,CAAC,oBAAoB,CAAC,CAAC;IACxC,CAAC;IAED,MAAM,GAAG,GAAa,EAAE,CAAC;IACzB,SAAS,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC,CAAC,QAAQ;IAE5B,iCAAiC;IACjC,MAAM,aAAa,GAAa,EAAE,CAAC;IACnC,MAAM,UAAU,GAAa,EAAE,CAAC;IAChC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC;QAC9B,MAAM,IAAI,GAAG,GAAG,EAAE,CAAC;QACnB,aAAa,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACzB,MAAM,IAAI,GAAG,GAAG,EAAE,CAAC;QACnB,UAAU,CAAC,IAAI,CAAC,IAAI,GAAG,CAAC,CAAC,CAAC;QAC1B,MAAM,QAAQ,GAAG,GAAG,EAAE,CAAC;QACvB,MAAM,QAAQ,GAAG,GAAG,EAAE,CAAC;QACvB,IAAI,IAAI,GAAG,CAAC,CAAC;QACb,IAAI,EAAE,KAAK,UAAU,IAAI,EAAE,KAAK,UAAU;YAAE,IAAI,GAAG,GAAG,EAAE,CAAC;QACzD,EAAE,EAAE,CAAC,CAAC,aAAa;QACnB,MAAM,GAAG,GAAG,EAAE,EAAE,CAAC;QACjB,IAAI,EAAE,KAAK,UAAU;YAAE,IAAI,GAAG,GAAG,EAAE,CAAC;QAEpC,yBAAyB;QACzB,IAAI,IAAI,GAAG,CAAC,IAAI,QAAQ,GAAG,CAAC,IAAI,QAAQ,GAAG,IAAI,IAAI,IAAI,GAAG,MAAM,GAAG,MAAM,EAAE,CAAC;YAC1E,MAAM,IAAI,KAAK,CAAC,2BAA2B,CAAC,CAAC;QAC/C,CAAC;QAED,SAAS,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC,CAAC,cAAc;QAClC,MAAM,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC;QAClB,IAAI,CAAC,GAAG,EAAE,IAAI,CAAC,KAAK,CAAC,IAAI,GAAG,EAAE,CAAC,CAAC,CAAC;QACjC,IAAI,CAAC,GAAG,EAAE,GAAG,CAAC,CAAC;QACf,MAAM,CAAC,GAAG,EAAE,IAAI,CAAC,KAAK,CAAC,CAAC,QAAQ,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC;QAC/C,MAAM,CAAC,GAAG,EAAE,QAAQ,CAAC,CAAC;IACxB,CAAC;IAED,uEAAuE;IACvE,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,CAAI,uBAAuB;IAC1C,IAAI,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC,CAAG,oBAAoB;IAEvC,IAAI,CAAC,SAAS,CAAC,CAAC;IAEhB,+BAA+B;IAC/B,KAAK,IAAI,EAAE,GAAG,CAAC,EAAE,EAAE,GAAG,GAAG,EAAE,EAAE,EAAE;QAAE,IAAI,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC;IAC/C,KAAK,IAAI,EAAE,GAAG,GAAG,EAAE,EAAE,GAAG,GAAG,EAAE,EAAE,EAAE;QAAE,IAAI,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC;IAEhD,MAAM,CAAC,GAAG,EAAE,YAAY,CAAC,CAAC;IAE1B,8CAA8C;IAC9C,MAAM,SAAS,GAAe,EAAE,CAAC;IACjC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE,EAAE,CAAC;QAC7B,MAAM,GAAG,GAAa,EAAE,CAAC;QACzB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE;YAAE,GAAG,CAAC,IAAI,CAAC,GAAG,EAAE,GAAG,SAAS,CAAC,CAAC;QACxD,SAAS,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;IACtB,CAAC;IAED,sEAAsE;IACtE,MAAM,KAAK,GAAG,IAAI,UAAU,CAAC,GAAG,GAAG,GAAG,CAAC,CAAC;IAExC,MAAM,KAAK,GAAG,GAAqC,EAAE;QACnD,MAAM,CAAC,GAAG,CAAC,IAAI,CAAC,GAAG,CAAC,IAAI,CAAC,EAAE,IAAI,CAAC,GAAG,GAAG,CAAC,CAAC,IAAI,CAAC,EAAE,IAAI,CAAC,GAAG,GAAG,CAAC,CAAC,IAAI,CAAC,EAAE,IAAI,CAAC,GAAG,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC;QACvF,GAAG,IAAI,CAAC,CAAC;QACT,OAAO,CAAqC,CAAC;IAC/C,CAAC,CAAC;IAEF,MAAM,MAAM,GAAG,CAAC,CAAS,EAAE,CAAS,EAAE,CAAS,EAAE,EAAU,EAAE,EAAU,EAAE,EAAU,EAAQ,EAAE;QAC3F,MAAM,GAAG,GAAa,EAAE,CAAC;QACzB,QAAQ,CAAC,GAAG,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;QAC1B,MAAM,IAAI,GAAG,QAAQ,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;QAC/B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE;YAAE,KAAK,CAAC,IAAI,GAAG,CAAC,CAAC,GAAG,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC;IAC5D,CAAC,CAAC;IAEF,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE,EAAE,CAAC;QAC7B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC;YAC3B,GAAG,GAAG,SAAS,CAAC,CAAC,CAAE,CAAC,CAAC,CAAE,CAAC,CAAC,mDAAmD;YAC5E,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;gBAC5B,IAAI,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,GAAG,KAAK,EAAE,CAAC;gBAE/B,IAAI,EAAE,KAAK,IAAI,EAAE,CAAC;oBAChB,IAAI,GAAG,GAAG,IAAI,CAAC,MAAM;wBAAE,MAAM,IAAI,KAAK,CAAC,uBAAuB,CAAC,CAAC;oBAChE,MAAM,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;oBAE5B,IAAI,EAAE,GAAG,IAAI,IAAI,EAAE,GAAG,IAAI;wBAAE,CAAC,IAAI,EAAE,CAAC;oBACpC,IAAI,EAAE,GAAG,IAAI,EAAE,CAAC;wBACd,CAAC,EAAE,CAAC;wBACJ,KAAK,IAAI,CAAC,GAAG,GAAG,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;4BAC9B,IAAI,CAAC,IAAI,EAAE;gCAAE,MAAM;4BACnB,MAAM,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;4BAC5B,CAAC,EAAE,CAAC;wBACN,CAAC;wBACD,CAAC,EAAE,CAAC;oBACN,CAAC;oBACD,SAAS;gBACX,CAAC;gBAED,0CAA0C;gBAC1C,MAAM,CAAC,GAAG,GAAG,CAAC,CAAC,iCAAiC;gBAChD,MAAM,EAAE,GAAG,EAAE,CAAC;gBACd,MAAM,CAAC,GAAG,CAAC,EAAE,IAAI,CAAC,CAAC,GAAG,EAAE,GAAG,SAAS,CAAC;gBAErC,GAAG,GAAG,KAAK,GAAG,CAAC,CAAC;gBAEhB,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,IAAI,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;oBAC7B,IAAI,CAAC,IAAI,EAAE;wBAAE,MAAM;oBAEnB,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,GAAG,KAAK,EAAE,CAAC;oBAC3B,MAAM,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;oBAE5B,IAAI,EAAE,GAAG,IAAI,IAAI,EAAE,GAAG,IAAI;wBAAE,CAAC,IAAI,EAAE,CAAC;oBACpC,IAAI,EAAE,GAAG,IAAI,EAAE,CAAC;wBACd,CAAC,EAAE,CAAC;wBACJ,KAAK,IAAI,CAAC,GAAG,GAAG,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;4BAC9B,IAAI,CAAC,IAAI,EAAE;gCAAE,MAAM;4BACnB,MAAM,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,CAAC;4BAC5B,CAAC,EAAE,CAAC;wBACN,CAAC;wBACD,CAAC,EAAE,CAAC;oBACN,CAAC;oBACD,CAAC,EAAE,CAAC;gBACN,CAAC;gBACD,CAAC,EAAE,CAAC;gBACJ,GAAG,GAAG,CAAC,CAAC;YACV,CAAC;QACH,CAAC;IACH,CAAC;IAED,qCAAqC;IACrC,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,GAAG,EAAE,CAAC,EAAE,EAAE,CAAC;QAC7B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,EAAE,EAAE,CAAC,EAAE,EAAE,CAAC;YAC5B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC;gBAC3B,MAAM,IAAI,GAAG,QAAQ,CAAC,CAAC,EAAE,CAAC,EAAE,CAAC,CAAC,CAAC;gBAC/B,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE;oBAAE,GAAG,CAAC,IAAI,CAAC,KAAK,CAAC,IAAI,GAAG,CAAC,CAAE,CAAC,CAAC;YACzD,CAAC;QACH,CAAC;IACH,CAAC;IAED,6EAA6E;IAC7E,KAAK,IAAI,CAAC,GAAG,CAAC,EAAE,CAAC,GAAG,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC;QAC9B,QAAQ,CAAC,IAAI,EAAE,KAAK,GAAG,aAAa,CAAC,CAAC,CAAE,GAAG,MAAM,EAAE,GAAG,EAAE,UAAU,CAAC,CAAC,CAAE,CAAC,CAAC;IAC1E,CAAC;IAED,OAAO,UAAU,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC;AAC9B,CAAC;AAED,mDAAmD;AACnD,SAAS,OAAO,CAAC,IAAgB,EAAE,KAAa;IAC9C,MAAM,CAAC,GAAG,IAAI,CAAC,MAAM,GAAG,KAAK,CAAC;IAC9B,IAAI,CAAC,GAAG,CAAC;QAAE,OAAO,CAAC,GAAG,CAAC,CAAC;IAExB,MAAM,EAAE,GAAG,UAAU,CAAC,IAAI,EAAE,KAAK,CAAC,CAAC;IACnC,IAAI,EAAE,KAAK,UAAU,IAAI,EAAE,KAAK,UAAU,IAAI,EAAE,KAAK,UAAU;QAAE,OAAO,CAAC,CAAC,CAAC;IAE3E,WAAW,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC;IACrB,OAAO,CAAC,CAAC;AACX,CAAC;AAED,gDAAgD;AAChD,MAAM,CAAC,MAAM,KAAK,GAAa;IAC7B,IAAI,EAAE,gBAAgB;IACtB,IAAI,EAAE,OAAO;IACb,MAAM,EAAE,SAAS;CAClB,CAAC"}

package/dist/pw-plugin.d.ts

@@ -0,0 +1,8 @@
+import type { FormatPlugin, LoadCtx, ModuleData } from '@modplayjs/core';
+/** pw_test (pw_load.c:44-56): pw_check-based probe. */
+export declare function pwTest(bytes: Uint8Array): boolean;
+/** pw_load (pw_load.c:58-190): depack then parse the M.K. result. */
+export declare function pwLoad(bytes: Uint8Array, ctx: LoadCtx): ModuleData;
+/** ProWizard format plugin (libxmp loaders/pw_load.c + MOD reader). */
+export declare const pwPlugin: FormatPlugin;
+//# sourceMappingURL=pw-plugin.d.ts.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"pw-plugin.d.ts","sourceRoot":"","sources":["../src/pw-plugin.ts"],"names":[],"mappings":"AAKA,OAAO,KAAK,EAAQ,YAAY,EAAE,OAAO,EAAE,UAAU,EAAE,MAAM,iBAAiB,CAAC;AAI/E,uDAAuD;AACvD,wBAAgB,MAAM,CAAC,KAAK,EAAE,UAAU,GAAG,OAAO,CAEjD;AAED,qEAAqE;AACrE,wBAAgB,MAAM,CAAC,KAAK,EAAE,UAAU,EAAE,GAAG,EAAE,OAAO,GAAG,UAAU,CAKlE;AAED,uEAAuE;AACvE,eAAO,MAAM,QAAQ,EAAE,YAOtB,CAAC"}

package/dist/pw-plugin.js

@@ -0,0 +1,27 @@
+// SPDX-License-Identifier: BSD-3-Clause
+// Copyright (c) 2026 Bitti09 — modplayjs contributors
+// Ported from: libxmp src/loaders/pw_load.c (pw_test :44-56,
+// pw_load :58-190).
+import { pwCheck, pwWizardry } from './prowiz.js';
+import { loadDepackedMod, readEvent } from '@modplayjs/fmt-mod';
+/** pw_test (pw_load.c:44-56): pw_check-based probe. */
+export function pwTest(bytes) {
+    return pwCheck(bytes, 0) !== null;
+}
+/** pw_load (pw_load.c:58-190): depack then parse the M.K. result. */
+export function pwLoad(bytes, ctx) {
+    const nameBox = {};
+    const depacked = pwWizardry(bytes, 0, nameBox);
+    const name = nameBox.name ?? 'prowizard';
+    return loadDepackedMod(depacked, ctx, name);
+}
+/** ProWizard format plugin (libxmp loaders/pw_load.c + MOD reader). */
+export const pwPlugin = {
+    name: 'prowizard',
+    test: pwTest,
+    load: pwLoad,
+    readEvent(core, chn, row) {
+        readEvent(core, chn, row);
+    },
+};
+//# sourceMappingURL=pw-plugin.js.map

package/dist/pw-plugin.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"pw-plugin.js","sourceRoot":"","sources":["../src/pw-plugin.ts"],"names":[],"mappings":"AAAA,wCAAwC;AACxC,sDAAsD;AACtD,6DAA6D;AAC7D,oBAAoB;AAGpB,OAAO,EAAE,OAAO,EAAE,UAAU,EAAE,MAAM,aAAa,CAAC;AAClD,OAAO,EAAE,eAAe,EAAE,SAAS,EAAE,MAAM,oBAAoB,CAAC;AAEhE,uDAAuD;AACvD,MAAM,UAAU,MAAM,CAAC,KAAiB;IACtC,OAAO,OAAO,CAAC,KAAK,EAAE,CAAC,CAAC,KAAK,IAAI,CAAC;AACpC,CAAC;AAED,qEAAqE;AACrE,MAAM,UAAU,MAAM,CAAC,KAAiB,EAAE,GAAY;IACpD,MAAM,OAAO,GAAsB,EAAE,CAAC;IACtC,MAAM,QAAQ,GAAG,UAAU,CAAC,KAAK,EAAE,CAAC,EAAE,OAAO,CAAC,CAAC;IAC/C,MAAM,IAAI,GAAG,OAAO,CAAC,IAAI,IAAI,WAAW,CAAC;IACzC,OAAO,eAAe,CAAC,QAAQ,EAAE,GAAG,EAAE,IAAI,CAAC,CAAC;AAC9C,CAAC;AAED,uEAAuE;AACvE,MAAM,CAAC,MAAM,QAAQ,GAAiB;IACpC,IAAI,EAAE,WAAW;IACjB,IAAI,EAAE,MAAM;IACZ,IAAI,EAAE,MAAM;IACZ,SAAS,CAAC,IAAU,EAAE,GAAW,EAAE,GAAW;QAC5C,SAAS,CAAC,IAAI,EAAE,GAAG,EAAE,GAAG,CAAC,CAAC;IAC5B,CAAC;CACF,CAAC"}

package/dist/pw-pp.d.ts

@@ -0,0 +1,8 @@
+import { type PwFormat } from './prowiz.js';
+/** pw_pp10 (pp10.c:177-181): "ProPacker 1.0". */
+export declare const pwPp10: PwFormat;
+/** pw_pp21 (pp21.c:249-253): "ProPacker 2.1". */
+export declare const pwPp21: PwFormat;
+/** pw_pp30 (pp21.c:255-259): "ProPacker 3.0". */
+export declare const pwPp30: PwFormat;
+//# sourceMappingURL=pw-pp.d.ts.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"pw-pp.d.ts","sourceRoot":"","sources":["../src/pw-pp.ts"],"names":[],"mappings":"AAMA,OAAO,EAA4D,KAAK,QAAQ,EAAE,MAAM,aAAa,CAAC;AAoJtG,iDAAiD;AACjD,eAAO,MAAM,MAAM,EAAE,QAIpB,CAAC;AAqLF,iDAAiD;AACjD,eAAO,MAAM,MAAM,EAAE,QAIpB,CAAC;AAEF,iDAAiD;AACjD,eAAO,MAAM,MAAM,EAAE,QAIpB,CAAC"}

package/dist/pw-pp.js

@@ -0,0 +1,341 @@
+// SPDX-License-Identifier: BSD-3-Clause
+// Copyright (c) 2026 Bitti09 — modplayjs contributors
+// Ported from: libxmp src/loaders/prowizard/pp10.c (ProPacker 1.0) and
+// pp21.c (ProPacker 2.1 + 3.0, shared depack_pp21_pp30).
+import { ParseError } from '@modplayjs/core';
+import { readmem16b, readmem32b, moveData, writeZero, pwReadTitle } from './prowiz.js';
+/** write8/write16b/write32b helpers — output accumulates as a byte array. */
+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);
+}
+// ---------------------------------------------------------------------------
+// ProPacker 1.0 (pp10.c)
+// ---------------------------------------------------------------------------
+/**
+ * depack_pp10 (pp10.c:41-120).
+ * Input: 31×8-byte sample headers, len @248, noisetracker byte @249,
+ * 4×128 track-number table @250, (ntrk+1)*256-byte track bank @762,
+ * then sample data.
+ */
+function depackPp10(data, start) {
+    const out = [];
+    const trkNum = [[], [], [], []];
+    writeZero(out, 20); // title
+    // Sample descriptions (pp10.c:48-66): 8 bytes each → 22 zero + 8.
+    let ssize = 0;
+    for (let i = 0; i < 31; i++) {
+        const pos = start + i * 8;
+        if (pos + 8 > data.length)
+            throw new ParseError('pp10: truncated sample headers');
+        const tmp = data.slice(pos, pos + 8);
+        writeZero(out, 22); // sample name
+        const size = readmem16b(tmp, 0);
+        ssize += size * 2;
+        if (tmp[4] === 0 && tmp[5] === 0) {
+            tmp[5] = 1; // loop size 0,0 → 0,1 (pp10.c:58-60)
+        }
+        for (let k = 0; k < 8; k++)
+            out.push(tmp[k]);
+    }
+    const len = data[start + 248]; // pattern table length
+    put8(out, len);
+    const c1 = data[start + 249]; // noisetracker byte
+    put8(out, c1);
+    // Track list, 4×128 (pp10.c:75-84); find highest track number.
+    let ntrk = 0;
+    for (let j = 0; j < 4; j++) {
+        for (let i = 0; i < 128; i++) {
+            const t = data[start + 250 + j * 128 + i];
+            trkNum[j].push(t);
+            if (t > ntrk)
+                ntrk = t;
+        }
+    }
+    // Pattern table "as is" (pp10.c:87-94): 0..len-1, zero-pad to 128, M.K.
+    let i = 0;
+    for (; i < len; i++)
+        put8(out, i);
+    writeZero(out, 128 - i);
+    put32b(out, 0x4d2e4b2e); // write32b(out, PW_MOD_MAGIC) → "M.K." BE bytes
+    // Track/pattern data (pp10.c:97-112): interleave 4 tracks per pattern.
+    const pdata = new Uint8Array(1024);
+    for (i = 0; i < len; i++) {
+        pdata.fill(0);
+        for (let j = 0; j < 4; j++) {
+            const trackOff = start + 762 + (trkNum[j][i] << 8);
+            for (let k = 0; k < 64; k++) {
+                const src = trackOff + k * 4;
+                const dst = k * 16 + j * 4;
+                for (let b = 0; b < 4; b++) {
+                    pdata[dst + b] = src + b < data.length ? data[src + b] : 0;
+                }
+            }
+        }
+        for (let b = 0; b < 1024; b++)
+            out.push(pdata[b]);
+    }
+    // Sample data (pp10.c:115-119): relocate to 762 + (ntrk+1)*256.
+    const smpOff = start + 762 + ((ntrk + 1) << 8);
+    moveData(data, smpOff, out, ssize);
+    return Uint8Array.from(out);
+}
+/**
+ * test_pp10 (pp10.c:123-175).
+ * Returns 0 match / -1 no match / N request-more-bytes.
+ */
+function testPp10(data, start) {
+    const s = data.length - start;
+    // PW_REQUEST_DATA(s, 1024)
+    if (s < 1024)
+        return 1024 - s;
+    // Noisetracker byte (pp10.c:131-134).
+    if (data[start + 249] > 0x7f)
+        return -1;
+    // Test #2 (pp10.c:136-172): 31 sample headers, 8 bytes each @0.
+    let ssize = 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;
+        ssize += size;
+        if (lsize === 0)
+            return -1;
+        if (lstart !== 0 && lsize <= 2)
+            return -1;
+        if (lstart + lsize > size + 2)
+            return -1;
+        if (data[d + 2] > 0x0f)
+            return -1; // finetune > 0x0f
+        if (data[d + 3] > 0x40)
+            return -1; // volume > 0x40
+        if (lstart > size)
+            return -1; // loop start > size
+        if (size > 0xffff)
+            return -1; // size > 0xffff
+    }
+    if (ssize <= 2)
+        return -1;
+    // Test #3 (pp10.c:174-178): pattern list size.
+    if (data[start + 248] === 0 || data[start + 248] > 127)
+        return -1;
+    // Highest track value (pp10.c:180-188).
+    let ntrk = 0;
+    for (let i = 0; i < 512; i++) {
+        const t = data[start + 250 + i];
+        if (t > ntrk)
+            ntrk = t;
+    }
+    ntrk++;
+    // PW_REQUEST_DATA(s, 762 + ntrk * 256)
+    const need = 762 + ntrk * 256;
+    if (s < need)
+        return need - s;
+    // Track data sanity (pp10.c:190-195): sample nibble <= 0x13.
+    for (let i = 0; i < ntrk * 64; i++) {
+        if (data[start + 762 + i * 4] > 0x13)
+            return -1;
+    }
+    return 0;
+}
+/** pw_pp10 (pp10.c:177-181): "ProPacker 1.0". */
+export const pwPp10 = {
+    name: 'ProPacker 1.0',
+    test: testPp10,
+    depack: depackPp10,
+};
+// ---------------------------------------------------------------------------
+// ProPacker 2.1 / 3.0 (pp21.c, shared depack_pp21_pp30)
+// ---------------------------------------------------------------------------
+/**
+ * depack_pp21_pp30 (pp21.c:37-121): sample headers, numpat, restart,
+ * 4×128 track table, M.K., per-track 64 u16 offsets into a reference
+ * table, reference-table-reconstructed patterns, then sample data.
+ */
+function depackPp21Pp30(data, start, is30) {
+    const out = [];
+    writeZero(out, 20); // title
+    // Sample descriptions (pp21.c:48-59)
+    let ssize = 0;
+    for (let i = 0; i < 31; i++) {
+        writeZero(out, 22); // sample name
+        const size = readmem16b(data, start + i * 8);
+        ssize += size * 2;
+        put16b(out, size);
+        put8(out, data[start + i * 8 + 2]); // finetune
+        put8(out, data[start + i * 8 + 3]); // volume
+        put16b(out, readmem16b(data, start + i * 8 + 4)); // loop start
+        put16b(out, readmem16b(data, start + i * 8 + 6)); // loop size
+    }
+    const numpat = data[start + 248];
+    if (numpat > 128)
+        throw new ParseError('pp21: too many patterns');
+    put8(out, numpat);
+    put8(out, data[start + 249]); // NoiseTracker restart byte
+    const trk = [[], [], [], []];
+    let max = 0;
+    for (let j = 0; j < 4; j++) {
+        for (let i = 0; i < 128; i++) {
+            const t = data[start + 250 + j * 128 + i];
+            trk[j].push(t);
+            if (t > max)
+                max = t;
+        }
+    }
+    // Pattern table without optimizing (pp21.c:78-81)
+    let i = 0;
+    for (; i < numpat; i++)
+        put8(out, i);
+    writeZero(out, 128 - i);
+    put32b(out, 0x4d2e4b2e); // "M.K."
+    // Per-track 64 u16 reference-table offsets (pp21.c:86-96)
+    const tptr = [];
+    for (let j = 0; j <= max; j++) {
+        const row = [];
+        for (let k = 0; k < 64; k++) {
+            let v = readmem16b(data, start + 762 + (j * 64 + k) * 2);
+            if (is30)
+                v >>= 2;
+            row.push(v);
+        }
+        tptr.push(row);
+    }
+    // Reference table (pp21.c:99-108)
+    const tabOff = start + 762 + (max + 1) * 128;
+    const tabsize = readmem32b(data, tabOff);
+    if (tabsize === 0)
+        throw new ParseError('pp21: zero reference table size');
+    const tab = data.subarray(tabOff + 4, tabOff + 4 + tabsize);
+    if (tab.length < tabsize)
+        throw new ParseError('pp21: reference table truncated');
+    // Pattern reconstruction (pp21.c:110-121): each row is 4×4 bytes copied
+    // from tab[tptr[trk[j][i]][row] * 4].
+    for (i = 0; i < numpat; i++) {
+        for (let j = 0; j < 64; j++) {
+            for (let c = 0; c < 4; c++) {
+                const off = tptr[trk[c][i]][j] * 4;
+                for (let b = 0; b < 4; b++) {
+                    out.push(tab[off + b] ?? 0);
+                }
+            }
+        }
+    }
+    // Sample data (pp21.c:126-128)
+    moveData(data, tabOff + 4 + tabsize, out, ssize);
+    return Uint8Array.from(out);
+}
+/** Shared pp21/pp30 test body (pp21.c:124-176 vs :178-247). */
+function testPp21Pp30(data, start, is30) {
+    const s = data.length - start;
+    if (s < 762)
+        return 762 - s;
+    let ssize = 0;
+    for (let i = 0; i < 31; i++) {
+        const d = start + i * 8;
+        const len = readmem16b(data, d) << 1;
+        const lstart = readmem16b(data, d + 4) << 1;
+        ssize += len;
+        if (data[d + 2] > 0x0f)
+            return -1; // finetune
+        if (data[d + 3] > 0x40)
+            return -1; // volume
+        if (lstart > len)
+            return -1; // loop start > size
+    }
+    if (ssize <= 2)
+        return -1;
+    // Pattern list size
+    const npat = data[start + 248];
+    if (npat === 0 || npat > 127)
+        return -1;
+    // Highest track value
+    let tsize = 0;
+    for (let i = 0; i < 512; i++) {
+        const trk = data[start + 250 + i];
+        if (trk > tsize)
+            tsize = trk;
+    }
+    tsize++;
+    tsize <<= 6;
+    // PW_REQUEST_DATA(s, tsize * 2 + 4 + 762)
+    const need = tsize * 2 + 4 + 762;
+    if (s < need)
+        return need - s;
+    let maxRef = 0;
+    if (!is30) {
+        // test #4 (pp21.c:194-203): track data value > $4000?
+        for (let i = 0; i < tsize; i++) {
+            const ref = readmem16b(data, start + i * 2 + 762);
+            if (ref > 0x4000)
+                return -1;
+            if (ref > maxRef)
+                maxRef = ref;
+        }
+        // test #5 (pp21.c:206-209): reference table size *4?
+        if (readmem32b(data, start + tsize * 2 + 762) !== (maxRef + 1) * 4)
+            return -1;
+    }
+    else {
+        // test #4 (pp21.c:211-230): track data value *4?
+        for (let i = 0; i < tsize; i++) {
+            const ref = readmem16b(data, start + i * 2 + 762);
+            if (ref > maxRef)
+                maxRef = ref;
+            if ((ref & 0x0003) !== 0)
+                return -1;
+        }
+        maxRef >>= 2;
+        // test #5 (pp21.c:233-243)
+        let refSize = readmem32b(data, start + tsize * 2 + 762);
+        if (refSize > 0xffff)
+            return -1;
+        if (refSize !== (maxRef + 1) << 2)
+            return -1;
+        refSize >>= 2;
+        // PW_REQUEST_DATA(s, (ref_size * 4) + (tsize * 2) + 4 + 762)
+        const need2 = refSize * 4 + tsize * 2 + 4 + 762;
+        if (s < need2)
+            return need2 - s;
+        // test #6 (pp21.c:245-...): reference table sanity
+        for (let i = 0; i < refSize; i++) {
+            const d = start + tsize * 2 + 766 + i * 4;
+            const fxt = data[d + 2] & 0x0f;
+            const fxp = data[d + 3];
+            if (fxt === 0x0c && fxp > 0x41)
+                return -1; // volume > 41
+            if (fxt === 0x0d && (fxp > 0x64 || (fxp & 0xf) > 9))
+                return -1; // break
+            if (fxt === 0x0b && fxp > 0x7f)
+                return -1; // jump > 128
+            if ((data[d] & 0xf0) > 0x10)
+                return -1; // sample > 1f
+        }
+    }
+    pwReadTitle(null, 0);
+    return 0;
+}
+function testPp21(data, start) {
+    return testPp21Pp30(data, start, false);
+}
+function testPp30(data, start) {
+    return testPp21Pp30(data, start, true);
+}
+/** pw_pp21 (pp21.c:249-253): "ProPacker 2.1". */
+export const pwPp21 = {
+    name: 'ProPacker 2.1',
+    test: testPp21,
+    depack: (data, start) => depackPp21Pp30(data, start, false),
+};
+/** pw_pp30 (pp21.c:255-259): "ProPacker 3.0". */
+export const pwPp30 = {
+    name: 'ProPacker 3.0',
+    test: testPp30,
+    depack: (data, start) => depackPp21Pp30(data, start, true),
+};
+//# sourceMappingURL=pw-pp.js.map