diff options
Diffstat (limited to 'Master/texmf-doc/doc/german/latex-tipps-und-tricks/mfpic.pl')
-rw-r--r-- | Master/texmf-doc/doc/german/latex-tipps-und-tricks/mfpic.pl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/Master/texmf-doc/doc/german/latex-tipps-und-tricks/mfpic.pl b/Master/texmf-doc/doc/german/latex-tipps-und-tricks/mfpic.pl new file mode 100644 index 00000000000..d96ed128b8a --- /dev/null +++ b/Master/texmf-doc/doc/german/latex-tipps-und-tricks/mfpic.pl @@ -0,0 +1,15 @@ +# +# mfpic.pl [-r <res>] [-m <mode>] <file> +# +use Getopt::Long; + +GetOptions("r=i", \$res, "m=s", \$mode); +$file = shift; +$res = 600 unless ($res>0); +$mode = "ljfour" unless ($mode); + +system("mf \\mode=$mode; input $file"); +system("gftopk $file.${res}gf $file.pk"); +system("copy $file.pk ". + "c:\\texmf\\fonts\\pk\\$mode". + "\\public\\misc\\dpi$res"); |