# This script fixes the Wadalab fonts which have been created with the # `makefont' script of the CJK package version 4.5.1 or earlier. # # It converts all PFB files in the current directory. for i in *.pfb; do echo $i mv $i $i.old cat $i.old | \ t1disasm | \ awk ' { sub(/001\.001/, "001.002") if (/%%Creation/) { print "%%CreationDate: 2003-Feb-07" next } if (/0 -160 rmoveto/ && last_is_hsbw) { last_is_hsbw = 0 next } if (/hsbw/) { last_is_hsbw = 1 waiting_for_Xmoveto = 1 } else last_is_hsbw = 0 if (waiting_for_Xmoveto) { if (/rmoveto/) { printf "\t%d %d rmoveto\n", $1, $2 - 160 waiting_for_Xmoveto = 0 next } else if (/vmoveto/) { printf "\t%d vmoveto\n", $1 - 160 waiting_for_Xmoveto = 0 next } else if (/hmoveto/) { printf "\t%d %d rmoveto\n", $1, -160 waiting_for_Xmoveto = 0 next } } if (/moveto/) print "\tclosepath" if (/hstem/) { printf "\t%d %d hstem\n", $1 - 160, $2 next } print } ' | \ t1asm > $i rm $i.old done