home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / fish / disks / d1049.lha / Programs / DOSReqTools / demo.rtEZRequest < prev    next >
Encoding:
Text File  |  1994-11-27  |  509 b   |  31 lines
  1. ;demo.rtEZRequest
  2.  
  3. LAB MAIN
  4. rtEZrequest "rtEZRequest" "Would you like to see a picture?\nSelect the Viewer:" "Multiview|VT|Another|Cancel"
  5. SET Result $RC
  6. if $result eq 1
  7. sys:utilities/multiview demo.pic
  8. endif
  9.  
  10. if $result eq 2
  11.  run >nil: VT demo.pic
  12. endif
  13.  
  14. if $result eq 3
  15.  rtGetString "Viewer Select" "Please enter the name of your viewer.\nInclude the Path if necessary" TO ENV:name
  16.  SET Result $RC
  17.  
  18.   IF $Result EQ 1
  19.     $name demo.pic
  20.   ELSE
  21.     skip back main
  22.   ENDIF
  23.  
  24. endif
  25.  
  26.  
  27. execute demo.version
  28.  
  29. Quit
  30.  
  31.