home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 499.lha / Rxgen_v1.0 / rexx / db.rexx < prev    next >
OS/2 REXX Batch file  |  1991-04-08  |  325b  |  12 lines
  1. /* AREXX program */
  2. LIBS.intuition = '00 00 00 00'x
  3. LIBS.intuition.OPENCOUNT = 0
  4. LIBS.intuition.DisplayBeep='FFA0'x||I||'2009'x
  5.  
  6. if ~show('L','rxgen.library') then call addlib('rxgen.library',0,-30,0)
  7.  
  8. /* no fuss here */
  9. call GenOpenLib("intuition",0)
  10. call GenACall("intuition","DisplayBeep",0)
  11. call GenCloseLib("intuition")
  12.