home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 19 / CD_ASCQ_19_010295.iso / vrac_os2 / back_os2.zip / LOADBACK.CMD < prev    next >
OS/2 REXX Batch file  |  1994-11-23  |  376b  |  20 lines

  1. @echo off
  2. set mask=%1\*.bmp.gz
  3. set count=%@random[1,%@files[%mask]]
  4. set name=%@findfirst[%mask]
  5. :loop
  6. if %count == 1 goto load
  7. set name=%@findnext[%mask]
  8. set count=%@dec[%count]
  9. goto loop
  10. :load
  11. Echo Loading Bitmap %name ...
  12. gzip -d < %name > bitmap.bmp
  13. if errorlevel 1 goto end
  14. backgrnd %@full[bitmap.bmp]
  15. :end
  16. del bitmap.bmp
  17. set mask=
  18. set name=
  19. set count=
  20.