Untitled

    if ($2 == info) {
      set %w 1 | set %ww 1
      while (%w <= $script(0)) { .set %lines $calc(%lines + $lines($script(%w))) | set %size $calc(%size + $file($script(%w)).size) | inc %w 1 }
      while (%ww <= $alias(0)) { .set %lines $calc(%lines + $lines($alias(%ww))) | set %size $calc(%size + $file($alias(%ww)).size) | inc %ww 1 }
      .msg $chan 10Loaded Scripts:07 $calc($script(0) + $alias(0)) 10Total Lines of Code:07 $bytes(%lines,b) 10Total File Size:07 $bytes(%size,b) Bytes - $bytes(%size,k).suf - $bytes(%size,m).suf | unset %lines | unset %size
    }