home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 4: Phase Four / 17Bit_Phase_Four.iso / files / 3197b.dms / 3197b.adf / ArexxExamples.lha / EP_AddUserPrg.dopus < prev    next >
Encoding:
Text File  |  1993-10-05  |  316 b   |  19 lines
  1. /* EaglePlayer - Lade angegebenes Userprogram rein */
  2.  
  3. parse arg userprgname
  4.  
  5. address 'rexx_EP'
  6.  
  7. options results
  8.  
  9. adduserprg userprgname
  10.  
  11. if result == "no" then do
  12.     address 'DOPUS.1'
  13.     toptext 'Eagleplayer: Userprogram not loaded !'
  14. end
  15. else do
  16.     address 'DOPUS.1'
  17.     toptext 'Eagleplayer: New Userprogram loaded !'
  18. end
  19.