#!/usr/bin/perl

($username) =@ARGV;

$dir = "users\\$username";

# 1.bat
system ("HParse $dir\\gram $dir\\wdnet > blah.txt");

# 5.bat
system ("perl $dir\\prompts2mlf $dir\\words.mlf $dir\\To_Say.txt > blah.txt");

# 6.bat
system ("HLEd -d dict -i $dir\\phones0.mlf $dir\\mkphones0.led $dir\\words.mlf > blah.txt");

system ("perl $dir\\makemap.pl $username > blah.txt");

# 7.bat
system ("HCopy -T 1 -C $dir\\config2 -S $dir\\codetr.scp > blah.txt");

# 8.bat
system ("HCompV -C $dir\\config -f 0.01 -m -S $dir\\train.scp -M $dir\\hmm0 $dir\\proto > blah.txt");

# 8a.bat
system ("perl $dir\\vfloors2macros.pl $dir\\hmm0\\vFloors $dir\\hmm0\\macros > blah.txt");

#perl script to put full path in front of lab files.
system ("perl fixlab.pl $username > blah.txt");

# 9.bat
system ("HERest -C $dir\\config -I $dir\\phones0.mlf -t 250.0 150.0 1000.0 -m 2 -S $dir\\train.scp -T 1 -H $dir\\hmm0\\macros -H $dir\\hmm0\\hmmdefs -M $dir\\hmm1 $dir\\monophones0 > blah.txt");

# 10.bat
system ("HERest -C $dir\\config -I $dir\\phones0.mlf -t 250.0 150.0 1000.0 -m 2 -S $dir\\train.scp -T 1 -H $dir\\hmm1\\macros -H $dir\\hmm1\\hmmdefs -M $dir\\hmm2 $dir\\monophones0 > blah.txt");

# 11.bat
system ("HERest -C $dir\\config -I $dir\\phones0.mlf -t 250.0 150.0 1000.0 -m 2 -S $dir\\train.scp -T 1 -H $dir\\hmm2\\macros -H $dir\\hmm2\\hmmdefs -M $dir\\hmm3 $dir\\monophones0 > blah.txt");

# 11a.bat
system ("perl $dir\\makehmm4.pl $dir\\hmm3\\hmmdefs $dir\\hmm4\\hmmdefs $username > blah.txt");

# 12.bat
system ("HHEd -H $dir\\hmm4\\macros -H $dir\\hmm4\\hmmdefs -M $dir\\hmm5 $dir\\sil.hed $dir\\monophones1 > blah.txt");

# 13.bat
system ("HERest -C $dir\\config -I $dir\\phones1.mlf -t 250.0 150.0 1000.0 -m 2 -S $dir\\train.scp -T 1 -H $dir\\hmm5\\macros -H $dir\\hmm5\\hmmdefs -M $dir\\hmm6 $dir\\monophones1 > blah.txt");

# 14.bat
system ("HERest -C $dir\\config -I $dir\\phones1.mlf -t 250.0 150.0 1000.0 -m 2 -S $dir\\train.scp -T 1 -H $dir\\hmm6\\macros -H $dir\\hmm6\\hmmdefs -M $dir\\hmm7 $dir\\monophones1 > blah.txt");

# 15.bat
system ("HVite -o SWT -b silence -C $dir\\config -a -H $dir\\hmm7\\macros -H $dir\\hmm7\\hmmdefs -i $dir\\aligned.mlf -m -t 250.0 -y lab -I $dir/words.mlf -S $dir\\train.scp $dir\\dict $dir\\monophones1 > blah.txt");

# 16.bat
system ("HERest -C $dir\\config -I $dir\\phones1.mlf -t 250.0 150.0 1000.0 -m 2 -S $dir\\train.scp -T 1 -H $dir\\hmm7\\macros -H $dir\\hmm7\\hmmdefs -M $dir\\hmm8 $dir\\monophones1 > blah.txt");

# 17.bat
system ("HERest -C $dir\\config -I $dir\\phones1.mlf -t 250.0 150.0 1000.0 -m 2 -S $dir\\train.scp -T 1 -H $dir\\hmm8\\macros -H $dir\\hmm8\\hmmdefs -M $dir\\hmm9 $dir\\monophones1 > blah.txt");

print "DONE";