on 1:LOAD:{ 
  if ( $readini(defnfo.ini, nfo, version) != 1.0.6 ) { writeini defnfo.ini nfo version 1.0.6 } 
  if ( $readini(defnfo.ini, nfo, c1) == $null ) { writeini defnfo.ini nfo c1 15 } 
  if ( $readini(defnfo.ini, nfo, c2) == $null ) { writeini defnfo.ini nfo c2 10 } 
  if ( $readini(defnfo.ini, nfo, ftplettre) == $null ) { writeini defnfo.ini nfo ftplettre c } 
  if ( $readini(defnfo.ini, nfo, sound) == $null ) { writeini defnfo.ini nfo sound Not Configured } 
  if ( $readini(defnfo.ini, nfo, gf) == $null ) { writeini defnfo.ini nfo gf Not Configured } 
  if ( $readini(defnfo.ini, nfo, mon) == $null ) { writeini defnfo.ini nfo mon Not Configured } 
  ./TimerUptime -oi 0 60 uptimer 
} 
on 1:UNLOAD:{ 
} 
on *:START: ./TimerUptime -oi 0 60 uptimer 
menu Channel,status,menubar,query { 
  NfO System 
  .V $readini(defnfo.ini, nfo, version):run http://www.defcode.org 
  .- 
  .InVisible 
  ..BiG-ONE: set %defnfosh echo | nstats 
  ..Stats: set %defnfosh echo | nfo 
  ..Operating System: set %defnfosh echo | sys 
  ..UpTime: set %defnfosh echo | uptime 
  ..MeM: set %defnfosh echo | mem 
  ..CpU: set %defnfosh echo | cpu 
  ..Free FTP Space: set %defnfosh echo | ftp 
  ..Free Space: set %defnfosh echo | hdd 
  ..Dialup: set %defnfosh echo | dialup 
  ..Display: set %defnfosh echo | display 
  ..Network: set %defnfosh echo | net 
  ..Sound Card: set %defnfosh echo | sound 
  ..MBM5(Must Be Installed): set %defnfosh echo | mbm 
  ..Bandwidth: set %defnfosh echo | du 
  ..Get-Send: set %defnfosh echo | gs 
  ..Power: set %defnfosh echo | powa 
  ..Servers: set %defnfosh echo | srv 
  ..FlashFXP: set %defnfosh echo | fxp 
  .Visible 
  ..BiG-ONE: nstats 
  ..Stats: nfo 
  ..Operating System: sys 
  ..UpTime: uptime 
  ..MeM: mem 
  ..CpU: cpu 
  ..Free FTP Space: ftp 
  ..Free Space: hdd 
  ..Dialup: dialup 
  ..Display: display 
  ..Network: net 
  ..Sound Card: sound 
  ..MBM5(Must Be Installed): mbm 
  ..Bandwidth: du 
  ..Get-Send: gs 
  ..Power: powa 
  ..Servers: srv 
  ..FlashFXP: fxp 
  .- 
  .Configuration:dialog -m defconf defconf 
  .- 
  .Advertise:say %col2 [-> NfO System $readini(defnfo.ini, nfo, version) www.defcode.org <-] 
  .Unload Script: echo Uninstall In Progress.... | /unload -rs defnfo.mrc 
} 
dialog defconf { 
  size -1 -1 260 330 
  title "NfO Configurator" 
  box "FTP Drive Letter", 1, 0 5 130 50 
  text "Drive Letter:", 2, 0 27 90 60, right 
  edit "", 4, 95 25 20 20, center, limit 1 
  text "CTRL+K", 16, 150 15 90 60, center 
  text "For The Colors", 17, 150 30 90 60, center 
  box "1st Script Color", 6, 0 55 130 50 
  text "Color Number:", 7, 0 77 90 60, right 
  edit "", 8, 95 75 20 20, center, limit 2 
  box "2nd Script Color", 10, 130 55 130 50 
  text "Color Number:", 11, 130 77 90 60, right 
  edit "", 12, 225 75 20 20, center, limit 2 
  box "FlashFXP Stats.dat file Path", 18, 0 105 260 50 
  text "Path:", 19, 20 127 90 60, left 
  edit "", 22, 50 125 150 20, center, autohs 
  button "Browse", 21, 205 125 40 20, 
  box "Sound Card", 23, 0 155 260 50 
  combo 24, 5 175 250 20, center, drop 
  box "Graphic Card", 25, 0 205 260 50 
  combo 26, 5 225 250 20, center, drop 
  box "Monitor", 27, 0 255 260 50 
  combo 28, 5 275 250 20, center, drop 
  button "Save", 14, 0 310 130 20, 
  button "Quit", 15, 130 310 130 20, ok 
} 
on *:dialog:defconf:*:*:{ 
  if  ($devent == init) { 
    did -a $dname 4 $readini(defnfo.ini, nfo, ftplettre) 
    did -a $dname 8 $readini(defnfo.ini, nfo, c1) 
    did -a $dname 12 $readini(defnfo.ini, nfo, c2) 
    did -a $dname 22 $readini(defnfo.ini, nfo, fxppath) 
    set %defnfocounter 0 
    did -a $dname 24 $readini(defnfo.ini, nfo, sound) 
    while ($dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\SYSTEM\ControlSet002\Control\Class\{4D36E96C-E325-11CE-BFC1-08002BE10318}\000 $+ %defnfocounter $+ \\DriverDesc) != $null ) { 
      if ( $dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\SYSTEM\ControlSet002\Control\Class\{4D36E96C-E325-11CE-BFC1-08002BE10318}\000 $+ %defnfocounter $+ \\DriverDesc) != $readini(defnfo.ini, nfo, sound) ) did -a $dname 24 $dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\SYSTEM\ControlSet002\Control\Class\{4D36E96C-E325-11CE-BFC1-08002BE10318}\000 $+ %defnfocounter $+ \\DriverDesc) 
      %defnfocounter = $calc(%defnfocounter + 1) 
    } 
    set %defnfocounter 0  
    while ($dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\MEDIA\000 $+ %defnfocounter $+ \\DriverDesc) != $null ) { 
      if ( $dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\MEDIA\000 $+ %defnfocounter $+ \\DriverDesc) != $readini(defnfo.ini, nfo, sound) ) did -a $dname 24 $dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\MEDIA\000 $+ %defnfocounter $+ \\DriverDesc) 
      %defnfocounter = $calc(%defnfocounter + 1) 
    }  
    did -c $dname 24 1 
    set %defnfocounter 0 
    did -a $dname 26 $readini(defnfo.ini, nfo, gf) 
    while ($dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E968-E325-11CE-BFC1-08002BE10318}\000 $+ %defnfocounter $+ \\DriverDesc) != $null ) { 
      if ( $dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E968-E325-11CE-BFC1-08002BE10318}\000 $+ %defnfocounter $+ \\DriverDesc) != $readini(defnfo.ini, nfo, gf) ) did -a $dname 26 $dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E968-E325-11CE-BFC1-08002BE10318}\000 $+ %defnfocounter $+ \\DriverDesc) 
      %defnfocounter = $calc(%defnfocounter + 1) 
    } 
    if ($dll($mircdir $+ moo.dll,gfxinfo,_) != -1 && $dll($mircdir $+ moo.dll,gfxinfo,_) != $readini(defnfo.ini, nfo, gf)) did -a $dname 26 $dll($mircdir $+ moo.dll,gfxinfo,_) 
    did -c $dname 26 1 
    set %defnfocounter 0 
    did -a $dname 28 $readini(defnfo.ini, nfo, mon) 
    while ($dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E96E-E325-11CE-BFC1-08002BE10318}\000 $+ %defnfocounter $+ \\DriverDesc) != $null ) { 
      if ( $dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E96E-E325-11CE-BFC1-08002BE10318}\000 $+ %defnfocounter $+ \\DriverDesc) != $readini(defnfo.ini, nfo, mon) ) did -a $dname 28 $dll($mircdir $+ registry.dll,GetKeyValue, [ 1 ] HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E96E-E325-11CE-BFC1-08002BE10318}\000 $+ %defnfocounter $+ \\DriverDesc) 
      %defnfocounter = $calc(%defnfocounter + 1) 
    } 
    did -c $dname 28 1 
    unset %defnfocounter 
  } 
  if ($devent == sclick) { 
    if ($did == 14) { 
      writeini defnfo.ini nfo ftplettre $did($dname,4) 
      writeini defnfo.ini nfo c1  $did($dname,8) 
      writeini defnfo.ini nfo c2  $did($dname,12) 
      writeini defnfo.ini nfo fxppath  $did($dname,22) 
      writeini defnfo.ini nfo sound  $did($dname,24) 
      writeini defnfo.ini nfo gf  $did($dname,26) 
      writeini defnfo.ini nfo mon  $did($dname,28) 
    } 
    if ($did == 21) { did -r $dname 22 | did -a $dname 22 $sfile($mircdir,Select Stats.Dat File,Oki) } 
  } 
} 
alias defcf { 
  dialog -m defconf defconf 
} 
alias defnfocolsh { 
  if (%defnfosh == $null) { set %defnfosh say } 
  set %defnfocol1 $+ $readini(defnfo.ini, nfo, c1) 
  set %defnfocol2 $+ $readini(defnfo.ini, nfo, c2) 
} 
alias nstats { 
  defnfocolsh 
  set %defnfoftplettre $readini(defnfo.ini, nfo, ftplettre) 
  if ($round($calc(($disk(%defnfoftplettre).free)/1048576),2) > 1) { set %defnfodisk1 $round($calc(($disk(%defnfoftplettre).free)/1073741824),2) $+ GB $+ / $+ $round($calc(($disk(%defnfoftplettre).size)/1073741824),2) $+ GB } 
  set %defnfoCG $readini(defnfo.ini, nfo, gf) 
  set %defnfoCS $readini(defnfo.ini, nfo, sound) 
  %defnfosh %defnfocol1 [Os] %defnfocol2 $dll($mircdir $+ moo.dll,osinfo,_) %defnfocol1 [Current Uptime] %defnfocol2 $duration($calc($ticks /1000)) %defnfocol1 [Mem] %defnfocol2 $dll($mircdir $+ moo.dll,meminfo,_) %defnfocol1 [Cpu] %defnfocol2 $dll($mircdir $+ moo.dll,cpuinfo,_) %defnfocol1 [Free FTP Space] %defnfocol2 %defnfodisk1 %defnfocol1 [Resolution] %defnfocol2 $dll($mircdir $+ moo.dll,screeninfo,_) %defnfocol1 [Graphic Card] %defnfocol2 %defnfoCG %defnfocol1 [Sound Card] %defnfocol2 %defnfoCS %defnfocol1 [Version] %defnfocol2 NfO System $readini(defnfo.ini, nfo, version) 
  unset %defnfo* 
} 
alias nfo { 
  defnfocolsh 
  set %defnfoftplettre $readini(defnfo.ini, nfo, ftplettre) 
  if ($round($calc(($disk(%defnfoftplettre).free)/1048576),2) > 1) { set %defnfodisk1 $round($calc(($disk(%defnfoftplettre).free)/1073741824),2) $+ GB $+ / $+ $round($calc(($disk(%defnfoftplettre).size)/1073741824),2) $+ GB } 
  %defnfosh %defnfocol1 [Os] %defnfocol2 $dll($mircdir $+ moo.dll,osinfo,_) %defnfocol1 [Current Uptime] %defnfocol2 $duration($calc($ticks /1000)) %defnfocol1 [Mem] %defnfocol2 $dll($mircdir $+ moo.dll,meminfo,_) %defnfocol1 [Cpu] %defnfocol2 $dll($mircdir $+ moo.dll,cpuinfo,_) %defnfocol1 [Free FTP Space] %defnfocol2 %defnfodisk1 %defnfocol1 [Version] %defnfocol2 NfO System $readini(defnfo.ini, nfo, version) 
  unset %defnfo* 
} 
alias sys { 
  defnfocolsh 
  %defnfosh %defnfocol1 [Os] %defnfocol2 $dll($mircdir $+ moo.dll,osinfo,_) %defnfocol1 [Installed For] %defnfocol2 $duration($calc($ctime - $file($defnfospecialdir(win) $+ \Setuplog.txt).mtime) ) 
  unset %defnfo* 
} 
alias uptime { 
  defnfocolsh 
  uptimer 
  if ( $readini(defnfo.ini, nfo, record) == $null ) { writeini defnfo.ini nfo record 0 } 
  %defnfosh %defnfocol1 [Current Uptime] %defnfocol2 $duration($calc($ticks /1000)) %defnfocol1 [Record Uptime] %defnfocol2 $duration($calc($readini(defnfo.ini, nfo, record) /1000)) 
  unset %defnfo* 
} 
alias uptimer { 
  if ($readini(defnfo.ini, nfo, record) == $null) { 
    writeini defnfo.ini nfo record $ticks 
  } 
  if ( $ticks > $readini(defnfo.ini, nfo, record) ) { 
    writeini defnfo.ini nfo record $ticks 
  } 
} 
alias mem { 
  defnfocolsh 
  %defnfosh %defnfocol1 [Mem] %defnfocol2 $dll($mircdir $+ moo.dll,meminfo,_) 
  unset %defnfo* 
} 
alias cpu { 
  defnfocolsh 
  %defnfosh %defnfocol1 [Cpu] %defnfocol2 $dll($mircdir $+ moo.dll,cpuinfo,_) 
  unset %defnfo* 
} 
alias ftp { 
  defnfocolsh 
  set %defnfoftplettre $readini(defnfo.ini, nfo, ftplettre) 
  if ($round($calc(($disk(%defnfoftplettre).free)/1048576),2) > 1) { set %defnfodisk1 $round($calc(($disk(%defnfoftplettre).free)/1073741824),2) $+ GB $+ / $+ $round($calc(($disk(%defnfoftplettre).size)/1073741824),2) $+ GB } 
  %defnfosh %defnfocol1 [Free FTP Space] %defnfocol2 %defnfodisk1 
  unset %defnfo* 
} 
alias hdd { 
  defnfocolsh 
  set %defnfohdd 1 
  set %defnfohddletters cdefghijklmnopqrstuvwxyz 
  while ( %defnfohdd != 25 ) { 
    set %defnfocurrletter $mid(cdefghijklmnopqrstuvwxyz,%defnfohdd,1)      
    if ($round($calc(($disk(%defnfocurrletter).free)/1048576),2) > 1) { set %defnfodisk $+ %defnfohdd ( $+ $upper(%defnfocurrletter) $+ : $round($calc(($disk(%defnfocurrletter).free)/1073741824),2) $+ GB $+ / $+ $round($calc(($disk(%defnfocurrletter).size)/1073741824),2) $+ GB) } 
    set %defnfohdd $calc(%defnfohdd + 1) 
    set %defnfodisk251 $calc(%defnfodisk251 + $disk(%defnfocurrletter).free) 
    set %defnfodisk261 $calc(%defnfodisk261 + $disk(%defnfocurrletter).size) 
  } 
  set %defnfodisk25 $calc(%defnfodisk251 / 1073741824) 
  set %defnfodisk26 $calc(%defnfodisk261 / 1073741824) 
  %defnfosh %defnfocol1 [Free Space] %defnfocol2 %defnfodisk1 %defnfodisk2 %defnfodisk3 %defnfodisk4 %defnfodisk5 %defnfodisk6 %defnfodisk7 %defnfodisk8 %defnfodisk9 %defnfodisk10 %defnfodisk11 %defnfodisk12 %defnfodisk13 %defnfodisk14 %defnfodisk15 %defnfodisk16 %defnfodisk17 %defnfodisk18 %defnfodisk19 %defnfodisk20 %defnfodisk21 %defnfodisk22 %defnfodisk23 %defnfodisk24 %defnfocol1 [Total Free Space] %defnfocol2 $round( %defnfodisk25 ,2 ) $+ GB %defnfocol1 [Total Storage Space] %defnfocol2 $round( %defnfodisk26 ,2 ) $+ GB 
  unset %defnfo* 
} 
alias dialup { 
  defnfocolsh 
  if ($dll($mircdir $+ moo.dll,connection,_) != -1) %defnfosh %defnfocol1 [Dialup] %defnfocol2 $dll($mircdir $+ moo.dll,connection,_) 
  else %defnfosh %defnfocol1 [Dialup] %defnfocol2 none detected 
  unset %defnfo* 
} 
alias display { 
  defnfocolsh 
  set %defnfoMon $readini(defnfo.ini, nfo, mon) 
  set %defnfoCG $readini(defnfo.ini, nfo, gf) 
  %defnfosh %defnfocol1 [Monitor] %defnfocol2 %defnfoMon %defnfocol1 [Graphic Card] %defnfocol2 %defnfoCG %defnfocol1 [Resolution] %defnfocol2 $dll($mircdir $+ moo.dll,screeninfo,_) 
  unset %defnfo* 
} 
alias net { 
  defnfocolsh 
  if ($dll($mircdir $+ moo.dll,interfaceinfo,_) != -1)  %defnfosh %defnfocol1 [NetWork] %defnfocol2 $dll($mircdir $+ moo.dll,interfaceinfo,_) 
  else %defnfosh %defnfocol1 [NetWork] %defnfocol2 none detected 
  unset %defnfo* 
} 
alias sound { 
  defnfocolsh 
  set %defnfoCS $readini(defnfo.ini, nfo, sound) 
  %defnfosh %defnfocol1 [Sound Card] %defnfocol2 %defnfoCS 
  unset %defnfo* 
} 
alias mbm { 
  defnfocolsh 
  set %defnfocounter 1 
  set %defnfostatus 1 
  while (%defnfocounter <= 31) { 
    if ($dll($mircdir $+ mbm.dll,gettemp,%defnfocounter) < 255) && ($dll($mircdir $+ mbm.dll,gettemp,%defnfocounter) > 0) { set %defnfocpus %defnfocpus [CpU ( $+  %defnfocounter $+ )] %defnfocol2 $dll($mircdir $+ mbm.dll,gettemp,%defnfocounter) $+ °C %defnfocol1 } 
    else { set %defnfostatus $calc(%defnfostatus + 1) } 
    set %defnfocounter $calc(%defnfocounter + 1)    
  } 
  set %defnfocounter 48 
  set %defnfocounter2 1 
  while (%defnfocounter <= 63) { 
    if ($dll($mircdir $+ mbm.dll,gettemp,%defnfocounter) > 0) && ($dll($mircdir $+ mbm.dll,gettemp,%defnfocounter) != 255) { set %defnfofans %defnfofans [Fan ( $+  %defnfocounter2 $+ )] %defnfocol2 $dll($mircdir $+ mbm.dll,gettemp,%defnfocounter) $+ RPM %defnfocol1 } 
    else { set %defnfostatus $calc(%defnfostatus + 1) } 
    set %defnfocounter $calc(%defnfocounter + 1)    
    set %defnfocounter2 $calc(%defnfocounter2 + 1)    
  } 
  if ($dll($mircdir $+ mbm.dll,gettemp,0) < 255) && ($dll($mircdir $+ mbm.dll,gettemp,0) > 0) { set %defnfomboard [MotherBoard] %defnfocol2 $dll($mircdir $+ mbm.dll,gettemp,0) $+ °C %defnfocol1 } 
  else { set %defnfostatus $calc(%defnfostatus + 1) } 
  if ( %defnfostatus == 49 ) { set %defnfomboard MotherBoard Monitor Not Loaded Or Wrongly Configured | set %defnfosh echo } 
  %defnfosh %defnfocol1 %defnfomboard %defnfocpus %defnfofans 
  unset %defnfo* 
} 
alias du { 
  defnfocolsh 
  set %defnfoup  1 
  set %defnfocounter 1 
  while (%defnfocounter <= $send(0)) { 
    set %defnfoup $calc(%defnfoup + $send(%defnfocounter).cps) 
    set %defnfocounter $calc(%defnfocounter + 1) 
  } 
  set %defnfodown 1 
  set %defnfocounter 1 
  while (%defnfocounter <= $get(0)) { 
    set %defnfodown $calc(%defnfodown + $get(%defnfocounter).cps) 
    set %defnfocounter $calc(%defnfocounter + 1) 
  } 
  %defnfosh %defnfocol1 %defnfocol1 [Dcc Download] %defnfocol2 $bytes(%defnfodown,k2) $+ k/s %defnfocol1 [Dcc Upload] %defnfocol2 $bytes(%defnfoup,k2) $+ k/s 
  unset %defnfo* 
} 
alias powa { 
  defnfocolsh 
  set %defnfoochan 0 
  set %defnfopchan 0 
  set %defnfocounter 1 
  set %defnfotchan 0 
  while (%defnfocounter <= $scon(0)) { 
    set %defnfocchan 0 
    scon %defnfocounter 
    set %defnfotchan $calc(%defnfotchan + $chan(0)) 
    while (%defnfocchan <= $chan(0)) { 
      if ($me isop $chan(%defnfocchan)) { 
        set %defnfoochan $calc(%defnfoochan + 1) 
        set %defnfopchan $calc(%defnfopchan + $nick($chan(%defnfocchan),0,a,o)) 
      } 
      set %defnfocchan $calc(%defnfocchan + 1) 
    } 
    set %defnfocounter $calc(%defnfocounter + 1) 
  } 
  scon -r 
  %defnfosh %defnfocol1 [I'm Op in] %defnfocol2 %defnfoochan of %defnfotchan channel(s) %defnfocol1 [Over] %defnfocol2 $scon(0) network(s) %defnfocol1 [and I'm GOD for] %defnfocol2 %defnfopchan user(s) 
  unset %defnfo* 
} 
alias gs { 
  if (( $send(0) != 0 ) || ( $get(0) != 0 )) { 
    defnfocolsh 
    set %defnfoup  1 
    set %defnfocounter 1 
    set %defnfoupsize 0 
    set %defnfoupspeed 0 
    while (%defnfocounter <= $send(0)) { 
      set %defnfoup $send(%defnfocounter).cps 
      set %defnfoupt $calc(((($round($calc($send(%defnfocounter).size),2)) - ($round($calc($send(%defnfocounter).sent),2)))/1024)) 
      set %defnfoupsize $calc(%defnfoupsize + $round($calc(($send(%defnfocounter).size /1024)/1024),2)) 
      set %defnfoupspeed $calc(%defnfoupspeed + $bytes(%defnfoup,k2)) 
      %defnfosh %defnfocol1 [Upload N°] %defnfocol2 %defnfocounter %defnfocol1 [Sending] %defnfocol2 $send(%defnfocounter).file ( $+ $round($calc(($send(%defnfocounter).size /1024)/1024),2) $+ MB $+ ) %defnfocol1 [To] %defnfocol2 $send(%defnfocounter) %defnfocol1 [At] %defnfocol2 $bytes(%defnfoup,k2) $+  k/s %defnfocol1 [Average] %defnfocol2 $round($calc((($send(%defnfocounter).sent)/1024) / $send(%defnfocounter).secs),2) $+ k/s %defnfocol1 [Left] %defnfocol2 $calc(($round($calc((($send(%defnfocounter).size)/1024)/1024),2)) - ($round($calc((($send(%defnfocounter).sent)/1024)/1024),2))) $+ MB ( $+ $calc(100 - $send(%defnfocounter).pc) $+ % $+ ) $duration($calc(%defnfoupt /(%defnfoup / 1024))) 
      set %defnfocounter $calc(%defnfocounter + 1) 
    } 
    set %defnfodown 1 
    set %defnfocounter 1 
    set %defnfodownsize 0 
    set %defnfodownspeed 0 
    set %defnfodownspeeda 0 
    while (%defnfocounter <= $get(0)) { 
      set %defnfodown $get(%defnfocounter).cps 
      set %defnfodownt $calc(((($round($calc($get(%defnfocounter).size),2)) - ($round($calc($get(%defnfocounter).rcvd),2)))/1024)) 
      set %defnfodownsize $calc(%defnfodownsize + $round($calc(($get(%defnfocounter).size /1024)/1024),2)) 
      set %defnfodownspeed $calc(%defnfodownspeed + $bytes(%defnfodown,k2)) 
      %defnfosh %defnfocol1 [Download N°] %defnfocol2 %defnfocounter %defnfocol1 [Receiving] %defnfocol2 $get(%defnfocounter).file ( $+ $round($calc(($get(%defnfocounter).size /1024)/1024),2) $+ MB $+ ) %defnfocol1 [From] %defnfocol2 $get(%defnfocounter) %defnfocol1 [At] %defnfocol2 $bytes(%defnfodown,k2) $+  k/s %defnfocol1 [Average] %defnfocol2 $round($calc((($get(%defnfocounter).rcvd)/1024) / $get(%defnfocounter).secs),2) $+ k/s %defnfocol1 [Left] %defnfocol2 $calc(($round($calc((($get(%defnfocounter).size)/1024)/1024),2)) - ($round($calc((($get(%defnfocounter).rcvd)/1024)/1024),2))) $+ MB ( $+ $calc(100 - $get(%defnfocounter).pc) $+ % $+ ) $duration($calc(%defnfodownt /(%defnfodown / 1024))) 
      set %defnfocounter $calc(%defnfocounter + 1) 
    } 
    %defnfosh %defnfocol1 [Total Downloading] %defnfocol2 %defnfodownsize $+ MB %defnfocol1 [At] %defnfocol2 %defnfodownspeed $+ k/s %defnfocol1 [Total Uploading] %defnfocol2 %defnfoupsize $+ MB %defnfocol1 [At] %defnfocol2 %defnfoupspeed $+ k/s %defnfocol1 [Total Bandwith] %defnfocol2 $calc(%defnfoupspeed + %defnfodownspeed) k/s 
    unset %defnfo* 
  } 
} 
alias srv { 
  defnfocolsh 
  set %defnfocounter 1 
  set %defnfocmdcnet set % $+ defnfocnet $!network 
  set %defnfocmdcserv set % $+ defnfocserv $!server 
  set %defnfocmdcservport set % $+ defnfocservport $!port 
  while (%defnfocounter <= $scon(0)) { 
    scon %defnfocounter %defnfocmdcnet 
    scon %defnfocounter %defnfocmdcserv 
    scon %defnfocounter %defnfocmdcservport 
    %defnfosh %defnfocol1 [Network N°] %defnfocol2 %defnfocounter %defnfocol1 [Name] %defnfocol2 %defnfocnet %defnfocol1 [Server] %defnfocol2 %defnfocserv %defnfocol1 [Port] %defnfocol2 %defnfocservport 
    set %defnfocounter $calc(%defnfocounter + 1) 
  } 
  unset %defnfo* 
} 
alias fxp { 
  set %defnfofxppath $readini(defnfo.ini, nfo, fxppath) 
  if ( $right(%defnfofxppath,9) == Stats.dat ) { 
    defnfocolsh 
    set %defnfofxpt $asctime($int($calc(($readini(%defnfofxppath, #Total#, LR) - 25569)*86400)),dd-mm-yyyy) 
    set %defnfofxpx $calc($round($calc($readini(%defnfofxppath, #Total#, X)/1048576),2)) 
    set %defnfofxpu $calc($round($calc($readini(%defnfofxppath, #Total#, FU)/1048576),2)) 
    set %defnfofxpd $calc($round($calc($readini(%defnfofxppath, #Total#, FD)/1048576),2)) 
    %defnfosh %defnfocol1 [FlashFXP Stats] %defnfocol2 %defnfofxpt %defnfocol1 [Total Fxped] %defnfocol2 %defnfofxpx $+ MB %defnfocol1 [Total Uploaded] %defnfocol2 %defnfofxpu $+ MB %defnfocol1 [Total Downloaded] %defnfocol2 %defnfofxpd $+ MB 
  } 
  else { %defnfosh %defnfocol1 [FlashFXP Stats] %defnfocol2 FlashFXP not set or wrong file selected try to reconfigure } 
  unset %defnfo* 
} 
;Folowing function gathered from forum @ mIRC.com 
alias defnfospecialdir { 
  if $findtok(win sys temp,$1,32) { var %a = sd $+ $ticks, %b = %a $+ d, %c = $ifmatch - 1 } 
  else return 
  .comopen %a Scripting.FileSystemObject 
  if $comerr { return <error> } 
  .comclose %a $com(%a,GetSpecialFolder,1,uint,%c,dispatch* %b) $com(%b,Path,2) 
  %a = $com(%b).result 
  .comclose %b 
  return %a 
}