MSN Stats

Contributed by Mota_boy Plain text version, right-click and "Save As".
Snippet to get a few stats from MSN messenger using COM objects. It retrieves the nick, e-mail being used, service provider and status.
;usage
;
;/msnstats -e to echo
;/msnstats channel/nick to message a channel or nick

alias MSNstats {
  .comopen msn Messenger.UIAutomation
  if ($comerr) { return ERR }
  var %a = $com(msn,MyStatus,2)
  var %b = $com(msn).result
  var %a = $com(msn,MyFriendlyName,2)
  var %c = $com(msn).result
  var %a = $com(msn,MySigninName,2)
  var %d = $com(msn).result
  var %a = $com(msn,MyServiceName,2)
  var %e = $com(msn).result
  .comclose msn
  if (%b == 1) { var %b = Offline }
  elseif (%b == 2) { var %b = Online }
  elseif (%b == 6) { var %b = Invisible }
  elseif (%b == 10) { var %b = Busy }
  elseif (%b == 14) { var %b = Be Right Back }
  elseif (%b == 18) { var %b = Idle }
  elseif (%b == 34) { var %b = Away }
  elseif (%b == 50) { var %b = On the Phone }
  elseif (%b == 66) { var %b = Out for Lunch }
  if (%b == offline) {
   $iif($1 == -e,echo,msg $1) MSN Messenger: Currently Offline! - 4[astr0-z0mbie4]
  }
  else {
   $iif($1 == -e,echo,msg $1) MSN Messenger: [Nickname: %c $+ ]  [E-mail: %d $+ ] [Service Provider: %e $+ ] [Status: %b $+ ] - 4[astr0-z0mbie4]
  }
}