home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / util / dosk-1.0.lha / DosK / Commands / AvailK < prev    next >
Text File  |  1995-01-04  |  984b  |  46 lines
  1. failat 21
  2. alias rq requestchoice
  3. LAB MORE
  4. rq >env:ans "AvailK ©November 1994 By Kenneth J. McCormick. All Rights Reserved." "SELECT A BUTTON" "CHIP" "FAST" "AVAIL" "FLUSH" "BYE"
  5. ENDIF
  6. IF $ANS EQ "1"
  7. AVAIL chip >RAM:AVAILBALE_CHIP_MEMORY
  8. SYS:UTILITIES/MULTIVIEW RAM:AVAILBALE_CHIP_MEMORY
  9. ENDIF
  10. IF $ANS EQ "2"
  11. AVAIL fast >RAM:AVAILABLE_FAST_MEMORY
  12. SYS:UTILITIES/MULTIVIEW RAM:AVAILABLE_FAST_MEMORY
  13. ENDIF
  14. IF $ANS EQ "3"
  15. AVAIL >RAM:AVAILABLE_TOTAL_MEMORY
  16. SYS:UTILITIES/MULTIVIEW RAM:AVAILABLE_TOTAL_MEMORY
  17. ENDIF
  18. IF $ANS EQ "4"
  19.    AVAIL FLUSH >ram:FLUSHED_MEMORY
  20.    SYS:UTILITIES/MULTIVIEW RAM:FLUSHED_MEMORY
  21. ENDIF
  22. IF $ANS EQ "0"
  23. SKIP DONE
  24. ENDIF
  25. SKIP MORE BACK
  26. LAB DONE
  27. IF EXISTS RAM:AVAILBALE_CHIP_MEMORY
  28. delete RAM:AVAILBALE_CHIP_MEMORY QUIET
  29. ENDIF
  30. IF EXISTS RAM:AVAILABLE_FAST_MEMORY
  31. DELETE RAM:AVAILABLE_FAST_MEMORY QUIET
  32. ENDIF
  33. IF EXISTS RAM:AVAILABLE_TOTAL_MEMORY
  34. DELETE RAM:AVAILABLE_TOTAL_MEMORY QUIET
  35. ENDIF
  36. IF EXISTS RAM:FLUSHED_MEMORY
  37. DELETE RAM:FLUSHED_MEMORY QUIET
  38. ENDIF
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.