home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / plogo100.zip / chnglogo.cmd < prev    next >
OS/2 REXX Batch file  |  1995-04-26  |  472b  |  17 lines

  1. /* CHNGLOGO.CMD - Change Warp Bootup Logo randomly */
  2.  
  3. /* Change this to the appropriate directory, but   */
  4. /* you MUST include the final backslash!           */
  5. LOGODIR = 'c:\boot-logos\'
  6.  
  7. /* Change this to whatever drive you boot from     */
  8. BOOTDRIVE = 'c:'
  9.  
  10. call RxFuncAdd "SysLoadFuncs", "RexxUtil", "SysLoadFuncs"
  11. call SysLoadFuncs
  12.  
  13. call SysFileTree LOGODIR'*.lgo', "logos.", "O"
  14.    i = random(1,logos.0)
  15.    'copy 'logos.i BOOTDRIVE'\os2logo'
  16. exit
  17.