more zfm stuffs

assets/disk0/tvdos/bin/command.js

@@ -759,7 +759,7 @@ shell.execute = function(line) {
                             errorlevel = 1
                     }
                     finally {
-                        debugprintln("[shell.execute] exec app " + searchFile.fullPath + "exit with no exception; errorlevel = " + errorlevel)
+                        debugprintln("[shell.execute] exec app " + searchFile.fullPath + " exit with no exception; errorlevel = " + errorlevel)
 
                         // sometimes no-error program may return nothing as the errorlevel; force set to 0 then.
                         if (!gotError && (errorlevel == undefined || (typeof errorlevel.trim == "function" && errorlevel.trim().length == 0) || isNaN(errorlevel)))

assets/disk0/tvdos/bin/decodeipf.js

@@ -3,6 +3,7 @@ if (exec_args[1] == undefined) {
     return 1
 }
 
+const interactive = exec_args[2] && exec_args[2].toLowerCase() == "/i"
 let infile = files.open(_G.shell.resolvePathInput(exec_args[1]).full)
 
 // read input file
@@ -49,4 +50,37 @@ graphics.setGraphicsMode(4)
 graphics.clearText(); graphics.clearPixels(0); graphics.clearPixels2(0)
 decodefun(ipfbuf, -1048577, -1310721, width, height, hasAlpha)
 
-sys.free(ipfbuf)*/
+sys.free(ipfbuf)*/
+
+
+let wait = interactive
+
+if (interactive) {
+    con.clear(); con.curs_set(0); con.move(1,1)
+    println("Push and hold Backspace to exit")
+}
+
+let t1 = sys.nanoTime()
+let akku = 0
+let notifHideTimer = 0
+const NOTIF_SHOWUPTIME = 3000000000
+while (wait) {
+    sys.poke(-40, 1)
+    if (sys.peek(-41) == 67) {
+        wait = false
+        con.curs_set(1)
+    }
+
+    sys.sleep(50)
+
+    let t2 = sys.nanoTime()
+    akku += (t2 - t1) / 1000000000.0
+
+    notifHideTimer += (t2 - t1)
+    if (notifHideTimer > NOTIF_SHOWUPTIME) {
+        con.clear()
+    }
+
+    t1 = t2
+
+}

assets/disk0/tvdos/bin/playmov.js

@@ -1,5 +1,5 @@
 // usage: playmov moviefile.mov [/i]
-const interactive = exec_args[2].toLowerCase() == "/i"
+const interactive = exec_args[2] && exec_args[2].toLowerCase() == "/i"
 const WIDTH = 560
 const HEIGHT = 448
 const FBUF_SIZE = WIDTH * HEIGHT
@@ -87,7 +87,7 @@ if (interactive) {
     println("Push and hold Backspace to exit")
 }
 let notifHideTimer = 0
-const NOTIF_SHOWUPTIME = 2000000000
+const NOTIF_SHOWUPTIME = 3000000000
 let [cy, cx] = con.getyx()
 let t1 = sys.nanoTime()
 renderLoop:
@@ -237,7 +237,7 @@ while (!stopPlay && seqread.getReadCount() < FILE_LENGTH) {
 
     if (interactive) {
         notifHideTimer += (t2 - t1)
-        if (notifHideTimer > NOTIF_SHOWUPTIME) {
+        if (notifHideTimer > (NOTIF_SHOWUPTIME + frameTime)) {
             con.clear()
         }
     }

assets/disk0/tvdos/bin/playpcm.js

@@ -0,0 +1,162 @@
+// usage: playpcm audiofile.pcm [/i]
+let filename = _G.shell.resolvePathInput(exec_args[1]).full
+function printdbg(s) { if (0) serial.println(s) }
+
+const interactive = exec_args[2] && exec_args[2].toLowerCase() == "/i"
+const pcm = require("pcm")
+const FILE_SIZE = files.open(filename).size
+
+
+
+function printComments() {
+    for (const [key, value] of Object.entries(comments)) {
+        printdbg(`${key}: ${value}`)
+    }
+}
+
+function GCD(a, b) {
+    a = Math.abs(a)
+    b = Math.abs(b)
+    if (b > a) {var temp = a; a = b; b = temp}
+    while (true) {
+        if (b == 0) return a
+        a %= b
+        if (a == 0) return b
+        b %= a
+    }
+}
+
+function LCM(a, b) {
+    return (!a || !b) ? 0 : Math.abs((a * b) / GCD(a, b))
+}
+
+
+
+//println("Reading...")
+//serial.println("!!! READING")
+
+const seqread = require("seqread")
+seqread.prepare(filename)
+
+
+
+
+
+
+let BLOCK_SIZE = 4096
+let INFILE_BLOCK_SIZE = BLOCK_SIZE
+const QUEUE_MAX = 4 // according to the spec
+
+let nChannels = 2
+let samplingRate = pcm.HW_SAMPLING_RATE;
+let blockSize = 2;
+let bitsPerSample = 8;
+let byterate = 2*samplingRate;
+let comments = {};
+let readPtr = undefined
+let decodePtr = undefined
+
+function bytesToSec(i) {
+    return i / byterate
+}
+function secToReadable(n) {
+    let mins = ''+((n/60)|0)
+    let secs = ''+(n % 60)
+    return `${mins.padStart(2,'0')}:${secs.padStart(2,'0')}`
+}
+
+let stopPlay = false
+con.curs_set(0)
+if (interactive) {
+    con.clear(); con.move(1,1)
+    println("Push and hold Backspace to exit")
+}
+let [cy, cx] = con.getyx()
+let [__, CONSOLE_WIDTH] = con.getmaxyx()
+let paintWidth = CONSOLE_WIDTH - 16
+// read chunks loop
+readPtr = sys.malloc(BLOCK_SIZE * bitsPerSample / 8)
+decodePtr = sys.malloc(BLOCK_SIZE * pcm.HW_SAMPLING_RATE / samplingRate)
+
+
+audio.resetParams(0)
+audio.purgeQueue(0)
+audio.setPcmMode(0)
+audio.setMasterVolume(0, 255)
+
+let readLength = 1
+
+function printPlayBar(startOffset) {
+    if (interactive) {
+        let currently = seqread.getReadCount() - startOffset
+        let total = FILE_SIZE - startOffset - 8
+
+        let currentlySec = Math.round(bytesToSec(currently))
+        let totalSec = Math.round(bytesToSec(total))
+
+        con.move(cy, 1)
+        print(' '.repeat(15))
+        con.move(cy, 1)
+
+        print(`${secToReadable(currentlySec)} / ${secToReadable(totalSec)}`)
+
+        con.move(cy, 15)
+        print(' ')
+        let progressbar = '\x84205u'.repeat(paintWidth + 1)
+        print(progressbar)
+
+        con.mvaddch(cy, 16 + Math.round(paintWidth * (currently / total)), 0xDB)
+    }
+}
+while (!stopPlay && seqread.getReadCount() < FILE_SIZE && readLength > 0) {
+    if (interactive) {
+        sys.poke(-40, 1)
+        if (sys.peek(-41) == 67) {
+            stopPlay = true
+        }
+    }
+
+
+    let queueSize = audio.getPosition(0)
+    if (queueSize <= 1) {
+
+        printPlayBar()
+
+        // upload four samples for lag-safely
+        for (let repeat = QUEUE_MAX - queueSize; repeat > 0; repeat--) {
+            let remainingBytes = FILE_SIZE - seqread.getReadCount()
+
+            readLength = (remainingBytes < INFILE_BLOCK_SIZE) ? remainingBytes : INFILE_BLOCK_SIZE
+            if (readLength <= 0) {
+                printdbg(`readLength = ${readLength}`)
+                break
+            }
+
+            printdbg(`offset: ${seqread.getReadCount()}/${FILE_SIZE}; readLength: ${readLength}`)
+
+            seqread.readBytes(readLength, readPtr)
+
+            audio.putPcmDataByPtr(readPtr, readLength, 0)
+            audio.setSampleUploadLength(0, readLength)
+            audio.startSampleUpload(0)
+
+
+            if (repeat > 1) sys.sleep(10)
+            
+            printPlayBar()
+        }
+
+        audio.play(0)
+    }
+
+    let remainingBytes = FILE_SIZE - seqread.getReadCount()
+    printdbg(`readLength = ${readLength}; remainingBytes2 = ${remainingBytes}; seqread.getReadCount() = ${seqread.getReadCount()};`)
+
+
+    sys.sleep(10)
+}
+
+
+audio.stop(0)
+if (readPtr !== undefined) sys.free(readPtr)
+if (decodePtr !== undefined) sys.free(decodePtr)

assets/disk0/tvdos/bin/playwav.js

@@ -2,7 +2,7 @@
 let filename = _G.shell.resolvePathInput(exec_args[1]).full
 function printdbg(s) { if (0) serial.println(s) }
 
-const interactive = exec_args[2].toLowerCase() == "/i"
+const interactive = exec_args[2] && exec_args[2].toLowerCase() == "/i"
 const seqread = require("seqread")
 const pcm = require("pcm")
 
@@ -104,6 +104,29 @@ if (interactive) {
 }
 let [cy, cx] = con.getyx()
 let [__, CONSOLE_WIDTH] = con.getmaxyx()
+let paintWidth = CONSOLE_WIDTH - 16
+function printPlayBar(startOffset) {
+    if (interactive) {
+        let currently = seqread.getReadCount() - startOffset
+        let total = FILE_SIZE - startOffset - 8
+
+        let currentlySec = Math.round(bytesToSec(currently))
+        let totalSec = Math.round(bytesToSec(total))
+
+        con.move(cy, 1)
+        print(' '.repeat(15))
+        con.move(cy, 1)
+
+        print(`${secToReadable(currentlySec)} / ${secToReadable(totalSec)}`)
+
+        con.move(cy, 15)
+        print(' ')
+        let progressbar = '\x84205u'.repeat(paintWidth + 1)
+        print(progressbar)
+
+        con.mvaddch(cy, 16 + Math.round(paintWidth * (currently / total)), 0xDB)
+    }
+}
 // read chunks loop
 while (!stopPlay && seqread.getReadCount() < FILE_SIZE - 8) {
     let chunkName = seqread.readFourCC()
@@ -195,29 +218,8 @@ while (!stopPlay && seqread.getReadCount() < FILE_SIZE - 8) {
 
             let queueSize = audio.getPosition(0)
             if (queueSize <= 1) {
-                if (interactive) {
-                    let currently = seqread.getReadCount() - startOffset
-                    let total = FILE_SIZE - startOffset - 8
-
-                    let currentlySec = Math.round(bytesToSec(currently))
-                    let totalSec = Math.round(bytesToSec(total))
-
-                    con.move(cy, 1)
-                    print(' '.repeat(40))
-                    con.move(cy, 1)
-
-                    print(`${secToReadable(currentlySec)} / ${secToReadable(totalSec)}`)
-
-                    con.move(cy, 15)
-                    print(' ')
-
-                    let paintWidth = CONSOLE_WIDTH - 16
-                    let progressbar = '\x84205u'.repeat(paintWidth + 1)
-                    print(progressbar)
-
-                    con.mvaddch(cy, 16 + Math.round(paintWidth * (currently / total)), 0xDB)
-                }
 
+                printPlayBar(startOffset)
 
                 // upload four samples for lag-safely
                 for (let repeat = QUEUE_MAX - queueSize; repeat > 0; repeat--) {
@@ -242,6 +244,8 @@ while (!stopPlay && seqread.getReadCount() < FILE_SIZE - 8) {
 
 
                     if (repeat > 1) sys.sleep(10)
+
+                    printPlayBar(startOffset)
                 }
 
                 audio.play(0)