--== Propertise by asri ==-- --== Copyright 2002-2008 ==-- --== neraka Inc ® ==-- --== Htt//nerakaInc.tripod.com ==-- alias nfo { /msg $active 7º14¤ 4H14ttp://4N14eraka4I14nc.4T14ripod.4C14om 14¤7º /msg $active 13S y s t e m  I n f o r m a t i o n14 ~> /msg $active 12• 10:11-0:11-10:14(13OS14) $dll($mircdirsystem\moo.dll,osinfo,_) 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13UpTime14) $dll($mircdirsystem\moo.dll,uptime,_) / $OStime 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13CPU Type14) $dll($mircdirsystem\moo.dll,cpuinfo,_) 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13Free CPU Speed14) $CPUspd 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13CPU Vendor14) $getInfo(getCPUVendor) x86 processor(s) 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13Display Adapters14) $Shwvga $dll($mircdirsystem\moo.dll,screeninfo,_) 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13Total Free Ram Speed14) $fram 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13Free Space Available14) $frespc 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13Connection Type14) $dll($mircdirsystem\moo.dll,connection,_) 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13Network Adapters14) $dll($mircdirsystem\moo.dll,interfaceinfo,_) 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13@ Power14) $power 10:11-0:11-10: 12• /msg $active 12• 10:11-0:11-10:14(13Exe Installed14) $mircexe / loaded script $script(0) 10:11-0:11-10: 12• } Alias CPUspd { Var %protest = $ticks , %i = 1 | :start | If ($calc($ticks - %protest) <= 100) { .inc %i | .goto Start } | :end | .return $round($calc(%i * 0.7543242),2) $+ Mhz } Alias Frespc { Var %hC = $round($calc(($disk(c).free)/1048576), 2), %hD = $round($calc(($disk(d).free)/1048576), 2), %hE = $round($calc(($disk(e).free)/1048576), 2), %hF = $round($calc(($disk(f).free)/1048576), 2), %hG = $round($calc(($disk(g).free)/1048576), 2), %hH = $round($calc(($disk(h).free)/1048576), 2), %h3 = $calc(%hF + %hG), %h5 = $calc(%h3 + %hH), %h5 = $calc(%h5 + %hE), %h1 = $calc(%hC + %hD), %hd = $calc(%h1 + %h5) .return C:\ $round($calc(($disk(c).free)/1048576), 2) $+ MB D:\ $round($calc(($disk(d).free)/1048576), 2) $+ MB E:\ $round($calc(($disk(e).free)/1048576), 2) $+ MB F:\ $round($calc(($disk(f).free)/1048576), 2) $+ MB G:\ $round($calc(($disk(g).free)/1048576), 2) $+ MB H:\ $round($calc(($disk(h).free)/1048576), 2) $+ MB Total: %hd $+ MB } Alias OStime { .return $int($calc($calc( $ticks /1000)/3600)) Hours, $calc($int($calc($calc( $ticks /1000)/60))-($calc($int($calc($calc( $ticks /1000)/3600))*60))) Minutes And $calc($calc( $ticks /1000)-($calc($calc($int($calc($calc( $ticks /1000)/60))*60)))) Secs } alias ram { .return $int($calc($getInfo(getPhysicalRAMTotal)/1024/1024+1)) $+ Mb RAM } alias fram { .return $int($calc($getInfo(getPhysicalRAMTotal)/1024/1024+1)) $+ Mb Ram $& ( $+ $int($calc($getInfo(getPhysicalRAMAvailable)/1024/1024+1)) $& $+ MB available, or $& $calc(100 - $getInfo(getPhysicalRAMLoad)) $+ % $+ ) RAM } alias getInfo { .return $dll($mircdirsystem\winstats.dll, getInfo, $1) } Alias Shwvga { .return $readini C:\windows\system.ini Boot.description Display.drv With A $window(-1).w $+ X $+ $window(-1).h Resolution } alias power { var %a = 1 , %b = 0 , %c = 0 , %d = 0 while (%a <= $chan(0)) { if ($me isop $chan(%a)) { inc %b inc %c $nick($chan(%a),0,a,o) inc %d $calc($nick($chan(%a),0) - 1) } inc %a } return opped in %b $+ / $+ $chan(0) $chr(40) $+ $iif((%b == 0) || ($chan(0) == 0),0,$round($calc((%b / $chan(0)) * 100),2)) $+ $chr(37) $+ $chr(41) channels, power over %c $+ / $+ %d $chr(40) $+ $iif((%c == 0) && (%d == 0),0,$round($calc((%c / %d) * 100),2)) $+ $chr(37) $+ $chr(41) users.. }