Untitled

on *:load:{
  set %wow.default Greymane
}
on *:text:!wowstatus*:#:{
  if (%wow.channel == $null) {
    set -u20 %wow.channel $chan
    if ($2- == $null) {
      set %wow.server %wow.default
    }
    else {
      set %wow.server $2-
    }
    sockopen wowstatus www.worldofwarcraft.com 80
  }
}
on *:sockopen:wowstatus:{
  sockwrite -n $sockname GET /realmstatus/index.xml
  sockwrite -n $sockname $crlf
}
on *:sockread:wowstatus:{
  if ($sockerr > 0) return
  :nextread
  sockread %temp
  echo -a %temp
  if ($sockbr == 0) return
  if ($replace(%wow.server,',') isin %temp) {
    if (Realm Up isin %temp) {
      msg %wow.channel $upper($mid(%wow.server,1,1)) $+ $mid(%wow.server,2,$len(%wow.server)) is up!
      sockclose $sockname
      unset %temp
      unset %wow.server
      unset %wow.channel
      return
    }
    elseif (Realm Down isin %temp) {
      msg %wow.channel $upper($mid(%wow.server,1,1)) $+ $mid(%wow.server,2,$len(%wow.server)) is down!
      sockclose $sockname
      unset %temp
      unset %wow.server
      unset %wow.channel
      return
    }
  }
  goto nextread
}