home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 63 / CDACTUAL63.iso / Aplicaciones / DarkBasic / DemoDarkBasic.exe / help / examples / flow / exam15.dba < prev    next >
Encoding:
Text File  |  2000-01-25  |  685 b   |  24 lines

  1. Rem * Title  : WAIT Command
  2. Rem * Author : DBS-MB
  3. Rem * Date   : 1st January 2000
  4. rem ===========================================================
  5. rem DARK BASIC EXAMPLE PROGRAM 15
  6. rem ===========================================================
  7. rem This program will show you how to use the wait command
  8. rem -----------------------------------------------------------
  9.  
  10. rem Set the ink to white and paper color to black 
  11. ink rgb(244,214,210),1
  12.     
  13. print "please type how long you what your computer to wait for"
  14. print "in seconds"
  15. input a
  16. print "thank you"
  17. print "I`M GOING TO WAIT NOW FOR ",a," SECONDS" 
  18. wait (a*1000)
  19. print "I`M BACK NOW"
  20.  
  21. rem End of program
  22. end
  23.  
  24.