home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / util / dosk-1.0.lha / DosK / Commands / CmdK < prev    next >
Text File  |  1995-01-04  |  871b  |  34 lines
  1. failat 21
  2. lab start
  3. requestfile >env:file1 title="SELECT FILE TO CMD COPY"
  4. REQUESTFILE >ENV:FILE2 TITLE="SELECT NEW FILE NAME"
  5. requestchoice >env:cho "CmdK ©December 1994 By Kenneth J. McCormick. All Rights Reserved." "Select Option" "BASIC" "NOTIFICATIONS" "HELP" "NOTIFICATIONS & HELP" "SKIP" "BYE"
  6.    IF $CHO EQ "0"
  7.       SKIP DONE
  8.    ENDIF
  9.    IF $CHO EQ "1"
  10.       RUN cmd parallel $file2
  11.       COPY FROM $FILE1 TO PRT:
  12.    ENDIF
  13.    IF $CHO EQ "2"
  14.       RUN cmd parallel $file2 n
  15.       COPY FROM $FILE1 TO PRT:
  16.    ENDIF
  17.    IF $CHO EQ "3"
  18.       RUN cmd parallel $file2 help
  19.       COPY FROM $FILE1 TO PRT:
  20.    ENDIF
  21.    IF $CHO EQ "4"
  22.       RUN cmd parallel $file2 N HELP
  23.       COPY FROM $FILE1 TO PRT:
  24.    ENDIF
  25.    IF $CHO EQ "5"
  26.       RUN cmd parallel $file2 S
  27.       COPY FROM $FILE1 TO PRT:
  28.    ENDIF
  29.    skip start back
  30. LAB DONE
  31. UNSETENV FILE1
  32. UNSETENV FILE2
  33. UNSETENV CHO
  34.