home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / util / dosk-1.0.lha / DosK / Commands / MakedirK < prev    next >
Text File  |  1995-01-04  |  480b  |  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.