JPRED-2 Initial commit of software for the Jpred website (some files excluded due...

[jpred.git] / websoft / bin / blc2ps

diff --git a/websoft/bin/blc2ps b/websoft/bin/blc2ps
new file mode 100755 (executable)
index 0000000..e466ac9
--- /dev/null
+++ b/websoft/bin/blc2ps
@@ -0,0 +1,24 @@
+#!/usr/bin/perl
+
+# Generates PS from a blc file (generally made by concise2blc)
+
+use strict;
+use warnings;
+use Getopt::Long;
+
+use Jpred;
+
+my ($in, $out, $ps);
+GetOptions(
+       "in=s" => \$in,
+       "out=s" => \$out,
+       "postscript=s" => \$ps
+);
+
+die "No input BLC file given\n" unless defined $in;
+die "No output path given\n" unless defined $out;
+die "No PostScript output path given\n" unless defined $ps;
+
+#xsystem("$BINDIR/prettify -f $in -prefix $out -ignore 2");
+xsystem("$BINDIR/prettify.pl --blc $in --alscript $out --postscript $ps");
+xsystem("$BINDIR/alscript -f $out");