on *:sockopen:*:{
  if ($sockname == tvrage_year) {
    sockwrite -n tvrage_year GET http://www.tvrage.com/quickinfo.php?show= $+ %tvrage.temp
  }
  if ($sockname == tvrage_country) {
    sockwrite -n tvrage_country GET http://www.tvrage.com/quickinfo.php?show= $+ %tvrage.temp
  }
  if ($sockname == tvrage_type) {
    sockwrite -n tvrage_type GET http://www.tvrage.com/quickinfo.php?show= $+ %tvrage.temp
  }
}
on *:sockread:tvrage_*:{
  if ($sockname == tvrage_year) {
    var %temptext | sockread %temptext | tvrage_ $replace($replace(%temptext,@,$chr(32)),^,$chr(32))
  }
  if ($sockname == tvrage_country) {
    var %temptext | sockread %temptext | tvrage_ $replace($replace(%temptext,@,$chr(32)),^,$chr(32))
  }
  if ($sockname == tvrage_type) {
    var %temptext | sockread %temptext | tvrage_ $replace($replace(%temptext,@,$chr(32)),^,$chr(32))
  }
}
alias tvai {
  var %a $1
  set %tvrage.temp $replace($2-,$chr(32),+)
  sockopen tvrage_ $+ %a http://www.tvrage.com 80
}
alias tvrage_ {
  if (Premiered == $1) {
    set %tvrage.auto.info.year $2-
    echo -a %tvrage.auto.info.year
  }
  if (Country == $1) {
    set %tvrage.auto.info.country $2-
    echo -a %tvrage.auto.info.country
  }
  if (Classification == $1) {
    set %tvrage.auto.info.type $2-
    echo -a %tvrage.auto.info.type
  }
  else { halt }
}