]> code.delx.au - transcoding/blobdiff - fix-pal-speedup
Use mplayer to extract audio instead of mkvextract
[transcoding] / fix-pal-speedup
index edac6642c8888e8b2b75e7954a37a3443cbedfa5..c951ed260629b349c5e1e5b109ac247028e66123 100755 (executable)
@@ -1,8 +1,7 @@
 #!/bin/bash -e
 
-# Many DVDs released in Australia are sped up from 23.976fps to 25fps.
+# Many DVDs released in Australia are sped up from 24fps to 25fps.
 # This script reverses the procedure, correcting the audio pitch.
-# Input files are assumed to be mkv files with track 2 audio.
 # The video framerate is adjusted without re-encoding. The audio is slowed and
 # normalised then re-encoded as mp3.
 
@@ -11,10 +10,8 @@ if [ -z "$1" -o -z "$2" ]; then
        exit 1
 fi
 
-# FORCEFPS = 24000 / 1001
-# SLOWDOWN = FORCEFPS / 25
-FORCEFPS="23.976023976023978"
-SLOWDOWN="0.9590409590409591"
+FORCEFPS="24"
+SLOWDOWN="0.96"
 
 destdir="$1"
 infile="$2"
@@ -29,8 +26,7 @@ fi
 
 set -x
 mkdir "$tmpdir"
-mkvextract tracks "$infile" 2:"${tmpdir}/audio"
-mplayer -ao pcm:file="${tmpdir}/audio.wav" -vo null "${tmpdir}/audio"
+mplayer -novideo -ao pcm:file="${tmpdir}/audio.wav" -vo null "$infile"
 sox "${tmpdir}/audio.wav" "${tmpdir}/audio-fixed.wav" speed "${SLOWDOWN}" gain -n
 lame --preset standard "${tmpdir}/audio-fixed.wav" "${tmpdir}/audio.mp3"
 mkvmerge -o "${outfile}" --default-duration "1:${FORCEFPS}fps" --no-audio "$infile" "${tmpdir}/audio.mp3"