home *** CD-ROM | disk | FTP | other *** search
/ TopWare 18: Liquid / Image.iso / liquid / top1136 / gifv.slo < prev    next >
Text File  |  1993-10-05  |  968b  |  35 lines
  1. ;
  2. ; GIFV.SLO
  3. ; This file demonstrates the usage of the Res+ , Res- , Center,
  4. ; Res-Lock, Res-UnLock, Res, Res-Up and Res-Down functions.
  5. ;
  6. ; Each picture will load with a resolution higher than the previous
  7. ; one until the maximum resolution is reached! After the last file is
  8. ; displayed the files are then displayed in reverse order with the
  9. ; resolution going down.
  10. ;
  11. ; NOTE: In the first pass where the files are displayed with
  12. ;       increasing resolution, each picture is increased in
  13. ;       resolution on the screen a couple of times, and then
  14. ;       decreased a couple of resolutions. Then finally the picture
  15. ;       is centered, before continuing on.
  16. ;
  17.         change-path *.gif
  18.         res 1
  19.         res-lock
  20. :loop
  21.         loadnext :next
  22.         res+
  23.         res+
  24.         res-
  25.         res-
  26.         center
  27.         res-up
  28.         goto     :loop
  29. :next
  30.         loadprev :exit
  31.         res-down
  32.         goto     :next
  33. :exit
  34.  
  35.