home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / basic / library / qb_pds / quicksub / delay.sub < prev    next >
Text File  |  1986-06-12  |  512b  |  13 lines

  1. ' DELAY.SUB -- MSDOS QuickBASIC subroutine to provide a time delay that
  2. '              correlates with the variable, DLY; e.g. entering the 
  3. '              subroutine with DLY = 7 should delay 7 seconds.  This is 
  4. '              machine dependent -- the factor 1585 works for my 8 mhz
  5. '              speed and a V20. Experiment and adjust the factor for 
  6. '              your system.
  7.  
  8.   '| Time Delay Subroutine
  9. DELAY:
  10.     FOR T  =  1 TO DLY * 1585 : NEXT T
  11.  
  12. RETURN
  13.