home *** CD-ROM | disk | FTP | other *** search
/ Mega Top 1 / os2_top1.zip / os2_top1 / APPS / TEKST / DVIPS / EMTEX / MAKETEXP.CMD < prev    next >
OS/2 REXX Batch file  |  1993-04-12  |  1KB  |  52 lines
  1. @echo off
  2. REM 
  3. REM    This command file makes a new TeX PK font, because one wasn't
  4. REM    found.  Parameters are:
  5. REM 
  6. REM    name dpi bdpi magnification [mode]
  7. REM 
  8. REM    `name' is the name of the font, such as `cmr10'.  `dpi' is
  9. REM    the resolution the font is needed at.  `bdpi' is the base
  10. REM    resolution, useful for figuring out the mode to make the font
  11. REM    in.  `magnification' is a string to pass to MF as the
  12. REM    magnification.  `mode', if supplied, is the mode to use.
  13. REM 
  14. REM    This command file just creates a mfjob file and runs mfjob.
  15. REM 
  16.  
  17. REM NAME=%1 DPI=%2 BDPI=%3 MAG=%4 MODE=%5
  18.  
  19. if exist dvips.mfj  goto :second
  20. echo %% dvips.mfj - created by dvips > dvips.mfj
  21. echo input [modes]; >> dvips.mfj
  22. echo Created dvips.mfj
  23.  
  24. :second
  25. echo { >> dvips.mfj
  26. echo base=plain; >> dvips.mfj
  27. echo font=%1; >> dvips.mfj
  28. echo mag=%4;  >> dvips.mfj
  29.  
  30. if "%5" == ""  goto :nomode
  31. if "%5" == "imagen"  goto :hpmode
  32. if "%5" == "hplaser"  goto :hpmode
  33.  
  34. :goodmode
  35. echo mode=%5[%3]; >> dvips.mfj
  36. echo output=pk[%dvidrvfonts%\%5\@Rrdpi\@f]; >> dvips.mfj
  37. goto :donemode
  38.  
  39. :hpmode
  40. echo mode=hplaser[%3]; >> dvips.mfj
  41. echo output=pk[%dvidrvfonts%\pixel.lj\@Rrdpi\@f]; >> dvips.mfj
  42. goto :donemode
  43.  
  44. :nomode
  45. echo m; >> dvips.mfj
  46.  
  47. :donemode
  48. echo } >> dvips.mfj
  49.  
  50. mfjob dvips
  51. :exit 
  52.