home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / util / dosk-1.0.lha / DosK / Commands / BreakK < prev    next >
Text File  |  1995-01-04  |  425b  |  19 lines
  1. FAILAT 21
  2. LAB START
  3. REQUESTCHOICE >ENV:CHO "BreakK ©January 1995 By Kenneth J. McCormick. All Rights Reserved." "Choice Please" "STATUS" "BREAK" "BYE"
  4.  IF $CHO EQ "0"
  5.    SKIP FIN
  6.  ENDIF
  7.  IF $CHO EQ "1"
  8.    STATUS >RAM:TEMPSTAT
  9.    SYS:UTILITIES/MULTIVIEW RAM:TEMPSTAT
  10.  ENDIF
  11.  IF $CHO EQ "2"
  12.      REQUESTFILE >ENV:FILE TITLE="TYPE COMM NUM ON FILE LINE"
  13.       break $file
  14.  ENDIF
  15.  SKIP BACK START
  16.  LAB FIN
  17.  UNSET CHO
  18.  UNSET FILE
  19.