home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / util / cli / dosk / commands / breakk < prev    next >
Encoding:
Text File  |  1995-01-04  |  425 b   |  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.