home *** CD-ROM | disk | FTP | other *** search
/ Pegasus Win & OS/2 Edition / Pegasus_Win_OS2.iso / os2 / util_ae / atmfinst.cmd < prev    next >
Encoding:
Text File  |  1992-02-25  |  408 b   |  11 lines
  1. /* ATM Font Installer for 6.167 */
  2. /* Chuck Badrow                       */
  3. say "Enter ATM font name to be installed: "
  4. fontname=linein()
  5. "COPY A:"fontname".AFM C:\OS2APPL\ATMFONTS"
  6. "COPY A:"fontname".PFB C:\OS2APPL\ATMFONTS"
  7. call RxFuncAdd 'SysLoadFuncs' , 'RexxUtil' , 'SysLoadFuncs'
  8. call SysLoadFuncs
  9. call SysIni "USER" , "PM_Fonts" , fontname".AFM" , "\OS2APPL\ATMFONTS\"fontname".AFM "
  10. "EXIT"
  11.