Something

;This section filters the ircchan channel
;It COPIES all COMPLETE lines for TV-XVID and TV-HR to a new Window called @TV
ON *:TEXT:*:#ircchan:{
  if (COMPLETE in TV-XVID: isin $strip($1-) || COMPLETE in TV-HR: isin $strip($1-) || COMPLETE in TV-X264: isin $strip($1-) ) {
    if ((The.Office isin $1-) || (House isin $1-) || (Numb3rs isin $1-) || (Shark isin $1-) || (CSI isin $1-) || (Amazing.Race isin $1-) || (Bones isin $1-) || (Criminal.Minds isin $1-) || (Heroes isin $1-) || (Jericho isin $1-) || (Lost isin $1-) || (My.Name.Is.Earl. isin $1-) || (Prison.Break isin $1-) || (Studio.60.on. isin $1-) || (The.Unit isin $1-) || (Vanished isin $1-) ) {
      /window -k0 @TV 10 0 3200 300
      var %msg
      %msg = $+($chr(40),$asctime(ddd HH:nn),$chr(41),$chr(3),7,$chr(32),$1-) 
      /aline -p @TVtest %msg
    }
  }
}
;This script cleans up ircchan-pre. I only care about TV releases so thats all it shows.
;If you like ircchan-pre as is, then erase this whole section
ON ^*:TEXT:*:#ircchan-pre:{
  if $3 != TV && ((The.Office !isin $1-) || (House !isin $1-) || (Numb3rs !isin $1-) || (Shark !isin $1-) || (CSI !isin $1-) || (Amazing.Race !isin $1-) || (Bones !isin $1-) || (Criminal.Minds !isin $1-) || (Heroes !isin $1-) || (Jericho !isin $1-) || (Lost !isin $1-) || (My.Name.Is.Earl. !isin $1-) || (Prison.Break !isin $1-) || (Studio.60.on. !isin $1-) || (The.Unit !isin $1-) || (Vanished !isin $1-) ) {
    halt
  } 
}