home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / comp / sys / amiga / programm / 18434 < prev    next >
Encoding:
Internet Message Format  |  1993-01-09  |  1.7 KB
  1. Path: sparky!uunet!munnari.oz.au!manuel.anu.edu.au!sserve!prolix!prolix.apana.org.au!dac
  2. From: dac@prolix.apana.org.au (Andrew Clayton)
  3. Newsgroups: comp.sys.amiga.programmer
  4. Subject: Re: Arexx question HOW TO IMPLEMENT DELAY()
  5. Message-ID: <CTugs*mV0@prolix.apana.org.au>
  6. Date: Fri, 08 Jan 1993 15:39:50 GMT
  7. References: <1993Jan7.071959.4572@sol.UVic.CA> <1993Jan8.032750.1849@latcs1.lat.oz.au>
  8. Organization: More like Dis~, really.
  9. X-Newsreader: Arn V1.00
  10. Lines: 46
  11.  
  12. In article <1993Jan8.032750.1849@latcs1.lat.oz.au>, James Burton version 1340 writes:
  13.  
  14. > >I have a simple question about Arexx... I want for my Arexx program to
  15. > >sit and wait for say 3 minutes or so, and then continue on with the program.
  16.  
  17. > >How do I get ARexx to do that without~r using up much processor time?
  18.  
  19. > >Aaron Ramsey
  20.  
  21. > Yes, I would be interested in this.
  22. > If you try to do the following
  23. > 'c:wait' 50
  24. > from an AREXX program, it does not wait.
  25.  
  26. The answer is here:
  27.  
  28.              --cut--------------------------------
  29. /*rexx*/
  30. if ~show('L','rexxsupport.library') then
  31.    call addlib('rexxsupport.library',0,-30)
  32.  
  33. say time()
  34. call delay(250) /*5 seconds*/
  35. say time()
  36.               --cut ------------------------------
  37.  
  38. testcon
  39. 01:39:12
  40. 01:39:17
  41.  
  42. > I suppose it backgrounds the shell task.
  43. > Can somebody please confirm this?
  44. > I find it extremely annoying.
  45.  
  46. This will do the delay that you seek.
  47.  
  48. Why it isn't in the Amiga doco, I don't know.  It's in the
  49. original Arexx release, and is part of the rexxsupport.library.
  50.  
  51. > James
  52.  
  53. Dac
  54. --
  55. dac@prolix.apana.org.au              David Andrew Clayton.           // _| _  _
  56. dac@prolix.sserve.cc.adfa.oz.au      Canberra, Australia           \X/ (_](_](_
  57.                     <Using ARN on an Amiga 4000. Yay!>
  58.