alias _ych return #DJ

;-- burayý kafana gore duzenle, duzenlettir
on *:text:*:#:{
  if ($chan == $_ych) {
    if ($chr(64) isin $1 && yt isin $1) {
      _yt $2-
      msg $_ych ok, 1sn.
    }
  }
}
 
alias _yt { %yts.s = $replace($2-,$chr(32),+,&,%26) | sockclose ytsearch | sockopen ytsearch 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
80 }
on *:sockopen:ytsearch:{
  sockwrite -nt $sockname GET /results?search_query= $+ %yts.s HTTP/1.1
  sockwrite -nt $sockname Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.1 (KHTML, like Gecko) Chrome/21.0.1180.60 Safari/537.1
  sockwrite -nt $sockname $crlf
}
 
on *:sockread:ytsearch:{
  var %_a | sockread %_a
  if ($regex(%_a,/<a aria-hidden="true" href="\/watch\?v=(.*)"/$i) == 1) { yclink $remove($token($regml(1),1,32),") | sockclose $sockname | halt }
  if (*No Videos found* iswm %yts.temp) { sockclose ytsearch | unset %yts.* | halt }
  if (*start search results* iswm %yts.temp) { %yts.searchres = 0  }  
}
 
alias trchra return $replace($1-,Ö,ö,Ç,ç,Ä°,i,ö,ö,ç,ç,ü,ü,ÅŸ,þ,ı,ý,Åž,þ,ÄŸ,ð,Ãœ,ü,Äž,ð,$chr(39),-)
alias _html {
  var %x, %i =  $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/gi,$null,%x),  %x = $remove(%x,&nbsp;,    )
  return %x
}
alias yclink {
  if (!$sock(spor)) {  
    var %yclink $1-,%yclink2 $remove(%yclink,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
set -eu10 %_vp $left(%yclink2,11)
    sockopen spor 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
80
    sockmark spor msg $_ych
  }
}
On *:sockopen:spor:{
  Sockwrite -n $sockname GET $+(/a/itemInfo/?video_id=,%_vp,&ac=
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
HTTP/1.1
  Sockwrite -n $sockname host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
Sockwrite -n $sockname $crlf
}
On *:sockread:spor:{
  var %_w | sockread %_w
  if $regex(%_w,/("h": "(.*)")/i) { var %_ha = $remove($regml(1),"h",:,") }
  if $regex(%_w,/("title": "(.*)")/i) { var %_tit = $remove($regml(1),"title",:,") }
  if $regex(%_w,/("image": "(.*)")/i) { 
    var %_img = $remove($regml(1),"image",:,") 
    $sock($sockname).mark 6• [You0,4tube] - 2Þarký ADI : $trchra($gettok(%_tit,1,44))
    $sock($sockname).mark 6• [You0,4tube] - 5Þarký Resmi : $replace($gettok(%_img,1,44),http//,http://)
    $sock($sockname).mark 6• [You0,4tube] - 5Dinlemek için :12 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
1 1 sockclose spor
}