on *:TEXT:*youtube.com/watch?v=*:#: {
set %tmpx $strip($remove($1,http://,youtube,.com,www.))
set %yt.temp.chan $chan
sockopen youtube youtube.com 80
}

on *:SOCKOPEN:youtube:{
  ; connection
  sockwrite -n $sockname GET %tmpx HTTP/1.1
  ; Write Connection Details
  sockwrite -n $sockname User-Agent: IRCSpider/mIRC $version
   sockwrite -n $sockname Host: www.youtube.com
 sockwrite -n $sockname Referer: $server
   sockwrite -n $sockname Accept: *.*, */*
  sockwrite -n $sockname Content-Type: text/html
   sockwrite -n $sockname Connection: Keep-Alive
   sockwrite -n $sockname $crlf
}
 sockread %mirc.temp
 on *:SOCKREAD:youtube:{
var %yt.temp
sockread %yt.temp
  if (<meta name="title" content=" isin %mirc.temp) {
     msg %yt.temp.chan  [YouTube] $remove($replace(%mirc.temp, &quot;, ", &amp;, &, &quot;, "),<meta name="title" content=",">)
}
}