# HG changeset patch
# User atmos4
# Date 1044277464 0
# Node ID 9733351ea3e5120a98e14292104b64c228c040c5
# Parent  bb490ffeebf529a02b7bacb769a2bbc997788811
update to use lavc, xvid, divx4

diff -r bb490ffeebf5 -r 9733351ea3e5 TOOLS/menc2pass
--- a/TOOLS/menc2pass	Mon Feb 03 10:27:50 2003 +0000
+++ b/TOOLS/menc2pass	Mon Feb 03 13:04:24 2003 +0000
@@ -9,11 +9,22 @@
 die <<"EOF" unless @ARGV;
 Menc2Pass: No arguments given!
 Please give all usual encoding parameters you would give to mencoder, but leave
-away the -pass switch.
+away the pass=<n> suboption.
 EOF
 
 for(my $i=1; $i<=2; $i++) {
-	system($mencoder,@ARGV," -pass $i")
-		and die "MEncoder pass $i failed!\n"
+  my $parm="";
+  foreach my $val (@ARGV) {
+    if($val =~ /-lavcopts/) {
+      $parm.="$val vpass=$i:";
+    } elsif($val =~ /-(divx4)|(xvid)opts/) {
+      $parm.="$val pass=$i:";
+    } else {
+      $parm.="$val ";
+    }
+  }
+  print "Running $mencoder $parm\n";
+  system($mencoder,$parm)
+  	and die "MEncoder pass $i failed!\n"
 }