Miscellany

; Scroll down to alias tv.trade and edit that info 
on *:TEXT:*:#tests:{
  if (($nick == lance)) && ((AutoNuke == $me)) {
    var %release = $strip($remove($4,[,])))
    echo -a  %release
    unset %tv.*
    unset %show_*
    var %strip = $strip($3-)
    if (tv-xvid isin %strip) {
      if (sample isin %strip) { return } 
      else {
        if (backfill isin %section) { return }
        else {
          window -g1 @Nukes
          echo @Nukes $timestamp 4[0TV-NEW4] 15:: 14Release:15 $gettok(%strip,2,32)
          if ($regex($gettok(%strip,2,32),/(.*?)\.S\d\d?E\d\d/i) > 0) {
            tvrage $regml(1) $gettok(%strip,2,32) $remove($gettok(%strip,1,32),$chr(91),$chr(93))
          }
        }
      }
    }
  }
}

alias tvrage { 
  unset %tvrage*
  %tvrage = $replace($1,$chr(46),% $+ 20)
  set %tv.release $2
  set %tv.section $3
  sockopen tvrage http://www.tvrage.com 80
}

on *:sockopen:tvrage:{
  sockwrite tvrage GET $+(http://www.tvrage.com/quickinfo.php?show=, %tvrage,$crlf) HTTP/1.1
  sockwrite -n tvrage Host: $+(www.tvrage.com,$crlf,$crlf)
}
on *:sockread:tvrage:{
  if ($sockerr) { return }
  var %tvdata
  sockread %tvdata
  if (show name isin %tvdata) { set %show_name $gettok(%tvdata,2,64) }
  if (country isin %tvdata) { set %show_country $gettok(%tvdata,2,64) }
  if (genre isin %tvdata) { set %show_genre $gettok(%tvdata,2,64) } 
  if (classification isin %tvdata) { set %show_class $gettok(%tvdata,2,64) } 
  if (!sockbr) { return } 
}
on *:sockclose:tvrage:{
  echo @Nukes $timestamp 4[0TV-INFO4] 15:: 14Show:15 %show_name 4• 14Country:15 %show_country 4• 14Genre:15 %show_genre 4• 14Classification:15 %show_class
  if (%show_class isin $readini(banned-tv.ini,tv-shows,banned)) { msg #tests 4=[0NUKE WARNING4]=  4[8 %show_class 4SHOWS NOT ALLOWED IN TV-XVID ]    =[0 30 SECONDS TILL NUKE X5 4 ]=
    { goto nuke } 

    :NUKE  
    .timer $+ mpd-tv-nuke 1 1 msg #tests !nuke %rlsname

  }
}