#!/bin/sh
#unalias rm

rm -f *.tmpplot*

PFILE=plot.fig
FILE=tmp.plot
echo $FILE
rm -f $FILE
#echo set term postscript eps monochrome dashed \"Times-Roman\" 24 > $FILE
#echo set term postscript eps color solid > $FILE
echo set term fig color fontsize 10 big landscape > $FILE
echo set output \"$PFILE\" >> $FILE


#echo set term x11 > $FILE
#echo set grid >> $FILE 
STYLE=$1
echo set xlabel \"$2\" >> $FILE 
echo set ylabel \"$3\" >> $FILE

#echo set xrange \[14200:14550\] >> $FILE
#echo set xrange \[100:20000\] >> $FILE
#echo set xrange \[4200:4600\] >> $FILE
echo set xrange \[100:400\] >> $FILE
#echo set xrange \[1600:2000\] >> $FILE
# echo set boxwidth 0.4 >> $FILE

#echo set logscale x >> $FILE
echo -n plot >> $FILE


PAR1=$2
PAR2=$3
NAME=A

shift
shift
shift    

pt=1
lt=1

for i in $* ; do
    echo $i ;
    echo $NAME
    grep -A 1 $PAR1 $i | grep -v "\-\-" | grep -v "#" > $i.tmpplot.x ;
    grep -A 1 $PAR2 $i | grep -v "\-\-" | grep -v "#" > $i.tmpplot.y ;
    paste $i.tmpplot.x $i.tmpplot.y > $i.tmpplot ;
    if test $i != $1 ; then echo -n ", ">>$FILE; fi
#    echo -n " "\"$i.tmpplot\"  title \"$NAME\" with $STYLE" " lt $pt >>$FILE ;
    echo -n " "\"$i.tmpplot\"  title \"$i\" with $STYLE" " lt $pt >>$FILE ;
    YPLOT="$YPLOT $i.tmpplot.y";
    case $NAME in
    A) NAME=B;;
    B) NAME=C;;
    C) NAME=D;;
    D) NAME=E;;
    E) NAME=F;;
    F) NAME=G;;
    G) NAME=H;;
    H) NAME=I;;
    I) NAME=J;;
    J) NAME=K;;
    K) NAME=L;;
    L) NAME=M;;
    M) NAME=N;;
    N) NAME=O;;
    esac;
    let pt=$pt+1;
done ;
echo >> $FILE
paste $1.tmpplot.x $YPLOT | grep -v "#"

cat $FILE
gnuplot $FILE 
rm -f $FILE
rm -f *.tmpplot*