home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d4xx / d457 / quickreq.lha / QuickReq / Examples / TestScript < prev    next >
Encoding:
Text File  |  1991-02-14  |  843 b   |  30 lines
  1. .K ""
  2. QuickReq "This is TestScript-example!\\Please press OK!-button when ready to continue!" "  OK  " -W300H100
  3. Echo "That was one good example where you can use QuickReq."
  4. Echo "You can use it to show fairly long text files and let programs"
  5. Echo "execution wait for users response!"
  6. Echo "Also this slow Echo-sequence could have been avoided with"
  7. Echo "just one QuickReq-call."
  8.  
  9. Lab Jump1
  10.  
  11. QuickReq "Now press either buttons!" " OK! " "  FALSE!  " -W300H100CB
  12. If WARN
  13.     Echo "You pressed FALSE! - button."
  14.     Echo ""
  15. Else
  16.     Echo "You pressed OK! - button."
  17.     Echo ""
  18. Endif
  19.  
  20. QuickReq "Do you want to try again!" " Yes " " No "
  21. If WARN
  22.     Echo "It's so easy to make intuitive scripts!!!"
  23.     Echo "Thank you for your time!"
  24.     Echo ""
  25.     Echo "Bye"
  26.     Echo ""
  27. Else
  28.     Echo "Thanks for you co-operation!"
  29.     Skip Back Jump1
  30. Endif