home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / TC4OS22.ZIP / TEST.C < prev    next >
Text File  |  1989-02-24  |  749b  |  30 lines
  1. #include <dos.h>
  2. #include <stdlib.h>
  3. #include <stdio.h>
  4. #include "os2vio.h"
  5.  
  6.  
  7. int attr = 0x0a20;
  8.  
  9. void main(int argc, char *argv[])
  10. /**********************************************************************
  11. /*                                                                    *
  12. **********************************************************************/
  13. {
  14. int x, y;
  15. char wstr[128];
  16.  
  17. VioScrollDn(0, 0, -1, -1, -1, &attr, 0);
  18. for (x = 0; x < argc; x++)
  19.   {
  20.   y = sprintf(wstr, "%u : %s", x, argv[x]);
  21.   VioWrtCharStr(wstr, y, x, 0, 0);
  22.   }
  23.  
  24. y = sprintf(wstr, "COMSPEC = %s", getenv("COMSPEC"));
  25. VioWrtCharStr(wstr, y, x++, 0, 0);
  26. y = sprintf(wstr, "SHELL = %s", getenv("SHELL"));
  27. VioWrtCharStr(wstr, y, x++, 0, 0);
  28. _exit(0);
  29. }
  30.