alias wotrodb {
  if $1 {
    set %wotro.search $1-
    sockopen wotrodb wotro.kicks-ass.org 80
    echo -cs info -
    echo -cs info WoTRO Database - Searching Mobs for: $1-
  }
}

alias -l wotro.die { sockclose wotrodb | unset %wotro.* | echo -cs info End of Results | echo -cs info - }

alias -l wotro.address { return $+(http://fidsah.kicks-ass.org/php/mob.php?search=,$replace($1-,$chr(32),+),&mIRC=1) }

on *:sockopen:wotrodb:{ 
  sockwrite -n $sockname GET $wotro.address(%wotro.search) HTTP/1.1 
  sockwrite -n $sockname Host: fidsah.kicks-ass.org $+ $crlf $+ $crlf
}

on *:sockread:wotrodb:{
  ;this will trigger when the website cant be reached 
  if $sockerr { echo -s Socket Error: $sockerr | halt }
  else {
    .var %wotro.raw
    ;    sockread the result, line by line into %wotro.raw
    sockread %wotro.raw
    ;    uncomment the following line to see the entire receieved data, for debugging.
    if %wotro.raw != $null { 
      tokenize 32 %wotro.raw
      if $1 = Name: { echo -cs info2 $1- }
    }

    /*
    This is where you add your code
    */

  }
  if </html> isin %wotro.raw { 
    wotro.die 
    halt 
  }
  echo -cs info2 -
}