All pastes #913370 Raw Edit

Stuff

public text v1 · immutable
·published 2008-02-22 00:23 UTC
rendered paste body
/spacep {
  var %gigabytes = 1073741824
  var %driveletter = 67
  while (%driveletter <= 90) {
    if ($disk($chr(%driveletter)).type == fixed || $disk($chr(%driveletter)).type == removable) {
      var %free = $round($calc($disk($chr(%driveletter)).free / %gigabytes),2)
      var %size = $round($calc($disk($chr(%driveletter)).size / %gigabytes),2)
      var %hdfree = $calc( %hdfree + %free )
      var %hdsize = $calc( %hdsize + %size )
      var %hdreport = %hdreport ( $+ $chr(%driveletter) $+ : %free $+ / $+ %size GB $+ ) $+ $chr(32)
    }
    inc %driveletter
  }
  var %hdfreepercent = $round($calc(%hdfree / %hdsize * 100),1)
  msg $iif($1,$1,$active) HDD Space: %hdreport [Total Free: %hdfree GB %hdfreepercent $+ % of %hdsize GB]
}