home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine 1995 / ARCHIVE95.iso / discs / shareware / share_37 / fontmenu / FntMnDemos / !KeyCaps / !Run next >
Text File  |  1990-11-22  |  312b  |  12 lines
  1. |!Run for KeyCaps
  2. IconSprites <Obey$Dir>.!Sprites  
  3.  
  4. If "<Font$Path>"="" Then Error 0 There are no fonts available.
  5.  
  6. RMEnsure FontMenu 1.11 RMLoad System:modules.FontMenu
  7. RMEnsure FontMenu 1.11 Error You need FontMenu 1.11 or later
  8.  
  9. Set KeyCaps$Dir <Obey$Dir>
  10. WimpSlot -min 16k -max 16k
  11. Run <Obey$Dir>.!RunImage
  12.