home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 5 / ctrom5b.zip / ctrom5b / PROGRAM / DIVERSEN / TIPI2A / ENVTEST.TPI < prev    next >
Text File  |  1994-09-29  |  225b  |  15 lines
  1. # ENVTEST.TPI by Kent Peterson 9/29/94
  2.  
  3. | This program displays the current DOS environment.
  4. |
  5.  
  6. define wait
  7.  begin key until
  8. enddef
  9.  
  10. 0
  11. begin
  12.  1 + dup env$
  13.  len if print$ cr
  14.      else wait drop$ bye endif
  15. 0 until