#!/bin/sh

cat $1 \
    | sed "s/^\/Courier-Italic/%\/Courier-Italic/g" \
    | sed "s/^\/Courier-BoldItalic/%\/Courier-BoldItalic/g" \
    | sed "s/^\([[:space:]]*3 -1 roll 1 sub 50 string cvs exch\)/%\1/g" \
    | sed "s/^\([[:space:]]*-29 add 7 rCT\)/%\1/g" \
    | sed "s/^\([[:space:]]*exch -29 add 7 rCT\)/%\1/g" \
    | sed "s/^\([[:space:]]*(0) exch -29 add 7 rCT\)/%\1/g" \
    | sed "s/^\([[:space:]]*-29 add -12 rCT\)/%\1/g" \
    | sed "s/^\([[:space:]]*(0) exch -29 add -12 rCT\)/%\1/g" \
    > $1.fix

pstoedit -f fig $1.fix $1.fog

cat $1.fog \
    | sed "s/ 0 2 0 / 0 1 0 /g" \
    > $1.fig