curioustorvald/tsvm
1
0
Fork 0
mirror of https://github.com/curioustorvald/tsvm.git synced 2026-03-07 11:51:49 +09:00
Code Issues Packages Projects Releases Wiki Activity

playwav play mono lpcm

Browse Source
This commit is contained in:
minjaesong
2023-01-07 00:26:52 +09:00
parent 5f22447c69
commit cbf5ca6236
1 changed files with 31 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

49
assets/disk0/tvdos/bin/playwav.js
View File

@@ -210,8 +210,7 @@ function sampleToVisual(i) {
} }
function checkIfPlayable() { function checkIfPlayable() {
if (pcmType != 1 && pcmType != 2) return `PCM Type not LPCM/ADPCM (${pcmType})` if (pcmType != 1 && pcmType != 2) return `PCM Type not LPCM/ADPCM (${pcmType})`
if (pcmType == 2 && nChannels > 2) return `Audio not mono/stereo but instead has ${nChannels} channels` if (nChannels < 1 || nChannels > 2) return `Audio not mono/stereo but instead has ${nChannels} channels`
if (pcmType != 2 && nChannels != 2) return `Audio not stereo but instead has ${nChannels} channels`
if (pcmType != 1 && samplingRate != HW_SAMPLING_RATE) return `Format is ADPCM but sampling rate is not ${HW_SAMPLING_RATE}: ${samplingRate}` if (pcmType != 1 && samplingRate != HW_SAMPLING_RATE) return `Format is ADPCM but sampling rate is not ${HW_SAMPLING_RATE}: ${samplingRate}`
return "playable!" return "playable!"
} }
@@ -220,17 +219,29 @@ function decodeLPCM(inPtr, outPtr, inputLen) {
if (2 == bytes) { if (2 == bytes) {
if (HW_SAMPLING_RATE == samplingRate) { if (HW_SAMPLING_RATE == samplingRate) {
for (let k = 0; k < inputLen / 2; k+=2) { if (2 == nChannels) {
let sample = [ for (let k = 0; k < inputLen / 2; k+=2) {
u16Tos16(sys.peek(inPtr + k*2 + 0) | (sys.peek(inPtr + k*2 + 1) << 8)), let sample = [
u16Tos16(sys.peek(inPtr + k*2 + 2) | (sys.peek(inPtr + k*2 + 3) << 8)) u16Tos16(sys.peek(inPtr + k*2 + 0) | (sys.peek(inPtr + k*2 + 1) << 8)),
] u16Tos16(sys.peek(inPtr + k*2 + 2) | (sys.peek(inPtr + k*2 + 3) << 8))
sys.poke(outPtr + k, s16Tou8(sample[0])) ]
sys.poke(outPtr + k + 1, s16Tou8(sample[1])) sys.poke(outPtr + k, s16Tou8(sample[0]))
// soothing visualiser(????) sys.poke(outPtr + k + 1, s16Tou8(sample[1]))
printvis(`${sampleToVisual(sample[0])} | ${sampleToVisual(sample[1])}`) // soothing visualiser(????)
printvis(`${sampleToVisual(sample[0])} | ${sampleToVisual(sample[1])}`)
}
return inputLen / 2
}
else if (1 == nChannels) {
for (let k = 0; k < inputLen; k+=1) {
let sample = u16Tos16(sys.peek(inPtr + k*2 + 0) | (sys.peek(inPtr + k*2 + 1) << 8))
sys.poke(outPtr + k*2, s16Tou8(sample))
sys.poke(outPtr + k*2 + 1, s16Tou8(sample))
// soothing visualiser(????)
printvis(`${sampleToVisual(sample)}`)
}
return inputLen
} }
return inputLen / 2
} }
// resample! // resample!
else { else {
@@ -239,7 +250,7 @@ function decodeLPCM(inPtr, outPtr, inputLen) {
let indices = (inputLen / indexStride) / nChannels / bytes let indices = (inputLen / indexStride) / nChannels / bytes
let sample = [ let sample = [
u16Tos16(sys.peek(inPtr+0) | (sys.peek(inPtr+1) << 8)), u16Tos16(sys.peek(inPtr+0) | (sys.peek(inPtr+1) << 8)),
u16Tos16(sys.peek(inPtr+2) | (sys.peek(inPtr+3) << 8)) u16Tos16(sys.peek(inPtr+bytes) | (sys.peek(inPtr+bytes+1) << 8))
] ]
printdbg(`indices: ${indices}; indexStride = ${indexStride}`) printdbg(`indices: ${indices}; indexStride = ${indexStride}`)
@@ -256,14 +267,14 @@ function decodeLPCM(inPtr, outPtr, inputLen) {
if (Math.abs((iEnd / iA) - 1.0) < 0.0001) { if (Math.abs((iEnd / iA) - 1.0) < 0.0001) {
// iEnd on integer point (no lerp needed) // iEnd on integer point (no lerp needed)
let iR = Math.round(iEnd) let iR = Math.round(iEnd)
sample[channel] = u16Tos16(sys.peek(inPtr + 4*iR + 2*channel) | (sys.peek(inPtr + 4*iR + 2*channel + 1) << 8)) sample[channel] = u16Tos16(sys.peek(inPtr + blockSize*iR + bytes*channel) | (sys.peek(inPtr + blockSize*iR + bytes*channel + 1) << 8))
} }
else { else {
// iEnd not on integer point (lerp needed) // iEnd not on integer point (lerp needed)
// sampleA = samples[iEnd|0], sampleB = samples[1 + (iEnd|0)], lerpScale = iEnd - (iEnd|0) // sampleA = samples[iEnd|0], sampleB = samples[1 + (iEnd|0)], lerpScale = iEnd - (iEnd|0)
// sample = lerp(sampleA, sampleB, lerpScale) // sample = lerp(sampleA, sampleB, lerpScale)
let sampleA = u16Tos16(sys.peek(inPtr + 4*iA + 2*channel + 0) | (sys.peek(inPtr + 4*iA + 2*channel + 1) << 8)) let sampleA = u16Tos16(sys.peek(inPtr + blockSize*iA + bytes*channel + 0) | (sys.peek(inPtr + blockSize*iA + bytes*channel + 1) << 8))
let sampleB = u16Tos16(sys.peek(inPtr + 4*iA + 2*channel + 4) | (sys.peek(inPtr + 4*iA + 2*channel + 5) << 8)) let sampleB = u16Tos16(sys.peek(inPtr + blockSize*iA + bytes*channel + blockSize) | (sys.peek(inPtr + blockSize*iA + bytes*channel + blockSize + 1) << 8))
let scale = iEnd - iA let scale = iEnd - iA
sample[channel] = (lerpAndRound(sampleA, sampleB, scale)) sample[channel] = (lerpAndRound(sampleA, sampleB, scale))
@@ -272,8 +283,10 @@ function decodeLPCM(inPtr, outPtr, inputLen) {
printvis(`${sampleToVisual(sample[0])} | ${sampleToVisual(sample[1])}`) printvis(`${sampleToVisual(sample[0])} | ${sampleToVisual(sample[1])}`)
// writeout // writeout
sys.poke(outPtr + sendoutLength, s16Tou8(sample[channel])) sys.poke(outPtr + sendoutLength, s16Tou8(sample[channel]));sendoutLength += 1
sendoutLength += 1 if (nChannels == 1) {
sys.poke(outPtr + sendoutLength, s16Tou8(sample[channel]));sendoutLength += 1
}
} }
} }
// pad with zero (might have lost the last sample of the input audio but whatever) // pad with zero (might have lost the last sample of the input audio but whatever)