home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / util / cli / dosk / commands / makedirk < prev    next >
Encoding:
Text File  |  1995-01-04  |  480 b   |  22 lines
  1. failat 21
  2. lab start
  3. requestfile >env:DR title="TYPE DIRECTORY NAME ON BOTTOM LINE"
  4. REQUESTCHOICE >ENV:CHO "MakedirK ©December 1994 By Kenneth J. McCormick. All Rights Reserved." "Select Option" "DOIT" "ABORT" "BYE"
  5.    IF $CHO EQ "0"
  6.       SKIP DONE
  7.    ENDIF
  8.    IF $CHO EQ "1"
  9.       UNSET CHO
  10.       makedir $DR
  11.       IF EXISTS $DR
  12.          ECHO "DIRECTORY CREATED"
  13.        else
  14.          ECHO "DIRECTORY NOT CREATED"
  15.       ENDIF
  16.    ENDIF
  17. SKIP START BACK
  18. LAB DONE
  19. UNSET DR
  20. UNSET CHO
  21.  
  22.