Support MSX-DOS format MML.

package.json

@@ -1,6 +1,6 @@
 {
   "name": "msxplay-js",
-  "version": "1.6.0",
+  "version": "1.6.1",
   "description": "",
   "type": "module",
   "engines": {
@@ -16,6 +16,7 @@
     "mgsrc-js": "^2.0.0",
     "prettier": "^2.8.4",
     "rimraf": "^4.4.1",
+    "utf16-to-sjis": "^1.1.1",
     "webaudio-stream-player": "github:digital-sound-antiques/webaudio-stream-player",
     "webpack": "^5.76.2",
     "webpack-bundle-analyzer": "^4.8.0",

public/editor.html

@@ -384,6 +384,11 @@
           <div class="subtext" lang="ja">テキスト形式でダウンロード</div>
           <div class="subtext" lang="en">Download as a plain text file.</div>
         </li>
+        <li data-value="mml-for-msx">
+          <div class="title">MML (for MSX-DOS)</div>
+          <div class="subtext" lang="ja">テキスト形式(MSX-DOS用)をダウンロード</div>
+          <div class="subtext" lang="en">Download as a text file for MSX-DOS.</div>
+        </li>
         <li data-value="mgs">
           <div class="title">MGS</div>
           <div class="subtext" lang="ja">MGS形式でダウンロード</div>

public/js/editor.js

@@ -729,7 +729,13 @@ function downloadAudio(type, rate, kbps, quality) {
 
 function downloadMML() {
   var blob = new Blob([editor.getValue()], { type: "text/plain" });
-  saveAs(blob, lastCompiledName || Date.now() + ".mml");
+  saveAs(blob, (lastCompiledName || Date.now()) + ".mml");
+}
+
+function downloadMMLforMSX() {
+  const mml4msx = MSXPlayUI.convertToMSXDOSText(editor.getValue());
+  var blob = new Blob([mml4msx], { type: "text/plain" });
+  saveAs(blob, (lastCompiledName || Date.now()) + ".mus");
 }
 
 function downloadMGS() {
@@ -796,6 +802,8 @@ function download() {
   showDialog("download-type", function (e) {
     if (e === "mml") {
       downloadMML();
+    } if (e === "mml-for-msx") {
+      downloadMMLforMSX();
     } else if (e === "mgs") {
       downloadMGS();
     } else if (e === "vgm") {

src/msxplay-ui.js

@@ -4,6 +4,7 @@ import { MSXPlay } from "./msxplay.js";
 import { mgs2mml, getJumpMarkerCount } from "mgsrc-js";
 import packageJson from "../package.json";
 import { isSafari, isIOS } from "./utils.js";
+import { convert as Utf16toSjis } from 'utf16-to-sjis';
 
 function zeroPadding(num) {
   return ("00" + num).slice(-2);
@@ -99,6 +100,14 @@ export class MSXPlayUI {
     return this.msxplay.toVGM(data, duration, loop, callback);
   }
 
+  convertToMSXDOSText(text) {
+    const data = Utf16toSjis(text.replace(/\n/g, '\r\n'));
+    const res = new Uint8Array(data.length + 1);
+    res.set(data);
+    res.set([0x1A], data.length); // append EOF
+    return res;
+  }
+
   audio_encode(type, data, song, callback, opts) {
     this.msxplay.audio_encode(type, data, song, callback, opts);
   }