home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a120 / 1.ddi / WATCOM_C / WAT87.C < prev    next >
Encoding:
C/C++ Source or Header  |  1992-05-27  |  961 b   |  38 lines
  1. /*------------------------------------------------------------------*/
  2. /* ╡{ªí└╔ªW║┘: wat87.c                                              */
  3. /*------------------------------------------------------------------*/
  4. #include <stdio.h>
  5. #include <string.h>
  6. #include <dir.h>
  7. #include <dos.h>
  8.  
  9. #define CF 1  /* ╢iª∞║X╝╨ */
  10.  
  11. int chd(char directory[80])
  12. {
  13.  
  14.    struct REGPACK reg;
  15.    int ret_value;
  16.  
  17.    reg.r_ax = 0x3B << 8;         /* ▒N 3Bh ▓╛ª▄ AH */
  18.    reg.r_dx = FP_OFF(directory);
  19.    reg.r_ds = FP_SEG(directory);
  20.    intr(0x21, ®);
  21.  
  22.    /* ¡Yñ┴┤½Ñ╪┐²ª¿Ñ\½h╢╟ª^ 0; º_½h, ╢╟ª^ 1 */
  23.    return(reg.r_flags & CF ? 1 : 0);
  24. }
  25.  
  26. void main(int argc,char **argv)
  27. {
  28.    if(argc == 1)
  29.       printf("¿╧Ñ╬ñΦ¬k : WAT87 <║╧║╨Ñ╪┐²╕⌠«|ªW║┘>\n");
  30.    else if(argc == 2)
  31.         {
  32.           if(chd(argv[1]))
  33.              printf("╡L¬kñ┴┤½ª▄½ⁿ⌐wñºÑ╪┐²\n");
  34.           else
  35.              printf("Ñ╪½e⌐╥ªbÑ╪┐²¼░ : %s\n", getcwd(argv[1],80));
  36.         }
  37. }
  38.