home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 5 / Amiga Plus Sonderheft 1996 #5.iso / sonstiges / picview20 / rexx / slideshow.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1986-07-07  |  424 b   |  22 lines
  1. /****************************************************/
  2. /* SlideShow.rexx $VER: 1.0 (25.03.96)  for PicView */
  3. /* (C) 1996 Holger Papajewski    papa@ami.boerde.de */
  4. /****************************************************/
  5.  
  6. OPTIONS RESULTS
  7. ADDRESS "PICVIEW.1"
  8.  
  9. GETNEXTSELECT START
  10. num = result
  11. DO WHILE num ~= -1
  12.  
  13.   SHOWPIC num TIMEOUT 15
  14.   IF result == 0 THEN DO
  15.     GETNEXTSELECT
  16.     num = result
  17.   END
  18.   ELSE num = -1
  19.  
  20. END
  21.  
  22.