home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / monitr01.zip / monitord.cmd next >
OS/2 REXX Batch file  |  1999-02-22  |  568b  |  24 lines
  1. /* done by Nenad */
  2.  
  3. Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  4. Call SysLoadFuncs
  5.  
  6. Call RxFuncAdd 'StHealthLoadFuncs', 'StHealth', 'StHealthLoadFuncs'
  7. Call StHealthLoadFuncs
  8.  
  9. Call RxFuncAdd 'RT2LoadFuncs', 'Theseus0', 'RT2LoadFuncs'
  10. Call RT2LoadFuncs
  11.  
  12. do forever
  13.  
  14.   parse value RT2AnalyzeSwapper() with SwapUsed SwapFree
  15.   '@echo' format((SwapUsed+SwapFree)*4/1024,,)" ("format(SwapUsed*4/1024,,1)")"'> \pipe\swapmon'
  16.  
  17.   Call SysSleep(10)
  18.  
  19.   '@echo' format(StHealthValue(TEMP1),,1)"°C "'> \pipe\tempmon'
  20.  
  21.   Call SysSleep(50)
  22.  
  23. end
  24.