Для этого нам понадобиться библиотека moo.dll и немного терпения. Сохраняем её в корневую папку mIRC-a, после чего открЫваем мирк, жмем зоветную комбинацию клавиш Alt+R и в сриптах сохраняем:

Код:
 ;####################################Системная Инфа#################################
alias stat {
  set %rb_size 10
  rambar
  say 12На моем компе стоит 4[ $+ $dll(moo.dll,osinfo,_) $+ ]  12Комп уже работает 4[ $+ $uptime(system,1) $+ ]  12Камень 4[ $+ $dll(moo.dll,cpuinfo,_) $+ ] 12Оперативки 4[ $+ $dll(moo.dll,meminfo,_) $+ $result $+ ]
}

alias connstat { say 12ЙА_онлайн 4[ $+ $dll(moo.dll,connection,_) $+ ] }
alias connstatself { echo -a *** 12ЙА_онлайн 4[ $+ $dll(moo.dll,connection,_) $+ ] }
alias screenstat { say 12ЙА_пялюсь в монег 4[ $+ $dll(moo.dll,screeninfo,_) $+ ] }
alias screenstatself { echo -a *** 12ЙА_пялюсь в монитор 4[ $+ $dll(moo.dll,screeninfo,_) $+ ] }

alias statself {
  set %rb_size 10
  rambar
  echo -a *** 12На моем компе стоит 4[ $+ $dll(moo.dll,osinfo,_) $+ ]  12Комп уже работает 4[ $+ $uptime(system,1) $+ ]  12Камень 4[ $+ $dll(moo.dll,cpuinfo,_) $+ ] 12Оперативки [ $+ $dll(moo.dll,meminfo,_) $+ $result $+ ]
}
alias uptime say 12ЙА_сижу под4 :: $+ $dll(moo.dll,osinfo,_) 12И мой комп не вЫрубаетцо4 - $uptime(system,1)
alias uptimeself echo -a *** 12ЙА_сижу под4 :: $+ $dll(moo.dll,osinfo,_) 12И мой комп не вЫрубаетцо4 - $uptime(system,1)

alias rambar {
  if ( %rb_size == 0 ) { return }
  set %rb_used $round($calc($dll(moo.dll,rambar,_) / 100 * %rb_size),0)
  set %rb_unused $round($calc(%rb_size - %rb_used),0)
  set %rb_usedstr $str(|,%rb_used)
  set %rb_unusedstr $str(-,%rb_unused)
  return  [ $+ %rb_usedstr $+ %rb_unusedstr $+ ]
}
alias gfx {
  if ($dll(moo.dll,gfxinfo,_) == -1) {
    moodll.error Could not find GFX card info in registry
  }
  else {
    say 12Видяхо 4[ $+ $dll(moo.dll,gfxinfo,_) $+ ]
  }
}
alias ni {
  say 12СетевЫе подключения 4[ $+ $dll(moo.dll,interfaceinfo,_) $+ ]
}
alias niself {
  echo -a *** 12СетевЫе подключения 4[ $+ $dll(moo.dll,interfaceinfo,_) $+ ]
}
alias hdd {
  :count
  inc %hdd.num
  if ( %hdd.num == $disk(0) )  { say 12Жоский диск: $replace(%hdd.total,GB,$+(GB,4,|,)) Total: $bytes(%hdd.total.size) $+ / $+ $bytes(%hdd.total.free).suf | unset %hdd.total | unset %hdd.total.size | unset %hdd.total.free | unset %hdd.num | halt }
  elseif ( $disk(%hdd.num).type != fixed ) { goto count | halt }
  else { set %hdd.total %hdd.total $+ $remove($disk(%hdd.num).path,\) $+ $bytes($disk(%hdd.num).size) $+ / $+ $bytes($disk(%hdd.num).free).suf  | set %hdd.total.free $calc(%hdd.total.free + $disk(%hdd.num).free ) | set %hdd.total.size $calc(%hdd.total.size + $disk(%hdd.num).size ) | goto count }
}

alias hddself {
  unset %hdd.*
  :count
  inc %hdd.num
  if ( %hdd.num == $disk(0) )  { echo -a 12Жоский диск: $replace(%hdd.total,GB,$+(GB,4,|,)) Total: $bytes(%hdd.total.size) $+ / $+ $bytes(%hdd.total.free).suf | unset %hdd.* | halt }
  elseif ( $disk(%hdd.num).type != fixed ) { goto count | halt }
  else { set %hdd.total %hdd.total $+ $remove($disk(%hdd.num).path,\) $+ $bytes($disk(%hdd.num).size) $+ / $+ $bytes($disk(%hdd.num).free).suf  | set %hdd.total.free $calc(%hdd.total.free + $disk(%hdd.num).free ) | set %hdd.total.size $calc(%hdd.total.size + $disk(%hdd.num).size ) | goto count }
}


alias gfxself {
  if ($dll(moo.dll,gfxinfo,_) == -1) {
    moodll.error Could not find GFX card info in registry
  }
  else {
    echo -a *** 12Видяхо [ $+ $dll(moo.dll,gfxinfo,_) $+ ]
  }
}

Потом лезем во вкладку Менюшки, жмем Вид-Канал и там пишем:

Систем.инфа
.Сказать всем
..OS,CPU,MEM:stat
..Онлайн стат:connstat
..Монитор:screenstat
..ОС аптайм:uptime
..Видяха:gfx
..Подключения:ni
..Жоский:hdd
.Сказать себе
..OS,CPU,MEM:statself
..Онлайн стат:connstatself
..Монитор:screenstatself
..ОС аптайм:uptimeself
..Видяха:gfxself
..Подключения:niself
..Жоский:hddself

Все это дело сохраняем. После чего по каналу щелкаем правой кнопкой мЫшки и вЫбираем Систем.инфа и там щелкаем по тому что хочем показать :)